setcps 1

d1
$ sometimes rev
$ every 2 (off 0.125 id)
$ every 4 (off 0.5 id)
$ s "bd"

d2
$ sometimes (0.25 <~)
$ every 2 (off 0.125 (|>0))
$ every 4 (off 0.25 (|>0))
$ every 8 (off 0.375 (|>0))
$ every 16 rev
$ every' 16 8 (fast 2)
$ s "hh"

d3
$ degradeBy "0 0.5"
$ every 2 (fast 2)
$ s "sn cp"

d4
-- $ chunk 1 (reverb 1)
$ sometimesBy 0.5 (off 0.125 (|> 0))
$ every 4 (hurry 2)
$ every 8 rev
$ s "supervibe*8" # up (run 12)
# gain 0.5

d3
$ every 4 (jux rev)
$ every 2 (degradeBy (0.4))
$ s "hh*32"
# cutoff (range 300 1000 $ slow 2 $ sine) # resonance "0.4"