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
39
40
41
setcps 1
d1 $ s "<kick [~ kick ~ ~]>"
# n 4
# gain 0.8
d2
$ every 4 (off 0.25 id)
$ s "~ kick:1"
# gain 0.9
d3
-- $ every' 4 3 (off 0.25 id)
$ s "~ <clap clap clap [clap clap]>"
# gain 0.8
d4
$ whenmod 64 32 (swing 2)
$ whenmod 16 12 (|- note 3)
$ whenmod 16 8 (|- note 2)
$ s "b <~ b b ~> <~ ~ b <~ ~ ~ b>>"
# s "bass3"
# note (scale "minor" "0 2 4")
# gain 0.9
# room 0.3
d5
$ whenmod 32 31 (|- note 2)
$ whenmod 32 30 (|- note 2)
$ whenmod 32 29 (|- note 2)
$ whenmod 32 28 (|- note 1)
$ whenmod 32 24 (|+ note 7)
$ whenmod 8 4 (|+ note 1)
-- $ sometimes (swing 3)
$ degrade
$ off 0.25 (|+ note 5)
$ s "[<[~ p] [p ~]> p]"
# s "superpiano"
# n (scale "aeolian" "[0,3] [0,5]")
# gain 0.5
# velocity 0.8