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
-- You got a friend in blue
-- You've got a frienemy
-- When the road is a barricade
-- And you're miles and miles from keeping a cool head
-- You just remember what an old cop said
-- Bro, you got a friend in blue
do
setcps (60/60/4)
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gM = gMask . gMute
d1 $ gF1 $ gMute2
$ fast 2 -- 120BPM!!!
$ fix (
(# att 0.001) . (# rel 0.05) .
(# lpf 1500)) "909"
$ "k k k k*<2 <4 [4 2]>>"
# "[909,808bd:3,kick:6]"
# midiG' "^78" 0 0.9
d2 $ gF1 $ gMute
$ fast 2
$ midiOn "^43" (<| "~ cp ~ <cp!3 cp*<2 [2 4]>>")
$ midiOff "^43" (<| "~ . cp ~ ~ <~!7 cp>")
$ "cp:1"
# n "<3!7 [3 4]>"
# room 0
# midiG "^79"
d3 $ gMute $ gF1 -- charley double croche
$ midiOn "^76" (ply 2)
$ s "hh*16"
# note "1 0 0 0 1 0 0 0 1 0 0 0 1 0 1 2 1"
# n 8
# gain 0.8
# pan 0.6
# midiG "^80"
d4 $ gF2
$ midiOn "^89" (ply "8")
$ midiOn "^57" (slice 4 ("<0!8 2!8> 0 0 <1!3 3>"))
$ chop 8
$ midiOn "^33" (# n 39) -- BassC_120E
$ "fbass:37" -- BassC_120D
# cut 4
# crushbus 41 (range 16 2.5 "^53")
# room 0
# pan 0.2
# midiG' "^81" 0 0.8
d5 $ gF3
$ midiOn "^90" (ply "<8!4 8 16 [16 32] [32 64]>")
$ midiOn "^58" (slice 4 ("0"))
$ chop 16
$ n "<39!4 37!3 [37 39]>"
# "fguitar"
-- 39: La base
-- 37: high or not?
-- 38: Rif hesitation
# cut 5
# gain 0.8
# crushbus 51 (range 16 2.5 "^53")
# midiG' "^82" 0 0.8
d8 -- TODO: Validate or replace ;)
$ midiOn "^92" (ply 4)
$ loopAt 1
$ chop 16
$ "fbreak80:10"
# midiG' "^84" 0 0.8
once $"fx_:9"# gain 0.8
once
$ "fguitar:39"
# gain 0.7 # cut 5 # pan 0.9
d9 -- Nappe de fond??
$ "90s_megafx:189"
# gain "^20"
# room 0.8
-- # delay 0.9
# delayfb 0.85
# delayt 0.25
# sz 0.8
# cut 9
once $ "tek_kick:4"
# room 0