do setcps (135/60/4) let gF = (# djfbus 1 (range 0.05 0.95 "^49")) let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>")) let gMute = (midiOn "^73" (mask "f*16")) let gM = gMask . gMute d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r... $ midiOn "^74" (<| "k*4") $ midiOn "^42" (<| "k k") $ midiOff "^42" (<| "k") -- $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not? $ "[jazz,cpu]" # midiG' "^78" 0 1.7 d2 $ gF $ "~ . <s!3 s> " # "[snare:21,snare:29]" # midiG' "^79" 0 1 d3 $ gF -- $ midiOn ("^44" - "^76") (off "0.33" id) $ midiOn ("^76" - "^44") (ply 2) $ midiOn "^44" (<| "~ h*2 [~ <~ h>] <~!3 h> h*2 [~ <~ h>]") $ midiOff "^44" (<| "h*4") $ drumFrom "rolandtr808" "[hh:1]" # midiG' "^80" 0 1.2 -- d4 once $ "ikedaBass" # note "e6" -- # room 1.2 -- # orbit 1 # gain 0.5 once $ note "b'min'3" # "organDonor" # gain 0.99