-
Notifications
You must be signed in to change notification settings - Fork 0
/
live-launcher-clone.pd
251 lines (251 loc) · 6.47 KB
/
live-launcher-clone.pd
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
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
#N canvas 564 50 517 729 12;
#N canvas 1112 195 711 434 samplers 1;
#X obj 301 35 inlet file-paths;
#X obj 27 33 inlet play-sample;
#X obj 71 278 outlet~;
#X msg 338 85 set \$1;
#X msg 125 130 all stop;
#X obj 301 60 t a f;
#X obj 72 88 t f b;
#X obj 27 59 sel 0;
#X obj 72 131 - 1;
#X obj 72 190 pack f 0;
#X obj 72 242 clone ableton-sample-player 8;
#X connect 0 0 5 0;
#X connect 1 0 7 0;
#X connect 3 0 10 0;
#X connect 4 0 10 0;
#X connect 5 0 10 1;
#X connect 5 1 3 0;
#X connect 6 0 8 0;
#X connect 6 1 4 0;
#X connect 7 0 4 0;
#X connect 7 1 6 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 2 0;
#X restore 170 371 pd samplers;
#N canvas 1010 50 885 705 make-sample-textfile 0;
#X floatatom 163 203 5 0 0 0 - - -, f 5;
#X msg 163 173 1e+006;
#X obj 92 119 openpanel;
#X obj 92 144 t a b;
#X obj 109 173 print;
#X obj 92 76 bng 30 250 50 0 empty empty Open 35 7 0 10 -262144 -1
-1;
#X text 35 16 Use this subpatch to create a text object of sample paths.
;
#X obj 94 406 bng 30 250 50 0 empty empty Write 35 7 0 10 -262144 -1
-1;
#X msg 171 577 read sampler-file-paths.txt;
#X msg 94 449 write sampler-file-paths.txt;
#X obj 134 493 loadbang;
#X obj 134 518 t b b;
#X obj 134 543 s \$0-load-samples;
#X text 332 533 When the patch is loaded \, load the existing file
\, and load the samples to the samplers.;
#X text 367 626 <-- Click on this to open the text file itself;
#X msg 31 590 clear;
#X obj 94 626 text define sampler-file-paths;
#X obj 92 230 text set sampler-file-paths;
#X text 229 171 <-- Big number to append text to the end of the file
;
#X text 335 231 <-- Here the new path is added to the text file;
#X text 22 305 IMPORTANT!;
#X text 24 330 When finished \, write the textfile out to disk \, if
you want to load it next time!;
#X connect 0 0 17 1;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 17 0;
#X connect 3 1 1 0;
#X connect 5 0 2 0;
#X connect 7 0 9 0;
#X connect 8 0 16 0;
#X connect 9 0 16 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 1 8 0;
#X connect 15 0 16 0;
#X restore 28 45 pd make-sample-textfile;
#N canvas 1199 130 664 528 load-samples 0;
#X obj 43 209 f 0;
#X obj 81 209 + 1;
#X obj 43 134 text size sampler-file-paths;
#X obj 43 159 until;
#X obj 43 271 text get sampler-file-paths;
#X obj 43 234 t f f;
#X obj 43 383 pack f s;
#X obj 43 355 f;
#X obj 43 326 t b s;
#X obj 43 88 bng 15 250 50 0 empty empty Load_samples 17 7 0 10 -262144
-1 -1;
#X msg 64 185 0;
#X obj 43 108 t b b;
#X obj 55 57 r \$0-load-samples;
#X obj 43 408 outlet;
#X obj 43 33 inlet reload;
#X text 128 202 Counter determines which sampler to load into;
#X text 135 377 Example: 1 ./test-samples/sample.wav;
#X text 136 356 Pack the sampler number and file path.;
#X obj 43 296 list-to-symbol;
#X text 191 301 If the filepath has a space in it \, convert it to
a single symbol \, instead of a space separated list.;
#X connect 0 0 1 0;
#X connect 0 0 5 0;
#X connect 1 0 0 1;
#X connect 2 0 3 0;
#X connect 3 0 0 0;
#X connect 4 0 18 0;
#X connect 5 0 4 0;
#X connect 5 1 7 1;
#X connect 6 0 13 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 8 1 6 1;
#X connect 9 0 11 0;
#X connect 10 0 0 1;
#X connect 11 0 2 0;
#X connect 11 1 10 0;
#X connect 12 0 9 0;
#X connect 14 0 9 0;
#X connect 18 0 8 0;
#X restore 255 338 pd load-samples;
#X obj 255 313 bng 15 250 50 0 empty empty Reload_samples 17 7 0 10
-262144 -1 -1;
#X obj 170 611 dac~;
#X text 27 20 Ableton clip launcher clone;
#X floatatom 255 252 5 0 0 0 BPM - -, f 5;
#X obj 384 126 loadbang;
#X msg 384 232 120;
#X obj 194 478 hsl 128 15 0 1 0 0 empty empty Volume -2 -8 0 10 -262144
-1 -1 9525 1;
#X obj 191 498 pack f 1;
#X obj 191 523 line~;
#X obj 170 586 *~;
#N canvas 1274 64 429 566 sequence 0;
#N canvas 1171 81 388 457 tempo 0;
#X obj 192 84 swap 60000;
#X obj 192 109 /;
#X floatatom 192 134 5 0 0 0 - - -, f 5;
#X obj 96 180 metro;
#X obj 96 148 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 96 235 f 0;
#X obj 138 235 + 1;
#X obj 96 260 t f f;
#X msg 117 212 0;
#X obj 192 52 inlet;
#X obj 59 35 inlet;
#X obj 96 381 outlet;
#X obj 96 288 + 1;
#X obj 59 60 sel 0;
#X msg 141 96 1, f 1;
#X msg 121 96 0, f 1;
#X msg 46 121 0;
#X obj 96 121 spigot 1;
#X text 175 293 Count to 4 for 4/4 time;
#X obj 130 319 sel 4;
#X connect 0 0 1 0;
#X connect 0 1 1 1;
#X connect 1 0 2 0;
#X connect 2 0 3 1;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 5 0 7 0;
#X connect 6 0 5 1;
#X connect 7 0 12 0;
#X connect 7 1 6 0;
#X connect 8 0 5 1;
#X connect 9 0 0 0;
#X connect 10 0 13 0;
#X connect 12 0 11 0;
#X connect 12 0 19 0;
#X connect 13 0 8 0;
#X connect 13 0 14 0;
#X connect 13 0 16 0;
#X connect 13 1 17 0;
#X connect 14 0 17 1;
#X connect 15 0 17 1;
#X connect 16 0 4 0;
#X connect 17 0 4 0;
#X connect 17 0 15 0;
#X connect 19 0 8 0;
#X restore 107 199 pd tempo;
#X floatatom 107 224 5 0 0 0 - - -, f 5;
#X obj 107 313 sel 1;
#X obj 107 355 f;
#X obj 107 286 spigot;
#X msg 155 261 1, f 1;
#X msg 137 261 0, f 1;
#X obj 53 381 sel 0;
#X msg 53 405 0;
#X obj 70 117 > 0;
#X obj 70 142 sel 1;
#X msg 70 168 1;
#X obj 102 41 inlet;
#X obj 226 40 inlet bpm;
#X obj 108 417 outlet;
#X obj 107 380 t f f;
#X obj 102 79 t f f b;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 2 0 6 0;
#X connect 3 0 15 0;
#X connect 4 0 2 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 7 0 8 0;
#X connect 8 0 0 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 0 0;
#X connect 12 0 16 0;
#X connect 13 0 0 1;
#X connect 15 0 7 0;
#X connect 15 1 14 0;
#X connect 16 0 9 0;
#X connect 16 1 3 1;
#X connect 16 2 5 0;
#X restore 170 274 pd sequence;
#X floatatom 181 302 5 0 0 0 - - -, f 5;
#X obj 191 547 +~;
#X obj 348 433 loadbang;
#X msg 348 458 0.75;
#X obj 294 508 hsl 128 15 0 1 0 0 empty empty Gain -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 291 528 pack f 1;
#X obj 291 553 line~;
#X obj 75 106 cnv 15 100 75 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 170 106 vradio 15 1 0 9 empty empty empty 0 -8 0 10 -262144
-1 -1 0;
#X text 110 104 Mute ->;
#X text 86 119 Samples ->;
#X text 158 135 |;
#X text 158 150 V;
#X text 319 20 Megalon 2017;
#X connect 0 0 12 0;
#X connect 2 0 0 1;
#X connect 3 0 2 0;
#X connect 6 0 13 1;
#X connect 7 0 8 0;
#X connect 7 0 22 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 15 0;
#X connect 12 0 4 0;
#X connect 12 0 4 1;
#X connect 13 0 0 0;
#X connect 13 0 14 0;
#X connect 15 0 12 1;
#X connect 16 0 17 0;
#X connect 17 0 9 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 20 0 15 1;
#X connect 22 0 13 0;
#X coords 0 729 1 728 15 75 0;