PageRenderTime 125ms CodeModel.GetById 41ms app.highlight 4ms RepoModel.GetById 76ms app.codeStats 0ms

/_main.pd

http://github.com/djiamnot/Re-Collect
Unknown | 512 lines | 512 code | 0 blank | 0 comment | 0 complexity | 2cc916423783113150f4c25da452b78b MD5 | raw file
  1#N canvas 108 8 911 661 10;
  2#X declare -path .;
  3#X declare -path ./pd;
  4#X declare -path ./rj;
  5#X declare -path ./abs;
  6#X declare -path ./ext;
  7#X declare -path ./mtl;
  8#X obj 41 552 soundoutput;
  9#X obj 698 26 declare -path .;
 10#X obj 698 64 declare -path ./pd;
 11#X obj 698 45 declare -path ./rj;
 12#X obj 214 17 sensor_in;
 13#X obj 87 19 soundinput;
 14#X obj 698 83 declare -path ./abs;
 15#X msg 317 517 sr 44100;
 16#X obj 317 498 loadbang;
 17#X obj 254 537 s_playtable;
 18#N canvas 19 375 450 300 meters 0;
 19#X obj 46 56 meter1~;
 20#X obj 58 56 meter1~;
 21#X obj 70 56 meter1~;
 22#X obj 82 56 meter1~;
 23#X obj 94 56 meter1~;
 24#X obj 106 56 meter1~;
 25#X obj 118 56 meter1~;
 26#X obj 130 56 meter1~;
 27#X obj 38 20 inlet~;
 28#X obj 82 20 inlet~;
 29#X obj 125 20 inlet~;
 30#X obj 168 21 inlet~;
 31#X obj 211 21 inlet~;
 32#X obj 256 18 inlet~;
 33#X obj 299 19 inlet~;
 34#X obj 344 16 inlet~;
 35#X connect 8 0 0 0;
 36#X connect 9 0 1 0;
 37#X connect 10 0 2 0;
 38#X connect 11 0 3 0;
 39#X connect 12 0 4 0;
 40#X connect 13 0 5 0;
 41#X connect 14 0 6 0;
 42#X connect 15 0 7 0;
 43#X restore 198 78 pd meters ------------;
 44#X floatatom 569 252 5 0 0 0 - - -;
 45#X obj 519 271 i;
 46#X obj 519 253 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 47-1 -1;
 48#X msg 520 305 \; trigger_rec_ch\$1 bang;
 49#X obj 547 85 until;
 50#X msg 547 25 8;
 51#X obj 547 106 f;
 52#X obj 572 105 + 1;
 53#X obj 547 44 t f b;
 54#X msg 574 65 1;
 55#X text 580 20 Clear arrays;
 56#X obj 436 32 r trig1;
 57#X obj 436 53 change;
 58#X obj 436 74 sel 1;
 59#X obj 436 94 f;
 60#X obj 463 94 + 1;
 61#X obj 436 114 % 8;
 62#X obj 436 135 + 1;
 63#X obj 386 88 r trig2;
 64#X obj 386 107 change;
 65#X obj 386 126 sel 1;
 66#X obj 93 347 catch~ outBus1;
 67#X obj 189 349 catch~ outBus2;
 68#X obj 288 349 catch~ outBus3;
 69#X obj 85 456 catch~ outBus4;
 70#X obj 101 475 catch~ outBus5;
 71#X obj 115 494 catch~ outBus6;
 72#X obj 130 513 catch~ outBus7;
 73#X obj 435 385 catch~ outBus8;
 74#X obj 698 102 declare -path ./ext;
 75#X msg 254 517 ch1_buf;
 76#X msg 547 126 \; ch\$1_buf const 0;
 77#X obj 376 587 tgl 15 0 empty trigger_rec_ch1 empty 17 7 0 10 -262144
 78-1 -1 0 1;
 79#X obj 394 587 tgl 15 0 empty trigger_rec_ch2 empty 17 7 0 10 -262144
 80-1 -1 0 1;
 81#X obj 412 587 tgl 15 0 empty trigger_rec_ch3 empty 17 7 0 10 -262144
 82-1 -1 1 1;
 83#X obj 430 587 tgl 15 0 empty trigger_rec_ch4 empty 17 7 0 10 -262144
 84-1 -1 0 1;
 85#X obj 448 587 tgl 15 0 empty trigger_rec_ch5 empty 17 7 0 10 -262144
 86-1 -1 0 1;
 87#X obj 466 587 tgl 15 0 empty trigger_rec_ch6 empty 17 7 0 10 -262144
 88-1 -1 0 1;
 89#X obj 484 587 tgl 15 0 empty trigger_rec_ch7 empty 17 7 0 10 -262144
 90-1 -1 0 1;
 91#X obj 502 587 tgl 15 0 empty trigger_rec_ch8 empty 17 7 0 10 -262144
 92-1 -1 0 1;
 93#X text 375 566 currently recording...:;
 94#X obj 243 184 input~ ch1;
 95#X obj 747 225 +;
 96#X obj 747 245 == 2;
 97#X obj 735 301 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 981;
 99#X obj 755 205 t b f;
