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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
hush
setcps 0.5
d8 $ euclid "<2 4 8 0>" 4
$ s "kicklinn"
d1
$ every 8 (rev)
$ every 4 (off 0.125 id)
$ s "dr*4 <dr*4 <dr*8 [dr*4 cp*2]>>"
-- poum: sn
-- tchac: cp
d2
$ every 8 (rev)
$ every' 16 14 (# gain 0)
$ every' 16 15 (# gain 0)
$ s "sn ~ cp ~ ~ sn cp <~ cp>"
d3
$ every' 16 12 (# gain 0)
$ every' 16 13 (# gain 0)
$ every 16 (rev)
$ every 8 (hurry 2)
$ chunk 4 (# crush 2)
$ every 4 (off 0 (|> 5))
$ every 4 (off 0.125 id)
$ s "glitch2:2(<3 5 7>,8)"
# gain 0.8
d4
$ degradeBy 0.2
$ sometimes (hurry 2)
$ off 0 (# note "<0 7>")
$ every' 4 3 (off 0.25 (|+ "[0,5]"))
$ every 2 (off 0.125 (# note "10"))
$ every' 2 1 (off 0.125 (# note "<[7,5] [3,15]>"))
$ s "superpiano(1,8)"
# note 3
# velocity (choose [0.5, 0.7])
# sustain 2
d5
$ every 2 (off 0.25 id)
$ every' 4 3 (off 0.375 (|- 3))
$ every 4 (off 0.375 (|- 5))
$ every 4 (off 0.375 id)
$ every' 8 5 (# gain 0)
$ every' 8 6 (# gain 0)
$ every' 8 7 (# gain 0)
$ s "trump"
# up "<1 8 3 1 8 13 8 1>"
# gain 0.8
d6
$ every 2 (off 0.125 id)
$ every' 4 3 (off 0.375 id)
$ every' 4 4 (off 0.5 id)
$ every 8 (rev)
$ every' 8 7 (# gain 0)
$ s "bass3(<3 5 3 1>,8)"
# up "<3 10 3>"
# gain 0.8
d7
$ degrade
$ slow 2
$ (# crush 5)
$ euclid "<5,3>" "8"
$ s "superfork"
# up 7
-- # up ("<[3, 5], <7, [3, 10]>>")
# gain 0.8
--- Etude
d1 $ s "~ [sn*2 ht] ~ [lt*2 mt] dr:0*4"
d3 $ s "numbers*4" # n (1 + run 4)
d4
$ every 4 (off 0.125 id)
$ every 8 (off 0.25 id)
$ every 16 (chunk 4 (rev))
$ every 16 (# note 7)
$ every' 2 1 (jux rev)
$ s "ulgab*4"
# n "4 5"
# cut 1
d8 $ s "hh:4(1,8,6)" # up (-2)
d1 $ "bd(3,8) <cp cp*2>"
d3 $ every 4 (# gain 1)
$ s "cp"
# gain 0
d5
$ every 4 (off 0.25 (|+ 7))
$ every' 4 2 (off 0.125 (|+ 7))
$ s "superpiano(7,8,2)"
# note "<[-20,-13]>"--[-19,-15] [-20,-16]*2>"
# velocity 0.5
# sustain 3
# gain 0.9
d1
$ s "<808bd <cp co:3>> dr ~ dr*4"