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
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
do
setcps 0.5
d1 -- KICK filtre grave
$ s "jazz(<3!3 5>,11)"
# gain 0.9
# lpf 100
d2 -- SNARE contretemps
$ whenmod 4 3 (fast "2 4")
$ s "~ snare:2"
|- note (slow 8 $ range 0 8 sine)
# room 0.2 # size 0.4 # dry 1
# gain 0.9
d3 -- Drumroll (metronome)
$ s "d*4" # s "drum:8"
# gain 0.9
d5
-- $ TODO guitare
-- superimpose (swing 2 . (|+ note 36))
$ note ("0" + "c5(<3 <5 4>>,8)") # s "bass3:5"
# gain 0.8
do
unmute 2 -- snare
unmute 3 -- Drumroll
unmute 6
unmute 1
setcps 0.3
d1 -- Breakbeat
$ superimpose (const -- BEAT
$ rarely (0.125 ~>)
$ "k . k(<3!3 5>,8)"
# s "kick:5" # lpf 200
# gain 0.8
)
$ whenmod 32 16 ( -- pont!
mask "t(6,8)" -- cut progressif
)
$ whenmod 8 6 ( -- pont!
mask "t(5,8,2)" -- cut progressif
)
$ loopAt 2 -- Etire le break
$ slice 8 ( -- Decoupage
"0*2 1 [0|2] [0|3] <0 4> <0!4 5!4> <0 6> <0 7>"
)
$ s "break" -- Notre break
# gain 0.8 -- Volume
d2 -- Snare accelere sur la fin
$ rarely (fast 2)
$ whenmod 4 3 (ply "2 4")
$ s "~ sn:1" # gain 0.9 # note (-4)
d3 -- Piano main gauche base accords
$ superimpose ( -- chhoeurs!
(# s "moogBass")
. (|- note 12)
. (# gain 0.9)
. (# sustain 3.5)
)
$ note ("<c4'maj c4'min d4'maj c4'maj>")
# s "superpiano"
# velocity (0.65 + (perlin * 0.2))
# sustain 1
d4 -- Bassline
$ mask "t(<1!4 4 2!3 3 4!7>,4)"
$ off (1/24) (|- gain 0.1)
$ note (scale "minor" -- gamme mineure
"<0!2 6!2> ~ [5 4] <0 5>"
)
# s "bass3:4"
-- # lpf 2000
# speed 0.6
# gain 1.1
d6 -- Drumroll
$ sometimes (juxBy 0.5 degrade)
$ fast "8 <8!3 16 8!3 16!5 [32 16]!2 [32 . 32 16]!2 [32 . 32 8]!2 [16 32]!4>"
$ s "drum:8"
# gain 0.7
d7 -- Cymbales
$ slow 2
$ sometimesBy "0 0.5" (# n "1")
$ stut 4 0.9 0.125
$ note ("<0 -4>" + "0(3,3)")
# s "808cy"
# gain (slow 10 $ range 0.5 0.7 saw)
d8 -- bourrasque space
$ whenmod 16 10 (
(swing 2) . (chop 2)
)
$ s "space:3"
# speed 0.4
# gain 0.5
# room 0.8
d10 -- Random pistolets
$ sometimesBy "<0 0.25>" (# gain "0!30 0.6 0.9")
$ s "~!30 s s"
# s "[snare:57,808cy:0]"
# pan 0.6
# gain 0
-- Cymbal 7/8
once $ s "space:2" # gain 0.8
"space:0" -- zip soucoupe
"space:1" -- respirateur
"space:2" -- respirateur court
"space:3" -- vent spacial
d5
$ splice 8 "[0*2, [~ 2]*2]"
$ s "bsguitar:4" # gain 0.9
-- Pause techno
do
d1
$ whenmod 16 14 (fast 2)
$ whenmod 16 10 (slow 2)
$ s "jazz(4,8)"
# hpf (slow 4 $ range 50 400 perlin)
d3 $ sometimes (ply 2)
$ s "ho*8" # n (irand 7) # gain 0.4
d2
$ whenmod 4 3 (fast 2)
$ s "~ cp:1"
# room 0.7 # sz 0.4
# dry 1.1
d4
$ superimpose ( -- basse grave
(|- note 12)
. slow 8
. (|- gain 0.05)
. (# room 0.5)
. (# size 0.5)
)
$ every 4 rev
$ note (scale "aeolian" (run 8) - 24)
# s "supersaw" # voice 0.1
# gain 0.6
d5 $ note (scale "minor" $ snowball 4 (+) (slow 2) $ (run 3))
# sound "gtr"
# gain 0.7