resetCycles

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
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 $ gM2
  $ midiOn "^42" (<| "k k k k*<1 1 1 2>")
  $ midiOff "^42" ((<| "<k(3,8) [k k k k ~]>") . superimpose (# "kick:5"))
  $ "[jazz,house]"
  # gain 1.2
d2 $ gF1 $ gM1
  $ midiOn "^43"  (<| "~ c ~ c")
  $ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
  $ "[rampleM1:10]"
  # gain 0.9
  # pan 0.6
  # room 0.84 # dry 0.95 # sz 0.1
  # lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
  $ midiOff "^44" (slow 2)
  $ arp "up"
  $ midiOn "^76" (ply 2)
  $ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
  # "[rampleS57:2]"
  # note (-12 + "3.5" + "e6")
  -- # cut 3
  # gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
  # pan 0.3
d4
  $ loopAt 2
  $ midiOn "^33" (chop 2)
  $ midiOn "^89" (chop 8)
  $ midiOn "^57" (slice 4 "4 3 2 1")
  $ chop 8
  $ "nujazz_bass120:18"
  # crushbus 41 (range 16 4.5 "^53")
  # room 0.3
  # cut 4
  # octer 0.9
  # octersub 0.5
d5 $ n "<10 10 11 10 10 12 11 12 11 12 12 11 11 12 12 13>" # "nujazz_guitar120" # cut 5
  # crushbus 51 (range 16 4.5 "^54")
  # hpfbus 51 (range 0 1500 "^54")
d7
  $ slice 4 "0 [~ 1] 2 <2 3>"
  $ chop 16
  $ loopAt 2
  $ "jungle_breaks:19" # cut 7
d8 $ gF1 $ gM1 -- BREAK THIS FLOOR
  $ midiOn "^60" (slice 8 $ run 16)
  $ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
  $ chop 16
  $ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:6"))
  $ midiOn "^56" (loopAt 0.5 . (# "jungle_breaks:45")) -- ORLEANAISE
  $ loopAt 4
  $ "nujazz_beats120:2"
  # pan "0.2 0.8 0.2 0.8"


-- FIXME GRAVEYARDDD