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
-- Dub digitale? decouverte supersynths
setcps 0.5
d1
$ whenmod 32 30 (# silence)
$ whenmod 32 24 (degrade)
$ fast "4 <4!3 <8 [16 4]>>"
$ s "kick808"
d2 -- Snares
$ n "~ [s*[1|2] ~]"
# s "snare:3"
d3
$ someCycles (fast "1 1 1 2")
$ sometimes (# s "drum:8")
$ fast "<<4 12> 8> <4 <8 6>>"
$ s "dr"
d4
$ n "~ 0(3,4,[0|1]) ~ 0(3,4,[0|2])"
# note (scale "aeolian" "[0,3,7]" + "0 <3!3 <2 5>>")
|- note 24
# s "superhammond"
# voice 32
# gain 0.8
d5
$ whenmod 8 6 (rev)
$ chop "<1 2 4>"
$ arp "updown"
$ s "supersiren"
# note (
scale "aeolian" "[0,3,7]" + "0 <3!3 <2 5>>"
- 7
)
# release 1.5
# sustain 8
# gain 0.45
d6
$ s "0(<8 5>,8)"
# note (
scale "aeolian" "[0,3,7]" + "0 <3!3 <2 5>>"
- 7
)
# s "supermandolin"
# gain 0.9
d7
$ s "superhoover"
# note (
scale "aeolian" "[0,3,7]" + "0 <3!3 <2 5>>"
- 12
)
# slide 2
# accelerate "<2 4 8 16 32 64 128>"
# decay "[0.5 0.25]"
# gain 0.6
d8
$ slow 4
-- $ off (1/16) (# note "c3'maj")
$ chop "<16 [16 8] [16 16 8]>"
$ arp "updown"
$ s "superzow"
# note (slow 4 $ "<c4'maj e4'maj>")
# gain 0.7