do
-- resetCycles
setcps (92/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
  $ mask "<f!8 t!56>"
  $ fix (# lpf 400) "gtkick"
  $ "k ~ <~ [~ k*<1 1 2 1>]> [<~!7 k> <~!3 k*<1 2>>]"
  # "[jazz,gtkick]"
  -- # att 0.01
  -- # rel 0.5
  # cut 1
  # gain 1.4
d2 $ gF1 $ gM1 -- snare clair sable mouvant inspired
  $ mask "<f!7 [f t] t!8>"
  $ "~ s ~ [s*<1 2> <~ [~ s] ~ [~ s] ~!3 [~ s]>]"
  # "snare"
  # n "<47!16 48!16>" -- CHANGEMENT DE SNARE ?!? QUELLE AUDACE
  # cut 2
  # gain 1.4
d3 $ gF1 $ gM1 -- Drumroll fantome
  $ mask "<f!16 f!11 [f t] t!4 t!32>"
  $ whenmod 32 24 (juxBy 0.4 rev)
  $ "~ h ~ h ~ h*<1!3 2> ~ h*<1!7 [4 <4 <2 8>>]>"
  # drumFrom "rolandtr808" "oh"
  # cut 3
  # room 0.3 # dry 1.9
  # sz 0.8
  # pan 0.7
d4 $ gF2 $ gM3
  $ midiOn "^89" (ply "4 2")
  $ superimpose (
    (# crushbus 41 (range 16 2.8 ("^53" + 0.25 * perlin)))
  . (# hpf 200)
  . (# lpf 10000)
  . (|* gain 1))
  $ note ("[fs3@7 <g3 <bf2 e3>>]"
  |+| "<0!32 [0 <<7!4 -7 7!3> <12 -5>>]!32>" -- Richer echoes
  )
  # "bassWarsaw"
  # lpf 300
  # delay 0.8 # delayfb 0.4 # delayt 0.5
  # gain (1 + (0.2 * perlin))
  -- # legato "<0!32 [<0!3 0.2>]!32>"
  # att 0.2 # rel 4
  # room 0.2 # sz 0.4 # dry 0.9
d5 $ gF3 $ gM3
  $ whenmod 128 64 (# n "1")
  $ whenmod 68 48 (# begin 0.5)
  $ "jane_wang:0"
  -- # begin 0.79
  # att 0.15 # rel 4
  # begin "<0!4 0.2!4 0.4 0.2!2 0.79!2>"
  # cut 5
  # gain 1.2
d8 $ gF1 $ gM1
  $ midiOn "^60" (mask "f(<4!3 [2 8]>,8)")
  $ chop 16
  $ loopAt 1
  $ midiOn "^56" ((>| "jungle_breaks:109") . (|* gain 0.95))
  $ "jungle_breaks:110"
  # cut 8
  # hpf 400
  # att 0.05
  # rel 2
  # gain 1.4

d9