

once $ "menthe:0" # cut 4  -- INTRO VOIX
  # room 0.5 
  # sz 0.9
  # gain 1

once $ "menthe:1" # cut 4  -- LONGUE MULTIPLE
  # gain 1.3

do
resetCycles
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 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 double = (midiOn "^29" $ fast 2)
setcps (80/60/4)
d1 $ gF1 $ gM2 $ double 
  $ "k . ~ k ~ <~ k*<1 2>>" 
  # "[techno:0,kick:4]"
-- # "[cpu,kick:4]"
d2 $ gF1 $ gM1 $ double $ "~ s ~ s*<1!3 2>" 
  # "vec1_snare:26"
d3 $ gF1 $ gM1 $ "~ h ~ h ~ h ~ h ~ h ~ h ~ h h? h*<1!3 2>" 
  # "ho:1" # gain 0.5 # cut 3
d4 $ gF2 $ gMute3
  $ midiOn "^89" (loopAt "<0.5!7 0.25>")
  $ midiOn "^57" (# n "<3!8 4!8>")
  $ chop 8
  $ loopAt 2  
  $ "menthe" # n "<2!16 5!16>" 
  # room 0.3
  # cut 1
d8 $ gF1 $ gM1
  $ loopAt 0.5 
  $ chop 8 
  $ midiOn "^36" (loopAt 4 . (|> "jungle_breaks:75"))
  $ midiOn "^56" (loopAt 2 . (|> "jungle_breaks:19"))
  -- $ whenmod 8 7 (striate "1 <2 4>")
  $  "breaks165"  
