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
do
d1
$ sometimesBy "0 0.01!3 0 0.05!3" (0.125 ~>)
$ whenmod 8 6 (degradeBy "0 . 0.9 1")
$ ply 4 $ s "kick:5"
# gain 0.5
# release 0.6
# lpf (slow 2 $ range 20 5000 perlin)
d2 -- Snares noise etire
$ whenmod 8 7 rev
$ fast 2
$ s "~ s*<1!3 <2 [2 4]>>" # s "glitch:7"
# speed (range 0.5 1 perlin)
# lpf 4000
# gain 0.7 # pan (slow 4 $ "<0.3 0.25> <0.3 0.35>")
d3
$ every 5 (sometimes degrade)
$ every 4 (often (fast 2))
$ every 3 (sometimes (ply 2))
$ sometimesBy "0 0.5" ((# s "hc:1") . (|- gain 0.1))
$ s "hh*8"
# gain 0.75
# cut 3
d4 -- MULTIBASSE
$ superimpose ( -- bassline
(+| note ("[0 7](<3!3 4>,8)" - 24)) .
(|* gain 1.3) .
(|- pan 0.1) .
(# voice 0.1)
-- (# crush (slow 8 $ range 5 8 perlin))
)
$ superimpose ( -- folie aigue electrique
-- (stut 8 0.5 (1/16)) .
ply "<2 4!2 8!2 16!4 32!8>" .
(|+ note "<c6'maj f6'min c6'min f6'maj>") .
(|* gain 0.5)
)
$ note ("<0 2 0 5 8 5 2 0>/4")
|- note 12
# s "supersquare"
# voice (slow 16 $ range 0.05 2 perlin)
# gain 0.45
# pan 0.6