resetCycles

do
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 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 gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
setcps (120/60/4)
d1 $ gF1 $ gMute2
  $ midiOff "^42"  (<| "<k [~!7 k*<1 2>]>")
  $ midiOn "^42" (<| "k k <k!3 [k*2 ~]> k")
  $ "kick:5"
--   # room 0.2 # dry 1.1
--   # gain "<1 0.8>"
--   # cut 1
d2 $ gF1 $ gM1
  $ "~ <rampleO10:2!3 cp>"
--   $ someCyclesBy  "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>")
--   $ someCyclesBy  "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>")
--   $ "[snare:24,snare:51]"
--   # gain "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>"
-- d3 $ gF1 $ gM1 $ "h(3,8) h(<3 <5 [5 <1 <8 [8 16]>>]>>,8)"
--   # drumFrom "rolandtr909" "hh" # cut 3 # gain 0.6 # legato 0.25
d3
  $ midiOn "^44" (stut 4 "0.8" "e")
  $ n ("~ 1 ~ 2 ~ 2 ~ <1!3 2>") # "rampleS24" # cut 3
d4 $ gF2 $ gMute2 $ note (
  "b4(<3 5 3 [3 5]>,8) <a5 <ef5 a4>>(<1!3 3>,8,<0 1>)"
  - 24
  -- - 1
  )
  # "bassWarsaw"
  # rel 0.4
  -- # octersubbus 41 (range 0 2 "^53")
  -- # crushbus 42 (range 16 2 "^33")
  # att 0.2
d4 $ gF2 $ gM1 -- BASSE SIMPLE
  $ note "~ b ~ b ~ b ~ [c b]"
  # octave 4
  # n ("<1!4 2!4>")
  # "rampleU4"
  -- # crushbus 42 (range 16 2 "^33")
  # cut 4
d7 $ gF2
  $ midiOn "^89" (ply "<1 2> <2!3 4 4!3 8>")
  $ slice 8 ("[0 1 2 3]*2" + "<0!4 3!4>")
  -- $ loopAt 8
  $ n "<3!3 4>"
  # octave "<4 [4 4 <4 [5|4]> 4] 4 <4 [4|3]>>"
  # "rampleU8"
  # cut 7
d5 -- ARPEGIATEUR
  -- $ mask "t(8,16)"
  $ arp "<up down updown downup>"
  $ fast (4/3)
  $ note (
    "[c3 b3]" + "c'min'4"
  + 4
  )
  # n ("<0 1 2>")
  # "rampleS53"
  -- # legato 0.25
  -- # att 0.12
  # rel (range 0.19 0.02 (perlin))
  # pan 0.4
  # gain 1.2
-- d9 $ mask "<f!3 t>"
--   -- $ (0.1 ~>)
--   $ "bogdan_grime:3"
--   # end "<0.42!3 0.66>"
--   # delay "<0!3 0.7>"
--   # delayt "h"
--   # delayfb 0
--   # speed 0.85
--   # room 0.4
--   # gain 1.2
d8 $ gF1 $ gM1 -- Come on breaks!
  $ chop 8
  $ midiOn "^56" (loopAt (2/3) . (# n "<74>"))
  $ midiOn "^92" (ply 4)
  $ midiOn "^36" (loopAt (2/3) . (# n "19")) -- Pure COMEON!
  -- $ midiOn "^56" ((# n "23")) -- Raise COMEON!
  $ midiOff "^60" (mask "t(4,8)")
  $ loopAt 2
  $ "jungle_breaks:26"
  # cut 8
  # gain 0.8
-- d4 $ gF2 $ gMute3 -- Bassline aqualgorithmique
--   $ note (
--   "<0!8 0(3,8)!8> 0" + "<d4!3 a3> <fs4 e4 d4 b3>"
--   - 12)
--   -- # "90s_matrix:0"
--   # "bassWarsaw"
--   # cut 4
--   # pan 0.3
--   # room 0.4
--   # octersubsub 0
--   # crushbus 41 (range 16 3.5 "^53")
--   # octersubsubbus 42 (range 0 2 "^33")
--   # gain 0.8
-- d5 $ gM3 $ gF3
--   $ juxBy 0.4 rev
--   $ note ("<[b4 [~ d5]. [fs5@3 fs5]] [e5 fs5 e5 fs5. [d5@3 fs5]]>")
--   # "marimba1"
--   # att 0.8
--   # rel 1
--   # pan 0.9
--   # gain 3
--   # room 0.3
d10 $ gF2 -- Menace
 $ note "<b3 ~ ~ [~!7 c4]>"
 # "90s_synatm:10"
 # room 0.3 # sz 0.8
 # gain 0.65
 # att 0.10
 # rel 10
 # legato 2
 # cut 9
-- d7 $ gM2 $ gF2
--   $ ply 2
--   $ midiOn "^91" (struct "t*<8!3 [8 4]>")
--   $ someCyclesBy "^19" (slice 4 "<<0 <1 2>>!8 <3 3 3*2 3*<4 8>>!8>")
--   $ chop 16
--   $ loopAt 4 $ "meth_bass:18" # cut 7 # gain 0.6
--   -- # octersubsubbus 73 (range 0 8 "^19")
--   -- # octersubbus 72 (range 0 4 "^35")
--   -- # octerbus 71 (range 0 1.7 "^55")
--   # crushbus 71 (range 16 1.7 "^55")
--   # panbus 72 (range 0.2 0.8 (fast "<2!4 4!4>" sine))