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
do
solo 1
solo 2
solo 3
solo 4
d1
$ whenmod 16 12 (mask "t(<0!2 1!2>,2)")
$ s "k . k(<3 1 2 3>,8)" # s "reverbkick"
# lpf 200 # gain 0.6
d2 -- Drumroll
$ every 4 (fast 2)
$ fast ("<1!3 2>" * 4)
$ s "drum:8" # gain 1.1
d3
$ superimpose (
off 0.125 (ply 2)
. fast 2
. (|+ 24)
)
$ note "<f4'maj f4'min f3'min f4'maj>"
# s "superpiano"
# velocity (slow 16 $ range 0.35 0.4 sine)
# gain (slow 64 $ range 0.5 1 saw)
d4 $ arp "pinkyup downup" $ note ("f2'maj")
# s "supersaw" # voice 0.3 # gain 0.4
do
setcps 0.5
d1 $ note "0 0 0 <0!3 <~ [~ 0]>>" # s "jazz" # gain 0.9
d2
$ every 4 (off 0.125 id)
$ whenmod 16 8 (fast 2)
$ s "~ cp" # lpf 4000
# gain 0.95
d3
$ every 8 (ply 2)
$ s "dr*<8!3 16>"
# gain (slow 16 $ range 0.7 1 perlin)
d4
$ whenmod 32 16 (mask "t(<1!8 3!4 4!4>,4)")
$ note (scale "aeolian" (
sometimes (7 -)
"0 ~ [4 <5 7> ~]"
) - 36)
# s "supersaw"
# voice 0.01
# gain 0.8
d7 -- synthe echos electrique
$ superimpose (
(# s "supercomparator") .
(# voice (slow 64 $ sine * 8)) . (|- note 12)
)
$ whenmod 16 8 (sometimes (juxBy 0.4 (|+ note 12))) -- jux eclairs!
$ degradeBy "<1 1 1 0> <[1 1 1 0] [1 0] 0>"
$ n "0*16"
# voice 0.1
# s "supersquare"
# note (scale "aeolian"
"<0 0 0 0 2 2 4 -2>")
# gain 0.55