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
-- DNB Joyeuse mineure 8-bit
-- surprise techno-tribe!
do
setcps (165/4/60)
solo 1
solo 2
unsolo 3
unsolo 4
solo 5
d1 -- Kick regulier, pause de temps en temps
-- section Kick DNB
-- $ mask "<t!12 [t f]!2>"
-- $ fast 4
-- $ s "<k [~ k]> . ~"
-- section Kick TECHNO
$ slow "<1!8 2!8>"
$ fast "<1!6 2 4>"
$ s "k k k <k!3 [~ k]>"
# "kick:5"
# crush 5
# gain 0.3
d2 -- Snares contretemps
$ fast "2"
$ sometimesBy "<0 0.5>" ((# lpf 1000) . (|* gain 1.2))
$ s "~ . <s!3 s*2>" # note (-12)
# s "snare:2"
# gain 0.65
d3 -- Drumroll
$ fast ("<1!3 2>" * 4)
$ s "drum:8" # gain 0.9
d4 -- COMETE
$ mask "<f!8 t!8 [f t]!8>"
$ s "m(<3!3 <5 1>>,8)"
# s "methbass:3"
# lpf (slow 16 $ range 200 5000 isaw)
# begin (slow 8 $ "<0 0.25 0.75>")
# end 0.85
# cut 1
# gain 0.6
d5
$ superimpose (
(arp "up") . (|+ note 24)
. (# gain 0.5)
. (# crush (slow 16 $ range 0.75 8 sine))
)
$ s "t(<4!2 5!2>,<4!2 8!2>)"
# note ("<c3'min c3'maj c3'min7 c3'maj>" - 12)
# s "supersaw"
# voice 0.01 # gain 0.4
d9 -- jambon fromage
$ degradeBy 1
$ slow 4
$ whenmod 8 6 (
(# s "~ macron:11")
. (# cut 19)
)
$ often (superimpose ((# squiz 2) . (|* gain 0.9)))
$ slice 4 ("0 <0!3 1>")
$ s "macron:7"
# room 0.5
# size 0.2
# squiz 1.2
# speed (range 0.8 0.95 perlin)
# cut 9
once
$ note (scale "major" 1 - (run 4))
# s "kaamelott:1"
# end 0.04 # cut 1
# gain 0.8