do
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gM = gMask . gMute
let gM2 = gMask . gMute2
setcps (160/60/4)
d1 $ gMute
-- $ midiOn "^42" (<| "k <~!8 k!56> . <~!4 k!28> k*<1!3 2>")
-- $ midiOff "^42" (<| "k . ~ ~ ~ <~ k ~ [~ k]>")
$ "k ~ <~ [~ k]>" # "[bd,808bd:3]"
# midiG' "^78" 0 1.2
d2 $ gMute2 $ gF1
$ ((|* gain "1 <1!3 [1 0.9 1]>") . (whenmod 4 3 (fix (# "snare:30") "snare:29")))
$ "~ <s!3 [s [~ s] ~]>"
# "[snare:29,snare:4]"
# lpf 5000
# midiG' "^79" 0 1
d3 $ gF1 $ gMute2
$ "h h h h <h!3 ~> h*<1!7 2>" |* gain "0.8 1 1.1 1 1 1.1"
-- # drumFrom "sakatadpm48" "[hh,oh]"
# "hh"
-- # n "0!3 <0!3 1>"
# lpf 4500
# midiG' "^80" 0 1
d8 $ gF1 $ gMute2
$ loopAt 2
$ slice 8 "~ 0 ~ 2 ~ 4 ~ 6"
$ "break:10"
-- $ loopAt 2 $ chop 4
-- $ "jungle_breaks:44"
# cut 8
# midiG' "^84" 0 1.2