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
d2
$ whenmod 8 4 (rev)
$ jux rev
$ chop 4
$ superimpose ((|- note "<7 5 3 7>") . (# gain 0.8))
$ s "bogdan:2"
# note (scale "major" "1 0 3 2")
# room 0.2
# size 0.8
# gain 0.6
d3 -- HEY BRO
$ every' 8 7 ((0.5 ~>) . (# begin 0.45)) -- bro
$ every' 8 3 ((0.45 ~>) . (# end 0.42)) -- hey
-- $ every' 8 7 ((chop 2 . (# gain "0 1.1"))) -- chop bro
-- $ every' 8 3 ((chop 5 . (# gain "0 1 0 0 0"))) -- chop hey
$ whenmod 8 4 (rev)
-- $ jux rev
-- $ chop 4
$ superimpose ((|- note "<7 5 3 7>") . (# gain 0.8))
$ s "bogdan:3"
# crush "<10 .. 15 15 .. 10>"
# room 0.2
# size 0.8
d4
$ fast 2
$ whenmod 8 7 (# gain 1)
$ chop 450
$ s "bogdan:5"
# gain 0
d5
$ fast 2
$ someCycles (# gain "1 0") $ chop 2
$ s "~ bogdan:6"
d6
$ fast "<2 2 2 1 1>"
$ whenmod 128 64 (euclid 4 4)
$ euclid 3 4
$ s "reverbkick"
# gain 0.8
d6
$ fast 2
$ s "~ cp:3"
once $ s "bogdan:3"