-- Inspiration https://www.youtube.com/watch?v=vGJTaP6anOU

-- FIXME: DO NOT MERGE - This one is unplugged :)
do
-- resetCycles
setcps (120/60/4)
let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
d1 $ gF1
  $ "808bd:2/2"
  # midiG' "^78" 0 1.1
d2 $ gF2 $ "<~ snare:30>"
  # midiG' "^79" 0 1.1
  # hpf 3000
d3 $ gF2
  $ midiOn "^76" (fast 2)
  $ midiOn "^44" (fast 2)
  $ "drum:2*3"
  # midiG' "^80" 0 1.1
