This should play if your Web browser has WebAssembly enabled (most do). Most examples will play unless they need to load files. The first time you click Play, Csound will spend a few seconds loading, then play. You can edit this code and replay it.
; Select audio/midi flags here according to platform -odac ;;;realtime audio out ;-iadc ;;;uncomment -iadc if realtime audio input is needed too ; For Non-realtime ouput leave only the line below: ; -o turnoff2.wav -W ;;; for file output any platform ; Required settings for WebAudio: sr = 48000 ksmps = 128 nchnls = 2 nchnls_i = 1 ; sr = 44100 ;samples per second for sound ; ksmps = 32 ; nchnls = 2 0dbfs = 1 ; example by Lou Cohen gisine ftgen 1, 0, 131073, 9, 1, 1, 0 ;single sine tone ;----------------------------------------- instr 2 ;start ktrigger init 0 if (ktrigger = 0) then kMultiple = 1.1 kHz = 440 kAmp = (0dbfs/10) ;startup four instances of instrument 200 event "i", 200, 0, 3000, kAmp, kHz kAmp = kAmp * 0.75 kHz = kHz * kMultiple event "i", 200, 0, 3000, kAmp, kHz kAmp = kAmp * 0.75 kHz = kHz * kMultiple event "i", 200, 0, 3000, kAmp, kHz kAmp = kAmp * 0.75 kHz = kHz * kMultiple event "i", 200, 0, 3000, kAmp, kHz kAmp = kAmp * 0.75 kHz = kHz * kMultiple ktrigger = 1 endif endin ;--------------------------------------------- instr 3 ;after 10 seconds, turn off the instruments ktrigger init 1 if (ktrigger==1) then turnoff2 200, 1, 1 ;turn off must recently started instrument instance kactive active 200 ;find out how many are still active printk2 kactive ;print mainly to show progress turnoff2 200, 0, 1 ;turn off all the rest of the instruments kactive active 200 ;find out how many are still active printk2 kactive, 10 ;print to show progress endif endin ;---------------------------------------------------- instr 200 ;play the tone kEnv linen 1, 0.1, p3, 0.1 ar oscil kEnv*p4, p5, 1 outs ar, ar print p4, p5 endin i2 0 0.1 i3 10 0.1