do
-- resetCycles
setcps (93/60/4)
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 gMute = (midiOn "^73" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let modIndex = pF "modIndex"
d1 $ gF1 $ gM2 -- Kick
  $ midiOff  "^42" (<| "k k k <k <k*2 [~ k]>>")
  $ midiOn "^42" (<| "k . ~ <~!2 k!2> ~ <~!3 k*<1 2>>")
  $ "[808bd:4,jazz]"
  # lpf 400
  # gain 1.2
--   # gain 1.4
d2 $ gF1 $ gM1 -- Snare melancolie fromagere
  $ midiOff  "^43" (<| "~ <s s <s!3 ~> <~!7 [~ s]>>")
  $ midiOn "^43" (<| "~ . s*<1!4 2!3 [4 2]> ~")
  $ "[rampleM12:3]"
  # gain 1.2
d3 $ gF1 $ gM1
  $ midiOn "^44" (ply 2)
  $ midiOn "^76" (ply 2)
  $ "d d d <d [<d ~> d]>" # "drum:2"
  # gain 0.8
d4 $ gF2 $ gM3
  $ note "<f3 c3 cs3 f3>"
  # crushbus 41 (range 16 3 "^53")
  # octerbus 42 (range 0 0.93 "^33")
  # octersubbus 43 (range 0 1.93 "^33")
  # "bassWarsaw"
d5 $ gF3 $ gM3
  $ note ("<[f4 [~ g4] [gs4 ~] as4 c5@4] [f5 [~ f5] . ef5 df5 c5@2] [bf4@3 bf4 . gs4 g4 f4@2] f4>" + 12)
  # "superfork"
  # room 0.3
d7 $ gF3 $ gM3
  $ struct "t*[8 . <8!3 16>]"
  $ note (
    "<[f4@3 g4 . gs4 as4 c5@2] [f5@3 f5 . ef5 df5 c5] [bf4@3 bf4 gs4 g4 f4] f4>"
    +"[0,12]" )
  # "pluck"
d8 $ gF1 $ gM1
  $ chop 8
  $ loopAt 1
  $ midiOn "^60" (mask "f(4,8)" . chop 8)
  $ midiOn "^36" (loopAt 2 . (# "jungle_breaks:19") . (|* gain 1.2)) -- Pure COMEON!
  $ midiOn "^56" (# "jungle_breaks:20")
  $ midiOn "^92" ( -- Bouton Nassim <3
    slice 8 (run 16)
    . loopAt 0.5 . (# "breaks165")
    -- . (# octer 0.4) . ( octersubsub 4)
    . (# lpf 2500)
    . (# room 0)
  )
  $ "break:8" # cut 8

--   -- # midiG' "^80" 0 1
--   # room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw)
-- d4 $ gF2 $ gM3
--   $ midiOn "^89" (ply 2)
--   $ slow 2
--   $ note (
--     struct "t(3,8) t(3,8)" $
--     arp "converge" $
--     cat [
--     "[bf3, d4, f4, a4]", -- Bbmaj7
--     "[a3, c4, e4, g4]", -- Am7
--     "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
--     "[g3, b4, d5, <f5 ~>]" -- <G7 G>
--     ] - 12)
--   # "bassWarsaw"
--   # crushbus 41 (range 16 4 "^53")
--   # room 0.2
--   # legato 0.5
--   # gain 1.4
-- d7 $ gF2 $ gM3
--   $ midiOn "^89" (ply 2)
--   $ slow 2
--   $ note (
--     struct "t(3,8) [t(<3!3 5>,8)|t|t*2]" $
--     arp "up" $
--     cat [
--     "[bf3, d4, f4, a4]", -- Bbmaj7
--     "[a3, c4, e4, g4]", -- Am7
--     "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
--     "[g3, b4, d5, <f5 ~>]" -- <G7 G>
--     ])
--   # "moogBass"
--   # cut 7
--   # room 0.2
--   # legato 0.5
--   # delay 0.7
--   # delayt 0.125
--   # delayfb 0.5
-- d5 $ gF2 $ gM3 $ slow 2 -- V2
--   -- $ superimpose ((arp "up") . (|+ note 12))
--   $ midiOn "^89" (stutWith 4 0.25 ((|* gain 0.85) . (# room 0)))
--   $ note (cat [
--     -- PARTITION ORIGINALE
--     "[bf3, d4, f4, a4]", -- Bbmaj7
--     "[a3, c4, e4, g4]", -- Am7
--     "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
--     "[g3, b4, d5, <f5 ~>]" -- <G7 G>
--   ]
--   - 12
--   )
--   # "FMRhodes2"
--   -- |- note 12
--   |+ note 2 -- Adjust to C
--   # modIndex (range 0 2 "^54")
--   # room 0.4
--   -- # midiG' "^81" 0 1.6
-- d8 $ gF1 $ gM1
--   $ midiOff "^60" (mask "f(4,8)" . chop 8)
--   $ midiOn "^92" (ply 4)
--   $ midiOn "^36" (# "jungle_breaks:45")
--   $ midiOn "^56" (# "jungle_breaks:30")
--   $ iter "1 <1!4 4!4>"
--   $ chop 8
--   $ loopAt 2
--   $ "break:2"
--   -- # n 4
--   # cut 8
--   # gain 0.7


C ASH
R ULES
E VERYTHING
A ROUND
M E