((#(0.5843619108200073 0.0 0.0 0.0 0.0 0.5843619108200073 0.0 0.0 0.0 0.0 0.5843619108200073 0.0 -19.43292999267578 17.163251876831055 0.0 1.0) "(define (zop time clock zap) (play time (* (adsr 0 0.02 0 1) (pick (list (white 100) (sine (* 200 (adsr 0 0.05 0.3 1)))) clock))) (if (modeq? clock 16) (in time 1 zopp 0 zap) (in time 1 zop (+ clock 1) zap)))") (#(0.668971836566925 0.0 0.0 0.0 0.0 0.668971836566925 0.0 0.0 0.0 0.0 0.668971836566925 0.0 -0.6540098190307617 17.071022033691406 0.0 1.0) "(define (zopp time clock zap) (play time (* (adsr 0 0.05 0 1) (tb (saw 440) (adsr 0 0.1 0.2 2) 0.1))) (if (modeq? clock 16) (in time 1 zoppp 0 zap) (in time 1 zopp (+ clock 1) zap)))") (#(0.7549728155136108 0.0 0.0 0.0 0.0 0.7549728155136108 0.0 0.0 0.0 0.0 0.7549728155136108 0.0 13.347240447998047 18.50469970703125 0.0 1.0) "(define (zoppp time clock zap) (play time (* (adsr 0 0.05 0 1) (tb (saw 500) (adsr 0 0.1 0.2 2) 0.1))) (when (not (modeq? clock 16)) (in time 1 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 20.58599281311035 20.304899215698242 0.0 1.0) "(reset)"))