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.
-odac -d -m1 ; Required settings for WebAudio: sr = 48000 ksmps = 128 nchnls = 2 nchnls_i = 1 ;example by joachim heintz (& Menno Knevel) ; sr = 44100 ; ksmps = 32 ; nchnls = 2 0dbfs = 1 ;ATSA wants a mono file! ires system_i 1,{{ atsa -h.1 -c1 fox.wav fox.ats }} ; only 1 cycle and small hop size instr AllTheNoise Sfile = "fox.ats" prints "Resynthesizing with all the noise.\n" iDur ATSinfo Sfile, 7 p3 = iDur ktime line 0, iDur, iDur asig ATSaddnz ktime, Sfile, 25 outs asig, asig ;start next instr event_i "i", "NoiseInBandsOfFive", iDur+1, 1, 0 endin instr NoiseInBandsOfFive Sfile = "fox.ats" prints "Resynthesizing with noise bands %d - %d.\n", p4, p4+5 iDur ATSinfo Sfile, 7 p3 = iDur ktime line 0, iDur, iDur asig ATSaddnz ktime, Sfile, 5, p4 outs asig, asig ;start next instr if p4 < 20 then event_i "i", "NoiseInBandsOfFive", iDur+1, 1, p4+5 endif endin i "AllTheNoise" 0 1 e 25