resetCycles

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 gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
setcps (140/60/4)
d1 $ gF1 $ gM2
  $ midiOn  "^42" (<| "k k k <k [~ k]>")
  $ midiOff  "^42" (<| "<<k!3 k(<3 6 12>,8)> [~ !7 <~ k>]>")
  $ "[kick:5,808bd:5]"
d2 $ gF1 $ gM1 -- Snare complice
  $ fix (|* gain 0.8) "sn"
  $ midiOn "^43" (<| "~ s ~ s*<1!6 3 3>")
  $ midiOff "^43" (<| "<~ [s*<1!3 3> ~]>")
  $ "[snare:13,sn:2]"
  # pan 0.3
d3 $ gF1 $ gM1 $ gMaskEnd16 -- My grimest hat
  $ midiOn "^76" (fast "[2]")
  $ "h(3,8) h([<3 5 5 3> <3 5>],8)"
  # drumFrom "rolandtr909" "hh"
  # cut 3
  # pan 0.8
  # gain 0.8
  |* gain "[0.75 1.1]*8"
d5 $ gF3 $ gM3 -- Burning butterflies FIXME TROP NUMERIQUE
  -- $ midiOn "^57" (>| note ("<ef bf fs gs>"))
  -- $ midiOff "^57" (>| note ("[ef, <~ [~!15 e] [~!15 cs] [~!7 [e*2 cs]]>]"))
  $ superimpose (arp "down" . (|+ note 12))
  $ note ("[0(3,8,1), [12(<1 3 1 5>,8) 12(3,8,1)]]"
  + "<bf gs <bf!3 e> <g!3 <ef [cs ef]>>>"
  - 24
  )
  -- # "giorgio_syn:20"
  # "supersquare"
   -- # cut 5
  # modIndex 2
  # crushbus 51 (range 16 5 "^54")
  # pan 0.45
  # gain (0.5 + (range 0 0.2 (slow 2 perlin)))
  # room 0.2
  # dry 0.9 # sz 0.5
d7 $ gF2 $ gM3
  $ chop 4
  $ loopAt 4
  $ "meth_bass:17"
  -- # octer 1
  # octersubbus 62 (range 0 1.5 "^35")
  # crushbus    61 (range 10 2.5 "^55")
  # octersub 0
  # octersubsub 0
  # gain 0.9
d4 $ gM3 $ gF2 -- giorgio's massive tribal bass
  $ midiOn "^91" (ply "2 <4 8>" . chop 8)
  $ slow 2
  $ midiOn "^57" (>| note ("<ef bf fs gs>"))
  $ midiOff "^57" (>| note ("[ef, <~ [~!15 e] [~!15 cs] [~!7 [e*2 cs]]>]"))
  $ "giorgio_syn:23"
  # cut 4
  # room 0.4
  # legato 2
  # octersubbus 43 (range 0 5 "^17")
  # squizbus 42 (range 0 1.5 "^33")
  # crushbus 41 (range 16 2.5 "^53")
  # gain 0.6
d8 $ gF1 $ gM1 $ gMaskEnd16 -- Come on breaks!
  $ chop 8
  $ midiOn "^56" (loopAt 2 . (# n "<60!3 61>"))
  $ midiOn "^92" (ply 4)
  $ midiOff "^60" (mask "t(4,8)")
  $ loopAt 2
  $ "jungle_breaks:26"
  # cut 8
  # gain 0.7
d9
  $ midiOn "^42" ((<| "<~ b>")
  . (# begin "<0!8 0.4!8>")
  . (# end "<0.4!8 1!8>")
  )
  $ midiOff "^42" (<| "<~!7 b>")
  $ "bogdan_grime"
  # end (slow 8 "<0.4!3 1>")
  # n 2
  # lpf (slow 8 $ "<4000!12 400 800>")
  # crushbus 91 (range 4 8 perlin * 4)
  # gain (0.7 + "<0.1!3 0>")
-- d10
--   $ "~ ~ ~ s"
--   # "glitch:2"
--   # speed (slow 8 $ range 0.15 2 perlin)
--   # cut 3
  -- # gain 2
d11  $ gF3
  $ n (stack [
    "<~!7 <82 83 84 91 92 93>>",
    -- "42/4"
    ""
    ])
  # "90s_megafx"
  # gain 0.8
  # lpf 5000
d11 -- Cut Cymbals
  $ gM1 $ gF1
  $ mask "<f!10 t!6>"
  $ "h(3,8) h(<3 <5 8>>,8)"
  # "hh:7"
  # gain (slow 8 $ range 0.4 0.8 saw)
  # cut 11
  # pan 0.2
  # legato "<0.5!6 1 1>"
  # lpf 5000
d10 $ gF3
  $ chop 16
  $ loopAt 4
  $ "jungle_riffs:21"
  # cut 4
  # gain 0.6
  # pan 0.4


once $ "dr"

# gain 2.5 # cut 1