hush

setcps 1

d1 $ s "hh:0*4"

d1
$ every 8 (# n "0 [7|1]>")
$ every 4 (off 0.125 (|> 8))
$ every 4 degrade
$ every' 4 2 (# n 8)
$ s "[hh [hh hh] ~]"

d2
$ degradeBy 0.4
$ every 4 (jux rev)
$ every 3 (off 0 (|- 7))
$ every 2 (off 0.25 (|> (choose [0,12])))
$ euclid "<3 5 3 5>" 8
$ s "superpiano"
# n "[0 | 3 | 5 | 7 | 12]"
-- # n 7
# velocity (0.4 + (rand / 8))
# sustain (0.2 + (rand / 2))

d3
$ degradeBy 0.2
$ s "bass3(5,8)"
# note "[0 | 5] [5 | 7] [5 | 7 | 12]"
# gain 0.8

d4 $ s "mouth:4"

d1 $ s "sax/4" # n "[12]"

-- Bass: hh5
-- Finish cymbal: hh7 / hh1
-- Scratchs: hh2 / hh3