once $ "nujazz_beats120"
resetCycles

do
setcps(120/60/4)
let gMask = (midiOn "^41" (mask "t f f [<f t> t]"))
let gMask1 = (midiOn ("^41" -"^42")(mask "t f f [<f t> t]"))
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.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
d1 $ gF1 $ gMask1 . gMute2
  -- $ fix ((# hpf 150) . (|* gain 1.05)) "jazz"
  $ fix ((# lpf 1250) . (|* gain 1.3)) "kick:5"
  $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
  $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
  $ "[kick:5,tech:5,jazz]"
  # gain 1.1
d2 $ gF1 $ gM1
  $ midiOn "^43"  (<| "~ c ~ c")
  $ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
  $ "[cp:1,rampleM1:10]"
  # gain 0.6
  # lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
  $ midiOn "^76" (ply 2)
  -- $ (0.125 ~>) -- decalage
  -- $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
  -- $ whenmod 64 8 (struct "t*<8 <4 <2 <1 [1 8]>>>>")
  $ "d*<8 [8 [16 <8 16> 16 <8 4 <16 32>>]]>" # "drum:2"
  # cut 3
  # legato (range 0.28 1 sine)
  # gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
  # room 0.14 # sz 0.4 # dry 1
  # pan 0.8
d4 $ gF2 $ gMute3 -- Questions basses
  $ midiOn "^89"  (slice 8 "<[0 0 0 3] [4 4 4 7]>")
  $ midiOn ("^57"-"^89")  (slice 8 "<[0 1 2 3]!4 [4 5 6 7]!4>")
  $ midiOff ("^57"+"^89") (slice 8 "<[0 1 2 3] [4 5 6 7]>")
  $ "nujazz_bass120:16" -- "Bass_D_2"
  # octersub 0.5
  # octerbus 41 "^53"
  # crushbus 42 (range 16 4.5 "^33")
  # lpfbus   43 (range 10000 4000 "^33")
  # room 0.4 # sz 0.5 # dry 1.1
  # cut 4
  # pan 0.6
d5 $ gF3 $ gM3  -- Side guitar
  $ midiOn "^89"  (ply "<2!3 4>" . (|+ note "<2 1>"))
  $ midiOn ("^57"-"^89")  (|+ note  "<1!4 2!4>")
  $ midiOff ("^57"+"^89") (|+ note "<2 1>")
  $ chop 4
  $ "nujazz_guitar120:1"
  # cut 5
d9 $ gF3 $ gM3  -- Ambiance garantie
  $ chop 8
  $ "nujazz_keys120/4" # n "<25!4 26!3 <26 27>>"
  # cut 9
  # pan 0.3
  # gain 0.8
  # room 0.4
d6 $ gF1 $ gM1 -- Highest hats
  -- $ (0.125 ~>) -- decalage
  -- $ whenmod 32 16 (sometimesBy "0 0.2!6 0" (ply 2))
  $ whenmod 64 8 (struct "{t(<3 <5 6 7>>,8),t*4}")
  $ "hh:7"
  # cut 3
  # gain (0.7 * (range 0.75 1.1 (fast 4 perlin)))
  # legato (range 1.1 0.25 (fast 4 perlin))
  # room 0.4 # sz 0.4
  # pan 0.2
d7 $ gM3 $ gF2
  $ midiOn "^91" (ply "<2!4 1!3> <2 4>")
  $ chop 8
  $ whenmod 16 8 (whenmod 4 3 (ply "<2 4>") . chop 8)
  $ "meth_bass:19"
  # end 0.5
  # begin "<0!4 0.2!4>"
  # cut 7
  # room 0.4
  # lpf 5000
  # octer 0
  # octersubsub 0
  -- # note "<0!4 2!4>"
  # gain 0.6
d8 $ gF1 $ gM1
  $ midiOn "^92" (ply "<2!4 1!3> <2 4>")
  $ somecyclesBy (slow 16 $ range 0.89 0.1 saw) (midiOff "^92" (mask "t f . t(3,8)"))
  $ iter "1 4 2 1"
  $ chop 16
  $ loopAt 2
  $ "jungle_breaks:42"
  # gain 0.6
  # pan (slow 8 $ range 0.8 0.55 saw)
d10 $ ""

-- d5 $ gF3 $ gM3 -- Piano guide premier
--   $ midiOn "^58" (juxBy 0.9 ( -- Piano reflet second
--       mask "<<f t> [<f t> t]>" .
--       (# begin 0.5)
--       . rev
--       . (|+ note 12)
--       . (|+ pan 0.2)
--       . (|* gain 0.87)
--       . (# cut 55))
--   )
--   $ slice 4 "<0 1 2 3 0 1 2 3 1 2 1 3 1 2 1 <~ 3>>"
--   $ "nujazz_keys120"
--   # n "<54!16 53!16>"
--   # pan 0.3
--   # cut 5
--   # gain 0.9
-- d7 $ gF2 $ gM3 -- Guitare egaree
--   $ midiOn "^59" (ply 2)
--   $ midiOn "^91" (ply 2)
--   $ chop 4
--   $ n "<0!3 1 0!3 1 3!3 4 3!3 5 6!3 7 6 6 7 7 6 7!3 7!4>"
--   -- $ n "<>"
--   # "nujazz_wahwah125"
--   # cut 7
--   # pan 0.8
--   # room 0.4
--   # octersubbus 71 (range 0 2 "^55")
--   # octersubsubbus 72 (range 0 3 "^55")
--   # gain 0.6
-- d8 $ gF1 $ gM1 -- JazzyBelle JazzyBreak
--   $ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
--   $ chop 16
--   $ loopAt 4
--   $ n "<0!4 1!3 0 2!4 3!3 <2 3>>"
--   # "nujazz_beats120"
--   # pan 0.26
--   # gain 0.7
--   # cut 8
-- d10 $ gF3 -- Pads
--   $ whenmod 64 132 ( -- ELECTRIFICATION
--     # octerbus 101 (slow 32 $ range 0.1 1.9 cosine)
--   )
--   $ n "<47 <48!3 46>>"
--   # cut 10
--   # "nujazz_keys120"
--   # room 0.5 # sz 0.8 # dry 0.5
--   # pan 0.4
--   # gain 0.55
-- d9  $ gM3 $ gF3
--   $ jux rev
--   $ note "<[a4@3 <c5 f5>] e5 [<d5!3 f5>] <a5!3 c6>>"
--   # "moogBass"
--   # chorus 0.2
--   # gain 0.5
--   # att 0.3
--   # rel 2
--   # room 0.8
--   # sz 0.8
--   # pan 0.8

once $ "jungle_vocals:28" # cut 6