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.
<CsoundSynthesizer> <CsOptions> ; Select audio/midi flags here according to platform -odac ;;;realtime audio out ;-iadc ;;;uncomment -iadc if RT audio input is needed too ; For Non-realtime ouput leave only the line below: ; -o trigseq.wav -W ;;; for file output any platform </CsOptions> <CsInstruments> ; Required settings for WebAudio: sr = 48000 ksmps = 128 nchnls = 2 nchnls_i = 1 ; sr = 44100 ; ksmps = 32 ; nchnls = 2 0dbfs = 1 giTimes ftgen 91, 0, 128, -2, 1, 1/2, 1/2, 1/8, 1/8, 1/2,1/2, 1/16, 1/16, 1/16, 1/16, 1/16, 1/16, 1/16, 1/16; times giSeq ftgen 90, 0, 128, -2, 1, 2, .5, 3, .25, 4, .10, 5, .05, 6 ;** sequence amplitude and freq-ratio bins instr 1 icps init p4 iamp init .3 kloop init p5 initndx init p6 kloop2 init p7 initndx2 init p8 kdur init p9 iminTime init p10 imaxTime init p11 kampratio init 1 kfreqratio init 1 ktime_unit expseg iminTime,p3/8,iminTime,p3* 3/4,imaxTime,p3/8,imaxTime ;**ktrig seqtime ktime_unit, kstart, kloop, initndx, kfn_times ;ktrig seqtime 1/ktime_unit, 0, 15, 0, giTimes ktrig metro ktime_unit ;**** trigseq ktrig_in, kstart, kloop, initndx, kfn_values, kout1 [, kout2, kout3, ...., koutN] trigseq ktrig, 0, kloop2,initndx2, giSeq, kampratio, kfreqratio ;atrig = ktrig*10000 schedkwhen ktrig, -1, -1, 3, 0, kdur, kampratio*iamp, kfreqratio*icps ; schedkwhen ktrig, -1, -1, 2, 0, ktrig, kampratio*iamp, kfreqratio*icps endin instr 2 icps init p4 iamp init .2 kloop init p5 initndx init p6 kloop2 init p7 initndx2 init p8 kdur init p9 iminTime init p10 imaxTime init p11 kampratio init 1 kfreqratio init 1 ktime_unit expseg iminTime,p3/8,iminTime,p3* 3/4,imaxTime,p3/8,imaxTime ;**ktrig seqtime ktime_unit, kstart, kloop, initndx, kfn_times ktrig seqtime 1/ktime_unit, 0, 15, 0, giTimes ;ktrig metro ktime_unit ;**** trigseq ktrig_in, kstart, kloop, initndx, kfn_values, kout1 [, kout2, kout3, ...., koutN] trigseq ktrig, 0, kloop2, initndx2, giSeq, kampratio, kfreqratio printk2 ktrig ;atrig = ktrig*10000 ; schedkwhen ktrig, -1, -1, 2, 0, kdur, kampratio*iamp, kfreqratio*icps schedkwhen ktrig, -1, -1, 3, 0, ktrig, kampratio*iamp, kfreqratio*icps endin instr 3 print p3 kenv expseg 1.04, p3,.04 a1 foscili p4*a(kenv-0.04), p5,1,1,kenv*5, 2 outs a1, a1 endin </CsInstruments> <CsScore> f2 0 8192 10 1 ; icps unused unused kloop2 initndx2 kdur iminTime imaxTime s i1 0 6 100 0 0 5 0 .2 3 15 i1 8 6 150 0 0 4 1 .1 4 30 i1 16 6 200 0 0 5 3 .25 8 50 i1 24 6 300 0 0 3 0 .1 1 30 i2 32 6 100 0 0 5 0 .2 1 1 i2 40 6 150 0 0 4 1 .1 .5 .5 i2 48 6 200 0 0 5 3 .25 3 .5 i2 56 6 300 0 0 5 0 .1 1 8 e </CsScore> </CsoundSynthesizer>