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
96
97
98
-- MINI1: Filtré militaire bruité
do
resetCycles
setcps (90/60/4)
let gF = (whenmod 32 24 (# djf (slow 8 $ range 0.1 0.9 sine)))
d1
$ gF
$ mask "t <t!8 f(<1 2 3>,4,1)!8>"
$ mask "t . <f t!7> f"
$ whenmod 32 16 (rarely (stut "[2|4]" 0.35 "s"))
$ "k . k(<<3 5> 3!3>,8,3)" # "reverbkick"
# gain (slow 16 $ range 0.8 1.1 saw)
d2
$ gF
$ whenmod 32 30 (fast "<2 4>")
$ whenmod 32 8 (fast 2)
$ fix (# legato (slow 4 $ sine)) ("glitch")
$ "~ . s ~"
# "[sn:1,snare:6,glitch:2]"
# note ("a4" + "0 <-2!3 1!3>")
# gain (slow 16 $ range 0.5 0.9 saw)
# room 0.4 # dry 0.95
# pan 0.35
d3 -- Drums excited!
$ gF
$ mask "t t t? t . t t? t"
$ ("<q!6 <q!6 e e> e>" ~>)
$ loopAt 2
$ slice 16 (run
$ whenmod 16 8 (iter 2)
$ slow 16 "<4 8 16 32>"
)
$ "break:3"
# gain (slow 32 $ range 0.4 0.8 saw)
# legato 1
# room 0.4 # dry 0.98 # sz 0.8
# cut 1
# pan (slow 32 $ range 0.5 0.8 saw)
d4
$ mask "<t <t!4 [t f] f [f t] t>>"
$ "h(<5!3 <8 [8 4]>>,8)"
# "h2ogmhh"
# n ("<0!8 4!8>" + run 16)
# gain 0.65
# release 0.9
# cut 4
-- Mini2: minimaliste breakbeat
do
setcps (80/60/4)
d1
$ "k . k(<3!3 <5 [5 3]>>,8)"
# "auto:5" # gain 0.6
d2
$ loopAt 2
$ "ade:8"
# cut 2
# gain (slow 32 $ range 0.4 0.6 saw)
-- Mini3: Dark low freq downtempo
do
setcps (60/60/4)
let gF = (whenmod 32 24 (# djf (slow 16 $ sine)))
d1
$ gF
$ "k k . k k(<1 3 5 <1 2>>,8,<0 0 0 2>)" -- Breakbeat
-- $ fast 2 $ "k k k <k k [~ k] k*2>" -- TECHNO
# "jazz" # gain 0.65
d2
$ gF
-- $ juxBy 0.8 ((|* gain 0.8) . rev)
$ fast ("<4!6 <4 [8 4] 8> 8>" * "4 <8 [8 4]>")
$ "[drum:2,cpu:4]" # gain 0.4
d3 -- OMINOUS rework
$ note (scale "majPent" (
-- often rev $
iter 2 $
run 4))
# "bass1"
# gain 0.4
# cut 3
do
setcps (70/60/4)
d1
$ "jazz"
# gain 0.65
# lpf (slow 10 $ range 2000 10000 perlin)
d2 -- Slowed break
$ loopAt 2
-- $ slow 2
$ slice 4 "0 1 <2 0 0 2> <3 3 1 1 1 1 1 3>" -- Double
-- $ slow 2 $ slice 8 ("0 1 <0 2> 3 4 5 6 7*<1 2>") -- Simple
$ "break:13"
# gain 0.65
# cut 2
"break:11" -- Cloches/hh