setcps 1.03 d1 -- bass -- $ whenmod 32 16 (# silence) $ slow 2 $ note ( scale "major" ( cat [ " 1 1 ~ . ~ [~ 0]", "0 [0 1] ~ ~ . ~ " ] + "[0, 7]" -- gamme ) ) # s "bass3" # gain 0.8 d2 -- hit roll $ s "<h*4 h*4 h*4 [d*4 ~]>" # s "hh" # release 0.5 d3 -- claps -- $ s "<[~ cp] [~ cp] [~ cp] [~ cp . cp ~]>" $ s "<[~ cp]!3 [~ cp . cp ~]>" # gain 0.9 # n 1 d4 -- fork $ off 0 ((# s "supergong") . (# gain 0.5) . (# release 0.5)) $ s (cat [ "~ f f*2 ~" , "f f ~ f" , "f*2 ~ f f" , "[f*4] ~" ]) # s "superfork" # n (scale "major" (-4)) # release 0.5 # gain 1.3 d5 $ someCycles (fast 2) -- $ whenmod 32 16 (# silence) $ whenmod 32 4 (# gain 0.8) $ every 4 (# silence) $ s "reverbkick*2" # gain 0.7