-- TODO INTRO
once $ "leon:19" -- Attends <3
  # end 0.3
  # cut 99 # orbit 8
  # gain 1.4

once $ "leon:20" -- Putain Non <3
  -- # end 0.3
  # cut 99 # orbit 8
  # gain 1.4

once $ "leon:19" -- Attends <3
  # end 0.3
  # cut 99 # orbit 8
  # gain 1.4

once $ "leon:19" -- Encore <3
  # begin 0.4
  # cut 99 # orbit 8
  # gain 1.4

do
-- resetCycles -- TODO UNCOMMENT
setcps (90/60/4)
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 gF1 =  (# djfbus 1 (range 0.01 0.99 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
d1 $ gF1 $ gM2
  $ fix (# n 0) "jazz"
  $ midiOff "^42" (>| n "0 . ~ [~ <~!2 0!2>]")
  $ midiOn "^42"  (>| n "0 0 0 0*<1 2 1 4 1 2 2 1>")
  $ "[rampleK1,jazz]"
d2 $ gF1 $ gM1
  $ "~ s ~ s"
  -- $ "~ <s!3 [s s*2 . ~]>"
  # "[rampleD4:3,snare:30]"
  -- # lpf 2000
  # gain 1.4
d3 $ gF1 $ gM1
  $ "~ h ~ h ~ h ~ h*<1 2>"
  # "h2ogmhh:3"
  # gain 1.8
d4 $ gF2 $ gM3
  $ midiOn "^89" (struct "t*<<8 [8 4]!2 8> <4 [4 16]>>")
  $ note "<<<g3!4 e2!4> [<g3!4 e2!4>@7 bf2]> b2>"
  # "bassWarsaw"
  # crushbus 41 (range 16 4   "^53")
  # octersubbus 42 (range 0 1.5 "^53")
  # room 0.4
  # lpf 1500
d5 $ gF3 $ gM3 -- Synth Marimba
  $ superimpose (struct "t(<2 2 3 3>,8) t(<0 1 3 <1 5>>,8)"
  . (|+| note (arp "<up!3 down>" "c'min'8")))
  $ note "[<e4!3 a3>@3 <~ g3!7>]"
  # "giorgio_syn:38"
  # room 0.4 # sz 0.8
  # octersubbus 51 (range 0 2.85 "^54")
  # att 0.05
  # rel 2
d9
  $ note ("e"
  - 4 -- Calage
  ) # "rampleK1:4" # gain 0.9
  # room 0.4
  # lpf 2000
  # legato 2
d7 $ gF3 $ gM3
  $ whenmod 4 3 (juxBy 0.2 (("e" ~>) . (# cut 71) . (|* gain 0.6)))
  $ midiOn "^91" (ply "1 <2 4>")
  $ midiOff "^91" (mask "<t f>")
  $ chop 4
  $ "leon" # n "<0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 16 17 18!4>"
  # cut 7
  # gain 1.2
  # roombus 71 (range 0.0 0.8 saw)
  # panbus 72 (slow 4 $ range 0.2 0.8 (sine + (slow 4 $ sine)))
  # tremrbus 51 (range 0 8 "^55")
  # tremdp 0.8
  -- # tremoloratebus 71 (range 0 2 "^55")
d8 $ gF1 $ gM1
  $ midiOn "^92" (ply "<2!3 [2 <4 8>]>")
  $ midiOff "^60" (mask "f(4,8)" . chop "2")
  $ chop 32
  -- $ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:22"))
  $ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:24"))
  $ midiOn "^56" (loopAt 0.25 . (# n 2))
  $ loopAt 4
  $ "jungle_breaks:20"
  # gain 1.1
  # cut 8