/_main.pd
Unknown | 512 lines | 512 code | 0 blank | 0 comment | 0 complexity | 2cc916423783113150f4c25da452b78b MD5 | raw file
- #N canvas 108 8 911 661 10;
- #X declare -path .;
- #X declare -path ./pd;
- #X declare -path ./rj;
- #X declare -path ./abs;
- #X declare -path ./ext;
- #X declare -path ./mtl;
- #X obj 41 552 soundoutput;
- #X obj 698 26 declare -path .;
- #X obj 698 64 declare -path ./pd;
- #X obj 698 45 declare -path ./rj;
- #X obj 214 17 sensor_in;
- #X obj 87 19 soundinput;
- #X obj 698 83 declare -path ./abs;
- #X msg 317 517 sr 44100;
- #X obj 317 498 loadbang;
- #X obj 254 537 s_playtable;
- #N canvas 19 375 450 300 meters 0;
- #X obj 46 56 meter1~;
- #X obj 58 56 meter1~;
- #X obj 70 56 meter1~;
- #X obj 82 56 meter1~;
- #X obj 94 56 meter1~;
- #X obj 106 56 meter1~;
- #X obj 118 56 meter1~;
- #X obj 130 56 meter1~;
- #X obj 38 20 inlet~;
- #X obj 82 20 inlet~;
- #X obj 125 20 inlet~;
- #X obj 168 21 inlet~;
- #X obj 211 21 inlet~;
- #X obj 256 18 inlet~;
- #X obj 299 19 inlet~;
- #X obj 344 16 inlet~;
- #X connect 8 0 0 0;
- #X connect 9 0 1 0;
- #X connect 10 0 2 0;
- #X connect 11 0 3 0;
- #X connect 12 0 4 0;
- #X connect 13 0 5 0;
- #X connect 14 0 6 0;
- #X connect 15 0 7 0;
- #X restore 198 78 pd meters ------------;
- #X floatatom 569 252 5 0 0 0 - - -;
- #X obj 519 271 i;
- #X obj 519 253 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
- -1 -1;
- #X msg 520 305 \; trigger_rec_ch\$1 bang;
- #X obj 547 85 until;
- #X msg 547 25 8;
- #X obj 547 106 f;
- #X obj 572 105 + 1;
- #X obj 547 44 t f b;
- #X msg 574 65 1;
- #X text 580 20 Clear arrays;
- #X obj 436 32 r trig1;
- #X obj 436 53 change;
- #X obj 436 74 sel 1;
- #X obj 436 94 f;
- #X obj 463 94 + 1;
- #X obj 436 114 % 8;
- #X obj 436 135 + 1;
- #X obj 386 88 r trig2;
- #X obj 386 107 change;
- #X obj 386 126 sel 1;
- #X obj 93 347 catch~ outBus1;
- #X obj 189 349 catch~ outBus2;
- #X obj 288 349 catch~ outBus3;
- #X obj 85 456 catch~ outBus4;
- #X obj 101 475 catch~ outBus5;
- #X obj 115 494 catch~ outBus6;
- #X obj 130 513 catch~ outBus7;
- #X obj 435 385 catch~ outBus8;
- #X obj 698 102 declare -path ./ext;
- #X msg 254 517 ch1_buf;
- #X msg 547 126 \; ch\$1_buf const 0;
- #X obj 376 587 tgl 15 0 empty trigger_rec_ch1 empty 17 7 0 10 -262144
- -1 -1 0 1;
- #X obj 394 587 tgl 15 0 empty trigger_rec_ch2 empty 17 7 0 10 -262144
- -1 -1 0 1;
- #X obj 412 587 tgl 15 0 empty trigger_rec_ch3 empty 17 7 0 10 -262144
- -1 -1 1 1;
- #X obj 430 587 tgl 15 0 empty trigger_rec_ch4 empty 17 7 0 10 -262144
- -1 -1 0 1;
- #X obj 448 587 tgl 15 0 empty trigger_rec_ch5 empty 17 7 0 10 -262144
- -1 -1 0 1;
- #X obj 466 587 tgl 15 0 empty trigger_rec_ch6 empty 17 7 0 10 -262144
- -1 -1 0 1;
- #X obj 484 587 tgl 15 0 empty trigger_rec_ch7 empty 17 7 0 10 -262144
- -1 -1 0 1;
- #X obj 502 587 tgl 15 0 empty trigger_rec_ch8 empty 17 7 0 10 -262144
- -1 -1 0 1;
- #X text 375 566 currently recording...:;
- #X obj 243 184 input~ ch1;
- #X obj 747 225 +;
- #X obj 747 245 == 2;
- #X obj 735 301 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
- 1;
- #X obj 755 205 t b f;
- #X obj 747 163 r trig1;
- #X obj 755 185 r trig2;
- #N canvas 62 216 675 431 presence 0;
- #X obj 55 53 r sonar1;
- #X obj 153 55 r sonar2;
- #X obj 256 55 r sonar3;
- #X obj 55 110 > 40;
- #X obj 55 73 t f f;
- #X obj 87 109 < 50;
- #X obj 55 135 +;
- #X obj 55 160 > 1;
- #X obj 55 183 change;
- #X obj 55 209 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
- 1;
- #X obj 153 113 > 40;
- #X obj 153 76 t f f;
- #X obj 185 112 < 50;
- #X obj 153 138 +;
- #X obj 153 163 > 1;
- #X obj 153 186 change;
- #X obj 153 212 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
- 1;
- #X obj 256 114 > 40;
- #X obj 256 77 t f f;
- #X obj 288 113 < 50;
- #X obj 256 139 +;
- #X obj 256 164 > 1;
- #X obj 256 187 change;
- #X obj 256 213 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
- 1;
- #X connect 0 0 4 0;
- #X connect 1 0 11 0;
- #X connect 2 0 18 0;
- #X connect 3 0 6 0;
- #X connect 4 0 3 0;
- #X connect 4 1 5 0;
- #X connect 5 0 6 1;
- #X connect 6 0 7 0;
- #X connect 7 0 8 0;
- #X connect 8 0 9 0;
- #X connect 10 0 13 0;
- #X connect 11 0 10 0;
- #X connect 11 1 12 0;
- #X connect 12 0 13 1;
- #X connect 13 0 14 0;
- #X connect 14 0 15 0;
- #X connect 15 0 16 0;
- #X connect 17 0 20 0;
- #X connect 18 0 17 0;
- #X connect 18 1 19 0;
- #X connect 19 0 20 1;
- #X connect 20 0 21 0;
- #X connect 21 0 22 0;
- #X connect 22 0 23 0;
- #X restore 398 187 pd presence calc;
- #X obj 268 164 input~ ch2;
- #X obj 291 140 input~ ch3;
- #N canvas 40 353 450 300 meters 0;
- #X obj 46 56 meter1~;
- #X obj 58 56 meter1~;
- #X obj 70 56 meter1~;
- #X obj 82 56 meter1~;
- #X obj 94 56 meter1~;
- #X obj 106 56 meter1~;
- #X obj 118 56 meter1~;
- #X obj 130 56 meter1~;
- #X obj 38 20 inlet~;
- #X obj 82 20 inlet~;
- #X obj 125 20 inlet~;
- #X obj 168 21 inlet~;
- #X obj 211 21 inlet~;
- #X obj 256 18 inlet~;
- #X obj 299 19 inlet~;
- #X obj 344 16 inlet~;
- #X connect 8 0 0 0;
- #X connect 9 0 1 0;
- #X connect 10 0 2 0;
- #X connect 11 0 3 0;
- #X connect 12 0 4 0;
- #X connect 13 0 5 0;
- #X connect 14 0 6 0;
- #X connect 15 0 7 0;
- #X restore 265 426 pd meters ------------;
- #X msg 145 216 play 1 1 0;
- #X msg 144 241 play 1 0.5 0;
- #X msg 159 262 play 1 1 0;
- #X obj 222 46 adc~ 3 4 5;
- #X obj 178 564 dac~ 1 2 3;
- #X obj 699 123 declare -path ./mtl;
- #X obj 16 112 mis.record ch1;
- #X obj 735 413 random 3;
- #X obj 735 433 + 1;
- #X obj 746 270 change;
- #X msg 712 509 \; trigger_rec_ch\$1 \$2;
- #X obj 735 475 pack;
- #X obj 725 456 f;
- #X obj 715 360 sel 0 1;
- #X obj 727 567 prepend set;
- #X msg 725 593 3 1;
- #X obj 735 322 t f f;
- #N canvas 0 0 450 300 random 0;
- #X obj 58 24 r sonar1;
- #X obj 57 46 > 10;
- #X obj 55 93 sel 1;
- #X obj 56 69 change;
- #X obj 180 43 > 10;
- #X obj 178 90 sel 1;
- #X obj 179 66 change;
- #X obj 254 47 > 10;
- #X obj 252 94 sel 1;
- #X obj 253 70 change;
- #X obj 181 21 r sonar2;
- #X obj 254 24 r sonar3;
- #X obj 55 121 rand_play chan1;
- #X obj 176 172 rand_play chan2;
- #X obj 257 119 rand_play chan1;
- #X connect 0 0 1 0;
- #X connect 1 0 3 0;
- #X connect 2 0 12 0;
- #X connect 3 0 2 0;
- #X connect 4 0 6 0;
- #X connect 5 0 13 0;
- #X connect 6 0 5 0;
- #X connect 7 0 9 0;
- #X connect 8 0 14 0;
- #X connect 9 0 8 0;
- #X connect 10 0 4 0;
- #X connect 11 0 7 0;
- #X restore 533 404 pd random players;
- #N canvas 0 0 450 300 random 0;
- #X obj 58 24 r sonar1;
- #X obj 57 46 > 10;
- #X obj 55 93 sel 1;
- #X obj 56 69 change;
- #X obj 180 43 > 10;
- #X obj 178 90 sel 1;
- #X obj 179 66 change;
- #X obj 254 47 > 10;
- #X obj 252 94 sel 1;
- #X obj 253 70 change;
- #X obj 181 21 r sonar2;
- #X obj 254 24 r sonar3;
- #X obj 55 121 rand_play chan2;
- #X obj 232 149 rand_play chan2;
- #X obj 264 172 rand_play chan1;
- #X connect 0 0 1 0;
- #X connect 1 0 3 0;
- #X connect 2 0 12 0;
- #X connect 3 0 2 0;
- #X connect 4 0 6 0;
- #X connect 5 0 13 0;
- #X connect 6 0 5 0;
- #X connect 7 0 9 0;
- #X connect 8 0 14 0;
- #X connect 9 0 8 0;
- #X connect 10 0 4 0;
- #X connect 11 0 7 0;
- #X restore 534 425 pd random players;
- #X obj 602 188 metro 3000;
- #X obj 603 218 t b b;
- #X obj 666 246 + 1000;
- #X obj 603 170 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
- 1;
- #X obj 542 167 loadbang;
- #X msg 541 191 1;
- #X obj 665 225 random 16000;
- #X msg 239 221 stop;
- #N canvas 59 274 901 378 mixer 0;
- #X obj 40 30 catch~ chan1;
- #X obj 213 28 catch~ chan2;
- #X obj 40 72 g_channelstrip chan1;
- #X obj 212 70 g_channelstrip chan2;
- #X obj 41 323 throw~ outBus1;
- #X obj 74 298 throw~ outBus2;
- #X obj 211 319 throw~ outBus2;
- #X obj 248 292 throw~ outBus3;
- #N canvas 0 0 450 300 store 0;
- #X msg 155 128 pan 0.519685 \, level 110 \, mute 0 \,;
- #X obj 155 98 inlet;
- #X obj 88 128 outlet;
- #X obj 208 97 loadbang;
- #X connect 0 0 2 0;
- #X connect 1 0 0 0;
- #X connect 3 0 0 0;
- #X restore 356 46 pd store;
- #N canvas 0 0 450 300 store 0;
- #X msg 155 128 pan 0.527559 \, level 110 \, mute 0 \,;
- #X obj 155 98 inlet;
- #X obj 88 128 outlet;
- #X obj 208 97 loadbang;
- #X connect 0 0 2 0;
- #X connect 1 0 0 0;
- #X connect 3 0 0 0;
- #X restore 183 48 pd store;
- #X obj 431 323 throw~ outBus1;
- #X obj 464 298 throw~ outBus2;
- #X obj 601 319 throw~ outBus2;
- #X obj 638 292 throw~ outBus3;
- #N canvas 0 0 450 300 store 0;
- #X msg 155 128 pan 0.637795 \, level 110 \, mute 0 \,;
- #X obj 155 98 inlet;
- #X obj 88 128 outlet;
- #X obj 208 97 loadbang;
- #X connect 0 0 2 0;
- #X connect 1 0 0 0;
- #X connect 3 0 0 0;
- #X restore 746 46 pd store;
- #N canvas 0 0 450 300 store 0;
- #X msg 155 128 pan 0.393701 \, level 110 \, mute 0 \,;
- #X obj 155 98 inlet;
- #X obj 88 128 outlet;
- #X obj 208 97 loadbang;
- #X connect 0 0 2 0;
- #X connect 1 0 0 0;
- #X connect 3 0 0 0;
- #X restore 573 48 pd store;
- #X obj 430 30 catch~ chan3;
- #X obj 430 72 g_channelstrip chan3;
- #X obj 602 70 g_channelstrip chan4;
- #X obj 603 28 catch~ chan4;
- #X obj 156 340 throw~ \$0-grains;
- #X connect 0 0 2 0;
- #X connect 1 0 3 0;
- #X connect 2 0 4 0;
- #X connect 2 1 5 0;
- #X connect 2 2 20 0;
- #X connect 2 4 9 0;
- #X connect 3 0 6 0;
- #X connect 3 1 7 0;
- #X connect 3 2 20 0;
- #X connect 3 4 8 0;
- #X connect 8 0 3 1;
- #X connect 9 0 2 1;
- #X connect 14 0 18 1;
- #X connect 15 0 17 1;
- #X connect 16 0 17 0;
- #X connect 17 0 10 0;
- #X connect 17 1 11 0;
- #X connect 17 2 20 0;
- #X connect 17 4 15 0;
- #X connect 18 0 12 0;
- #X connect 18 1 13 0;
- #X connect 18 2 20 0;
- #X connect 18 4 14 0;
- #X connect 19 0 18 0;
- #X restore 446 439 pd mixer;
- #X obj 29 310 mis.play ch2 chan3;
- #X obj 27 268 mis.play ch1 chan4;
- #X obj 226 284 mis.play ch2 chan3;
- #X obj 26 290 mis.play ch1 chan4;
- #X obj 16 130 mis.record ch2;
- #X obj 16 150 mis.record ch3;
- #N canvas 0 0 450 300 dsp 0;
- #N canvas 175 140 608 390 grainsdelay 0;
- #X obj 404 109 s \$0-GRAIN;
- #X obj 404 63 r \$0-SET-GRAIN;
- #N canvas 402 181 518 421 e_graindelread-GUI 0;
- #N canvas 0 0 586 607 GUI 0;
- #X obj 124 128 g_hsl pan-r 0 1;
- #X obj 124 159 g_hsl vol 0 1;
- #X obj 124 225 g_nbx delay;
- #X obj 194 225 g_nbx delay-r;
- #X obj 124 260 g_nbx size;
- #X obj 194 260 g_nbx size-r;
- #X obj 124 295 g_nbx bw;
- #X obj 194 295 g_nbx grain-rate;
- #X obj 124 190 g_hsl vol-r 0 1;
- #X obj 124 68 inlet;
- #X obj 194 369 outlet;
- #X msg 124 405 phase-rand bang;
- #X obj 124 326 bng 15 250 50 0 empty empty phase-rand 17 7 1 10 -262144
- -1 -1;
- #X text 267 132 random panning width;
- #X text 267 162 base volume;
- #X text 268 193 random volume width;
- #X text 270 230 delay \, random delay variation;
- #X text 272 266 grain size and its variation;
- #X text 272 326 randomize the phase;
- #X connect 0 0 1 0;
- #X connect 1 0 8 0;
- #X connect 2 0 3 0;
- #X connect 3 0 5 0;
- #X connect 4 0 6 0;
- #X connect 5 0 4 0;
- #X connect 6 0 7 0;
- #X connect 7 0 10 0;
- #X connect 8 0 2 0;
- #X connect 9 0 0 0;
- #X connect 11 0 10 0;
- #X connect 12 0 11 0;
- #X coords 0 -1 1 1 380 250 1 100 100;
- #X restore 30 56 pd GUI;
- #X obj 30 31 inlet;
- #X obj 30 313 outlet;
- #X connect 0 0 2 0;
- #X connect 1 0 0 0;
- #X restore 404 86 pd e_graindelread-GUI;
- #X msg 274 115 help;
- #X msg 305 145 save;
- #X obj 305 168 t a b;
- #X obj 263 217 u_cocollect;
- #X msg 193 270 pan-r 0.787402 \, delay-r 400 \, delay 500 \, size-r
- 0 \, size 100 \, vol-r 0.133858 \, vol 0.409449 \, bw 1 \, phase 0.4819
- \, grain-rate 30 \,;
- #X obj 193 319 s \$0-SET-GRAIN;
- #X text 63 165 Args: <NAME> <delayline>;
- #X obj 263 93 r \$0-GRAIN;
- #X obj 193 217 loadbang;
- #X text 349 148 saving;
- #X text 390 41 Slider controls inside:;
- #X obj 38 335 outlet~;
- #X obj 101 337 outlet~;
- #X obj 10 51 inlet~;
- #X obj 77 191 e_graindelread TAG \$0-delay;
- #X obj 10 93 delwrite~ \$0-delay 2000;
- #X connect 1 0 2 0;
- #X connect 2 0 0 0;
- #X connect 3 0 17 1;
- #X connect 4 0 5 0;
- #X connect 5 0 17 1;
- #X connect 5 1 6 1;
- #X connect 6 0 7 0;
- #X connect 7 0 8 0;
- #X connect 10 0 17 1;
- #X connect 11 0 7 0;
- #X connect 16 0 18 0;
- #X connect 17 0 14 0;
- #X connect 17 1 15 0;
- #X connect 17 2 6 0;
- #X restore 111 81 pd grainsdelay;
- #X obj 110 44 catch~ \$0-grains;
- #X obj 109 115 throw~ outBus1;
- #X connect 0 0 2 0;
- #X connect 1 0 0 0;
- #X restore 445 471 pd dsp;
- #X connect 7 0 9 1;
- #X connect 8 0 7 0;
- #X connect 9 0 0 1;
- #X connect 11 0 12 1;
- #X connect 12 0 14 0;
- #X connect 13 0 12 0;
- #X connect 15 0 17 0;
- #X connect 16 0 19 0;
- #X connect 17 0 18 0;
- #X connect 17 0 42 0;
- #X connect 18 0 17 1;
- #X connect 19 0 15 0;
- #X connect 19 1 20 0;
- #X connect 20 0 17 1;
- #X connect 22 0 23 0;
- #X connect 23 0 24 0;
- #X connect 24 0 25 0;
- #X connect 25 0 26 0;
- #X connect 25 0 27 0;
- #X connect 26 0 25 1;
- #X connect 27 0 28 0;
- #X connect 29 0 30 0;
- #X connect 30 0 31 0;
- #X connect 32 0 62 0;
- #X connect 32 0 67 0;
- #X connect 33 0 62 1;
- #X connect 33 0 67 1;
- #X connect 34 0 62 2;
- #X connect 34 0 67 2;
- #X connect 35 0 62 3;
- #X connect 36 0 62 4;
- #X connect 37 0 62 5;
- #X connect 38 0 62 6;
- #X connect 39 0 62 7;
- #X connect 41 0 9 0;
- #X connect 53 0 54 0;
- #X connect 54 0 72 0;
- #X connect 55 0 79 0;
- #X connect 56 0 53 0;
- #X connect 56 1 53 1;
- #X connect 57 0 53 0;
- #X connect 58 0 56 0;
- #X connect 63 0 92 0;
- #X connect 64 0 93 0;
- #X connect 64 0 94 0;
- #X connect 65 0 91 0;
- #X connect 66 0 10 0;
- #X connect 66 0 52 0;
- #X connect 66 1 10 1;
- #X connect 66 1 60 0;
- #X connect 66 2 10 2;
- #X connect 66 2 61 0;
- #X connect 69 1 63 0;
- #X connect 69 1 64 0;
- #X connect 70 0 71 0;
- #X connect 71 0 75 0;
- #X connect 72 0 55 0;
- #X connect 74 0 73 0;
- #X connect 74 0 77 0;
- #X connect 75 0 74 0;
- #X connect 76 0 75 0;
- #X connect 76 1 70 0;
- #X connect 77 0 78 0;
- #X connect 79 0 76 0;
- #X connect 79 1 74 1;
- #X connect 82 0 83 0;
- #X connect 83 0 55 0;
- #X connect 83 1 88 0;
- #X connect 84 0 82 1;
- #X connect 85 0 82 0;
- #X connect 86 0 87 0;
- #X connect 88 0 84 0;
- #X connect 89 0 91 0;
- #X connect 89 0 92 0;
- #X connect 89 0 93 0;
- #X connect 89 0 94 0;
- #X connect 95 1 64 0;
- #X connect 96 1 65 0;