do
setcps (120/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
d1 $ gF1 $ gM2
  $ fix (|* gain (0.9 * "^30")) "clubkick"
  $ "k k k k*<1 <2 [4 2]>>"
  # "[clubkick:0,rampleM1]"
  # room 0.3
  # dry 1.05
  # sz 0.75
  # lpf 2000
  # gain 1.5
d2 $ gF1 $ gM1
  $ midiOn "^43" (<| "~ s*<1!8 2!3 1 2!3 1> ~ s*<1!3 2>")
  $ midiOff "^43" (<| "<s*<1 2> ~> ~!3")
  $ "snare:40"
  # note "-2"
  -- # room 0.4 # dry 0.9
  # lpf 2400
  -- # legato 0.25
d3 $ gF1 $ gM1
  $ midiOff "^44" (mask "t f")
  -- $ someCyclesBy 1 (|+ note "0!3 <0 4> 0!3 <4!6 -10!2>")
  -- $ "dr*[8!3 <8 <16!3 [8 16]>>]"
  $ "~ h ~ h ~ h*<1!6 2 2> ~ h*<1 <2 [4 2]>>"
  -- # "rampleD2:3"
  # "808cy:10"
  # legato "<0.4!3 0.1>"
  # cut 3
d4 $ gF2 $ gM3
  $ midiOn "^89" (>| note "[e e <g b> e e e <a c7*<1 2 2 4>> e]")
  $ midiOn "^57" (stutWith 8 "e" ((|+ note ("0 12 0 12")) . (|* gain 0.95)))
  -- $ someCyclesBy (1 - "^33") (mask "t . t(3,8,1)")
  $ midiOff "^89" (>| note ("<<[e e g e]!2 [a a g e]!2> ~ <~!4 [a a g e]!4> ~> . ~" - 0))
  $ "bass1:10"
  # cut 4
  # room 0.2
  # octerbus 41 (range 0 1 "^33")
  # crushbus 42 (range 16 3.5 "^53")
  # att 0.23
  # pan 0.4
  # rel 2
d5 $ gF3 $ gM3
  $ midiOn "^58" (ply 2)
  $ midiOn "^90" (slice 4 "0 1 2 3 <[0 1 2 3] [0 3]>")
  $ chop 8
  $ loopAt 4
  $ "nujazz_guitar120"
  # n "<11>"
  # crushbus 51 (range 16 3.5 "^54")
  # cut 5
d7 $ gF3 $ gM3 -- La pluie <3
  $ midiOn "^59" (|+| note "0 12 0 <12!4 [12 0 12]!4 [0 7 12 0]!8>")
  $ superimpose (struct "t(<3!3 [3 5]>,8)" . (|+| note (arp "<down!3 up>" "<c'maj'3!3 c'maj'4>")))
  $ note ("<e c b4 <e4 d4>>")
  # "moogBass"
  # ampbus 71 (range 0.05 0.7 "^83")
  # chorus 0.1
  # dec 0.9
  # rel (slow 8 $ range 0.1 0.4 saw)
  # gain 0.9
  # room 0.4 # dry 1.2 # sz (slow 8 $ range 0.8 0.2 saw)
d8 $ gF1 $ gM1
  $ midiOn "^92" (const $ chop 8 $ whenmod 4 3 (ply "1 . 2 [4 2]") $ loopAt 1 $ "breaks165")
  $ midiOff ("^36" + "^92") (slice 8 "~ 1 ~ 3 3*<0 <1 2 <4 [8 2]>>> 5 <~!3 6> 7")
  $ midiOn "^36" (loopAt 0.5 . (# n 56) . (# lpf 5000)) -- Morning Mimosa
  $ midiOn "^56" (# n 46) -- Low Bass WallRide
  $ loopAt 2
  $ chop 16
  $ "jungle_breaks:45" -- Douceur Orleanaise
    -- # cut 8
  -- # gain 0.8
d9 $ gF3 $ gM3 -- BROOOOO
  $ slice 3 "~ <0!6 1 1> ~ <0 0 0 1>"
  $ "bogdan:3"
  # cut 9
  # gain 1.2
  # legato "<0.4!4 0.2!3 0.4 0.2!6 1 1>"
  # room 0.4 # dry 0.5 # sz 0.26
d10 -- Atmosphere Humide
  $ chop 16
  $ note "e2"
  # "90s_glassatm:2"
  # cut 10
d11 $ gF3 -- Marimba electrique
  -- $ mask "<f!16 t!16 f!32 t!32 t!16 f!16>"
  $ whenmod 16 12 rev
  $ note ("<~ [e <g e> a <b bf>]> . ~" - 12)
  # "marimba1"
  # gain 1
  # ampbus 110 (range 0.05 0.7 "^14")
  # octersub "<0!16 0.5!16>"
  -- # amp 4
d12 $ gF2 -- ECLAIR ORAGEUX
  -- $ whenmod 16 12 (|>| note ("<[e3@3 a3 fs3@2] f3>" + 12))
  $ note "<[d4 d4 [d4 e4] ~ e4 ~ ~ ~] <~!3 g4>>" -- DANCE!
  # "giorgio_syn:0"
  # pan 0.9
  # room 0.4
  # dry 0.8 # sz 0.7
  # gain 0.85
  # lpf 4000
  # cut 12