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
-- Atelier de force motrice
do
-- resetCycles
setcps (125/60/4)
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 gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 -- Kick premier`
$ gF1 $ gMute2
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ midiOn "^42" (<| "k k k k")
$ superimpose ((# hpf 500) . (# delay "<0!2 <0 0.2> 0.2>") . (# delayt 0.25))
$ "[kick:4]"
# lpf 5000
# gain 0.9
d2 $ gM1 $ gF1 -- Snare second
$ fix (# lpf 4000) "snare"
$ midiOff "^43" (mask "<t!16 f!16>")
$ "~ s ~ s*<1!3 2>"
# "[rampleM8:8,snare:45]"
# note "-2"
d3 $ gM1 $ gF1
-- $ midiOn "^44" (mask "t([16 <16 [32 64]>],64)" . chop 16 . ply 4)
$ "hh(3,8) hh(<3!3 5>,8)"
# "rampleM8:4"
# gain (fast 8 $ range 0.85 0.95 perlin)
d4 $ gMute3 $ gF2 $ chop 16 $ loopAt 4
$ midiOn "^89" (slice 4 "2*2 ")
$ "nujazz_bass125:1"
# cut 4
# octersub (slow 32 $ range 0 0.9 sine)
-- # room (slow 32 $ range 0.2 0.8 cosine)
-- # dry 1.3
# pan 0.3
# crushbus 41 (range 16 4 "^53")
# octerbus 42 (range 0 0.94 "^33")
# gain 1.2
-- # sz (slow 8 $ range 0.7 0.1 sine)
d5 $ gM3 $ gF3
$ midiOn "^58" (off 0.125 id . rev)
$ note ("[g@2 ~!4 <f ~ as5 c6>]" - 12)
# crushbus 51 (range 16 5 "^54")
# modIndex (range 0 2 "^34")
# "FMRhodes1"
# gain 1.2
-- # room 0.2
-- # legato 0.25
d7 $ gM3 $ gF3
$ midiOn "^59" (struct "<t(3,8)!3 [t(3,8) t(<3!3 5>,8)]>")
$ note ("<c g <ef!3 as> f>"
-- - 12
)
# pan 0.9
# room 0.4
# "giorgio_syn:22"
# crushbus 71 (range 12 3.4 "^55")
# cut 7
# gain 0.7
d8 $ gM1 $ gF1
$ midiOn "^60" (ply "1 <2 4>")
$ midiOn "^92" (iter "1 <1 4>")
$ midiOn "^36" ((|* gain 0.9) . loopAt 2 . (# "jungle_breaks:16"))
$ midiOn "^56" ((|* gain 0.9) . loopAt 0.5 . (# "jungle_breaks:36"))
$ chop 16
$ loopAt 2
$ "break:2"
# gain 0.8
d10
$ mask "<f!2 t!2>"
-- $ loopAt 1
$ "risers:2" # end 0.5
-- # att 0.04
-- # rel 4
-- # room 0.8
# cut 10
d9
$ n "<~ ~ 27 ~ ~ ~ ~ <29 21>>"
# "jungle_vocals"
# cut 9
# gain 0.6
# room 0.4
d11 $ gF3 $ gM3
$ whenmod 64 32 (superimpose (
(stut 4 0.65 "e")
. (# n 3)
. (|* gain 0.9)
. (# cut 110)))
$ note "<c5 <g4!8 ef5!8> <bf4 bf4 bf4 ds4> <ef4 ef4 ef4 d4>>"
# "cbow:2"
# cut 11
d6 $ gM3 $ gF2 $ note
(
"<g4 c4 ds4 <ds4 f4>>"
- 5 -- calage
+ 24
)
# "meth_bass:3"
# cut 6
# gain 0.5
once $ "risers:6" # cut 10 # orbit 9
# begin 0.5
-- # note "-4"