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
setcps 1
d1
$ sometimes (# gain "<0 0.9> 1")
$ fast 2
$ s "kick_electro electro1"
# note ("0 -10")
# gain 0.9
d2
$ whenmod 32 16 (# gain 0.8)
$ whenmod 32 15 (# gain 0.7)
$ whenmod 32 14 (# gain 0.6)
$ whenmod 32 0 (# gain 0)
$ every 4 (off 0.25 (|+ 0))
$ s "~ [cp sn:1]"
d3 -- TODO: Better drums
$ someCycles (# silence)
$ someCycles (slow 2)
$ s "<[dr*4 ~ dr*2] [dr*2 ~ dr*2 ~]>"
d4 -- TODO: Better bass
-- $ off 0.125 (|+ note 12)
-- play one per cycle
d4
-- $ off 0.25 (|+ note 7)
-- $ off 0.125 (|+ 0)
$ note "<0(3,8) 3 5 12*2>"
# s "bass3:2"
# sustain 4
-- |- note 7
d5 -- lead piano synthe
$ whenmod 32 16 (rev)
$ jux rev
$ slow 2
$ off 0.125 (|+ 12)
$ note (off 0.125 (|+ 7) "<c(3,4) a*2 f(3,4,2) <e e a e>*2>")
# s "defaultB"
# gain 0.6
d6 -- lead blade
$ whenmod 32 28 (degrade)
$ whenmod 32 16 (|- 7)
$ someCycles (|+ note 7) . (chop 4)
$ slow 2
$ s "cs80leadMH"
# note "<c a f e>"
# gain 0.9