1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
setcps 0.44
d1
$ whenmod 8 4 (rev)
$ every 8 ((# s "hh"). (# n "2 3") . (# gain 1))
$ s "hh sn dr*4 <808cy 808cy 808cy 808cy*2>"
# gain 0.8
d2
$ whenmod 8 7 ((# s "bd:1 hh:4") . (# gain 0.8))
$ whenmod 16 10 (# silence)
$ fast 4
$ "bd:1 [sn,linnhats]:1"
# gain 0.8
d3
$ whenmod 32 16 (rev)
$ whenmod 16 15 (# gain 0.5)
$ whenmod 16 12 (# silence)
$ whenmod 16 10 (# release 0.1)
$ whenmod 16 2 (# gain 0.8)
$ whenmod 16 1 (# gain 0.7)
$ whenmod 16 0 (# gain 0.6)
-- [b ] [b b]
$ s "[b ~ b ~] [b ~ ~ ~] [b <~ b> <~ ~ ~ b> b] [~ b? ~ b?]"
# s "bass3:5"
# note "0 5 [[8 5] [8 <12 5>]] 0 "
-- hh:2 scratch
-- hh:4 final!
-- bass3:
-- 0
-- 4: ronde courte
-- 5: ronde longue
-- 6: seche
-- 7: profonde
-- 8: electric, rare