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
once
$ off 3 id
$ off 2 id
$ "90s_weird:0"
# speed 0.35 -- TODO Slowly move to 0.5
# gain 0.9 # cut 13 -- Spooky intro!
-- # gain 0
-- (.ParVagues ----- L1VE.)
-- T""""""""""""""""""""T
-- |.;....,..........;..|
-- |;;:: . . . |
-- l;;;:. : . .. ;
-- `;;:::.: . . .'
-- l;;:. .. . .: ;
-- `;;::.. . . ; .'
-- l;;:: . . / ;
-- \;;:. . .,' /
-- `\;:.. ..' .'
-- `\;:.. ..'
-- \;:. /
-- l; f
-- `;f'
-- ||
-- ;l.
-- ;: l
-- / ; \
-- ,/ : `.
-- ./' . : `.
-- /' ,' : \
-- f / . : i
-- ,' ; . : `.
-- f ; . : . i
-- .' : : . `.
-- f , . ; : i
-- | : ,/`. : |
-- | ;,/;:. `. . |
-- |___,/;;:. . .`._____|
-- (For 0rbit.l0ve <3)
-- """"""""""""""""""""""
do
setcps (110/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gM = gMask . gMute
d1 $ gF
$ midiOn "^42" (<| "k k k k*2")
$ (<| "k")
$ "jazz"
# midiG' "^78" 0 1.2
d2 $ gF $ gM $ "~ cp"
# midiG' "^79" 0 1.2
d3 $ gF $ gM $ loopAt 2 $ "break:2"
# midiG' "^80" 0 1.2
d4 $ gF2
$ whenmod 4 3 (ply "4 2 . 8")
$ "fbass:48"
# cut 4
# midiG' "^81" 0 1.2
d8 $ gF $ gM
$ midiOn "^60" (mask "[t <t!3 f>]" . rev . chop "<4!3 [2 1]>")
$ loopAt 2
$ "break:20"
# midiG' "^84" 0 1.2