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 turnon.wav -W ;;; for file output any platform ; Required settings for WebAudio: sr = 48000 ksmps = 128 nchnls = 2 nchnls_i = 1 ; by Stefano Cucchi 2020 and Richard Boulanger ; sr = 44100 ; ksmps = 32 ; nchnls = 2 0dbfs = 1 gasend1 init 0 gasend2 init 0 turnon 100 turnon 101 instr 1 abar barmodel 2, 2, p4, 0.000001, 0.0103, 20, p5, p6, p7 kenvelope expseg 1, p3, .01 abar = abar * kenvelope * p8 ; NO local output gasend1 = gasend1 + abar*p8 gasend2 = gasend2 + abar*p8 endin instr 2 idenStart = p4 kdensity expseg p4, p3, 0.001 apulse mpulse 1, kdensity kenvelope expseg 1, p3, .001 apulse = apulse * kenvelope * p5 ; NO local output gasend1 = gasend1 + apulse gasend2 = gasend2 + apulse endin instr dry idryLeft = p4 idryRight = p5 kgate adsr .01,.01,1,0 outs (gasend1*kgate) * p4, (gasend2*kgate) * p5 endin instr 100 aphaser phaser1 gasend1, 4700, 1000, -0.8 arevphaser reverb aphaser, 1.618 outs arevphaser * 0.2, arevphaser * 0.2 clear gasend1 endin instr 101 afold fold gasend2, 26 adelfoldL multitap afold, 0.62, 0.52, 1.19, 0.44 adelfoldR multitap afold, 0.94, 0.64, 1.42, 0.54 outs adelfoldL * 0.5, adelfoldR * 0.5 clear gasend2 endin i2 0 6 .07 1 i "dry" 0 2 .87 .2 i1 3 4 10 0.13 300 0.3 0.8 i2 7 5 .007 1 i "dry" 7 3 .12 .86 i1 11 9 09 0.09 400 0.23 0.78 i2 15 9 .01 1 i "dry" 15 12 .94 .09 s i "dry" 0 26.9 .68 .48 ; lowered i 2 0.0 4 .07 1 i 2 0.1 4 .02 1 i 1 0.21 1 08 0.13 300 0.3 0.8 i 1 2 2 14 0.02 500 0.2 0.7 i 2 2 5 .06 0.8 ; lowered i 2 4 5 .05 0.7 ; lowered i 2 4 6 .01 0.6 ; lowered i 1 4.3 3 9 0.08 1145 0.1 0.5 ; lowered i 1 4.5 3 11 0.10 245 0.2 0.4 ; lowered i 1 8.00 7 08 0.11 125 0.1 0.6 i 1 8.01 6 28 0.13 280 0.3 0.8 i 1 8.02 5 39 0.02 600 0.2 0.7 i 1 8.03 4 39 0.02 600 0.2 0.7 i 2 8.24 18 .09 1 i 2 8.75 11 .05 1 i 2 8.99 4 .01 1 i 1 18 9 8.1 0.12 105 0.12 0.56 i 1 18.01 8 8.8 0.13 205 0.52 0.46 i 1 18.02 7 8.2 0.15 745 0.42 0.26 i 1 18.03 11 8.3 0.14 905 0.62 0.36 i "dry" 25 .85 .32 .38 i 2 25 5 .71 1 i "dry" 27 .74 .62 .68 i 2 27 6 .11 1 i "dry" 32.3 .42 .32 .38 i 2 32.3 14 .005 1 i 1 36 13 9.9 0.233 333 0.23 0.63 i 1 39 12 8.9 0.323 403 0.34 0.53 i 1 42 10 7.8 0.123 283 0.42 0.73 i 1 48.01 9 8.11 0.122 108 0.13 0.54 i 1 48.03 8 8.82 0.135 208 0.50 0.44 i 1 48.05 7 8.23 0.158 748 0.40 0.24 i 1 48.08 11 8.35 0.147 908 0.60 0.34 e 60 ; score extended to allow for reverb and multitap tails to ring out ; keeping instr 100 and instr 101 "turned on" for 60 seconds