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
do
solo 1
solo 3
solo 4
solo 5
unsolo 6
solo 7
resetCycles
-- Le crapeau russe
do
setcps (120/60/4)
d1 -- Kick techno regulier variations filtre
-- $ whenmod 32 24 (<| n "0*2")
-- $ whenmod 32 16 (<| n "0")
$ s "k(<4!3 [4 8 8 4!3]>,4)" # s "jazz"
# lpf (slow 64 $ range 40 400 sine)
# gain 0.95
d3 -- Les snares bogdanesques
$ fast 4
$ "~ <h!3 h*2>"
# s "bogdan:1"
# cut 3 # gain 0.8
d4 -- begaye!
$ someCyclesBy 0.2
(# gain 0)
$ rarely (# lpf 3000)
$ often (# hpf 1500)
$ loopAt 19
$ striate "64 <64!3 [64 128]>"
$ sound "bogdan:14*4"
# cut 4
# room 0.4
# size 0.5
# gain 0.8
d5 -- Electric Bassline TODO Variations
$ note (scale "aeolian" (
"0 1 0 1 0 1 <2 3> <2 -2>"
)
- 24
)
# s "supersquare" # voice 0.1 # gain 0.7
d6 -- Le crapeau!
$ someCyclesBy 0.2 (# gain 0.7)
$ loopAt "<0.5!7 0.125>" $ striate 4
$ sound "bogdan:2"
# cut 7
# gain 0
# pan rand
d7 -- TODO : ??
$ slow 2 $ loopAt 2
$ striate (slow 8 "<8 4 2 1>")
$ s "break:9"
# gain 0.4