do
setcps (128/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 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 gO = (# octersubbus 5 (range 0 1 "^29")) . (# octerbus 6 (range 0 1.2 "^29"))
d1 $ gF1 $ gM2 -- Kick
  $ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
  $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 5000)) "kick:4"
  $ midiOn "^42" ((<| "k k k <k!7 [<k ~> k]>"))
  $ midiOff "^42" (
    -- (<| "<k!24 ~!8> ~ ~ <~!3 k> . ~ <~!7 k> ~ ~")
    (<| "k . ~ k ~ <~ k>")
    )
  $ "[jazz,kick:4]"
  -- $ "[rampleA0:3,jazz]"
  # gain 1.2
d2 $ gF1 $ gM1
  $ midiOn  "^43" (<| "~ s ~ s*<1 1 2 <1 4>>")
  $ midiOff "^43" (<| "~ s ~ s*<1 2 <1 2> 1>")
  $ "[rampleA0:11,rampleA2:11]" -- Basic snare
  # note "-2"
  # gain 0.9
d3 $ gF1 $ gM1 -- Contretemps
  $ midiOn "^76" (slow 2)
  $ midiOff "^44" (slow 2)
  $ "~ h ~ h ~ h ~ h*<1 2 2 <1 2>>"
  -- $ "~ h ~ <~!4 h!28> ~ <~!3 h ~!3 h h!8> ~ <h ~ h ~ h!3 <h*2 [~ h*<1 2>]>>"
  # "[snare:38]"
  # room 0
  # gain 0.9
d4 $ gO $ gF2 $ gM3 -- SUBSUB INFRABASS
  $ midiOn "^57" (struct "t*8 t(<3!3 5>,8)")
  $ midiOn "^89" (stut 4 0.9 "e")
  -- $ juxBy 0.8 (
    -- (# crushbus 41 (slow 16 $ range 12 2.5 saw))
    -- . (# lpfbus 41 (slow 16 $ range 10000 2000 saw))
  -- )
  $ note "<g3!4 c3!4>(3,8)"
  # "jungbass:3"
  # lpf 2000
  # cut 4
  # crushbus 41 (range 12 2 "^53")
  -- # octersubsubbus 42 (range 0 1.2 "^33")
  # pan 0.65
  # gain 1.2
d5 $ gO $ gM3 $ gF2 -- Basse appel important
  $ note "<fs3 [fs3@7 b3] [fs3@7 g3] [fs3@5 g3 fs3 d2] [b2@7 d2] [b2@7 d2] [b2@7 gs2] [b2 . b2 d3 <fs3 g3>]>"
  # "giorgio_syn:0"
  # pan 0.35
  # lpfbus 52 (range 400 4000 "^34")
  # distortbus 51 (range 0 1.2 "^54")
  # cut 7
  # gain 0.85
d7 $ gO $ gF3 -- guitare salvatrice
  -- $ mask "<f!32 t!32>"
  $ slice 16 "0*[4 <4 4 1 1 4 4 1 4 1 1 4 4> 4 <1!3 4>]"
  $ chop 16
  $ loopAt 2
  $ "fguitar:55"
  # cut 7
  # gain 0.9
d6 $ gO $ gM1 $ gF1 -- Rim drums
  $ fix ((|* gain (1.2 + 0.1 * perlin))) (n 18)
  $ n (stack [
    "~ ~ ~ <~!7 <13 14 15 16 17>>", -- Cy
    "<~!0 18([<2 3> <1 <3!3 5>>],8)!16> 18(<1 1 3 1>,8)"
  ])
  # "h2ogmhh:1"
  |* gain (range 0.8 1 perlin)
  # gain 1.5
d8 $ gM1 $ gF1 -- BOOM BOOM THE BREAKS
  $ midiOn "^92" (ply 2)
  $ fix (|* gain 0.8) ("jungle_breaks:24")
  $ whenmod 8 7 (slice 4 "0 3 2*<1 2> 1*<1 2 4 4>")
  $ midiOn "^36" ((# n "19")) -- Pure COMEON!
  $ midiOn "^56" ((# n "23")) -- Raise COMEON!
  -- $ midiOn "^60" (const $ loopAt 2 $ chop 8 $ "jungle_breaks:60" # gain 0.8)
  $ chop 16 $ loopAt 2
  $ "jungle_breaks:24"
  # gain 1.2
d9 $ gF3
  $ ply "1 2 <1 <2 4 8 2>> <<2 1 4 <1 4>> 1>"
  $ chop 8
  $ "jungle_pads:24/4"
  # note (2 + (slow 2 $ "<0 -5>"))
  # cut 9
  # gain 0.8
  # lpf 5000
d10 $ gF1 -- CONSTRUCTION NOISES
  -- $ fix (|* gain (slow 32 $ range 1 0.3 saw)) "giorgio_syn"
  $ (stack [
  "<~!0 giorgio_syn:52!16>/2"
  ])
  # note (slow 2 "<0 <-4.5 -7>>")
  # cut 10
  # gain 0.6