Reality_Exploration/Sound-Pd-Patch-main/Viv-Pd-Patch-main/V2.pd

220 lines
5.5 KiB
Plaintext

#N canvas 688 0 1073 988 10;
#X obj 524 -178 soundfiler;
#X floatatom 523 -144 10 0 0 0 - - -;
#X obj 620 177 s grain_dur;
#X floatatom 610 124 5 0 0 0 - - -;
#X obj 205 864 dac~;
#X msg 88 573 next \$1;
#X obj 88 507 *~;
#X obj 523 -124 s fileDuration;
#X obj 119 452 r fileDuration;
#X floatatom 119 473 10 0 0 0 - - -;
#X obj 88 528 snapshot~;
#X obj 492 425 metro 125;
#X obj 493 384 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X floatatom 88 549 10 0 0 0 - - -;
#X floatatom 571 531 5 0 0 0 - - -;
#X obj 492 451 random 10;
#X obj 526 492 + 50;
#X floatatom 557 328 5 0 0 0 - - -;
#X floatatom 586 463 5 0 0 0 - - -;
#X obj 186 -437 netreceive -u -b 8765;
#X obj 176 -397 oscparse;
#X floatatom 114 -198 5 0 0 0 - - -;
#X floatatom 173 -197 5 0 0 0 - - -;
#X obj 96 669 *~ 0.5;
#X obj 156 667 *~ 0.5;
#X obj 172 -328 route chan presence;
#X obj 171 -368 route list;
#X obj 132 -235 unpack f f;
#X floatatom 211 -274 5 0 0 0 - - -;
#X obj 486 279 loadbang;
#X msg 627 55 1000;
#X obj 524 -259 loadbang;
#X msg 491 343 1;
#X obj 321 235 s detune;
#X floatatom 223 105 5 0 0 0 - - -;
#X obj 212 -72 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 54 -92 change;
#X obj 63 -34 +;
#X floatatom 42 9 5 0 0 0 - - -;
#X msg 10 -42 0;
#X obj 4 -81 sel 0;
#X obj 369 -95 change;
#X obj 378 -37 +;
#X floatatom 343 13 5 0 0 0 - - -;
#X obj 319 -84 sel 0;
#X obj 32 34 expr 30 - $f1;
#X obj 39 56 change;
#X obj 319 67 change;
#X text 648 128 GrainDuration;
#X text 629 466 GraindRandom;
#X text 593 329 GrainAmount;
#X floatatom 344 168 5 0 0 0 - - -;
#X obj 326 195 * 30;
#X text 380 168 pitchDelta;
#X msg 556 305 20, f 6;
#X obj 485 -308 openpanel;
#X obj 498 -355 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 587 430 100;
#X obj 587 399 loadbang;
#X obj 627 13 loadbang;
#X obj 356 115 loadbang;
#X obj 966 -432 loadbang;
#X msg 966 -395 \; pd dsp 1;
#X msg 524 -222 read -resize bell.wav grainArray1;
#X obj 522 -72 array define grainArray1;
#X msg 485 -287 read -resize \$1 grainArray1;
#X msg 284 645 next \$1;
#X obj 284 579 *~;
#X floatatom 315 545 10 0 0 0 - - -;
#X obj 284 600 snapshot~;
#X floatatom 284 621 10 0 0 0 - - -;
#X obj 292 741 *~ 0.5;
#X obj 352 739 *~ 0.5;
#X obj 766 -72 array define grainArray2;
#X obj 813 -173 soundfiler;
#X floatatom 812 -139 10 0 0 0 - - -;
#X obj 813 -254 loadbang;
#X obj 774 -303 openpanel;
#X obj 787 -350 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 813 -217 read -resize bell_long.wav grainArray2;
#X msg 774 -282 read -resize \$1 grainArray2;
#X floatatom 48 122 5 0 0 0 - - -;
#X obj 55 270 / 30;
#X floatatom 55 291 5 0 0 0 - - -;
#X floatatom 319 93 5 0 0 0 - - -;
#X obj 213 220 / 30;
#X floatatom 213 241 5 0 0 0 - - -;
#X obj 92 422 clip 0.1 1;
#X obj 284 456 clip 0.1 1;
#X msg 336 -31 0;
#X obj 314 42 expr 30 - $f1;
#X obj 248 63 change;
#X obj 812 -119 s fileDuration2;
#X obj 315 524 r fileDuration2;
#X text 495 -388 INHALE;
#X text 774 -384 Exhale;
#X text 95 391 INHALE;
#X text 293 416 Exhale;
#X obj 94 612 clone Grain 128;
#X obj 290 684 clone Grain2 128;
#X obj 71 209 -;
#X obj 221 184 -;
#X obj 107 123 random 3;
#X obj 265 123 random 3;
#X msg 356 136 10;
#X obj 486 95 + 10;
#X obj 515 147 * 50;
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 3 0 2 0;
#X connect 5 0 98 0;
#X connect 6 0 10 0;
#X connect 8 0 9 0;
#X connect 9 0 6 1;
#X connect 10 0 13 0;
#X connect 11 0 15 0;
#X connect 11 0 69 0;
#X connect 11 0 10 0;
#X connect 12 0 11 0;
#X connect 13 0 5 0;
#X connect 14 0 11 1;
#X connect 15 0 16 0;
#X connect 16 0 14 0;
#X connect 17 0 16 1;
#X connect 18 0 15 1;
#X connect 19 0 20 0;
#X connect 20 0 26 0;
#X connect 21 0 40 0;
#X connect 21 0 36 0;
#X connect 22 0 35 0;
#X connect 22 0 44 0;
#X connect 22 0 41 0;
#X connect 23 0 4 0;
#X connect 24 0 4 1;
#X connect 25 0 27 0;
#X connect 25 1 28 0;
#X connect 26 0 25 0;
#X connect 27 0 21 0;
#X connect 27 1 22 0;
#X connect 28 0 12 0;
#X connect 29 0 54 0;
#X connect 29 0 32 0;
#X connect 30 0 3 0;
#X connect 31 0 63 0;
#X connect 32 0 12 0;
#X connect 34 0 52 0;
#X connect 34 0 101 0;
#X connect 34 0 105 0;
#X connect 35 0 102 0;
#X connect 35 0 103 0;
#X connect 36 0 37 0;
#X connect 37 0 38 0;
#X connect 38 0 37 1;
#X connect 38 0 45 0;
#X connect 39 0 38 0;
#X connect 40 0 39 0;
#X connect 41 0 42 0;
#X connect 42 0 43 0;
#X connect 43 0 42 1;
#X connect 43 0 90 0;
#X connect 43 0 91 0;
#X connect 44 0 89 0;
#X connect 45 0 46 0;
#X connect 46 0 34 0;
#X connect 46 0 81 0;
#X connect 47 0 84 0;
#X connect 51 0 52 1;
#X connect 52 0 33 0;
#X connect 54 0 17 0;
#X connect 55 0 65 0;
#X connect 56 0 55 0;
#X connect 57 0 18 0;
#X connect 58 0 57 0;
#X connect 59 0 30 0;
#X connect 60 0 104 0;
#X connect 61 0 62 0;
#X connect 63 0 0 0;
#X connect 65 0 0 0;
#X connect 66 0 99 0;
#X connect 67 0 69 0;
#X connect 68 0 67 1;
#X connect 69 0 70 0;
#X connect 70 0 66 0;
#X connect 71 0 4 0;
#X connect 72 0 4 1;
#X connect 74 0 75 0;
#X connect 75 0 92 0;
#X connect 76 0 79 0;
#X connect 77 0 80 0;
#X connect 78 0 77 0;
#X connect 79 0 74 0;
#X connect 80 0 74 0;
#X connect 81 0 100 0;
#X connect 82 0 83 0;
#X connect 83 0 87 0;
#X connect 85 0 86 0;
#X connect 86 0 88 0;
#X connect 87 0 6 0;
#X connect 88 0 67 0;
#X connect 89 0 43 0;
#X connect 90 0 47 0;
#X connect 91 0 34 0;
#X connect 93 0 68 0;
#X connect 98 0 23 0;
#X connect 98 1 24 0;
#X connect 99 0 71 0;
#X connect 99 1 72 0;
#X connect 100 0 82 0;
#X connect 101 0 85 0;
#X connect 102 0 100 1;
#X connect 103 0 101 1;
#X connect 104 0 51 0;
#X connect 105 0 106 0;
#X connect 106 0 3 0;