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
setcps 0.6
d1
$ often (
superimpose (
(stut 4 0.5 0.125) .
(# s "electro1:3") .
(# gain 0.8)
))
$ note "0 <0 0?> <0 0 0? 0> [[0|1] 1]"
-- $ note "<0 [0|0*2]>*4"
-- $ note "[0|0*2] . ~ <0 0 0 ~>" -- attente
# s "jazz"
# pan 0.3
# gain 0.75
d2 -- Snares reguliers
$ whenmod 8 4 (fast 2)
$ s "~ ~ s ~"
# s "snare:8"
# room (slow 20 $ range 0 0.6 sine)
# size (slow 40 $ range 0.6 0.6 cosine)
# dry 0.9
# gain 0.9
d3 -- Drumroll FIXME
$ degrade
$ s "dr*16"
# gain 0.8
d4 --
-- Todo: vars interne a la mesure
$ s "supersaw(<5 7 3>,8, <0 2>)"
# n (scale "aeolian" ("<0 0 0 0 2 2 4 <-2 3>>" - 14))
# gain (slow 16 $ range 0.5 0.65 sine)
# voice 0.1 # room 0.5 # orbit 0
d5 -- Bulles folles
$ bite 4 "<0 3>(1,3,<1 3>) <1 1(3,8)> 2 <3 3*2 0 3>"
$ note (scale "major" (
whenmod 16 8 (8 -)
(run 8)
+ (slow 4 $ "<-14 -7 0 -14>") -- gamme
+ "[0,7]" -- accord
))
# s "supersaw"
# voice 0.05
# accelerate 1
# gain (slow 16 $ range 0.6 0.4 sine)
d6 -- Sirene
-- $ whenmod 16 8 (chop ("<2 2 16 16 8 64 32 16>"))
$ s "supersiren/4"
# sustain 3 -- FIXME: Except when chopped
# n (scale "aeolian" ("<0 0 0 0 2 2 4 <-2 3>>" - 14))
# gain 0.6
d7 -- glitchs!
$ jux rev
$ s "g(<3 5 8 1>,8,<0 2>)"
# s "glitch:2"
# gain 0.6
# pan (rand / 4)
d8 -- Bulles finales
$ often (# crush 4)
$ someCycles (stut 8 0.5 (1/16))
$ every' 8 7 (# gain 0.7)
$ s "~ s ~ s ~ s s ~"
# s "supersnare"
# n (-12)
# accelerate 8
# sustain 1
# gain 0