setcps 0.25 d1 $ every' 8 7 (fast 2) $ "k . k(<3 5>, 8)" # "kick:8" # lpf 2000 # gain 0.7 d2 $ "~ s" # "snare:2" # lpf 5000 # note (-8) # gain 0.7 d3 $ fast 2 $ fast "<8!3 32> <16!3 [16 <8 [8 16]>]>" $ s "drum:8" # gain 0.9 d4 $ s "h*3 h <h h*3> h*2" # "hh" # gain 0.8 # pan (slow 16 $ sine) d4 $ whenmod 32 16 (slow 2) $ swing 2 $ note (scale "aeolian" "c3'major7" + "0 . 1 <2 0>" ) # s "supersaw" # voice 0.1 # gain 0.45 d5 $ note ( "0(12?,8)" ) # s "superpiano" # velocity 0.35 # pan 0.8 # sustain 0.4