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

245 lines
6.2 KiB
Plaintext

#N canvas 1339 406 1073 1013 10;
#X obj 524 -178 soundfiler;
#X floatatom 523 -144 10 0 0 0 - - -, f 10;
#X obj 620 177 s grain_dur;
#X floatatom 610 124 5 0 0 0 - - -, f 5;
#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 - - -, f 10;
#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 #fcfcfc #000000
#000000 0 1;
#X floatatom 88 549 10 0 0 0 - - -, f 10;
#X floatatom 571 531 5 0 0 0 - - -, f 5;
#X obj 492 451 random 10;
#X obj 526 492 + 50;
#X floatatom 557 328 5 0 0 0 - - -, f 5;
#X floatatom 586 463 5 0 0 0 - - -, f 5;
#X floatatom 68 -152 5 0 0 0 - - -, f 5;
#X floatatom 181 -147 5 0 0 0 - - -, f 5;
#X obj 96 669 *~ 0.5;
#X obj 156 667 *~ 0.5;
#X floatatom 240 -230 5 0 0 0 - - -, f 5;
#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 - - -, f 5;
#X obj 212 -72 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 54 -92 change;
#X obj 63 -34 +;
#X floatatom 42 9 5 0 0 0 - - -, f 5;
#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 - - -, f 5;
#X obj 319 -84 sel 0;
#X obj 32 34 expr 30 - $f1;
#X obj 39 56 change;
#X text 648 128 GrainDuration;
#X text 629 466 GraindRandom;
#X text 593 329 GrainAmount;
#X floatatom 344 168 5 0 0 0 - - -, f 5;
#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 #fcfcfc
#000000 #000000;
#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 - - -, f 10;
#X obj 284 600 snapshot~;
#X floatatom 284 621 10 0 0 0 - - -, f 10;
#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 - - -, f 10;
#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 #fcfcfc
#000000 #000000;
#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 - - -, f 5;
#X obj 55 270 / 30;
#X floatatom 55 291 5 0 0 0 - - -, f 5;
#X obj 213 220 / 30;
#X floatatom 213 241 5 0 0 0 - - -, f 5;
#X obj 92 422 clip 0.1 1;
#X obj 284 456 clip 0.1 1;
#X msg 336 -31 0;
#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 obj 63 -249 moses;
#X obj 62 -219 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X msg 62 -188 0;
#X floatatom 59 -280 5 0 0 0 - - -, f 5;
#X obj 153 -238 moses;
#X obj 152 -208 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X msg 152 -177 0;
#X floatatom 149 -269 5 0 0 0 - - -, f 5;
#X obj 21 -411 loadbang;
#X msg 70 -333 0.1;
#X msg 212 -318 0.1;
#N canvas 1091 608 450 300 VivInput 0;
#X obj 131 46 oscparse;
#X obj 126 75 route list;
#X obj 141 6 netreceive -u -b 15000;
#X obj 127 115 route sound;
#X obj 122 157 unpack f f f;
#X obj 134 243 outlet;
#X obj 192 240 outlet;
#X obj 246 241 outlet;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 0 0;
#X connect 3 0 4 0;
#X connect 4 0 7 0;
#X connect 4 1 5 0;
#X connect 4 2 6 0;
#X restore 188 -400 pd VivInput;
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 3 0 2 0;
#X connect 5 0 90 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 63 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 20 0 30 0;
#X connect 20 0 39 0;
#X connect 20 0 36 0;
#X connect 24 0 48 0;
#X connect 24 0 27 0;
#X connect 25 0 3 0;
#X connect 26 0 57 0;
#X connect 27 0 12 0;
#X connect 29 0 46 0;
#X connect 29 0 93 0;
#X connect 29 0 97 0;
#X connect 30 0 94 0;
#X connect 30 0 95 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 32 1;
#X connect 33 0 40 0;
#X connect 34 0 33 0;
#X connect 35 0 34 0;
#X connect 36 0 37 0;
#X connect 37 0 38 0;
#X connect 38 0 37 1;
#X connect 38 0 83 0;
#X connect 39 0 82 0;
#X connect 40 0 41 0;
#X connect 41 0 29 0;
#X connect 41 0 75 0;
#X connect 45 0 46 1;
#X connect 46 0 28 0;
#X connect 48 0 17 0;
#X connect 49 0 59 0;
#X connect 50 0 49 0;
#X connect 51 0 18 0;
#X connect 52 0 51 0;
#X connect 53 0 25 0;
#X connect 54 0 96 0;
#X connect 55 0 56 0;
#X connect 57 0 0 0;
#X connect 59 0 0 0;
#X connect 60 0 91 0;
#X connect 61 0 63 0;
#X connect 62 0 61 1;
#X connect 63 0 64 0;
#X connect 64 0 60 0;
#X connect 65 0 4 0;
#X connect 66 0 4 1;
#X connect 68 0 69 0;
#X connect 69 0 84 0;
#X connect 70 0 73 0;
#X connect 71 0 74 0;
#X connect 72 0 71 0;
#X connect 73 0 68 0;
#X connect 74 0 68 0;
#X connect 75 0 92 0;
#X connect 76 0 77 0;
#X connect 77 0 80 0;
#X connect 78 0 79 0;
#X connect 79 0 81 0;
#X connect 80 0 6 0;
#X connect 81 0 61 0;
#X connect 82 0 38 0;
#X connect 83 0 29 0;
#X connect 85 0 62 0;
#X connect 90 0 21 0;
#X connect 90 1 22 0;
#X connect 91 0 65 0;
#X connect 91 1 66 0;
#X connect 92 0 76 0;
#X connect 93 0 78 0;
#X connect 94 0 92 1;
#X connect 95 0 93 1;
#X connect 96 0 45 0;
#X connect 97 0 98 0;
#X connect 98 0 3 0;
#X connect 99 0 100 0;
#X connect 99 1 19 0;
#X connect 100 0 101 0;
#X connect 101 0 19 0;
#X connect 101 0 31 0;
#X connect 102 0 99 0;
#X connect 103 0 104 0;
#X connect 103 1 20 0;
#X connect 104 0 105 0;
#X connect 105 0 20 0;
#X connect 106 0 103 0;
#X connect 107 0 109 0;
#X connect 107 0 108 0;
#X connect 108 0 99 1;
#X connect 109 0 103 1;
#X connect 110 0 102 0;
#X connect 110 1 106 0;
#X connect 110 2 23 0;