100#X obj 747 163 r trig1;
101#X obj 755 185 r trig2;
102#N canvas 62 216 675 431 presence 0;
103#X obj 55 53 r sonar1;
104#X obj 153 55 r sonar2;
105#X obj 256 55 r sonar3;
106#X obj 55 110 > 40;
107#X obj 55 73 t f f;
108#X obj 87 109 < 50;
109#X obj 55 135 +;
110#X obj 55 160 > 1;
111#X obj 55 183 change;
112#X obj 55 209 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1131;
114#X obj 153 113 > 40;
115#X obj 153 76 t f f;
116#X obj 185 112 < 50;
117#X obj 153 138 +;
118#X obj 153 163 > 1;
119#X obj 153 186 change;
120#X obj 153 212 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1211;
122#X obj 256 114 > 40;
123#X obj 256 77 t f f;
124#X obj 288 113 < 50;
125#X obj 256 139 +;
126#X obj 256 164 > 1;
127#X obj 256 187 change;
128#X obj 256 213 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1291;
130#X connect 0 0 4 0;
131#X connect 1 0 11 0;
132#X connect 2 0 18 0;
133#X connect 3 0 6 0;
134#X connect 4 0 3 0;
135#X connect 4 1 5 0;
136#X connect 5 0 6 1;
137#X connect 6 0 7 0;
138#X connect 7 0 8 0;
139#X connect 8 0 9 0;
140#X connect 10 0 13 0;
141#X connect 11 0 10 0;
142#X connect 11 1 12 0;
143#X connect 12 0 13 1;
144#X connect 13 0 14 0;
145#X connect 14 0 15 0;
146#X connect 15 0 16 0;
147#X connect 17 0 20 0;
148#X connect 18 0 17 0;
149#X connect 18 1 19 0;
150#X connect 19 0 20 1;
151#X connect 20 0 21 0;
152#X connect 21 0 22 0;
153#X connect 22 0 23 0;
154#X restore 398 187 pd presence calc;
155#X obj 268 164 input~ ch2;
156#X obj 291 140 input~ ch3;
157#N canvas 40 353 450 300 meters 0;
158#X obj 46 56 meter1~;
159#X obj 58 56 meter1~;
160#X obj 70 56 meter1~;
161#X obj 82 56 meter1~;
162#X obj 94 56 meter1~;
163#X obj 106 56 meter1~;
164#X obj 118 56 meter1~;
165#X obj 130 56 meter1~;
166#X obj 38 20 inlet~;
167#X obj 82 20 inlet~;
168#X obj 125 20 inlet~;
169#X obj 168 21 inlet~;
170#X obj 211 21 inlet~;
171#X obj 256 18 inlet~;
172#X obj 299 19 inlet~;
173#X obj 344 16 inlet~;
174#X connect 8 0 0 0;
175#X connect 9 0 1 0;
176#X connect 10 0 2 0;
177#X connect 11 0 3 0;
178#X connect 12 0 4 0;
179#X connect 13 0 5 0;
180#X connect 14 0 6 0;
181#X connect 15 0 7 0;
182#X restore 265 426 pd meters ------------;
183#X msg 145 216 play 1 1 0;
184#X msg 144 241 play 1 0.5 0;
185#X msg 159 262 play 1 1 0;
186#X obj 222 46 adc~ 3 4 5;
187#X obj 178 564 dac~ 1 2 3;
188#X obj 699 123 declare -path ./mtl;
189#X obj 16 112 mis.record ch1;
190#X obj 735 413 random 3;
191#X obj 735 433 + 1;
192#X obj 746 270 change;
193#X msg 712 509 \; trigger_rec_ch\$1 \$2;
194#X obj 735 475 pack;
195#X obj 725 456 f;
196#X obj 715 360 sel 0 1;
197#X obj 727 567 prepend set;
198#X msg 725 593 3 1;
199#X obj 735 322 t f f;
200#N canvas 0 0 450 300 random 0;
201#X obj 58 24 r sonar1;
202#X obj 57 46 > 10;
203#X obj 55 93 sel 1;
204#X obj 56 69 change;
205#X obj 180 43 > 10;
206#X obj 178 90 sel 1;
207#X obj 179 66 change;
208#X obj 254 47 > 10;
209#X obj 252 94 sel 1;
210#X obj 253 70 change;
211#X obj 181 21 r sonar2;
212#X obj 254 24 r sonar3;
213#X obj 55 121 rand_play chan1;
214#X obj 176 172 rand_play chan2;
215#X obj 257 119 rand_play chan1;
216#X connect 0 0 1 0;
217#X connect 1 0 3 0;
218#X connect 2 0 12 0;
219#X connect 3 0 2 0;
220#X connect 4 0 6 0;
221#X connect 5 0 13 0;
222#X connect 6 0 5 0;
223#X connect 7 0 9 0;
224#X connect 8 0 14 0;
225#X connect 9 0 8 0;
226#X connect 10 0 4 0;
227#X connect 11 0 7 0;
228#X restore 533 404 pd random players;
229#N canvas 0 0 450 300 random 0;
230#X obj 58 24 r sonar1;
231#X obj 57 46 > 10;
232#X obj 55 93 sel 1;
233#X obj 56 69 change;
234#X obj 180 43 > 10;
235#X obj 178 90 sel 1;
236#X obj 179 66 change;
237#X obj 254 47 > 10;
238#X obj 252 94 sel 1;
239#X obj 253 70 change;
240#X obj 181 21 r sonar2;
241#X obj 254 24 r sonar3;
242#X obj 55 121 rand_play chan2;
243#X obj 232 149 rand_play chan2;
244#X obj 264 172 rand_play chan1;
245#X connect 0 0 1 0;
246#X connect 1 0 3 0;
247#X connect 2 0 12 0;
248#X connect 3 0 2 0;
249#X connect 4 0 6 0;
250#X connect 5 0 13 0;
251#X connect 6 0 5 0;
252#X connect 7 0 9 0;
253#X connect 8 0 14 0;
254#X connect 9 0 8 0;
255#X connect 10 0 4 0;
256#X connect 11 0 7 0;
257#X restore 534 425 pd random players;
258#X obj 602 188 metro 3000;
259#X obj 603 218 t b b;
260#X obj 666 246 + 1000;
261#X obj 603 170 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
2621;
263#X obj 542 167 loadbang;
264#X msg 541 191 1;
265#X obj 665 225 random 16000;
266#X msg 239 221 stop;
267#N canvas 59 274 901 378 mixer 0;
268#X obj 40 30 catch~ chan1;
269#X obj 213 28 catch~ chan2;
270#X obj 40 72 g_channelstrip chan1;
271#X obj 212 70 g_channelstrip chan2;
272#X obj 41 323 throw~ outBus1;
273#X obj 74 298 throw~ outBus2;
274#X obj 211 319 throw~ outBus2;
275#X obj 248 292 throw~ outBus3;
276#N canvas 0 0 450 300 store 0;
277#X msg 155 128 pan 0.519685 \, level 110 \, mute 0 \,;
278#X obj 155 98 inlet;
279#X obj 88 128 outlet;
280#X obj 208 97 loadbang;
281#X connect 0 0 2 0;
282#X connect 1 0 0 0;
283#X connect 3 0 0 0;
284#X restore 356 46 pd store;
285#N canvas 0 0 450 300 store 0;
286#X msg 155 128 pan 0.527559 \, level 110 \, mute 0 \,;
287#X obj 155 98 inlet;
288#X obj 88 128 outlet;
289#X obj 208 97 loadbang;
290#X connect 0 0 2 0;
291#X connect 1 0 0 0;
292#X connect 3 0 0 0;
293#X restore 183 48 pd store;
294#X obj 431 323 throw~ outBus1;
295#X obj 464 298 throw~ outBus2;
296#X obj 601 319 throw~ outBus2;
297#X obj 638 292 throw~ outBus3;
298#N canvas 0 0 450 300 store 0;
299#X msg 155 128 pan 0.637795 \, level 110 \, mute 0 \,;
300#X obj 155 98 inlet;
301#X obj 88 128 outlet;
302#X obj 208 97 loadbang;
303#X connect 0 0 2 0;
304#X connect 1 0 0 0;
305#X connect 3 0 0 0;
306#X restore 746 46 pd store;
307#N canvas 0 0 450 300 store 0;
308#X msg 155 128 pan 0.393701 \, level 110 \, mute 0 \,;
309#X obj 155 98 inlet;
310#X obj 88 128 outlet;
311#X obj 208 97 loadbang;
312#X connect 0 0 2 0;
313#X connect 1 0 0 0;
314#X connect 3 0 0 0;
315#X restore 573 48 pd store;
316#X obj 430 30 catch~ chan3;
317#X obj 430 72 g_channelstrip chan3;
318#X obj 602 70 g_channelstrip chan4;
319#X obj 603 28 catch~ chan4;
320#X obj 156 340 throw~ \$0-grains;
321#X connect 0 0 2 0;
322#X connect 1 0 3 0;
323#X connect 2 0 4 0;
324#X connect 2 1 5 0;
325#X connect 2 2 20 0;
326#X connect 2 4 9 0;
327#X connect 3 0 6 0;
328#X connect 3 1 7 0;
329#X connect 3 2 20 0;
330#X connect 3 4 8 0;
331#X connect 8 0 3 1;
332#X connect 9 0 2 1;
333#X connect 14 0 18 1;
334#X connect 15 0 17 1;
335#X connect 16 0 17 0;
336#X connect 17 0 10 0;
337#X connect 17 1 11 0;
338#X connect 17 2 20 0;
339#X connect 17 4 15 0;
340#X connect 18 0 12 0;
341#X connect 18 1 13 0;
342#X connect 18 2 20 0;
343#X connect 18 4 14 0;
344#X connect 19 0 18 0;
345#X restore 446 439 pd mixer;
346#X obj 29 310 mis.play ch2 chan3;
347#X obj 27 268 mis.play ch1 chan4;
348#X obj 226 284 mis.play ch2 chan3;
349#X obj 26 290 mis.play ch1 chan4;
350#X obj 16 130 mis.record ch2;
351#X obj 16 150 mis.record ch3;
352#N canvas 0 0 450 300 dsp 0;
353#N canvas 175 140 608 390 grainsdelay 0;
354#X obj 404 109 s \$0-GRAIN;
355#X obj 404 63 r \$0-SET-GRAIN;
356#N canvas 402 181 518 421 e_graindelread-GUI 0;
357#N canvas 0 0 586 607 GUI 0;
358#X obj 124 128 g_hsl pan-r 0 1;
359#X obj 124 159 g_hsl vol 0 1;
360#X obj 124 225 g_nbx delay;
361#X obj 194 225 g_nbx delay-r;
362#X obj 124 260 g_nbx size;
363#X obj 194 260 g_nbx size-r;
364#X obj 124 295 g_nbx bw;
365#X obj 194 295 g_nbx grain-rate;
366#X obj 124 190 g_hsl vol-r 0 1;
367#X obj 124 68 inlet;
368#X obj 194 369 outlet;
369#X msg 124 405 phase-rand bang;
370#X obj 124 326 bng 15 250 50 0 empty empty phase-rand 17 7 1 10 -262144
371-1 -1;
372#X text 267 132 random panning width;
373#X text 267 162 base volume;
374#X text 268 193 random volume width;
375#X text 270 230 delay \, random delay variation;
376#X text 272 266 grain size and its variation;
377#X text 272 326 randomize the phase;
378#X connect 0 0 1 0;
379#X connect 1 0 8 0;
380#X connect 2 0 3 0;
381#X connect 3 0 5 0;
382#X connect 4 0 6 0;
383#X connect 5 0 4 0;
384#X connect 6 0 7 0;
385#X connect 7 0 10 0;
386#X connect 8 0 2 0;
387#X connect 9 0 0 0;
388#X connect 11 0 10 0;
389#X connect 12 0 11 0;
390#X coords 0 -1 1 1 380 250 1 100 100;
391#X restore 30 56 pd GUI;
392#X obj 30 31 inlet;
393#X obj 30 313 outlet;
394#X connect 0 0 2 0;
395#X connect 1 0 0 0;
396#X restore 404 86 pd e_graindelread-GUI;
397#X msg 274 115 help;
398#X msg 305 145 save;
399#X obj 305 168 t a b;
400#X obj 263 217 u_cocollect;
401#X msg 193 270 pan-r 0.787402 \, delay-r 400 \, delay 500 \, size-r
4020 \, size 100 \, vol-r 0.133858 \, vol 0.409449 \, bw 1 \, phase 0.4819
403\, grain-rate 30 \,;
404#X obj 193 319 s \$0-SET-GRAIN;
405#X text 63 165 Args: <NAME> <delayline>;
406#X obj 263 93 r \$0-GRAIN;
407#X obj 193 217 loadbang;
408#X text 349 148 saving;
409#X text 390 41 Slider controls inside:;
410#X obj 38 335 outlet~;
411#X obj 101 337 outlet~;
412#X obj 10 51 inlet~;
413#X obj 77 191 e_graindelread TAG \$0-delay;
414#X obj 10 93 delwrite~ \$0-delay 2000;
415#X connect 1 0 2 0;
416#X connect 2 0 0 0;
417#X connect 3 0 17 1;
418#X connect 4 0 5 0;
419#X connect 5 0 17 1;
420#X connect 5 1 6 1;
421#X connect 6 0 7 0;
422#X connect 7 0 8 0;
423#X connect 10 0 17 1;
424#X connect 11 0 7 0;
425#X connect 16 0 18 0;
426#X connect 17 0 14 0;
427#X connect 17 1 15 0;
428#X connect 17 2 6 0;
429#X restore 111 81 pd grainsdelay;
430#X obj 110 44 catch~ \$0-grains;
431#X obj 109 115 throw~ outBus1;
432#X connect 0 0 2 0;
433#X connect 1 0 0 0;
434#X restore 445 471 pd dsp;
435#X connect 7 0 9 1;
436#X connect 8 0 7 0;
437#X connect 9 0 0 1;
438#X connect 11 0 12 1;
439#X connect 12 0 14 0;
440#X connect 13 0 12 0;
441#X connect 15 0 17 0;
442#X connect 16 0 19 0;
443#X connect 17 0 18 0;
444#X connect 17 0 42 0;
445#X connect 18 0 17 1;
446#X connect 19 0 15 0;
447#X connect 19 1 20 0;
448#X connect 20 0 17 1;
449#X connect 22 0 23 0;
450#X connect 23 0 24 0;
451#X connect 24 0 25 0;
452#X connect 25 0 26 0;
453#X connect 25 0 27 0;
454#X connect 26 0 25 1;
455#X connect 27 0 28 0;
456#X connect 29 0 30 0;
457#X connect 30 0 31 0;
458#X connect 32 0 62 0;
459#X connect 32 0 67 0;
460#X connect 33 0 62 1;
461#X connect 33 0 67 1;
462#X connect 34 0 62 2;
463#X connect 34 0 67 2;
464#X connect 35 0 62 3;
465#X connect 36 0 62 4;
466#X connect 37 0 62 5;
467#X connect 38 0 62 6;
468#X connect 39 0 62 7;
469#X connect 41 0 9 0;
470#X connect 53 0 54 0;
471#X connect 54 0 72 0;
472#X connect 55 0 79 0;
473#X connect 56 0 53 0;
474#X connect 56 1 53 1;
475#X connect 57 0 53 0;
476#X connect 58 0 56 0;
477#X connect 63 0 92 0;
478#X connect 64 0 93 0;
479#X connect 64 0 94 0;
480#X connect 65 0 91 0;
481#X connect 66 0 10 0;
482#X connect 66 0 52 0;
483#X connect 66 1 10 1;
484#X connect 66 1 60 0;
485#X connect 66 2 10 2;
486#X connect 66 2 61 0;
487#X connect 69 1 63 0;
488#X connect 69 1 64 0;
489#X connect 70 0 71 0;
490#X connect 71 0 75 0;
491#X connect 72 0 55 0;
492#X connect 74 0 73 0;
493#X connect 74 0 77 0;
494#X connect 75 0 74 0;
495#X connect 76 0 75 0;
496#X connect 76 1 70 0;
497#X connect 77 0 78 0;
498#X connect 79 0 76 0;
499#X connect 79 1 74 1;
500#X connect 82 0 83 0;
501#X connect 83 0 55 0;
502#X connect 83 1 88 0;
503#X connect 84 0 82 1;
504#X connect 85 0 82 0;
505#X connect 86 0 87 0;
506#X connect 88 0 84 0;
507#X connect 89 0 91 0;
508#X connect 89 0 92 0;
509#X connect 89 0 93 0;
510#X connect 89 0 94 0;
511#X connect 95 1 64 0;
512#X connect 96 1 65 0;