do
-- resetCycles
setcps (135/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
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 modIndex = pF "modIndex"
d1 $ gMute2 $ gF1 -- Kick solide
  -- $ fix ( -- Rumble
  -- . (# att 0.2) . (# rel 2)
  -- . (# gain 2)
  -- . (# delay 0.125) . (# delayt "q") . (# delayfb 0) -- Smear
  -- . (# smear 0.85)
  -- . (# room 0.12) . (# sz 0.1) . (# dry 0.2)
  -- . (# lpf 100) -- Low-pass  show
  -- ) "rumble"
  $ midiOn "^42" (struct "t t*<1!3 <1!4 2!4>> t <t <t!4 [~ t]!4> t t*2>")
  $ midiOff "^42" (<| "k . ~ k ~ <~!3 k*[4 1]>")
  $ stack [
  "kick" # cut 11 # gain 1.2 # lpf 10000 # delaybus 11 0,
  "rumble" # cut 12 # gain 2 # lpf 200 # delaybus 12 0.25 # delayt "q" # delayfb 0
  ,
  -- # lpf 120
  -- # cut 11,
  ""
  ]
  # "[kick:4]"
  # delay 0
  # gain 1
  -- # cut 1
d2 $ gF1 $ gM1 -- Basic clap ma gueule
  $ midiOn "^43" (<| "~ <~!8 cp!8> . cp*<1!3 2> <~!8 [~ cp]!8>" )
  $ midiOff "^43" (<| "~ <cp!3 <~ [cp*<2 4>]>>")
  $ "cp"
  # note "0!3 -1"
  # lpf 4000
  # room 0.4 # sz 0.8 # dry 1.1
d3 $ gF1 $ gM1
  -- $ jux (rev)
  -- $ whenmod 8 6 (mask "f t" . rev)
  $ "h h*2 ~ h ~ h ~ <~!2 h h*2>"
  # "rampleP3:19"
  # delay 0.5 # delayt 0.25 # delayfb 0.2
  # pan 0.7 # cut 3
  # legato (range 0.2 0.8 "^52")
d10 $ gF3 -- Self-destruction riser
  $ (stack [
    n "<<55!8 ~!54> ~!3>"
    # end "<0.5 1 0.5 1 0.5 0.5 0.5 1 0.5!5 1!3>"
    # begin "<0 0.5 0 0.5 0 0 0 0.5 0!5 0.5!3>",
    n "<<~!3 56>!32 ~!28 ~ 56 ~ ~>" # begin 0.5, -- Activated
    n "<~!32 <~ <54!3 53 53!3 54>!16 ~!16>>" -- Systems
    # crushbus 101 (slow 15 $ range 12 5 perlin),
    ""
  ])
  # "rhadamanthe_vocal"
d6 $ gF1 $ gM1 $ "~ ~ ~ 808cy:1"
d9 $ gF3
  $ mask "<<t!4 f!4> t t f>"
  $ note ("<d4/2!12>" + 5)
  # "rhadamanthe_vocal:5"
  # cut 9
  # begin "<0!16 0!8 0.25!5 0.3!3>"
  # octersub 0.5
  # octersubsub 0.5
  # bandf 400
  # gain 1.3
d4 $ gF2 $ gMute3 -- V2 PLN's "Je peux ptet faire une basse acide moi meme"
  $ midiOff "^57" (
    -- (|+ note "<0 12>") .
    mask "<[t f]!0 t(<1!3 [1 4]>,4)!0 t([<8!3 <4 16>> <8!3 16>],16)>")
  $ stack [
  n "<30!16 31!16>" # "vec2_synth_acid" # gain (range 1.1 0 ("^53" + "^33")),
  "vec1_acid:40" # hpf 200 # gain (range 0.6 1.1 "^53"),
  "vec1_acid:39" # hpf 200 # gain (range 0 1.1 "^33"), -- TODO BONUS ACID
  -- # octer 1.1
  -- ,
  ""
  ]
  # crushbus 41 (range 16 1 "^53")
  # legato (range 0.39 0.7 (1 - "^17"))
  >| note ("[b d6 b cs6 d6 b cs6 b]*2"
  - "<0!32 12!32>" -- Alternance
  -- + "<0!24 7!8 0!48 1!16>" -- Note variation tension???
  )
  -- # att 0.1 # sus 0.2 # rel 4
  -- # cut 4
  # octersub 2
  -- # octerbus 41 (range 0 1 "^33")
  -- # crushbus 42 (range 16 4.2 "^53")
d5 $ gF3 $ gM3 -- Piano lead acidule
  $ fix (# bandf 800) "FMRhodes1"
  -- $ fix (# bandf 1050)  "FMRhodes2"
  $ midiOn "^90" (struct "t(<8 <8 16>>,64)")
  $ midiOn "^58" ((stutWith 4 0.125 (|- note 12)) . (|+ note 12))
  $ superimpose (# modIndex (range 0 16 "^34"))
  $ note ("b ~ ~ b ~ ~ <d!7 e6> <~ d>"
  + "[0,<~!4 7!4>]"
  -- + "[0,12]"
  - 24)
  # "[FMRhodes1]"
  # tremdp 4 # tremr 1.8 -- Bouncy droplet
  -- # bandf 50 # bandq 0
  -- # crushbus 51 (range 16 4.5 "^54")
  # gain 1.8
d7 $ gF2 $ gMute3 -- Caring bass
  $ midiOn "^59" (|+ note "[0,12]")
  $ midiOn "^91" ((struct "<[t t . t*[4 <4 8>]]!3 t*[<8 4> 8]>") . (# rel 0.5))
  $ superimpose (
    (# cut 71) .
    (# crushbus 71 (range 10 3.5 "^55"))
  )
  $ note (
    "<b5!3 <g d>>@7 <c6 c6 cs6 a6>" -- This is caring
  )
  # "moog:0"
  # legato 1
  # bandf 50
  # bandq 0
  # cut 7
  # gain 1.4
d8 $ gF1 $ gM1
  $ midiOn "^92" ( -- Bouton Nassim <3
    slice 8 "0 1 2 <3!3 ~> <4!3 ~> 5 <6!3 6*2 ~!3 6> 7*<1!3 <2 4>>"
    . loopAt 0.5 . (# "breaks165") . (# octersub 2)
    . (|* gain 0.8)
  )
  $ midiOff ("^60" + "^92") (mask "t(4,8,1)" . chop 16)
  $ midiOn "^56" (# "jungle_breaks:40")
  $ midiOn ("^36" - "^92") (chop 8 . loopAt 4 . (# "trance_loops:4") . (|* gain 1.1))
  $ chop 8
  $ loopAt 2
  $ "jungle_breaks:45"
  # cut 8
  # gain 1.4
d11 $ gF2 $ gM3 -- Synthetique violon
  $ note (stack ["<b6!3 [b6 a6@7]>", -- Low basis
  "~ <b7!3 [b7 [<d8 <[d8 ~ e8 f8 e8 <d8@2 a8@2>@2]@3>>]]>"
  ] - 24)
  # "90s_synatm:21"
  # cut 11
  # room 0.4
  # pan 0.8
  # att 0.5
  # lpf 4000
  # sustain 0.5
  # rel 2
  # gain 2

once $ "FMRhodes1"