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
setcps 0.45
d1
$ sometimesBy "0 0.5" (# n 0)
$ s "bsperc(<3 [3|6] 12>,6)"
# n "[5|6]"
# gain 0.9
d2
$ sometimes (ply 2)
$ whenmod 8 7 (# gain 0)
$ s "[dr(<6!3 12>,4),[~ . ~ ~ ~ 808oh]]"
# gain 0.7
d4
$ off 0.5 degrade
$ off 0.25 degrade
$ often (superimpose (off 0.125
(|+ note "12")
))
$ slow 4
$ note (
"<7!3 0> . <5 12> 0? ~ 0?"
- 12
)
|+ note "<c'maj c'min d'min c'maj>"
# s "superpiano"
# velocity 0.45
d5
$ slow 2
$ note ("<c3'maj>"
+ "0(5,8) <<4!3 8> <2 6>>*2"
+ (slow 4 $ "<0 12>")
) # s "superfork"
# gain 0.7
# room 0.2