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
-- DU CODE !
do
d1 -- BEAT
$ whenmod 32 30 (# gain 0.9)
$ whenmod 32 25 (# gain 0)
$ sometimesBy "1 0.5 0.25 0" (fast 2) -- FASTER!
$ s "b ~ [b? b] <~ [~ b?]>"
# s "reverbkick"
# gain 0.8
# pan (slow 8 $ range 0.6 0.8 saw)
d2 -- Breaks
$ whenmod 32 19 rev
$ whenmod 32 18 (slow 2)
$ whenmod 32 17 (fast 2)
$ whenmod 32 16 rev
$ whenmod 32 30 (# gain "<0.5 0.6>")
$ whenmod 32 24 (# gain 0)
$ loopAt 2 $ chop (slow 4 "<2 8>") $ sound "break"
# gain 0.65
# pan (slow 8 $ range 0.2 0.8 saw)
d3 -- Percroll
$ almostNever (# n 1) . degrade
$ s "d(<10!2 14 16>,16)"
# s "bsperc:5"
# gain (slow 8 $ range 0.7 1 saw)
d4 -- basse bruitée
$ whenmod 32 16 (# crush 4) . (# lpf 12000)
$ sometimesBy 0.2 (fast 2)
$ chop (slow 4 $ "<[1|2] [4|8] 8 1>")
$ note (scale "aeolian" (
"[0, <~ [0 ~ <1 2> <2 1>]>]"
) - 24)
# s "supersaw"
# voice 0.25
# gain 0.55
d5 -- Claps dégradés
$ degradeBy "0.9 0 0.5"
$ s "c([3|5],8)"
# s "clap"
# n "0 [0|1]"
# gain 0.8
d6 -- PIANO FOU
$ note (scale "aeolian" (
"c5'maj(<[3|5|7] [10|12|14]>,16,[0|4])" -- accord
+ (iter 4 $ "{0 [2 0] 4 [2 0]}") -- melodie
+ "<0!4 7 0 -7>" -- gamme
)
)
# "superpiano"
# sustain (1/"[2|4|8]")
# velocity (slow 64 $ range 0.3 0.5 sine)
d7 -- Choeur nappes
$ note (scale "aeolian" ("c4'maj"))
# s "moogBass"
# amp (slow 4 $ "<0.2 0.4 0.6 0.8>") -- INTENSIFICATION
# gain (slow 4 $ "<1 0.9 0.8 0.8>") -- Compense volume
# cutoff (slow 16 $ (1000 * (1 + run 15))) -- Variations filtree
d8 -- du code
$ "~ kaamelott:2/8"
# begin (slow 8 $ "<0 0 0.5 0.55 0.75 0.5>")
# end (slow 8 $ "<0.5 0.5 1 1 1 1 >")
# crush (5 + irand 10)
# speed (0.85 + rand / 4)
# room 0.5
# gain 0.7