((#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 -27.424129486083984 19.455556869506836 0.0 1.0) "(define (zop time clock zap) (play time (* 3 (adsr 0 (pick (list 0.02 0.4 0.02) clock) 0.8 4) (sample (pick (list \"MA.WAV\" \"SD2500.WAV\" \"HT.WAV\" \"LC25.WAV\" \"CL.WAV\" \"CH.WAV\") clock) 300))) (if (modeq? clock 16) (in time 0.5 zopp 0 (+ zap 1)) (in time (pick (list 0.5 0.25) clock) zop (+ clock 1) zap)))") (#(0.826685905456543 0.0 0.0 0.0 0.0 0.826685905456543 0.0 0.0 0.0 0.0 0.826685905456543 0.0 9.937207221984863 20.713424682617188 0.0 1.0) "(bootstrap (lambda () zop))") (#(0.826685905456543 0.0 0.0 0.0 0.0 0.826685905456543 0.0 0.0 0.0 0.0 0.826685905456543 0.0 7.192734718322754 -3.724299669265747 0.0 1.0) "(reset)") (#(0.6366130709648132 0.0 0.0 0.0 0.0 0.6366130709648132 0.0 0.0 0.0 0.0 0.6366130709648132 0.0 13.830187797546387 13.933135032653809 0.0 1.0) "(define (zoppp time clock zap) (play time (* (adsr 0 0.05 0.4 2) (sine (note (* (modulob clock 12) 10))) (sine (note (* (modulob zap 5) 12)))) (sin clock)) (when (< clock 16) (in time 0.25 zoppp (+ clock 1) zap)))") (#(0.602653980255127 0.0 0.0 0.0 0.0 0.602653980255127 0.0 0.0 0.0 0.0 0.602653980255127 0.0 6.116777420043945 -13.004716873168945 0.0 1.0) "(+)") (#(0.6497272849082947 0.0 0.0 0.0 0.0 0.6497272849082947 0.0 0.0 0.0 0.0 0.6497272849082947 0.0 7.610789775848389 5.392420291900635 0.0 1.0) "(echo)") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 -13.714335441589355 14.024030685424805 0.0 1.0) "(saw (* 2000 (adsr 0 0.2 0.3 1)) 0.1 0)") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 -6.43792200088501 20.738962173461914 0.0 1.0) "(define (zopp time clock zap) (play time (crush (* (adsr 0 0.05 0 1) (sine (+ (note (* 30 (modulob zap 5))) (* (adsr 0 0.3 0.3 2) 2100 (sine (note (* 30 (modulor clock 3)))))))) 3 (pick (list 0.02 3 2 10) clock)) 0.6) (if (modeq? clock 14) (in time 0.5 zoppp clock zap) (in time (pick (list 0.25) clock) zopp (+ clock 1) zap)))") (#(0.6366130709648132 0.0 0.0 0.0 0.0 0.6366130709648132 0.0 0.0 0.0 0.0 0.6366130709648132 0.0 22.35306167602539 -0.9037953019142151 0.0 1.0) "(+ 19 (* 440 (sine 0.2)))") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 -14.350143432617188 3.5088253021240234 0.0 1.0) "(+ (* 30 (modulob clock 6)))") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 7.597330570220947 0.4383751153945923 0.0 1.0) "1.5") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 4.846402168273926 -0.730107843875885 0.0 1.0) "1.5") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 -16.43575668334961 15.131343841552734 0.0 1.0) "0.3") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 -16.644176483154297 13.267688751220703 0.0 1.0) "(pick (list 0 0) zap)") (#(0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 0.0 0.0 0.0 0.7394179701805115 0.0 6.5721588134765625 7.534087181091309 0.0 1.0) "(pick (list 0 0.3 0) clock)") (#(1.399999976158142 0.0 0.0 0.0 0.0 1.399999976158142 0.0 0.0 0.0 0.0 1.399999976158142 0.0 19.108755111694336 20.061019897460938 0.0 1.0) "(reset)"))