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
-- ça tombe bien, j'avais un sample appelé 90s_weird, c'est l'occasion de l'écouter !
once $ "90s_weird:9"
# cut 1
# gain 0.65
# gain 0.78
# room 0.5 # dry 0.8 # sz 0.8
-- WEIRD <3
do
setcps (100/60/4)
let g = (# djf (range 0.15 0.85 (slow 16 $ cosine)))
let g = (# djf 0.355) -- FIXME MANUAL
d1 $ g-- Les boucles c'est rigolo
$ sometimesBy (slow 4 $ range 0 0.8 sine) (# crush 5)
$ chop 16
$ loopAt 4
$ "90s_weird:9"
# lpf 200
# gain 0.65
# cut 1
# pan 0.2
# sz 0.8 # dry 0.8
# room (slow 32 $ range 0 0.8 saw)
d2 -- Mais il nous faut un cl1ck
$ g
$ fast 2
$ note ("0 [<2 ~ 2 2> <~ 2>] 0 2" - 36)
# "90s_weird"
# legato 0.03
# gain 1.8
# lpf 800
# room 1.8 # sz 0.8 # dry 1
# cut 2
d3 $ g -- V0us allez peut-être me trouver W3ird...
$ slice 16 (
stack [
"0 0 0 [0 <1 2>]",
"1(<5!4 3!3 <5 8>>,8)",
"3*<1 0> 3*2 3*[1|2|4] 3*2",
"[~ <10!3 11>]*4",
""
])
$ "90s_weird:9"
# legato 0.4
# gain 0.5
# pan (slow 32 $ range 0.9 0.5 sine)
# room 0.4 # dry 1.2 # sz 0.9
d4 $ g -- ...mais je trouve cette compagnie fort agréable
$ g
$ slice 32 "10(<5!3 [5 <8 4>]>,8)"
$ "90s_weird:9"
# gain 0.5
# crushbus 41 (slow 16 $ range 8 3.9 saw)
# room 0.2 # dry 1 # sz 0.8
# pan 0.3
# cut 4
d5 $ g -- MÊME LA CLOCK EST WEIRD
$ slice 16 "[0*<1!7 2> 1 3 8*<1 2 4 8?>]"
-- $ chop 16
$ "90s_weird:9"
# speed 8
# gain 0.58
# pan 0.9
# cut 5
d10 $ g -- Heureusement, tout n'est pas weird
$ slice 8 "0 <1 ~> <2 2 ~ 2> 3 4 5 2*<1!3 2> 3*<1 2 1 <2 4 8>>"
$ loopAt 2
$ "break:16"
# room 0 # dry 1 # sz 0 # delay 0
# gain 0.75
-- WEEEEEIIIIIIIIRRRRRRDDDD
once $ "90s_weird"
# n 6
# gain 0.65
# cut 1
-- # lpf 1500
-- # room 0.5
-- # dry 1
-- # begin 0
-- # end 0.6