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