resetCycles

do
setcps (85/60/4)
let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.18 saw)))
d1 $ g
  $ mask "<f!16 t!48>"
  $ "k*<1!4 2 1!3> ~ . ~ k ~ <~ k ~ <~ k>>"
  # "reverbkick" # gain 0.86
d2 $ g
  $ mask "<f!8 t!54>"
  $ whenmod 4 3 (ply "<2!4 2 2 4 <4 8>>")
  $ fast "<2 <2!8 [4!3 2]!8>>" $ "~ cp" # "[sn:45,sn:10]"
  # gain 0.95
d3 $ g
  $ mask "<f!4 t!28>"
  $ fast "1 <1 <2 [<2 [4 8]> <4 [4 . 16 8]>]>>"
  $ "drum:2*8"
  # gain 0.8
d4
  $ whenmod 64 0 ((# legato "<1!8 h!4 q q e s>") . chop "<4 4 16 <4 2>>")
  $ whenmod 32 16 (# djfbus 4 (slow 16 $ range 0.5 0.98 saw))
  $ n "<0!4 1 0 1 1*2>"
  # "celtic_guitar85"
  # gain 0.9
  # room (slow 16 $ range 0.35 0.8 saw)
  # pan 0.67
  # drybus 41 (1.3 + 0.4 * perlin)
  # sz 0.49
  # cut 4
d5 -- SUB accompagnateurs
  $ g
  $ mask "<f!8 f f t t t!50>"
  $ note "d*<1!4 2!4> ~!3 . ~!3 <~ <f g>*<1!3 <4 [4 2]>>>"
  # "[808bd:1,wobble]"
  # lpf 4000
  # gain 1.1
  # room 0.5
  # sz 0.9
  # dry 1
  # pan 0.33
d6
  $ whenmod 64 32 (
    (|* gain (slow 32 $ range 4 1 saw))
    . mask "t!3 <t!4 f t f t> . <f t [t f] t> t"
  )
  $ whenmod 32 16 (|* gain (slow 16 $ range 1.5 4 saw))
  $ slice 8 (run "8 <8!3 16>")
  $ chop 8
  $ loopAt 1
  $ "break:11"
  # gain 0.2