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 realtime audio input is needed too ; For Non-realtime ouput leave only the line below: ; -o strindexk.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 seed 0 instr 1 ;get one element of the input string whenever the metro ;triggers, and call a subinstrument to play the file Smember strget p4 istrlen strlen Smember kprint init 0 ktrig metro .6 if ktrig == 1 then ;whenever the trigger gives signal kel random 0, 3.9999 ;choose a random element (0, 1 or 2) kel = int(kel) Scopy strcpyk Smember ;make a copy for leaving Smember intact kndx = 0 ;set the initial index for reading substrings kcount = 0 ;set counter for searching the element loop: ;start looping over the elements in Smember kdelim strindexk Scopy, ":" if kdelim > 0 then ;as long as ":" occurs in Scopy, do: if kel == kcount then ;if this is the element to get Sfile strsubk Scopy, kndx, kdelim ;read it as substring kprint = kprint+1 kgoto call ;and jump out else ;if not Scopy strsubk Scopy, kdelim+1, istrlen ;cut off this element from Scopy endif kcount = kcount+1 ;if no element has been found,go back to loop kgoto loop ;and look for the next element else ;if there is no delimiter left, the rest is the searched element Sfile strcpyk Scopy endif call: ;print the result, call the subinstrument and play the file printf "kel = %d, file = '%s'\n", ktrig+kprint, kel, Sfile S_call sprintfk {{i 2 0 1 "%s"}}, Sfile scoreline S_call, ktrig endif endin instr 2 ;play Sfile strget p4 ilen filelen Sfile p3 = ilen asig soundin Sfile outs asig, asig endin </CsInstruments> <CsScore> i 1 0 30 "marimba.aif:fox.wav:beats.wav:flute.aiff" e </CsScore> </CsoundSynthesizer>