setcps 1.00

d1
$ whenmod 32 30 (const
  $ s "e:2 ~ [e:2 e:2] e:3 ~"
  # s "electro1"
  )
$ whenmod 32 28 (# silence)
$ someCyclesBy 0.05 (superimpose (fast 2) . (# gain 0.7))
$ s "reverbkick(2,4)"
# gain 0.9

d2
$ whenmod 32 24 (# silence)
$ someCycles (# s "hh")
$ s "<dr [dr*2 <~ dr*4>]>"

d4
$ whenmod 16 6 (# gain 0.8)
$ whenmod 16 4 (# gain 0.7)
$ whenmod 16 2 (# gain 0.6)
$ whenmod 16 0 (# gain 0.4)
$ off 0.25 ((|-| note 7) . (# gain 0.8))
$ s "bass3(<1 3>,8)"
# note (scale "major" "<0 <4 0> 0>")
# release (0.5 + rand / 2)
# gain 0


d5
$ whenmod 128 64 (jux rev)
$ whenmod 32 24 (off 0.125 id)
$ every 2 (# gain 0.8)
$ rarely (rev)
$ sometimes (superimpose (|-| note 7))
$ sometimes (superimpose (|+| note 14))
$ chop 4 $ s "sax"
# note (scale "major" "0 4 <7 0>")
# cut 1
# gain 0

d6
-- $ whenmod 32 31 (const $ s "moan" # gain 0.8 # crush 4)
$ whenmod 4 3 (# gain 0.6)
$ whenmod 4 0 (# gain 0)
$ degradeBy 0.3
$ superimpose (|+| note 7)
$ sometimesBy 0.2 (jux rev)
$ rev
-- $ chop 2
$ s "kurt"
# crush 5
# gain 0.6
# pan (rand)


once $ s "kurt:6"