do
-- resetCycles
setcps (89/60/4)
d1 $ gF1 $ gM1 -- Kick de 
  $ fast 2
  $ midiOff "^41" (<| "k  . ~ k ~ ~ ")
  $ midiOn  "^41" (<| "k k k <k <k*2 [~ k]>>")
  $ "[bskick,jazz]"
  # gain 1.2
  # gain 1.8
  -- # cut 1
  -- PLN 2026-08-02: "definitely the kicks too saturate". Measured, not guessed.
  -- SuperDirt amplitude is gain^4, so `gain 2` is +24.1 dB — and this line stacks
  -- TWO samples at it (popkick + kick), so ~+30 dB into the orbit. Every other
  -- orbit in this track sits between 0 and +14.1 dB: the kick was a 10 dB outlier
  -- against its own bassline. 1.5 = +14.1 dB, still 2.4 dB proud of d4. If it now
  -- reads thin, raise the OTHERS rather than coming back here. TODO @PLN verify.
  # gain 1.5
  -- # midiG' "^78" 0 1.5
d2 $ fast 2 $ gF1 $ gM2
  $ midiOn "^42" (<| "~ s ~ s*<1!3 <2 [4 2]>>")
  $ midiOff "^42" (<| "~ . s*<1!3 2> ~")
  $ "[realclaps:0,snare:56]"
  -- # "h2ogmcp"
  -- # gain (1.0 * "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>")
  # gain 1.2
d3 $ gM2 $ gF1 -- E3 (^43) was dead. PLN's own TODO, implemented: "an opening
               -- legato or att to make it slowly go from hard dry h to an open
               -- ho? as in take 5 drops, would make for a good transition imo".
               -- Held, it opens over 8 cycles — legato lets the sample ring out
               -- while the hpf walks down from 7k to 2.5k, so a tight closed hat
               -- becomes a wide one. Release and it snaps back. TODO @PLN verify.
  $ midiOn "^43" (
      (# legato (slow 8 $ range 0.4 2.5 saw))
    . (# hpf    (slow 8 $ range 7000 2500 saw))
    . (# room 0.5) . (# sz 0.7)
    )
  $ "~ d ~ d ~ d ~ d ~ d*<1 2 2 1>  ~ d ~ d ~ d"
  # "h2ogmhh"
  # hpf 7000
  # gain 1.4
  # room 0.3 # sz 0.5 # dry 0.9
  # pan "0.8 0.8 0.8 <0.2 0.2 0.8 [0.8 0.2]>"
d4 $ gF2 $ gM3
  $ midiOn "^44" (|- note 12)   -- E4, was dead: DROP TO THE CELLAR, an octave down
  $ midiOn "^76" (ply "1 <1 2 1 4>")
  $ note "[<as2 cs3 f3 cs3> <b2 ef3 fs3 b2>@7]"
  # "bassWarsaw" # cut 4
  # room 0.4 # sz 0.8 # dry 0.9
  # octersubbus 42 (range 0 1.8 "^32")
  # crushbus 41 (range 16 4.5 "^52")
  # gain 1.5
d5 $ gF3 $ gM3 
  $ midiOn "^89" ((# begin "0 0.5") . ply "<4!7 [8 16]>")
  $ midiOn "^57" (ply "<4!3 [8 16]>")
  $ slice 4 "<0 1 2 3 4 5 6 7>"
  $ "daft" # n "<0!8 1!8>" 
  # cut 5
  # gain 1.4 
  # dry 1.3 # sz 0.8 # room 0.4
  # pan "0.3!3 0.7"
  # octersubbus 51 (range 0 0.8 "^33")
  # octerbus 52 (range 0 0.4 "^33")
  # crushbus 53 (range 16 5 "^53")
d6 $ gF3 $ gM3  -- ignite
  $ midiOn "^58" (# n 3)
  $ midiOn "^90" (ply "<4!3 [8 16]>")
  $ slice 4 "<0 1 2 3 4 5 6 7>"
  $ "daft" # n "2" 
  # cut 6
  # gain 1.3 
  # dry 1.3 # sz 0.8 # room 0.4
  # pan "0.7!3 <0.6 0.4>"
  # room 0.7 # sz 0.8
d8 $ gF1 $ gM2  -- The Right Breaks :tm:
  $ midiOn "^92" (ply "<2 2 2 <4 8>>")
  $ midiOff "^60" (mask "t(8,16,1)" . chop 8)
  $ chop 8
  $ fix (loopAt 2) (n 155)
  $ loopAt 1 
  $ midiOn "^36" (loopAt "0.5" . (# n "<135!3 [<135 155> 155]>"))
  $ midiOn "^56" (# n 152)
  $ "jungle_breaks:74" 
  # cut 8
  # gain 1.5
d10 $ gM3
  $ mask "<f!4 t f!3>" 
  $ loopAt 4 $ "risers:8" # gain 1 
  # cut 10
  # room 0.3 # sz  0.6 
-- # lpf 4000
-- TODO: BANGER LEAD SIDEKICK! Can we add more of 18 19 effects to it, e.g. on 19 could
-- hit more notes, on 17 sound could change, tbh it works so well, other notes or chords
-- we could play?
d12 $ gF3 $ gM3
  $ arp "up" 
  $ note ("c'min7 c'min7" 
  + (slow 2 "<gs ef>")
  + "<0 12>"
  )
  # "FMRhodes1"
  # modIndex (range 0 16 "^20")
  # room 0.5
  # sz 0.4 
  # gain 1.2
  # pan 0.7 
