do
setcps (160/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 gF4 = (# djfbus 4 (range 0.05 0.95 "^29"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF4 $ gMute2
  $ superimpose (
    (# "hardkick_rha") .
    -- (# n "<14!3 15 <14 15>>")
    (# n 14)
    . (|* gain (range 0 1 "^30"))
    ) -- SALE
  $ "k k*2 k <k k*2 k*<4 2 4 1> [~ k*<1 1 <1 <2 [4 2]>> <2 4>>]>"
  # "[jazz,hardkick_rha:5]"
    # note ("<0!4 -4!4>") -- Calage
  -- # n "<14!3 15 <14 15>>" -- SALE
  # gain 1.8
d2 $ gF1 $ gM1 $ "~ s ~ [s*<1!3 2> ~]"
  # "[cp]"
  # gain 1.4
d3
  $ gF1 $ gM1
  $ "d(4,8,1)"
  # "h2ogmhh"
  # gain 2 # cut 3 -- Drill that Baby
d8 $ gF1 $ gM1
  $ midiOn "^92" (ply 4)
  $ loopAt 2
  $ chop 8
  $ midiOn "^56" (loopAt 0.5 . (>| "breaks165"))
  $ "jungle_breaks:11"
  # cut 8
  # room 0.4 # dry 1.1
  # gain 1.5
d4 $ gF2 $ gM3 -- Incroyable melodie mega chargee explosive
  $ midiOn "^89" (ply 4)
  $ midiOn "^57" (mask "t([<2!4 4!4 8!4 16!4> 2],16)"
  . (# room 0.4) . (# dry 0.9))
  -- $ midiOn "^57" (fast 4)
  $ chop 64
  $ superimpose (# crushbus 41 (range 16 4 "^33"))
  $ slice 4 (slow 4 "<0 1 2 3>")
  $ "rhadamanthe_melo:15"
  # gain 1.2
d5 -- Descente inexorable
  $ note ("0 . 0(3,8)" +
    "<[e4 c4 b3 a3] [e4 c4 b3 a3] [f4 d4 c4 b3] [f4 d4 c4 b3]>"
    )
  # "FMRhodes1"
  # crushbus 51 (range 16 4 "^54")
  # modIndex (range 0 4 "^34")
  # gain 1.4
  # room 0.2
d6 $ gF3 $ gM3 -- Gros effet basse tremolo
  -- $ superimpose (# crushbus 51 (range 16 4 "^54"))
  $ midiOn "^90" (ply "<2 3>")
  $ midiOn "^58" (slice 4 "<0 4 1 2 <3 <4 1>>>*4")
  -- $ n "<0!8 1!3 0 1!3 1*4>"
  $ n "0"
  # "rhadamanthe_divers:69"
  # cut 6
  # pan (slow 16 $ range 0.6 0.45 saw)
  # gain 1.4
d12 $ gM3 $ gF3
  $ note (
    "<[~ cs ~ cs] [~ fs ~ fs] [~ bf ~ bf] [~ gs@3 ~ cs@2 [gs fs]]>"
    + "<0 0 0 [0 <0 12>]>" + "<0!14!8 12!8>"
    - 24
   )
  # "moogBass"
  # legato 2
  # chorus 1.2
  # cut 12
  -- # tremdp 0.8
  -- # tremr "<2 4 4 <8 16>>"
  # gain 1.2
d7 $ gF3 $ gM3 -- SCRATCH
  $ midiOn "^91" (ply "2 4 <8 8 4 16>")
  $ midiOn "^59" (chop 16)
  $ midiOff "^59" (chop 4)
  $ "rhadamanthe_vocal:1/4"
  # cut 7
  # pan (slow 16 $ range 0.9 0.6 saw)
  # gain 1.2
d10 $ gM3 $ gF3
  $ fix (# begin 0.25) "movie_statue:36"
  $ stack [
  -- I'VE GOT YOU SEVERAL TIMES
  mask "<f!24 t!8 f!16 t!16>"
  $ "movie_wine:15*<1 1 2 4>"
  # begin "<0!3 <<0.04 0.1> 0.25>>"
  # room 0.2 # sz 0.1
  # end "<0.45!8 0.5!8>" # cut 101, -- ON MY MIND
  mask "<f!7 t>"
  "<[movie_statue:36 movie_statue:7]>"
  # gain 0.9, -- Young lady from China
  mask "<t!32 f!8 t!8 f!8>" $
  mask "<f!3 t f!4>" $
  "[movie_dead:0 movie_vitality:4]" # end "<0 0.25>",
  -- just a drift --
  mask "<t!8 f!8>"
  $ "[movie_vitality:4]" # end "<0.1!2 0.05!2>" # gain 0.9 # room 0, -- Just a drift
  "<~!3 [movie_vitality:4]>" # end "<0.25>" # begin "<0.1>", -- WITHOUT CONTROL
  ""
  ]
  -- # rel 2 # att 0.1
  # gain 1.3
  # cut 101


-- rhadamanthe_divers:143 -- bien sifllement
