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
84
85
86
87
88
89
90
91
92
93
94
95
-- Responsabilité: Breakbeat pas prise de tête
-- Tags: Hip-Hop, breaks, bass, hypnotique, instrumental
-- Ready: 5/10 (Melody=, Variations=, Parts=)
resetCycles
-- region Responsabilite
do
-- unsolo 4
setcps 0.5
d1
$ whenmod 16 10 (# hpf 6000)
$ loopAt 4
$ slice 4 (
whenmod 8 6 (|> "0")
"[0 <1 0> <0 2> <3 0 0*2 3*2>]")
$ "break" # gain 0.65
d3
$ rarely (jux rev)
$ n ("0(<4!2 5!2 8 [8 16] 8 [16 8]>,8)")
# note (scale "major" "0 0 -1 2")
# "dr:13"
# gain (slow 64 $ range 0.5 0.85 saw)
d4
-- $ mask "t(<1 2 3 4 1!4 4!4>,4)"
$ slice 4 "<0 .. 3> <3 .. 0>"
$ "bsbass:4"
# cut 3
# hpf (slow 4 $ range 50 500 sine) -- TODO superimpose?
# gain (slow 16 $ range 0.4 0.6 perlin)
d8 -- Falling coins
$ someCycles (# speed 0.5)
$ off (1/16) (|+ note (slow 4 "<[2|4] [0 -2]>"))
$ s "coins(<3!3 <5 8>>,8)"
# note (scale "aeolian" (irand 7))
# gain (slow 80 $ range 0.4 0.7 (sine + perlin/8))
d9 -- Orchestra hit
$ degradeBy "<1!3 0.5>"
$ "~ ~ brass:1 ~"
# note ("<0!4 -4!2 2 4>")
# release 0.85 # attack 5
# lpf (slow 16 $ range 20000 2000 saw)
# gain 0.65
# room 0.8
# size 0.8
# dry 2
-- endregion
-- region IRRESPONSABLE
-- IrResponsabilité: Du Breakbeat à la break-tech
-- Tags: Tech-Hop, breaks, bass, hypnotique, instrumental
-- Ready: ?/10 (Melody=, Variations=, Parts=)
resetCycles
do
setcps 0.5
d1
$ every' 4 3 (someCycles (# hpf 500))
$ whenmod 32 16 (mask "<[f t?]!8 f!7 t>")
$ superimpose (
const -- Kick
-- $ sometimesBy -- décalage
-- "0 <0!3 0.5> 0 <0 1>" ("e" ~>)
-- $ superimpose ((# "clubkick:5") . (# hpf 500))
$ "k k k <k!3 <~ [~ k] k*2>>"
# "kick:5"
# gain 0.5
)
$ loopAt 4
$ "break"
# gain 0.5
d3
$ rarely (jux rev)
$ n ("0(<4!2 5!2 8 [8 16] 8 [16 8]>,8)")
# note (scale "major" "0 0 -1 2")
# "dr:13"
# gain (slow 64 $ range 0.5 0.85 saw)
d4
-- $ mask "t(<1 2 3 4 1!4 4!4>,4)"
$ superimpose ( -- Attente
fast 2 . (|* 0.75) . (# hpf 0)
)
$ slice 4 "<0 .. 3> <3 .. 0>"
$ "bsbass:4"
# cut 3
# hpf (slow 4 $ range 1500 500 sine)
# gain (slow 16 $ range 0.4 0.6 perlin)
d8 -- Falling coins
$ someCycles (# speed 0.5)
$ off (1/16) (|+ note (slow 4 "<[2|4] [0 -2]>"))
$ s "coins(<3!3 <5 8>>,8)"
# note (scale "aeolian" (irand 7))
# gain (slow 80 $ range 0.4 0.7 (sine + perlin/8