setcps 0.5

d1
$ someCyclesBy 0.1 (# silence)
$ someCyclesBy 0.6 (fast 2)
$ s "reverbkick*2"
# gain "1 0.8"

d2
$ someCyclesBy 0.2 (const $ s "cp dr:0*8")
$ s "~ <sn:3 ~>"

d3
$ s "glitch*8"
# n 1
# note "0 3 5 7 5 3 0 0"

d4
$ someCyclesBy 0.1 (degradeBy 0.8)
$ someCyclesBy 0.1 (
  fast 2 . (# note (scale "dorian" (7))) . (# s "superpiano")
)
$ someCyclesBy 0.1 (# attack (tri / 8)) -- cut sample
$ whenmod 16 8 (# note (scale "dorian" "7 .. 0"))
$ off 0.125 (# note "<0 7>")
$ s "superpiano*4"
# note (scale "dorian" "0 .. 7")
# attack (tri)
# gain 0.8

d5
$ someCyclesBy 0.1 (degradeBy 0.6)
$ someCyclesBy 0.1 (
  degradeBy 0.4 . fast 2 . (# note (scale "dorian" (-7))) . (# s "superpiano")
)
$ sometimes (off 0.25 id)
$ off 0.125 (
  # note (scale "dorian" (-7) + "0 3 0")
)
$ s "superpiano*2"
# note (scale "dorian" (-14) + "0 3 0")
# gain 0.8
# sustain 2


d6
$ degrade
$ someCyclesBy 0.1 (fast 2)
$ s "bass3(5,8)"
# note (scale "dorian" "<0 3 0 3> 2 <0 0 3 3>")
# gain 0.8