do setcps (85/60/4) let g1 = (# djfbus 1 (range 0.05 0.95 "^49")) let g2 = (# djfbus 2 "^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 let modIndex = pF "modIndex" d1 $ g1 $ gMute $ midiOn "^42" (<| "k . ~ k ~ ~") $ midiOff "^42" ( -- JuxGhost juxBy 0.4 ((sometimesBy "0 1" (rev . (|* gain 0.8))))) $ midiOff "^42" (<| "k . k(<3!7 [<3 8> 5]>,8,<0!3 1>)") $ "jazz" # midiG' "^78" 0 1.4 d2 $ g1 $ gM -- $ "~ s ~ s ~ <s [~ s]> ~ <s [s ~ s <~ s>]>" $ midiOn "^43" (<| "~ s ~ s*<1!3 2>") $ midiOff "^43" (<| "~ s") $ "meth_snare:2" # midiG' "^79" 0 1.4 d3 $ g1 $ gM $ loopAt 2 $ "jungle_breaks" # pan 0.2 # midiG' "^84" 0 1.4 d4 $ g1 $ gM $ fix (|* gain 0.9) "dr" $ "h*4 h*<4 [2 <2 4>]> h*<4 4 2 4> h*<3!3 12>" # "[jungle,dr]" # midiG' "^80" 0 1.4 d5 $ g2 $ gM $ whenmod 64 0 ( -- Délire (whenmod 4 3 (ply "1 4" . slice 4 (run 2))) . (# pan "<0.8 0.8 0.2 0.8>") ) $ "jungle_vocals:0" # att 0.05 # rel 10 # pan 0.8 # cut 5 # gain 0.5 # midiG' "^83" 0 0.6 d6 $ slice 8 "4 <[<4 5 4 [4 5]> <5!7 1>] [4 2 <4!3 3> <2!3 3>]> " $ "fepiano:18" # hpf 2500 # rel 0.9 # midiG' "^82" 0 1.4 # pan 0.8