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
-- 2 Aight 'Aa'
-- 3 Hey bro ' b'
-- 4 Monney-ee 'ni'
-- 5 That's right
-- 56 Cheeky basterd
--
--
--
C C D C F E
C C D C G F
C C C A F E D
A# A# A F G F F
do
setcps (120/60/4)
d1 $ "k . <~!4 k!4 k(<3 3 5 3>,8)!4>"
# "reverbkick"
# gain 0.8 # djf 0.2
d3
$ fix (|* gain "<0!16 1.2!16>") ("bogdan")
$ fix ((# "superpiano")
. (# velocity 0.75)
) ("arpy")
$ (>| note (cat [
"c ~ [c d ] ~ c f e ~",
"c ~ [c d ] ~ c g f ~",
"c ~ [c a ] ~ f e d ~",
"as ~ [as a] ~ f g f ~"
]))
$ slice 6 "0 1 2 <~!3 1> 3 4 5"
$ "[arpy,bogdan:11]"
# gain (slow 16 $ range 0.65 1 saw)
-- BIRTHDAY DUST
do
resetCycles
setcps (90/60/4)
d1
$ sometimesBy "<1!8 0!240>" (mask "t f!7") -- TODO INTRO
$ whenmod 8 7 (mask "f!3 t")
$ s "h*<2 1 1 2> ~ . ~ h . ~ h . h <~!3 h*2>"
# lpf 2000
# legato 1
# "reverbkick"
# gain 0.7
d2 --DUSTY
$ mask "<f!8 t!240>" -- TODO INTRO
$ (0.02 ~>) -- Fix decalage?
$ loopAt 4
$ slice 4 "0 <1!3 0> 2 3"
$ "dusty:0"
# gain 0.8
# lpf 2000
# pan 0.35
# cut 2
d3
$ mask "<t(4,16)!4 t(3,8)!2 t(10,16) t t!240>" -- TODO INTRO
$ "d d d*<1 2> d*<4 [8 4 <8 8 4 8> <4 8>]>"
# "[drum:2,cpu:4]"
# pan (slow 4 $ sine)
# gain 0.65
d4
$ mask "<f!8 t!240>" -- TODO INTRO
$ fix (
(every' 2 1 $ ply 2)
) (n 5)
$ fix ("q" <~) (n 6)
$ n "~ ~ ~ <5!3 <6 3>>" -- Right cheeky right bro
# "bogdan"
# pan 0.9
# gain 0.8
# cut 4
once $ "bogdan:2" # end 0.2
once $ "bogdan:4" # begin 0.2 # end 0.4
once $ "bogdan:15" # begin 0.358 # end 0.362 # cut 1