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
do
setcps (85/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
d1 $ gF
$ superimpose ((# "kick:5") . (|* gain 0.8))
$ midiOn "^42" (struct "t*<1!3 2> . t(3,8)")
$ midiOff "^42" (struct "t t t <t t*2 t [~ t]>")
$ "[jazz,808bd:2]"
# midiG' "^78" 0 1.2
d2 $ gF
$ midiOn "^43" (fast 2)
$ "~ [cpu:2,cpu:3]"
# midiG' "^79" 0 1.2
d3 $ gF
-- $ someCyclesBy 2 (fast "1 2")
-- $ struct "t([12 . <16!3 8> 16],16)"
$ midiOn "^76" (ply 2)
$ struct "t*4 t*8"
$ "drum:2"
# midiG' "^80" 0 2
d4 $ gF2 -- La base
$ superimpose (
(|+ note 24)
. (fast 2)
. (# cut 41)
. (|* gain 1.2)
)
$ (# crushbus 41 (range 16 4 "^54"))
$ midiOn "^58" (mask "t f <f!3 f> <f!8 [t f]!7 t>")
$ chop 16
$ loopAt 1
$ "han" # n "<0!4 1!4>"
# midiG' "^82" 0 2
# cut 4
d6 $ gF2 -- La basse
$ loopAt 2
$ slice 8 (run 8)
-- $ superimpose (# crushbus 41 (range 16 4 "^53"))
-- $ struct "t . t t"
-- $ slice 4 ("0 <0!4 2!4> 0(<1!4 5!4>,8) <0 2>")
$ "han" # n "<0!4 1!4>"
# cut 6
# pan 0.3
# room 0.4
# midiG' "^81" 0 2
d8 $ gF
$ loopAt 4
$ midiOn "^60" (fast 4)
$ sometimesBy ("^56*8") (shuffle 16)
$ slice 8 (run 8)
$ "drums_commodore" # n "0"
# cut 8
# midiG' "^84" 0 2
d9 $ gF2 -- La trompette
$ midiOn "^59" (superimpose ((# cut 91) . (|+ note 12) . ( |* gain 0.9)))
$ slice 4 ("<0!4 2!3 1>" + "0 0 0 <1!3 3>")
$ "han/4" # n "3"
# cut 9
# midiG' "^83" 0 1.6
# pan (0.8 + (slow 8 $ range 0 1 perlin))
d8 $ loopAt 2 $ "break:1" # cut 8
# midiG' "^84" 0 2
once $ "dr*4"
once
$ scale "aeolian" ("3 3 . 1")
# "bassWarsaw"
# cut 4
# pan 0.1
# gain 0.9
once $ "han:2"
# gain 1
# cut 3
# gain 1.4
# cut 4