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
99
once $ "igor:00" # cut 1 -- _pas_gravat.wav
once $ "igor:01" # cut 1 -- _clepsydre_18.wav
once $ "igor:02" # cut 1 -- _clepsydre_1.wav
once $ "igor:03" # cut 1 -- _hauberge_hongick_seoul.wav
once $ "igor:04" # cut 1 -- _tambour.wav
once $ "igor:05" # cut 1 -- _within.wav
once $ "igor:06" # cut 1 -- _digital_week.wav
once $ "igor:07" # cut 1 -- _abattoirs_mousse.wav
once $ "igor:08" # cut 1 -- _toiture_oural.wav
once $ "igor:09" # cut 1 -- _marche_mangrove.wav
once $ "igor:10" # cut 1 -- _benin_poules.wav
once $ "igor:11" # cut 1 -- _les_oiseaux_vertou_2.wav
once $ "igor:12" # cut 1 -- _mollusques_sharjah_1.wav
once $ "igor:13" # cut 1 -- _corbeaux_mangrove.wav
once $ "igor:14" # cut 1 -- _ourobouros.wav
once $ "igor:15" # cut 1 -- _enseigne.wav
-- Bonjour :)
-- Je teste de nouveaux SAMPLES
-- Merci à Igor Porte ;)
-- Glitchy <3
-- À BIENTÔT ;)
do
let gDJF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gLPQ = (# lpqbus 2 (range 0.0 0.5 "^29"))
let gHPQ = (# lpqbus 3 (range 0.0 0.5 "^30"))
let g = gDJF . gLPQ . gHPQ
setcps 0.5
d1 $ g
$ midiOn "^41" (<| "k*4")
$ midiOff "^41" (<| "k*<1!4 2 1 2 2> ~ . k*<2!2 1 <1 2>> ~")
$ "jazz"
# midiG' "^78" 0 1.4
d2 $ g
$ midiOn "^43" (slow 2)
-- $ fix
$ "~ s ~ s"
# "[snare:35,cp]"
# midiG' "^79" 0 1.6
d7
$ someCyclesBy "<0!3 0.2>" (mask "t(16,32)" .fast "1 2")
$ someCyclesBy 0.2 (mask "t(4,8)")
$ "hh(12,16)"
# midiG' "^79" 0 1.2
d3 $ g
$ loopAt 4
$ slice 8 (
"0 1 0 <2 3> 0*<2!3 4> <1 [~ 1]> 2 <7!3 3>")
$ "break"
# midiG' "^80" 0 1.5
d5 $ g -- bassline!
$ slow 4
$ note ("<e df>" +
stack [
"0 . 0(<1 3 5 8>,8)" |+| (
arp (slow 8 "<up updown thumbup pinkyup>")
"c . <c'min'4 c'min'4*2>"), -- High fly
"-12" -- Low slow
- 12 -- Baseline
]
)
# room 0.2 # sz 0.5 # dry 1
# "bassWarsaw"
# crushbus 51 (range 10 1.25 "^53")
# midiG' "^81" 0 1.5
d4 $ g -- Digital week
$ note "e4" # "igor:6" # cut 4
# midiG' "^82" 0 1.8
# pan (slow 32 $ range 0.1 0.5 perlin)
# midiG' "^83" 0 1.8
d6 $ g -- STATIC
$ slice 16 "<0 1 0 0> 1*<2 1 0 1> 2? 4(<1 <3 5>>,8)"
$ "igor:15"
# midiG' "^83" 0 1.8
# pan (slow 32 $ range 0.1 0.9 saw)
# cut 6
d8 $ g -- Ourobouros
$ sometimesBy (1 - "^36") (segment "8 16")
$ g
$ superimpose (
(|+ note "<7 12 <7 -7> <0 -8>>") . (# cut 81)
)
$ midiOn "^60" (slow 2)
$ someCyclesBy (slow 8 saw) (slow 2)
$ slow "<4 8 16 32>"
$ chop 4
$ "igor:14"
# midiG' "^84" 0 1
# begin "0.25"
# cut 8
# crushbus 81 (range 14 2 "^56")
# room 0.4