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
resetCycles
do
setcps (170/60/4)
solo 1
solo 2
solo 4
solo 5
solo 6
solo 8 -- Nappes graves
d1 -- Kick DNB
$ whenmod 32 24 (mask "t" . (|* gain (slow 8 $ range 0.65 0.9 saw)))
$ whenmod 32 16 (mask "f")
-- $ whenmod 8 4 (slow 2)
-- $ mask "<f!16 t!16>"
$ "k ~ ~ ~ ~ k ~ ~"
# "[jazz,kick:7]"
# gain 0.65
# legato 0.9
d2 -- Snare DNB
$ whenmod 32 16 (# djf (slow 16 $ range 0.15 0.9 saw))
-- $ whenmod 32 16 (# lpf (slow 16 $ range 10000 200 isaw))
$ "~ s . ~ s*<1!3 2>" # "[snare:2,cp]"
# gain 0.65
d4 -- Hats run
$ whenmod 8 4 (degradeBy "0 0.5!7")
$ note "<0!4 4 2 -2 -4>(<3!3 5>,8)" # "snare:1"
# gain (slow 64 $ range 0.35 0.65 sine)
d5 -- Guitar
$ whenmod 32 16 (# silence)
$ jux (fast 2 . (# room 0.6) . (# cut 51))
$ fast 2
$ loopAt 4
$ slice 4 "<0!2 2!2 3!3 [3 4] [5 6] [3 .. 6] [4 .. 7] [0 .. 7]>"
$ "fguitar:0"
# gain 0.65
-- (slow 16 $ range 0.5 0.5 saw)
# cut 5
# hpf (slow 16 $ 2500)
d6 -- Epiano
$ mask "<t!4 f!12 t!16>"
$ slice 4 (run 4)
$ loopAt 4
$ sometimes (# begin 0.5)
$ "~ fepiano:1"
# gain (slow 32 $ range 0.5 0.65 saw)
# room (slow 32 $ range 0.1 0.7 saw)
d8 -- Nappes "Bassline"
$ mask "<t!16 f!16>"
$ note (scale "major" (
"<0!4 -2!2 0!2>"
-- "0"
)) # "methbass:3" # gain 0.6
# begin 0.7 # end 0.8 # legato 2
# cut 8 # lpf 200
d2
$ fast "<1!8 2!4 4 8>" $ "~ s" # "snare:21" # gain 0.6
d3 $ s "drum:8*<1 2 4 8>" # pan (slow 16 $ sine) # gain 0.75
d8 -- Ominous bass
$ silence
-- TECHNOBASS
do
setcps 0.5
d1
-- $ whenmod 32 16 (mask "<f!15 t>")
$ s "kick:5*4" # gain 0.6
d2
$ whenmod 32 28 (|* gain 1.1)
$ mask "t(<1!4 3!4 5!4 7!4>,8,1)"
$ fast 4 $ "~ clap:0"
# gain 0.55
# lpf (slow 16 $ range 200 2000 saw)
d3 -- Bass
$ whenmod 32 26 (# silence)
$ slice 8 (
"<[0 1 2 3]!8 [0 1 3 2]!2 [0 1]!2 1*2 1*4 1*8 1*[8 4]>"
)
$ loopAt 2
$ note (-2)
# "fbass"
# n (slow 32 $ "<18!3 19!4>")
# gain 0.75 # cut 3
d4
$ jux rev
$ fast "<4!3 8> <8!2 16 [8 16]>"
$ "hh"
# note ("<0!24 -2!4 0!4>")
# gain 0.75
# pan (slow 4 $ perlin)
d6 $ s "drum:8" # gain 0.7
d5
$ slice 8 "8 1"
$ loopAt 2
$ s "fpiano:4"
# cut 5
# gain 0.55