pp.grainer~.pd

#N struct 2325-template float x float y float c float s float th float
stretch array 2325-plus 2325-template-y array 2325-minus 2325-template-y
;
#N struct 2325-template-y float y;
#N canvas 92 81 629 549 10;
#X obj 522 235 table \$0-sf;
#X obj 100 213 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 100 325 metro 50;
#X msg 99 405 next bang;
#X obj 100 454 outlet~;
#X obj 294 452 outlet~;
#N canvas 206 109 1057 586 stuff 0;
#X obj 28 41 r \$0-samplelength;
#X obj 62 63 r \$0-samplerate;
#X obj 62 86 / 1000;
#X obj 28 84 /;
#X obj 44 142 s \$0-postionguir;
#X obj 152 315 r \$0-trigger-speed;
#X obj 152 337 * 128;
#X obj 139 457 * -1;
#X obj 147 478 pack;
#X msg 147 500 range \$1 \$2;
#X obj 147 531 s \$0-sizer;
#X obj 43 166 s \$0-positionr;
#X obj 225 427 r \$0-size;
#X obj 207 454 <;
#X obj 253 460 f;
#X obj 152 428 t f f f f;
#X obj 207 476 sel 1;
#X obj 253 503 s \$0-size;
#X obj 28 187 s \$0-random-positionr;
#X obj 496 401 s \$0-playguicnv;
#X obj 461 325 sel 0 1;
#X obj 461 297 r \$0-playbacktgl;
#X msg 496 375 color 16;
#X msg 461 352 color 11;
#X obj 580 8 r \$0-grainposition;
#X obj 598 46 r \$0-samplelength;
#X obj 580 108 /;
#X obj 598 89 /;
#X obj 633 90 / 1000;
#X obj 580 148 * 498;
#X obj 562 255 s \$0-zeiger;
#X obj 633 68 r \$0-samplerate;
#X msg 562 232 pos \$1 1;
#X obj 562 169 f;
#X obj 502 142 metro 50;
#X obj 562 211 change;
#X obj 301 13 r \$0-visbng;
#X obj 321 144 s \$0-visbngr;
#X msg 301 116 color 0 0;
#X msg 385 116 color 10 10;
#X obj 383 91 del 250;
#X obj 301 35 t b;
#X obj 214 89 s pd-\$0-grainer~;
#X text 13 296 grainsize should not exceed grain-distance * 128 (number
of max. active grains);
#X obj 822 75 r \$0-trigger-speed;
#X obj 793 4 r \$0-size;
#X obj 793 193 min 128;
#X obj 793 119 /;
#X obj 822 97 t b f;
#X obj 793 72 +;
#X obj 807 25 r \$0-random-size;
#X obj 807 47 t b f;
#X obj 793 140 i;
#X obj 856 173 r \$0-int_triggeronoff;
#X obj 792 298 spigot;
#X obj 856 195 t f f;
#X obj 804 214 sel 1;
#X obj 793 234 f;
#X obj 791 374 s \$0-active-grains;
#X msg 791 352 label \$1;
#X obj 869 231 loadbang;
#X msg 869 253 0;
#X obj 791 333 makefilename %d;
#X obj 775 274 f;
#X obj 562 191 mod 498;
#X obj 580 129 wrap;
#X obj 406 142 s \$0-namecnv;
#X obj 705 234 metro 100;
#X obj 793 167 abs;
#N canvas 343 276 853 414 normalize 0;
#X obj 111 205 expr if($f1<$f2 \, $f2 \, $f1);
#X obj 207 181 abs;
#X msg 415 364 normalize \$1;
#X obj 528 19 r \$0-normalize;
#X obj 529 60 del 100;
#X obj 370 315 f;
#X obj 529 41 t b;
#X obj 351 152 r \$0-normalize;
#X obj 297 25 t b;
#X obj 351 172 change;
#X obj 351 194 pipe 20;
#X msg 357 55 0;
#X obj 357 76 s \$0-normalizer;
#X obj 415 385 s \$0-sf;
#X obj 529 89 s waveform/\$0-sf;
#X obj 350 213 sel 0;
#X obj 276 73 t b b;
#X obj 111 128 array max \$0-sf;
#X obj 207 160 array min \$0-sf;
#X obj 276 3 r \$0-sf-path;
#X obj 286 49 del 10;
#X connect 0 0 5 1;
#X connect 1 0 0 1;
#X connect 2 0 13 0;
#X connect 3 0 6 0;
#X connect 4 0 14 0;
#X connect 5 0 2 0;
#X connect 6 0 4 0;
#X connect 7 0 9 0;
#X connect 8 0 20 0;
#X connect 8 0 11 0;
#X connect 9 0 10 0;
#X connect 10 0 15 0;
#X connect 11 0 12 0;
#X connect 15 0 5 0;
#X connect 15 1 2 0;
#X connect 16 0 17 0;
#X connect 16 1 18 0;
#X connect 17 0 0 0;
#X connect 18 0 1 0;
#X connect 19 0 8 0;
#X connect 20 0 16 0;
#X restore 323 226 pd normalize;
#X obj 502 98 r \$0-visbng;
#X obj 705 192 r \$0-visbng;
#X obj 502 119 t b;
#X obj 705 213 t b;
#X msg 214 65 relocate 540x340+1+1 1x1+50+60 \, vis 1 \, editmode 0
;
#X msg 28 114 range 0 \$1;
#X msg 463 538 set \$1 \, bang;
#X obj 463 562 s waveform/\$0-sf;
#X obj 463 438 r \$0-visbng;
#X obj 559 443 r \$0-set;
#X obj 463 461 t b;
#X obj 463 514 symbol \$0-sf;
#X obj 559 466 t b a;
#X obj 152 398 spigot;
#X obj 196 340 r \$0-int_triggeronoff;
#X obj 196 363 t f f;
#X obj 8 407 sel 0;
#X msg 8 430 range -1e+06 1e+06;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 3 1;
#X connect 3 0 75 0;
#X connect 5 0 6 0;
#X connect 6 0 83 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 12 0 13 1;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 7 0;
#X connect 15 1 8 1;
#X connect 15 2 13 0;
#X connect 15 3 14 1;
#X connect 16 0 14 0;
#X connect 20 0 23 0;
#X connect 20 1 22 0;
#X connect 21 0 20 0;
#X connect 22 0 19 0;
#X connect 23 0 19 0;
#X connect 24 0 26 0;
#X connect 25 0 27 0;
#X connect 26 0 65 0;
#X connect 27 0 26 1;
#X connect 28 0 27 1;
#X connect 29 0 33 1;
#X connect 31 0 28 0;
#X connect 32 0 30 0;
#X connect 33 0 64 0;
#X connect 34 0 33 0;
#X connect 35 0 32 0;
#X connect 36 0 41 0;
#X connect 38 0 37 0;
#X connect 38 0 66 0;
#X connect 39 0 37 0;
#X connect 39 0 66 0;
#X connect 40 0 39 0;
#X connect 41 0 74 0;
#X connect 41 0 40 0;
#X connect 41 0 38 0;
#X connect 44 0 48 0;
#X connect 45 0 49 0;
#X connect 46 0 57 0;
#X connect 47 0 52 0;
#X connect 48 0 47 0;
#X connect 48 1 47 1;
#X connect 49 0 47 0;
#X connect 50 0 51 0;
#X connect 51 0 49 0;
#X connect 51 1 49 1;
#X connect 52 0 68 0;
#X connect 53 0 55 0;
#X connect 54 0 62 0;
#X connect 55 0 56 0;
#X connect 55 1 54 1;
#X connect 56 0 57 0;
#X connect 56 1 62 0;
#X connect 57 0 63 1;
#X connect 59 0 58 0;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 62 0 59 0;
#X connect 63 0 54 0;
#X connect 64 0 35 0;
#X connect 65 0 29 0;
#X connect 67 0 63 0;
#X connect 68 0 46 0;
#X connect 70 0 72 0;
#X connect 71 0 73 0;
#X connect 72 0 34 0;
#X connect 73 0 67 0;
#X connect 74 0 42 0;
#X connect 75 0 4 0;
#X connect 75 0 11 0;
#X connect 75 0 18 0;
#X connect 76 0 77 0;
#X connect 78 0 80 0;
#X connect 79 0 82 0;
#X connect 80 0 81 0;
#X connect 81 0 76 0;
#X connect 82 0 81 0;
#X connect 82 1 81 1;
#X connect 83 0 15 0;
#X connect 84 0 85 0;
#X connect 85 0 86 0;
#X connect 85 1 83 1;
#X connect 86 0 87 0;
#X connect 87 0 10 0;
#X restore 435 255 pd stuff;
#X obj 100 348 s \$0-trigger;
#X obj 100 169 r \$0-int_triggeronoff;
#X obj 153 196 r \$0-trigger-speed;
#X obj 212 241 r \$0-random-trigger-speed;
#X obj 153 286 +;
#X obj 163 219 r \$0-trigger;
#X obj 163 241 random;
#X obj 163 263 t b f;
#N canvas 244 109 924 538 map 0;
#X obj 39 258 s \$0-grainpitch;
#X obj 59 193 r \$0-pitch;
#X obj 39 236 +;
#X obj 58 213 t b f;
#X obj 39 83 r \$0-trigger;
#X obj 39 172 -;
#X obj 39 150 random;
#X obj 78 106 r \$0-random-pitch;
#X obj 78 129 * 2;
#X obj 464 243 s \$0-grainpan;
#X obj 464 194 / 100;
#X obj 493 44 r \$0-trigger;
#X obj 464 22 r \$0-pan;
#X obj 464 221 clip -1 1;
#X obj 533 64 r \$0-random-pan;
#X obj 532 84 * 2;
#X obj 493 126 -;
#X obj 493 104 random;
#X obj 461 277 r \$0-amp;
#X obj 461 422 + 100;
#X obj 461 444 dbtorms;
#X obj 471 368 t b f;
#X obj 472 303 r \$0-trigger;
#X obj 472 346 random;
#X obj 511 324 r \$0-random-amp;
#X obj 461 465 s \$0-grainamp;
#X obj 461 396 -;
#X obj 493 148 t b f;
#X obj 464 171 +;
#X obj 705 48 r \$0-trigger;
#X obj 673 148 s \$0-freq;
#X obj 673 297 s \$0-q;
#X obj 705 70 random;
#X obj 705 92 t b f;
#X obj 673 122 +;
#X obj 690 207 r \$0-trigger;
#X obj 690 229 random;
#X obj 690 251 t b f;
#X obj 673 276 +;
#X obj 673 25 r \$0-filter-freq;
#X obj 755 69 r \$0-random-filter-freq;
#X obj 673 174 r \$0-filter-q;
#X obj 739 228 r \$0-random-filter-q;
#X obj 217 399 s \$0-grainsize;
#X obj 217 36 r \$0-size;
#X obj 264 85 r \$0-random-size;
#X obj 231 118 random;
#X obj 231 62 r \$0-trigger;
#X obj 217 168 +;
#X obj 231 141 t b f;
#X obj 298 174 r \$0-int_triggeronoff;
#X obj 217 195 list prepend 0;
#X obj 254 275 r \$0-trigger-speed;
#X obj 254 340 * -1;
#X obj 254 298 * 128;
#X obj 254 319 t f f;
#X obj 242 361 clip;
#X obj 217 218 list trim;
#X obj 217 241 route 0 1;
#X connect 1 0 3 0;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 3 1 2 1;
#X connect 4 0 6 0;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X connect 7 0 5 1;
#X connect 7 0 8 0;
#X connect 8 0 6 1;
#X connect 10 0 13 0;
#X connect 11 0 17 0;
#X connect 12 0 28 0;
#X connect 13 0 9 0;
#X connect 14 0 15 0;
#X connect 14 0 16 1;
#X connect 15 0 17 1;
#X connect 16 0 27 0;
#X connect 17 0 16 0;
#X connect 18 0 26 0;
#X connect 19 0 20 0;
#X connect 20 0 25 0;
#X connect 21 0 26 0;
#X connect 21 1 26 1;
#X connect 22 0 23 0;
#X connect 23 0 21 0;
#X connect 24 0 23 1;
#X connect 26 0 19 0;
#X connect 27 0 28 0;
#X connect 27 1 28 1;
#X connect 28 0 10 0;
#X connect 29 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 33 1 34 1;
#X connect 34 0 30 0;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 38 0;
#X connect 37 1 38 1;
#X connect 38 0 31 0;
#X connect 39 0 34 0;
#X connect 40 0 32 1;
#X connect 41 0 38 0;
#X connect 42 0 36 1;
#X connect 44 0 48 0;
#X connect 45 0 46 1;
#X connect 46 0 49 0;
#X connect 47 0 46 0;
#X connect 48 0 51 0;
#X connect 49 0 48 0;
#X connect 49 1 48 1;
#X connect 50 0 51 1;
#X connect 51 0 57 0;
#X connect 52 0 54 0;
#X connect 53 0 56 1;
#X connect 54 0 55 0;
#X connect 55 0 53 0;
#X connect 55 1 56 2;
#X connect 56 0 43 0;
#X connect 57 0 58 0;
#X connect 58 0 43 0;
#X connect 58 1 56 0;
#X restore 435 276 pd map;
#N canvas 537 50 560 555 envelope 0;
#N canvas 284 50 661 699 hann 0;
#X obj 102 334 until;
#X obj 102 355 f;
#X obj 129 361 + 1;
#X msg 167 330 0;
#X obj 154 205 t b b;
#X obj 103 382 t f f;
#X obj 99 499 expr -cos($f1*3.14159)*.5+.5;
#X obj 322 526 expr -cos($f1*3.14159)*.5+.5;
#X obj 322 551 * -1;
#X obj 323 573 + 1;
#X obj 181 421 moses;
#X obj 169 612 pow 1;
#X obj 445 120 exp;
#X obj 445 8 inlet shape;
#X obj 445 28 / 100;
#X obj 291 8 inlet x;
#X obj 101 468 /;
#X obj 102 292 f 1024;
#X obj 206 658 tabwrite \$0-window;
#X obj 322 497 expr ($f1-$f2)/(1024-$f2-1);
#X obj 444 143 t b f;
#X obj 290 135 t b f;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 17 0;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 5 1 18 1;
#X connect 6 0 11 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 0;
#X connect 10 0 16 0;
#X connect 10 1 19 0;
#X connect 11 0 18 0;
#X connect 12 0 20 0;
#X connect 13 0 14 0;
#X connect 14 0 12 0;
#X connect 15 0 21 0;
#X connect 16 0 6 0;
#X connect 17 0 0 0;
#X connect 19 0 7 0;
#X connect 20 0 4 0;
#X connect 20 1 11 1;
#X connect 21 0 4 0;
#X connect 21 1 10 1;
#X connect 21 1 16 1;
#X connect 21 1 19 1;
#X restore 87 503 pd hann;
#N canvas 702 50 631 726 trapez 0;
#X obj 43 374 until;
#X obj 43 395 f;
#X obj 70 401 + 1;
#X msg 161 344 0;
#X obj 120 480 moses;
#X obj 134 280 t b b;
#X obj 119 439 t f f;
#X obj 118 608 clip 0 1;
#X obj 120 583 *;
#X obj 238 12 inlet x;
#X obj 435 15 inlet shape;
#X obj 435 82 / 100;
#X obj 435 107 + 1;
#X obj 435 173 max 1;
#X obj 43 347 f 1024;
#X obj 213 505 expr -($f1-$f2)/(1024-$f2-1)+1;
#X obj 435 195 t b f;
#X obj 238 164 t b f f f;
#X obj 148 640 tabwrite \$0-window;
#X obj 120 531 / 1024;
#X obj 435 58 + 200;
#X obj 435 151 -;
#X msg 435 129 6 \$1;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 19 0;
#X connect 4 1 15 0;
#X connect 5 0 14 0;
#X connect 5 1 3 0;
#X connect 6 0 4 0;
#X connect 6 1 18 1;
#X connect 7 0 18 0;
#X connect 8 0 7 0;
#X connect 9 0 17 0;
#X connect 10 0 20 0;
#X connect 11 0 12 0;
#X connect 12 0 22 0;
#X connect 13 0 16 0;
#X connect 14 0 0 0;
#X connect 15 0 8 0;
#X connect 16 0 5 0;
#X connect 16 1 8 1;
#X connect 17 0 5 0;
#X connect 17 1 4 1;
#X connect 17 2 19 1;
#X connect 17 3 15 1;
#X connect 19 0 8 0;
#X connect 20 0 11 0;
#X connect 21 0 13 0;
#X connect 22 0 21 0;
#X restore 296 501 pd trapez;
#X obj 125 175 f;
#X obj 241 117 t b f;
#X obj 401 114 t b f;
#N canvas 633 50 680 699 curved2 0;
#X obj 64 415 until;
#X obj 64 436 f;
#X obj 91 442 + 1;
#X msg 139 412 0;
#X obj 113 328 t b b;
#X obj 63 472 t f f;
#X obj 53 586 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 127 631 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 128 654 * -1;
#X obj 129 676 + 1;
#X obj 63 509 moses;
#X obj 576 171 exp;
#X obj 478 86 moses 0;
#X obj 478 168 * -1;
#X obj 479 209 exp;
#X obj 480 230 * -1;
#X obj 478 123 + 1;
#X obj 478 146 moses -1;
#X obj 479 190 - 1;
#X obj 479 62 - 1;
#X obj 63 551 /;
#X obj 302 21 inlet x;
#X obj 479 18 inlet shape;
#X obj 479 38 / 100;
#X obj 493 265 t b b f f;
#X obj 478 608 * -1;
#X obj 64 381 f 1024;
#X obj 141 729 tabwrite \$0-window;
#X obj 189 546 expr ($f1-$f2)/(1024-$f2-1);
#X obj 302 211 t b f f f;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 26 0;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 5 1 27 1;
#X connect 6 0 27 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 27 0;
#X connect 10 0 20 0;
#X connect 10 1 28 0;
#X connect 11 0 24 0;
#X connect 12 0 16 0;
#X connect 12 1 11 0;
#X connect 13 0 18 0;
#X connect 14 0 15 0;
#X connect 15 0 24 0;
#X connect 16 0 17 0;
#X connect 17 0 13 0;
#X connect 17 1 24 0;
#X connect 18 0 14 0;
#X connect 19 0 12 0;
#X connect 20 0 6 0;
#X connect 21 0 29 0;
#X connect 22 0 23 0;
#X connect 23 0 19 0;
#X connect 24 0 4 0;
#X connect 24 2 6 1;
#X connect 24 3 25 0;
#X connect 25 0 7 1;
#X connect 26 0 0 0;
#X connect 28 0 7 0;
#X connect 29 0 4 0;
#X connect 29 1 10 1;
#X connect 29 2 20 1;
#X connect 29 3 28 1;
#X restore 219 501 pd curved2;
#N canvas 633 50 680 699 curved 0;
#X obj 66 424 until;
#X obj 66 445 f;
#X obj 93 451 + 1;
#X msg 141 421 0;
#X obj 115 337 t b b;
#X obj 65 481 t f f;
#X obj 55 595 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 129 640 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 130 663 * -1;
#X obj 131 685 + 1;
#X obj 65 518 moses;
#X obj 578 180 exp;
#X obj 480 95 moses 0;
#X obj 480 177 * -1;
#X obj 481 218 exp;
#X obj 482 239 * -1;
#X obj 480 132 + 1;
#X obj 480 155 moses -1;
#X obj 481 199 - 1;
#X obj 481 71 - 1;
#X obj 65 560 /;
#X obj 304 30 inlet x;
#X obj 481 27 inlet shape;
#X obj 481 47 / 100;
#X obj 495 274 t b b f f;
#X obj 66 397 f 1024;
#X obj 143 741 tabwrite \$0-window;
#X obj 191 555 expr ($f1-$f2)/(1024-$f2-1);
#X obj 304 220 t b f f f;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 25 0;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 5 1 26 1;
#X connect 6 0 26 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 26 0;
#X connect 10 0 20 0;
#X connect 10 1 27 0;
#X connect 11 0 24 0;
#X connect 12 0 16 0;
#X connect 12 1 11 0;
#X connect 13 0 18 0;
#X connect 14 0 15 0;
#X connect 15 0 24 0;
#X connect 16 0 17 0;
#X connect 17 0 13 0;
#X connect 17 1 24 0;
#X connect 18 0 14 0;
#X connect 19 0 12 0;
#X connect 20 0 6 0;
#X connect 21 0 28 0;
#X connect 22 0 23 0;
#X connect 23 0 19 0;
#X connect 24 0 4 0;
#X connect 24 2 6 1;
#X connect 24 3 7 1;
#X connect 25 0 0 0;
#X connect 27 0 7 0;
#X connect 28 0 4 0;
#X connect 28 1 10 1;
#X connect 28 2 20 1;
#X connect 28 3 27 1;
#X restore 148 501 pd curved;
#X obj 124 375 pack 0 512;
#X obj 248 375 pack 0 0;
#X obj 124 200 t f f;
#N canvas 227 104 947 699 complex 0;
#X obj 190 316 until;
#X obj 190 337 f;
#X obj 217 343 + 1;
#X msg 265 302 0;
#X obj 211 240 t b b;
#X obj 460 630 expr -cos($f1*3.14159)*.5+.5;
#X obj 282 512 moses;
#X obj 235 741 pow 1;
#X obj 680 199 t b f;
#X obj 254 674 expr -cos($f1*3.14159)*.5+.5;
#X obj 324 774 *;
#X obj 460 653 * -1;
#X obj 461 675 + 1;
#X obj 190 612 expr -cos($f1*18.8496)*.5+.5;
#X obj 679 36 inlet vsl;
#X obj 399 28 inlet hsl;
#X obj 399 143 t b f f f;
#X obj 190 482 t float float;
#X obj 190 367 t float float;
#X obj 189 291 f 1024;
#X obj 190 588 / 1024;
#X obj 460 602 expr ($f1-$f2)/(1024-$f2-1);
#X obj 324 797 tabwrite \$0-window;
#X obj 254 651 / 512;
#X obj 680 71 + 200;
#X obj 680 93 / 400;
#X obj 680 137 + 0.2;
#X obj 680 115 * 2.5;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 18 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 19 0;
#X connect 4 1 3 0;
#X connect 5 0 11 0;
#X connect 6 0 23 0;
#X connect 6 1 21 0;
#X connect 7 0 10 0;
#X connect 8 0 4 0;
#X connect 8 1 7 1;
#X connect 9 0 10 1;
#X connect 10 0 22 0;
#X connect 11 0 12 0;
#X connect 12 0 10 1;
#X connect 13 0 7 0;
#X connect 14 0 24 0;
#X connect 15 0 16 0;
#X connect 16 0 4 0;
#X connect 16 1 6 1;
#X connect 16 2 23 1;
#X connect 16 3 21 1;
#X connect 17 0 20 0;
#X connect 17 1 6 0;
#X connect 18 0 17 0;
#X connect 18 1 22 1;
#X connect 19 0 0 0;
#X connect 20 0 13 0;
#X connect 21 0 5 0;
#X connect 23 0 9 0;
#X connect 24 0 25 0;
#X connect 25 0 27 0;
#X connect 26 0 8 0;
#X connect 27 0 26 0;
#X restore 373 501 pd complex;
#X obj 124 401 route 0 1 2 3 4;
#X obj 246 400 route 0 1 2 3 4;
#X obj 241 50 r \$0-env-bias;
#X obj 401 44 r \$0-env-shape;
#X text 78 520 well \, i think some of the math in this subpatches
is redundant;
#X obj 401 68 * 400;
#X obj 401 90 - 200;
#X obj 241 71 * 974;
#X obj 241 93 + 25;
#X obj 125 60 r \$0-env-type;
#X connect 2 0 9 0;
#X connect 3 0 2 0;
#X connect 3 1 7 1;
#X connect 4 0 2 0;
#X connect 4 1 8 1;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 7 0;
#X connect 9 1 8 0;
#X connect 11 0 0 0;
#X connect 11 1 6 0;
#X connect 11 2 5 0;
#X connect 11 3 1 0;
#X connect 11 4 10 0;
#X connect 12 0 0 1;
#X connect 12 1 6 1;
#X connect 12 2 5 1;
#X connect 12 3 1 1;
#X connect 12 4 10 1;
#X connect 13 0 18 0;
#X connect 14 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 4 0;
#X connect 18 0 19 0;
#X connect 19 0 3 0;
#X connect 20 0 2 0;
#X restore 435 297 pd envelope;
#X obj 457 103 inlet;
#X obj 318 101 inlet~;
#N canvas 280 97 888 439 record 0;
#X msg 243 237 start;
#X obj 443 82 sel 0 1;
#X obj 481 227 timer;
#X obj 481 265 * 44.1;
#X obj 535 221 samplerate~;
#X obj 535 246 / 1000;
#X msg 156 239 stop;
#X obj 416 57 t f f;
#X obj 298 108 sel 1 0;
#X msg 715 247 resize 1.67772e+07;
#X msg 481 332 resize \$1;
#X obj 416 9 r \$0-record;
#X obj 136 66 inlet~;
#X obj 301 205 del 10;
#X obj 416 34 > 0;
#X obj 595 246 s \$0-samplerate;
#N canvas 343 67 797 561 info 0;
#X obj 172 519 s \$0-wfbg;
#X obj 107 138 /;
#X obj 57 202 / 60;
#X obj 57 222 i;
#X obj 182 193 mod 60;
#X obj 214 265 < 10;
#X obj 187 346 makefilename 0%d;
#X obj 182 245 t f f;
#X obj 157 287 list prepend;
#X obj 157 306 route 0 1;
#X obj 156 326 makefilename %d;
#X obj 107 158 t f f;
#X obj 114 261 < 10;
#X obj 36 350 makefilename 0%d;
#X obj 57 242 t f f;
#X obj 35 282 list prepend;
#X obj 35 301 route 0 1;
#X obj 2 330 makefilename %d;
#X msg 172 495 label Recorded___\$1:\$2___\$3Hz;
#X obj 172 473 pack s s f;
#X obj 423 42 inlet;
#X obj 107 36 inlet;
#X msg 137 543 Recorded \$1:\$2 \$3Hz;
#X msg 11 540 label Recorded;
#X obj 138 563 print grainer~;
#X obj 11 562 s \$0-namecnv;
#X connect 1 0 11 0;
#X connect 2 0 3 0;
#X connect 3 0 14 0;
#X connect 4 0 7 0;
#X connect 5 0 8 1;
#X connect 6 0 19 1;
#X connect 7 0 8 0;
#X connect 7 1 5 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 1 6 0;
#X connect 10 0 19 1;
#X connect 11 0 2 0;
#X connect 11 1 4 0;
#X connect 12 0 15 1;
#X connect 13 0 19 0;
#X connect 14 0 15 0;
#X connect 14 1 12 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 16 1 13 0;
#X connect 17 0 19 0;
#X connect 18 0 0 0;
#X connect 19 0 18 0;
#X connect 19 0 22 0;
#X connect 19 0 23 0;
#X connect 20 0 19 2;
#X connect 20 0 1 1;
#X connect 21 0 1 0;
#X connect 22 0 24 0;
#X connect 23 0 25 0;
#X restore 631 303 pd info;
#X obj 136 313 tabwrite~ \$0-sf;
#X obj 301 236 s waveform/\$0-sf;
#X obj 715 381 s \$0-sf;
#X obj 494 303 s \$0-samplelength;
#X obj 136 87 hip~ 10;
#X obj 137 153 *~;
#X msg 173 135 0 \, 1 5;
#X obj 173 157 line~;
#X msg 212 159 0 5;
#X obj 157 219 del 5;
#X obj 443 359 f \$0;
#X msg 443 382 \; \$1-set symbol \$1-sf;
#X obj 498 120 t b b b;
#X connect 0 0 17 0;
#X connect 1 0 2 1;
#X connect 1 0 27 0;
#X connect 1 1 29 0;
#X connect 2 0 3 0;
#X connect 3 0 10 0;
#X connect 3 0 16 0;
#X connect 3 0 20 0;
#X connect 4 0 5 0;
#X connect 4 0 15 0;
#X connect 4 0 16 1;
#X connect 5 0 3 1;
#X connect 6 0 17 0;
#X connect 7 0 8 0;
#X connect 7 1 1 0;
#X connect 8 0 0 0;
#X connect 8 0 23 0;
#X connect 8 1 13 0;
#X connect 8 1 25 0;
#X connect 8 1 26 0;
#X connect 9 0 19 0;
#X connect 10 0 19 0;
#X connect 11 0 14 0;
#X connect 12 0 21 0;
#X connect 13 0 18 0;
#X connect 14 0 7 0;
#X connect 21 0 22 0;
#X connect 22 0 17 0;
#X connect 23 0 24 0;
#X connect 24 0 22 1;
#X connect 25 0 24 0;
#X connect 26 0 6 0;
#X connect 27 0 28 0;
#X connect 29 0 2 0;
#X connect 29 1 4 0;
#X connect 29 2 9 0;
#X restore 319 129 pd record;
#X obj 99 383 r \$0-trigger;
#X obj 436 473 outlet;
#N canvas 241 155 754 542 open-sf 0;
#X obj 219 10 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 217 150 pack s \$0;
#X obj 146 297 t b;
#X obj 146 319 s waveform/\$0-sf;
#X obj 242 10 r \$0-open-sf;
#X obj 219 71 s \$0-sf-path;
#X obj 315 52 r \$0-sf-path;
#N canvas 423 90 797 561 sondfile-info 0;
#X obj 172 519 s \$0-wfbg;
#X msg 199 116 \$1;
#X obj 107 138 /;
#X obj 57 202 / 60;
#X obj 57 222 i;
#X obj 182 193 mod 60;
#X obj 214 265 < 10;
#X obj 187 346 makefilename 0%d;
#X obj 182 245 t f f;
#X obj 157 287 list prepend;
#X obj 157 306 route 0 1;
#X obj 156 326 makefilename %d;
#X msg 31 473 label empty..;
#X obj 107 158 t f f;
#X obj 341 43 inlet path;
#X obj 53 35 inlet samp.length;
#X obj 199 36 inlet sfinfo;
#X obj 114 261 < 10;
#X obj 36 350 makefilename 0%d;
#X obj 57 242 t f f;
#X obj 35 282 list prepend;
#X obj 35 301 route 0 1;
#X obj 2 330 makefilename %d;
#X obj 53 57 pipe 1;
#X msg 11 540 label \$4;
#X msg 172 495 label \$4___\$1:\$2___\$3Hz;
#X msg 107 543 \$4 \$1:\$2 \$3Hz;
#X obj 105 563 print grainer~;
#X obj 172 473 pack s s f s;
#X obj 31 450 loadbang;
#X obj 11 562 s \$0-namecnv;
#N canvas 426 89 883 671 splitfilename 0;
#X obj 425 37 list fromsymbol;
#X obj 425 59 trigger list list bang;
#X obj 425 81 list length;
#X obj 310 169 until;
#X obj 310 195 f;
#X obj 325 218 - 1;
#X obj 457 339 t f f;
#X obj 425 104 t f f;
#X obj 488 414 t l;
#X obj 363 491 list;
#X obj 574 355 sel;
#X obj 363 513 list tosymbol;
#X obj 632 275 loadbang;
#X obj 632 297 symbol /;
#X obj 632 319 list fromsymbol;
#X obj 425 15 inlet symbol path;
#X obj 457 414 list;
#X obj 457 312 list store;
#X msg 457 287 get \$1 1;
#X obj 185 487 list tosymbol;
#X obj 185 463 list store;
#X msg 185 438 get 0 \$1;
#X obj 185 413 f;
#X obj 363 535 outlet;
#X text 407 538 filename;
#X obj 185 532 outlet;
#X text 226 532 path;
#X obj 617 383 t b b b;
#X obj 312 240 t f f f;
#X obj 363 353 sel 0;
#X obj 310 145 + 1;
#X obj 363 376 t b b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 17 1;
#X connect 1 1 20 1;
#X connect 1 2 16 1;
#X connect 2 0 7 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 28 0;
#X connect 5 0 4 1;
#X connect 6 0 16 0;
#X connect 6 1 10 0;
#X connect 7 0 30 0;
#X connect 7 1 4 1;
#X connect 8 0 16 1;
#X connect 9 0 11 0;
#X connect 10 0 27 0;
#X connect 11 0 23 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 10 1;
#X connect 15 0 0 0;
#X connect 16 0 8 0;
#X connect 16 0 9 1;
#X connect 17 0 6 0;
#X connect 18 0 17 0;
#X connect 19 0 25 0;
#X connect 20 0 19 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 27 0 22 0;
#X connect 27 1 9 0;
#X connect 27 2 3 1;
#X connect 28 0 22 1;
#X connect 28 1 29 0;
#X connect 28 2 18 0;
#X connect 29 0 31 0;
#X connect 30 0 3 0;
#X connect 31 0 9 0;
#X connect 31 1 3 1;
#X restore 341 67 pd splitfilename;
#X connect 1 0 2 1;
#X connect 1 0 28 2;
#X connect 2 0 13 0;
#X connect 3 0 4 0;
#X connect 4 0 19 0;
#X connect 5 0 8 0;
#X connect 6 0 9 1;
#X connect 7 0 28 1;
#X connect 8 0 9 0;
#X connect 8 1 6 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 1 7 0;
#X connect 11 0 28 1;
#X connect 12 0 0 0;
#X connect 12 0 30 0;
#X connect 13 0 3 0;
#X connect 13 1 5 0;
#X connect 14 0 31 0;
#X connect 15 0 23 0;
#X connect 16 0 1 0;
#X connect 17 0 20 1;
#X connect 18 0 28 0;
#X connect 19 0 20 0;
#X connect 19 1 17 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 21 1 18 0;
#X connect 22 0 28 0;
#X connect 23 0 2 0;
#X connect 24 0 30 0;
#X connect 25 0 0 0;
#X connect 26 0 27 0;
#X connect 28 0 25 0;
#X connect 28 0 26 0;
#X connect 28 0 24 0;
#X connect 29 0 12 0;
#X connect 31 1 28 3;
#X restore 217 282 pd sondfile-info;
#X f 20;
#X obj 315 72 t a a b;
#X obj 354 93 f \$0;
#X msg 354 116 \; \$1-set symbol \$1-sf;
#X msg 217 175 read -resize \$1 \$2-sf;
#N canvas 522 220 600 405 openpanel 0;
#N canvas 76 95 883 671 splitfilename 0;
#X obj 425 37 list fromsymbol;
#X obj 425 59 trigger list list bang;
#X obj 425 81 list length;
#X obj 310 169 until;
#X obj 310 195 f;
#X obj 338 210 - 1;
#X obj 383 339 t f f;
#X obj 425 104 t f f;
#X obj 414 413 t l;
#X obj 363 491 list;
#X obj 501 355 sel;
#X obj 363 513 list tosymbol;
#X obj 559 275 loadbang;
#X obj 559 297 symbol /;
#X obj 559 319 list fromsymbol;
#X obj 425 15 inlet symbol path;
#X obj 383 413 list;
#X obj 331 294 sel 1;
#X obj 383 312 list store;
#X msg 383 287 get \$1 1;
#X obj 185 487 list tosymbol;
#X obj 185 463 list store;
#X msg 185 438 get 0 \$1;
#X obj 185 413 f;
#X obj 363 535 outlet;
#X text 407 538 filename;
#X obj 185 532 outlet;
#X text 226 532 path;
#X obj 544 383 t b b b;
#X obj 312 240 t f f f;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 18 1;
#X connect 1 1 21 1;
#X connect 1 2 16 1;
#X connect 2 0 7 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 29 0;
#X connect 5 0 4 1;
#X connect 6 0 16 0;
#X connect 6 1 10 0;
#X connect 7 0 3 0;
#X connect 7 1 4 1;
#X connect 8 0 16 1;
#X connect 9 0 11 0;
#X connect 10 0 28 0;
#X connect 11 0 24 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 10 1;
#X connect 15 0 0 0;
#X connect 16 0 8 0;
#X connect 16 0 9 1;
#X connect 17 0 9 0;
#X connect 18 0 6 0;
#X connect 19 0 18 0;
#X connect 20 0 26 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 22 0;
#X connect 28 0 23 0;
#X connect 28 1 9 0;
#X connect 28 2 3 1;
#X connect 29 0 23 1;
#X connect 29 1 17 0;
#X connect 29 2 19 0;
#X restore 224 89 pd splitfilename;
#X obj 145 270 openpanel;
#X obj 145 47 f;
#X obj 175 48 + 1;
#X obj 145 70 sel 0;
#X obj 173 168 t b;
#X obj 145 20 inlet;
#X obj 145 293 outlet;
#X text 237 158 remember last directory;
#X obj 145 124 symbol ./;
#X obj 224 67 symbol;
#X obj 224 44 r \$0-sf-path;
#X obj 173 210 symbol ./;
#X connect 0 0 9 1;
#X connect 0 0 12 1;
#X connect 1 0 7 0;
#X connect 2 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 1 5 0;
#X connect 5 0 12 0;
#X connect 6 0 2 0;
#X connect 9 0 1 0;
#X connect 10 0 0 0;
#X connect 11 0 10 0;
#X connect 12 0 1 0;
#X restore 219 43 pd openpanel;
#X obj 217 199 soundfiler;
#X msg 392 297 \$1;
#N canvas 194 181 619 300 nofile 0;
#X obj 227 31 inlet;
#X obj 117 30 inlet;
#X obj 117 184 spigot 1;
#X obj 272 100 != 0;
#X obj 117 276 outlet;
#X obj 362 240 symbol empty..;
#X obj 443 29 inlet;
#X obj 227 55 t a a;
#X obj 227 277 outlet;
#X obj 362 280 outlet;
#X obj 227 184 spigot 1;
#X obj 362 138 sel 1 0;
#X obj 381 162 symbol;
#X msg 381 183 couldn't find \$1;
#X msg 272 78 \$1;
#X obj 381 206 print grainer~;
#X connect 0 0 7 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 2 1;
#X connect 3 0 10 1;
#X connect 3 0 11 0;
#X connect 5 0 9 0;
#X connect 6 0 5 1;
#X connect 6 0 12 1;
#X connect 7 0 10 0;
#X connect 7 1 14 0;
#X connect 10 0 8 0;
#X connect 11 0 5 0;
#X connect 11 1 12 0;
#X connect 12 0 13 0;
#X connect 13 0 15 0;
#X connect 14 0 3 0;
#X restore 217 224 pd nofile;
#X f 20;
#X obj 273 318 s \$0-samplelength;
#X obj 392 317 s \$0-samplerate;
#X connect 0 0 12 0;
#X connect 1 0 11 0;
#X connect 2 0 3 0;
#X connect 4 0 12 0;
#X connect 6 0 8 0;
#X connect 8 0 1 0;
#X connect 8 1 15 2;
#X connect 8 2 9 0;
#X connect 9 0 10 0;
#X connect 11 0 13 0;
#X connect 12 0 5 0;
#X connect 13 0 15 0;
#X connect 13 1 15 1;
#X connect 14 0 17 0;
#X connect 15 0 2 0;
#X connect 15 0 16 0;
#X connect 15 0 7 0;
#X connect 15 1 14 0;
#X connect 15 1 7 1;
#X connect 15 2 7 2;
#X restore 435 234 pd open-sf;
#X obj 103 115 hsl 175 15 0 127 0 0 \$0-visbng \$0-visbngr empty 1
8 2 10 -233017 -233017 -1 0 1;
#N canvas 50 60 540 340 \$0-grainer~ 0;
#N canvas 252 125 841 473 mask 0;
#X obj 100 100 cnv 15 520 320 empty empty empty 20 12 0 14 -262144
-66577 0;
#X obj 112 233 hsl 496 10 0 44345.5 0 0 \$0-postiongui \$0-postionguir
empty -2 -8 0 10 -262144 -1 -1 0 0;
#X obj 109 147 cnv 15 502 82 empty empty empty 20 12 0 14 -128992 -66577
0;
#N canvas 104 142 569 133 mask 0;
#X obj 1 1 cnv 15 498 78 empty empty empty 20 12 0 14 -228856 -66577
0;
#X obj 0 0 pp.waveform \$0-sf 500 80 1 -1 0 1 1 100;
#X obj 0 1 cnv 1 1 78 empty \$0-zeiger empty 20 12 0 14 -258113 -66577
0;
#X coords 0 -1 1 1 500 80 2 0 0;
#X restore 110 148 pd mask;
#X obj 115 280 nbx 8 12 0 44345.5 0 0 \$0-position \$0-positionr Position(ms)
70 7 2 10 -262144 -1 -1 0 256;
#X msg 12 313 set \$1;
#X obj 12 292 i;
#X obj 109 251 tgl 20 0 \$0-int_triggeronoff \$0-int_triggeronoffr
empty 17 7 2 10 -228856 -1 -1 0 1;
#X obj 3 336 s \$0-position;
#X obj 284 281 nbx 8 12 0 44345.5 0 0 \$0-random-position \$0-random-positionr
Random-Position(ms) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 115 295 nbx 5 12 -1e+06 1e+06 0 0 \$0-size \$0-sizer Grainsize(ms)
69 7 2 10 -262144 -1 -1 100 256;
#X obj 142 265 nbx 4 12 1 1e+37 0 0 \$0-trigger-speed \$0-trigger-speedr
Grain-Distance(ms) 42 7 2 10 -262144 -1 -1 50 256;
#X obj 284 296 nbx 5 12 0 1e+11 0 0 \$0-random-size \$0-random-sizer
Random-Grainsize(ms) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 284 266 nbx 4 12 0 1e+37 0 0 \$0-random-trigger-speed \$0-random-trigger-speedr
Random-Grain-Distance(ms) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 115 310 nbx 5 12 -1e+28 1e+28 0 0 \$0-pitch \$0-pitchr Pitch(cents)
70 7 2 10 -262144 -1 -1 0 256;
#X obj 284 311 nbx 5 12 0 1e+13 0 0 \$0-random-pitch \$0-random-pitchr
Random-Pitch(cents) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 273 316 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 321 cnv 5 1 1 empty empty _ 0 -5 0 10 -262144 -66577 0;
#X obj 274 272 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 287 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 302 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 115 325 nbx 4 12 -100 100 0 0 \$0-pan \$0-panr Panorama 70 7
2 10 -262144 -1 -1 0 256;
#X obj 284 326 nbx 4 12 0 100 0 0 \$0-random-pan \$0-random-panr Random-Panorama(%)
70 7 2 10 -262144 -1 -1 0 256;
#X obj 273 331 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 336 cnv 5 1 1 empty empty _ 0 -5 0 10 -262144 -66577 0;
#X obj 115 340 nbx 4 12 -100 0 0 0 \$0-amp \$0-ampr Amplitude(db) 70
7 2 10 -262144 -1 -1 0 256;
#X obj 284 341 nbx 4 12 0 100 0 0 \$0-random-amp \$0-random-ampr Random-Amplitude(db)
70 7 2 10 -262144 -1 -1 0 256;
#X obj 273 347 cnv 5 1 1 empty empty _ 0 -5 0 10 -262144 -66577 0;
#X obj 181 116 tgl 16 0 \$0-playbacktgl \$0-playbacktglr Play 0 -7
2 10 -262144 -262144 -1 0 1;
#X obj 186 119 cnv 1 1 10 empty \$0-playguicnv empty 20 12 0 14 -128992
-262144 0;
#X obj 187 120 cnv 1 1 8 empty \$0-playguicnv empty 20 12 0 14 -128992
-262144 0;
#X obj 188 121 cnv 1 1 6 empty \$0-playguicnv empty 20 12 0 14 -128992
-262144 0;
#X obj 190 122 cnv 1 1 4 empty \$0-playguicnv empty 20 12 0 14 -128992
-262144 0;
#X obj 191 123 cnv 1 1 2 empty \$0-playguicnv empty 20 12 0 14 -128992
-262144 0;
#X obj 121 116 bng 16 250 50 0 \$0-open-sf \$0-open-sfr Open -2 -7
2 10 -262144 -4034 -1;
#X obj 151 116 tgl 16 0 \$0-record \$0-recordr Record -4 -7 2 10 -262144
-258113 -1 0 1;
#X obj 208 120 nbx 4 12 -1e+37 1e+37 0 0 \$0-playback-speed \$0-playback-speedr
Playback-Speed 0 -11 2 10 -262144 -1 -1 100 256;
#X obj 246 117 cnv 15 10 15 empty empty % 1 10 2 10 -262144 -1 0;
#X obj 496 398 hradio 10 1 0 5 \$0-env-type \$0-env-typer Type 0 -7
2 10 -262144 -1 -1 0;
#X obj 496 266 cnv 15 98 72 empty empty empty 20 12 0 14 -162280 -66577
0;
#N canvas 0 50 450 300 mask 0;
#X obj 101 101 cnv 15 94 68 empty empty empty 20 12 0 14 -262144 -66577
0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-window 1024 float 3;
#A 0 0 9.41753e-06 3.76403e-05 8.46982e-05 0.000150591 0.000235289
0.000338793 0.000461131 0.000602275 0.000762194 0.000940949 0.00113848
0.00135478 0.00158983 0.00184369 0.00211629 0.00240764 0.0027177 0.00304651
0.00339401 0.00376022 0.00414512 0.00454867 0.00497088 0.00541174 0.00587121
0.0063493 0.00684595 0.00736117 0.00789493 0.00844723 0.00901806 0.00960734
0.0102151 0.0108413 0.0114859 0.0121489 0.0128303 0.01353 0.014248
0.0149843 0.0157389 0.0165117 0.0173028 0.0181119 0.0189393 0.0197847
0.0206482 0.0215298 0.0224294 0.0233469 0.0242825 0.0252359 0.0262071
0.0271963 0.0282032 0.0292279 0.0302703 0.0313304 0.0324082 0.0335035
0.0346165 0.0357469 0.0368948 0.0380602 0.0392429 0.040443 0.0416604
0.042895 0.0441469 0.0454159 0.0467021 0.0480053 0.0493255 0.0506627
0.0520168 0.0533878 0.0547755 0.0561801 0.0576014 0.0590393 0.0604938
0.0619648 0.0634524 0.0649564 0.0664768 0.0680135 0.0695664 0.0711356
0.0727209 0.0743223 0.0759397 0.0775731 0.0792224 0.0808875 0.0825684
0.0842651 0.0859773 0.0877052 0.0894486 0.0912074 0.0929817 0.0947713
0.0965761 0.0983961 0.100231 0.102081 0.103947 0.105827 0.107722 0.109631
0.111556 0.113495 0.115448 0.117416 0.119399 0.121395 0.123406 0.125432
0.127471 0.129524 0.131592 0.133673 0.135768 0.137876 0.139999 0.142134
0.144284 0.146446 0.148622 0.150812 0.153014 0.155229 0.157458 0.159699
0.161953 0.16422 0.1665 0.168792 0.171096 0.173413 0.175743 0.178084
0.180438 0.182803 0.185181 0.18757 0.189971 0.192384 0.194808 0.197244
0.199691 0.20215 0.20462 0.207101 0.209593 0.212096 0.214609 0.217134
0.219669 0.222215 0.224771 0.227337 0.229914 0.232501 0.235098 0.237705
0.240322 0.242948 0.245585 0.24823 0.250886 0.253551 0.256225 0.258908
0.2616 0.264301 0.267011 0.26973 0.272458 0.275194 0.277939 0.280692
0.283453 0.286222 0.288999 0.291785 0.294578 0.297379 0.300187 0.303004
0.305827 0.308658 0.311496 0.314341 0.317193 0.320052 0.322918 0.32579
0.328669 0.331555 0.334446 0.337344 0.340249 0.343159 0.346075 0.348997
0.351924 0.354857 0.357796 0.36074 0.363689 0.366643 0.369602 0.372567
0.375536 0.378509 0.381488 0.38447 0.387458 0.390449 0.393444 0.396444
0.399447 0.402454 0.405465 0.40848 0.411497 0.414518 0.417543 0.42057
0.423601 0.426634 0.42967 0.432709 0.43575 0.438794 0.44184 0.444888
0.447939 0.450991 0.454045 0.457101 0.460158 0.463217 0.466277 0.469339
0.472402 0.475466 0.47853 0.481596 0.484662 0.487729 0.490796 0.493864
0.496931 0.499999 0.503067 0.506135 0.509203 0.51227 0.515337 0.518403
0.521469 0.524533 0.527597 0.53066 0.533721 0.536782 0.539841 0.542898
0.545954 0.549008 0.55206 0.55511 0.558159 0.561205 0.564248 0.56729
0.570328 0.573365 0.576398 0.579428 0.582456 0.58548 0.588501 0.591519
0.594534 0.597544 0.600552 0.603555 0.606554 0.60955 0.612541 0.615528
0.618511 0.621489 0.624463 0.627432 0.630396 0.633356 0.63631 0.639259
0.642203 0.645142 0.648075 0.651002 0.653924 0.65684 0.65975 0.662654
0.665552 0.668444 0.67133 0.674209 0.677081 0.679947 0.682806 0.685658
0.688503 0.691341 0.694172 0.696995 0.699811 0.70262 0.705421 0.708214
0.710999 0.713777 0.716546 0.719307 0.72206 0.724805 0.727541 0.730269
0.732988 0.735698 0.738399 0.741091 0.743774 0.746448 0.749113 0.751768
0.754414 0.757051 0.759677 0.762294 0.764901 0.767498 0.770085 0.772662
0.775228 0.777784 0.78033 0.782865 0.78539 0.787903 0.790406 0.792898
0.795379 0.797849 0.800308 0.802755 0.805191 0.807615 0.810028 0.812429
0.814818 0.817196 0.819561 0.821915 0.824256 0.826586 0.828903 0.831207
0.833499 0.835779 0.838046 0.8403 0.842541 0.84477 0.846985 0.849187
0.851377 0.853553 0.855715 0.857865 0.860001 0.862123 0.864232 0.866326
0.868408 0.870475 0.872528 0.874568 0.876593 0.878604 0.880601 0.882583
0.884551 0.886505 0.888444 0.890368 0.892278 0.894173 0.896053 0.897918
0.899768 0.901603 0.903423 0.905228 0.907018 0.908792 0.910551 0.912294
0.914022 0.915734 0.917431 0.919112 0.920777 0.922426 0.92406 0.925677
0.927278 0.928864 0.930433 0.931986 0.933523 0.935043 0.936547 0.938035
0.939506 0.94096 0.942398 0.943819 0.945224 0.946612 0.947983 0.949337
0.950674 0.951994 0.953297 0.954584 0.955853 0.957104 0.958339 0.959556
0.960757 0.961939 0.963105 0.964253 0.965383 0.966496 0.967591 0.968669
0.969729 0.970772 0.971796 0.972803 0.973792 0.974764 0.975717 0.976653
0.97757 0.97847 0.979351 0.980215 0.98106 0.981888 0.982697 0.983488
0.984261 0.985015 0.985752 0.98647 0.987169 0.987851 0.988514 0.989158
0.989785 0.990392 0.990982 0.991553 0.992105 0.992639 0.993154 0.99365
0.994129 0.994588 0.995029 0.995451 0.995855 0.99624 0.996606 0.996953
0.997282 0.997592 0.997884 0.998156 0.99841 0.998645 0.998861 0.999059
0.999238 0.999398 0.999539 0.999661 0.999765 0.999849 0.999915 0.999962
0.999991 1 0.999991 0.999962 0.999915 0.999849 0.999764 0.99966 0.999537
0.999395 0.999235 0.999055 0.998857 0.99864 0.998404 0.998149 0.997875
0.997583 0.997272 0.996942 0.996593 0.996225 0.995839 0.995434 0.99501
0.994567 0.994106 0.993626 0.993127 0.99261 0.992074 0.99152 0.990947
0.990355 0.989745 0.989116 0.988469 0.987804 0.98712 0.986417 0.985696
0.984957 0.9842 0.983424 0.98263 0.981818 0.980987 0.980138 0.979271
0.978386 0.977483 0.976562 0.975623 0.974666 0.973691 0.972698 0.971687
0.970659 0.969612 0.968548 0.967466 0.966367 0.96525 0.964115 0.962962
0.961793 0.960605 0.959401 0.958179 0.956939 0.955683 0.954409 0.953118
0.95181 0.950485 0.949142 0.947783 0.946407 0.945014 0.943604 0.942177
0.940734 0.939274 0.937798 0.936304 0.934795 0.933269 0.931726 0.930168
0.928593 0.927001 0.925394 0.923771 0.922131 0.920476 0.918804 0.917117
0.915414 0.913696 0.911962 0.910212 0.908447 0.906666 0.90487 0.903058
0.901232 0.89939 0.897533 0.895661 0.893774 0.891872 0.889956 0.888024
0.886078 0.884118 0.882143 0.880153 0.878149 0.876131 0.874099 0.872052
0.869992 0.867917 0.865828 0.863726 0.86161 0.85948 0.857337 0.85518
0.85301 0.850826 0.848629 0.846419 0.844196 0.84196 0.839711 0.837449
0.835174 0.832887 0.830587 0.828275 0.82595 0.823613 0.821263 0.818902
0.816528 0.814143 0.811745 0.809336 0.806915 0.804483 0.802039 0.799583
0.797116 0.794639 0.792149 0.789649 0.787138 0.784616 0.782084 0.77954
0.776986 0.774422 0.771847 0.769262 0.766667 0.764061 0.761446 0.758821
0.756186 0.753541 0.750887 0.748224 0.74555 0.742868 0.740177 0.737476
0.734766 0.732048 0.729321 0.726585 0.72384 0.721087 0.718326 0.715557
0.712779 0.709993 0.707199 0.704398 0.701589 0.698772 0.695947 0.693116
0.690277 0.68743 0.684577 0.681717 0.67885 0.675976 0.673095 0.670208
0.667314 0.664414 0.661508 0.658596 0.655678 0.652754 0.649824 0.646888
0.643947 0.641001 0.638049 0.635092 0.63213 0.629163 0.626191 0.623214
0.620232 0.617246 0.614256 0.611261 0.608262 0.605259 0.602252 0.599241
0.596226 0.593208 0.590186 0.587161 0.584132 0.581101 0.578066 0.575028
0.571988 0.568944 0.565899 0.56285 0.559799 0.556746 0.553691 0.550634
0.547575 0.544514 0.541451 0.538387 0.535322 0.532255 0.529187 0.526117
0.523047 0.519976 0.516904 0.513832 0.510759 0.507685 0.504611 0.501538
0.498464 0.49539 0.492316 0.489243 0.48617 0.483097 0.480025 0.476954
0.473884 0.470815 0.467746 0.46468 0.461614 0.45855 0.455487 0.452426
0.449367 0.44631 0.443255 0.440202 0.437151 0.434103 0.431057 0.428014
0.424973 0.421935 0.4189 0.415869 0.41284 0.409815 0.406793 0.403775
0.40076 0.397749 0.394742 0.391739 0.38874 0.385745 0.382755 0.379769
0.376787 0.373811 0.370839 0.367872 0.364909 0.361952 0.359 0.356054
0.353113 0.350177 0.347247 0.344323 0.341405 0.338493 0.335587 0.332687
0.329793 0.326906 0.324026 0.321152 0.318284 0.315424 0.312571 0.309725
0.306885 0.304054 0.301229 0.298413 0.295603 0.292802 0.290008 0.287222
0.284445 0.281675 0.278914 0.276161 0.273416 0.27068 0.267953 0.265235
0.262525 0.259825 0.257133 0.254451 0.251778 0.249114 0.24646 0.243815
0.24118 0.238555 0.23594 0.233334 0.230739 0.228154 0.225579 0.223015
0.220461 0.217918 0.215385 0.212863 0.210352 0.207852 0.205362 0.202885
0.200418 0.197962 0.195518 0.193086 0.190665 0.188256 0.185858 0.183473
0.181099 0.178738 0.176388 0.174051 0.171726 0.169414 0.167114 0.164827
0.162552 0.16029 0.158041 0.155805 0.153582 0.151372 0.149175 0.146991
0.144821 0.142664 0.140521 0.138391 0.136275 0.134172 0.132084 0.130009
0.127949 0.125902 0.12387 0.121852 0.119848 0.117858 0.115883 0.113922
0.111976 0.110045 0.108128 0.106227 0.10434 0.102468 0.100611 0.0987691
0.0969424 0.095131 0.093335 0.0915542 0.0897888 0.088039 0.0863048
0.0845863 0.0828834 0.0811963 0.0795249 0.0778695 0.07623 0.0746067
0.0729993 0.0714082 0.0698331 0.0682743 0.0667319 0.0652058 0.0636961
0.062203 0.0607265 0.0592665 0.0578232 0.0563965 0.0549867 0.0535937
0.0522175 0.0508583 0.0495161 0.0481908 0.0468826 0.0455917 0.0443178
0.0430612 0.0418218 0.0405998 0.0393951 0.0382078 0.037038 0.0358857
0.0347509 0.0336338 0.0325342 0.0314523 0.0303881 0.0293417 0.0283131
0.0273023 0.0263094 0.0253343 0.0243772 0.0234381 0.022517 0.0216139
0.0207289 0.0198621 0.0190133 0.0181828 0.0173705 0.0165764 0.0158006
0.0150431 0.0143039 0.0135831 0.0128806 0.0121966 0.011531 0.0108839
0.0102552 0.0096451 0.00905347 0.00848043 0.00792599 0.00739014 0.00687289
0.0063743 0.00589436 0.00543308;
#A 1000 0.00499052 0.00456667 0.00416148 0.00377512 0.00340748 0.00305855
0.00272846 0.00241721 0.00212467 0.00185102 0.00159621 0.00136018 0.00114298
0.000944734 0.000765264 0.000604689 0.000463009 0.000340223 0.000236273
0.000151217 8.50558e-05 3.77893e-05 9.41753e-06 0;
#X coords 0 1 1024 0 96 70 1 0 0;
#X restore 100 100 graph;
#X coords 0 -1 1 1 96 70 2 100 100;
#X restore 497 267 pd mask;
#X obj 496 252 cnv 12 80 12 empty empty empty 20 12 0 14 -262144 -66577
0;
#X obj 499 352 hsl 92 10 0 1 0 0 \$0-env-bias \$0-env-biasr Bias -2
-7 2 10 -262144 -1 -1 4550 1;
#X obj 496 251 cnv 10 10 10 empty empty Grain-Envelope 0 5 2 10 -262144
-1 0;
#X obj 133 249 cnv 10 10 10 empty empty Int.Grain-Trigger 0 5 2 10
-262144 -1 0;
#X obj 115 387 nbx 5 12 0 15000 0 0 \$0-filter-freq \$0-filter-freqr
Frequency(Hz) 70 7 2 10 -262144 -1 -1 100 256;
#X obj 284 387 nbx 5 12 0 15000 0 0 \$0-random-filter-freq \$0-random-filter-freqr
Random-Frequency(Hz) 70 7 2 10 -262144 -1 -1 5000 256;
#X obj 115 402 nbx 3 12 0 100 0 0 \$0-filter-q \$0-filter-qr Q 70 6
2 9 -262144 -1 -1 1 256;
#X obj 284 402 nbx 3 12 0 100 0 0 \$0-random-filter-q \$0-random-filter-qr
Random-Q 70 6 2 9 -262144 -1 -1 0 256;
#X obj 141 373 tgl 10 0 \$0-filter-bypass \$0-filter-bypassr Bypass
15 6 2 10 -262144 -1 -1 1 1;
#X obj 273 392 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 408 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 115 357 cnv 10 10 10 empty empty bp-Filter 0 5 2 10 -262144
-1 0;
#X obj 499 375 hsl 92 10 0 1 0 0 \$0-env-shape \$0-env-shaper Shape
-2 -7 2 10 -262144 -1 -1 4550 1;
#X obj 109 136 cnv 10 10 10 empty \$0-wfbg empty.. 1 5 2 10 -262144
-1 0;
#X obj 443 121 cnv 15 10 10 empty empty grainer~ 0 0 2 14 -262144 -162280
0;
#X obj 540 105 cnv 10 10 10 empty \$0-active-grains 0 0 5 2 11 -262144
-1 0;
#X obj 517 105 cnv 10 10 10 empty empty max. 0 5 2 10 -262144 -1 0
;
#X obj 560 106 cnv 10 10 10 empty empty Grains 0 5 2 10 -262144 -1
0;
#X obj 592 106 cnv 10 10 10 empty empty active 0 5 2 10 -262144 -1
0;
#X obj 554 133 tgl 10 0 \$0-normalize \$0-normalizer normalize 14 6
2 10 -262144 -1 -1 0 1;
#X connect 1 0 6 0;
#X connect 4 0 1 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 6 0 8 0;
#X coords 0 -1 1 1 521 321 2 100 100;
#X restore 10 8 pd mask;
#X restore 435 383 pd \$0-grainer~;
#X obj 99 430 clone pp.grainer~-onegrain 128 \$0;
#N canvas 55 101 1256 588 outlet-message 0;
#X obj 20 7 r \$0-trigger-speed;
#X obj 52 27 r \$0-position;
#X obj 84 47 r \$0-size;
#X obj 116 69 r \$0-pitch;
#X obj 188 605 list trim;
#X msg 90 603 addcomma;
#X msg 30 407 set;
#X obj 188 582 list prepend add2;
#X obj 188 643 outlet;
#X obj 197 2 r \$0-filter-freq;
#X obj 229 27 r \$0-filter-q;
#X obj 214 133 r \$0-filter-bypass;
#X obj 180 112 r \$0-amp;
#X obj 148 91 r \$0-pan;
#X obj 261 53 r \$0-playback-speed;
#X obj 293 76 r \$0-playbacktgl;
#X obj 305 96 r \$0-env-type;
#X obj 344 117 r \$0-env-bias;
#X obj 378 136 r \$0-env-shape;
#X obj 729 269 r \$0-sf-path;
#X obj 729 291 symbol;
#N canvas 3 282 1274 292 bang_once...................................................
0;
#X obj 174 87 t b f;
#X obj 132 87 t b f;
#X obj 89 183 del 0;
#X obj 89 87 t b f;
#X obj 217 87 t b f;
#X obj 261 87 t b f;
#X obj 303 87 t b f;
#X obj 89 41 inlet;
#X obj 132 40 inlet;
#X obj 174 40 inlet;
#X obj 217 40 inlet;
#X obj 261 41 inlet;
#X obj 304 41 inlet;
#X obj 465 288 outlet;
#X obj 89 217 f;
#X obj 350 88 t b f;
#X obj 351 42 inlet;
#X obj 397 86 t b f;
#X obj 398 40 inlet;
#X obj 448 87 t b f;
#X obj 492 87 t b f;
#X obj 534 87 t b f;
#X obj 448 40 inlet;
#X obj 492 41 inlet;
#X obj 535 41 inlet;
#X obj 1216 37 inlet;
#X obj 1215 83 t b a;
#X obj 580 86 t b f;
#X obj 624 86 t b f;
#X obj 666 86 t b f;
#X obj 580 40 inlet;
#X obj 624 41 inlet;
#X obj 667 41 inlet;
#X obj 709 88 t b f;
#X obj 710 42 inlet;
#X obj 755 87 t b f;
#X obj 799 87 t b f;
#X obj 841 87 t b f;
#X obj 755 41 inlet;
#X obj 799 42 inlet;
#X obj 842 42 inlet;
#X obj 888 88 t b f;
#X obj 889 42 inlet;
#X obj 934 87 t b f;
#X obj 978 87 t b f;
#X obj 1020 87 t b f;
#X obj 934 41 inlet;
#X obj 978 42 inlet;
#X obj 1021 42 inlet;
#X obj 1064 87 t b f;
#X obj 1065 42 inlet;
#X obj 1110 86 t b f;
#X obj 1111 41 inlet;
#X obj 465 263 pack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 s;
#X obj 1162 86 t b f;
#X obj 1163 41 inlet;
#X connect 0 0 2 0;
#X connect 0 1 53 2;
#X connect 1 0 2 0;
#X connect 1 1 53 1;
#X connect 2 0 14 0;
#X connect 3 0 2 0;
#X connect 3 1 14 1;
#X connect 4 0 2 0;
#X connect 4 1 53 3;
#X connect 5 0 2 0;
#X connect 5 1 53 4;
#X connect 6 0 2 0;
#X connect 6 1 53 5;
#X connect 7 0 3 0;
#X connect 8 0 1 0;
#X connect 9 0 0 0;
#X connect 10 0 4 0;
#X connect 11 0 5 0;
#X connect 12 0 6 0;
#X connect 14 0 53 0;
#X connect 15 0 2 0;
#X connect 15 1 53 6;
#X connect 16 0 15 0;
#X connect 17 0 2 0;
#X connect 17 1 53 7;
#X connect 18 0 17 0;
#X connect 19 0 2 0;
#X connect 19 1 53 8;
#X connect 20 0 2 0;
#X connect 20 1 53 9;
#X connect 21 0 2 0;
#X connect 21 1 53 10;
#X connect 22 0 19 0;
#X connect 23 0 20 0;
#X connect 24 0 21 0;
#X connect 25 0 26 0;
#X connect 26 0 2 0;
#X connect 26 1 53 25;
#X connect 27 0 2 0;
#X connect 27 1 53 11;
#X connect 28 0 2 0;
#X connect 28 1 53 12;
#X connect 29 0 2 0;
#X connect 29 1 53 13;
#X connect 30 0 27 0;
#X connect 31 0 28 0;
#X connect 32 0 29 0;
#X connect 33 0 2 0;
#X connect 33 1 53 14;
#X connect 34 0 33 0;
#X connect 35 0 2 0;
#X connect 35 1 53 15;
#X connect 36 0 2 0;
#X connect 36 1 53 16;
#X connect 37 0 2 0;
#X connect 37 1 53 17;
#X connect 38 0 35 0;
#X connect 39 0 36 0;
#X connect 40 0 37 0;
#X connect 41 0 2 0;
#X connect 41 1 53 18;
#X connect 42 0 41 0;
#X connect 43 0 2 0;
#X connect 43 1 53 19;
#X connect 44 0 2 0;
#X connect 44 1 53 20;
#X connect 45 0 2 0;
#X connect 45 1 53 21;
#X connect 46 0 43 0;
#X connect 47 0 44 0;
#X connect 48 0 45 0;
#X connect 49 0 2 0;
#X connect 49 1 53 22;
#X connect 50 0 49 0;
#X connect 51 0 2 0;
#X connect 51 1 53 23;
#X connect 52 0 51 0;
#X connect 53 0 13 0;
#X connect 54 0 2 0;
#X connect 54 1 53 24;
#X connect 55 0 54 0;
#X restore 124 322 pd bang_once...................................................
;
#X obj 392 1 r \$0-random-trigger-speed;
#X obj 419 22 r \$0-random-position;
#X obj 445 44 r \$0-random-size;
#X obj 460 67 r \$0-random-pitch;
#X obj 474 89 r \$0-random-pan;
#X obj 499 109 r \$0-random-amp;
#X obj 510 130 r \$0-random-filter-freq;
#X obj 524 152 r \$0-random-filter-q;
#X obj 666 49 r \$0-position;
#X obj 696 74 r \$0-samplerate;
#X obj 696 95 / 1000;
#X obj 695 114 r \$0-samplelength;
#X obj 666 151 * 100;
#X obj 666 95 *;
#X obj 666 130 /;
#X obj 807 47 r \$0-random-position;
#X obj 837 68 r \$0-samplerate;
#X obj 837 89 / 1000;
#X obj 836 108 r \$0-samplelength;
#X obj 807 145 * 100;
#X obj 807 89 *;
#X obj 807 124 /;
#X obj 931 148 r \$0-int_triggeronoff;
#X msg 169 413 open \$26 \, grain-distance \$1 \, position \$2 \, grainsize
\$3 \, pitch \$4 \, panorama \$5 \, amplitude \$6 \, filter-bypass
\$7 \, frequency \$8 \, q \$9 \, playback-speed \$10 \, play \$11 \,
env-type \$12 \, env-bias \$13 \, env-shape \$14 \, random-grain-distance
\$15 \, random-position \$16 \, random-grainsize \$17 \, random-pitch
\$18 \, random-panorama \$19 \, random-amplitude \$20 \, random-frequency
\$21 \, random-q \$22 \, position% \$23 \, random-position% \$24 \,
int.grain-trigger \$25 \,;
#X obj 124 368 t b a b;
#X obj 169 533 t b a a;
#N canvas 497 347 297 264 save 0;
#X obj 48 16 inlet;
#N canvas 690 259 481 384 collect 0;
#X obj 47 60 inlet;
#X obj 47 274 outlet;
#X obj 98 180 list;
#X obj 166 181 t l;
#X obj 47 225 list;
#X obj 98 139 list append |;
#X obj 47 126 del 0;
#X obj 47 82 t b a;
#X text 119 75 hacky thing... replaycing " \, " with "|";
#X connect 0 0 7 0;
#X connect 2 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 2 1;
#X connect 4 0 1 0;
#X connect 5 0 2 0;
#X connect 6 0 2 1;
#X connect 6 0 4 0;
#X connect 7 0 6 0;
#X connect 7 1 5 0;
#X restore 48 38 pd collect;
#X obj 117 16 r \$0-save;
#X obj 27 130 text set \$0-savestates;
#X obj 27 104 list;
#X obj 117 62 t b f;
#X obj 117 39 clip 0 20;
#X connect 0 0 1 0;
#X connect 1 0 4 1;
#X connect 2 0 6 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 5 1 3 1;
#X connect 6 0 5 0;
#X restore 208 557 pd save;
#X connect 0 0 21 0;
#X connect 1 0 21 1;
#X connect 2 0 21 2;
#X connect 3 0 21 3;
#X connect 4 0 8 0;
#X connect 5 0 8 0;
#X connect 6 0 8 0;
#X connect 7 0 4 0;
#X connect 9 0 21 7;
#X connect 10 0 21 8;
#X connect 11 0 21 6;
#X connect 12 0 21 5;
#X connect 13 0 21 4;
#X connect 14 0 21 9;
#X connect 15 0 21 10;
#X connect 16 0 21 11;
#X connect 17 0 21 12;
#X connect 18 0 21 13;
#X connect 19 0 20 0;
#X connect 20 0 21 25;
#X connect 21 0 46 0;
#X connect 22 0 21 14;
#X connect 23 0 21 15;
#X connect 24 0 21 16;
#X connect 25 0 21 17;
#X connect 26 0 21 18;
#X connect 27 0 21 19;
#X connect 28 0 21 20;
#X connect 29 0 21 21;
#X connect 30 0 35 0;
#X connect 31 0 32 0;
#X connect 32 0 35 1;
#X connect 33 0 36 1;
#X connect 34 0 21 22;
#X connect 35 0 36 0;
#X connect 36 0 34 0;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 39 0 42 1;
#X connect 40 0 43 1;
#X connect 41 0 21 23;
#X connect 42 0 43 0;
#X connect 43 0 41 0;
#X connect 44 0 21 24;
#X connect 45 0 47 0;
#X connect 46 0 8 0;
#X connect 46 1 45 0;
#X connect 46 2 6 0;
#X connect 47 0 5 0;
#X connect 47 1 7 0;
#X connect 47 2 48 0;
#X restore 436 444 pd outlet-message;
#N canvas 96 84 696 551 playback+position 0;
#X obj 277 416 snapshot~;
#X obj 175 314 r \$0-trigger;
#X obj 308 320 r \$0-samplelength;
#X obj 326 341 r \$0-samplerate;
#X obj 326 364 / 1000;
#X obj 308 385 /;
#X obj 276 385 *~;
#X obj 276 48 r \$0-samplelength;
#X obj 294 91 r \$0-samplerate;
#X obj 276 141 /;
#X obj 276 112 f;
#X obj 276 70 t b f;
#X obj 276 195 *;
#X obj 307 130 r \$0-playback-speed;
#X obj 307 152 / 100;
#X obj 465 36 r \$0-position;
#X obj 497 140 r \$0-samplelength;
#X obj 515 161 r \$0-samplerate;
#X obj 515 184 / 1000;
#X obj 497 205 /;
#X obj 465 225 /;
#X obj 121 22 r \$0-playbacktgl;
#X obj 276 223 f;
#X obj 276 273 phasor~;
#X obj 167 100 sel 1;
#X obj 276 245 spigot;
#X obj 167 49 t f f;
#X obj 306 173 t b f;
#X obj 458 513 s \$0-grainposition;
#X obj 491 483 +;
#X obj 499 461 t b f;
#X obj 533 424 r \$0-random-position;
#X obj 500 405 r \$0-trigger;
#X obj 500 442 random;
#X obj 188 511 s \$0-positionr;
#X obj 188 480 f;
#X obj 96 416 r \$0-playbacktgl;
#X obj 96 437 sel 0;
#X obj 486 70 r \$0-int_triggeronoff;
#X obj 465 127 f;
#X obj 486 91 sel 1;
#X floatatom 477 178 5 0 0 0 - - -;
#X connect 0 0 29 0;
#X connect 0 0 35 1;
#X connect 1 0 0 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 5 1;
#X connect 5 0 6 1;
#X connect 6 0 0 0;
#X connect 7 0 11 0;
#X connect 8 0 10 1;
#X connect 9 0 12 0;
#X connect 10 0 9 0;
#X connect 11 0 10 0;
#X connect 11 1 9 1;
#X connect 12 0 22 0;
#X connect 13 0 14 0;
#X connect 14 0 27 0;
#X connect 15 0 39 0;
#X connect 16 0 19 0;
#X connect 16 0 41 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 1;
#X connect 20 0 23 1;
#X connect 21 0 26 0;
#X connect 22 0 25 0;
#X connect 23 0 6 0;
#X connect 24 0 22 0;
#X connect 24 0 20 0;
#X connect 24 1 23 0;
#X connect 25 0 23 0;
#X connect 26 0 24 0;
#X connect 26 1 25 1;
#X connect 27 0 12 0;
#X connect 27 1 12 1;
#X connect 29 0 28 0;
#X connect 30 0 29 0;
#X connect 30 1 29 1;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 35 0 34 0;
#X connect 36 0 37 0;
#X connect 37 0 35 0;
#X connect 38 0 40 0;
#X connect 39 0 20 0;
#X connect 40 0 39 0;
#X restore 435 318 pd playback+position;
#X obj 103 118 cnv 10 10 10 empty \$0-namecnv empty.. 0 5 2 10 -233017
-1 0;
#N canvas 689 58 450 300 init 0;
#X obj 196 22 loadbang;
#X obj 201 86 f \$0;
#X obj 309 60 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 201 109 \; \$1-filter-bypassr 1 \; \$1-playback-speedr 100 \;
\$1-trigger-speedr 50 \; \$1-sizer 100 \; \$1-env-typer 0 \; \$1-env-biasr
0.5 \; \$1-env-shaper 0.5 \; \$1-filter-freqr 100 \; \$1-random-filter-freqr
5000 \; \$1-filter-qr 1 \;;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X restore 435 213 pd init;
#N canvas 307 -31 831 712 in 0;
#X obj 40 15 inlet;
#X obj 40 120 s \$0-trigger-speedr;
#X obj 105 197 s \$0-positionr;
#X obj 196 167 s \$0-sizer;
#X obj 274 177 s \$0-pitchr;
#X obj 42 240 s \$0-panr;
#X obj 110 262 s \$0-ampr;
#X obj 246 250 s \$0-filter-freqr;
#X obj 314 272 s \$0-filter-qr;
#X obj 556 905 s \$0-trigger;
#X obj 44 339 s \$0-playback-speedr;
#X obj 113 362 s \$0-playbacktglr;
#X obj 48 606 route random-pitch random-panorama random-amplitude;
#X obj 54 679 route random-frequency random-q;
#X obj 171 579 s \$0-random-positionr;
#X obj 45 444 s \$0-random-trigger-speedr;
#X obj 312 456 s \$0-random-sizer;
#X obj 48 629 s \$0-random-pitchr;
#X obj 167 648 s \$0-random-panr;
#X obj 284 664 s \$0-random-ampr;
#X obj 54 702 s \$0-random-filter-freqr;
#X obj 161 731 s \$0-random-filter-qr;
#X obj 54 833 s \$0-env-typer;
#X obj 130 855 s \$0-env-biasr;
#X obj 206 876 s \$0-env-shaper;
#X obj 54 811 clip 0 4;
#X obj 130 812 clip 0 1;
#X obj 206 812 clip 0 1;
#X obj 233 351 != 0;
#X obj 233 372 s \$0-recordr;
#X obj 178 287 s \$0-filter-bypassr;
#X obj 42 218 route panorama amplitude filter-bypass frequency q;
#X obj 395 168 r \$0-samplerate;
#X obj 395 189 / 1000;
#X obj 365 170 *;
#X obj 365 189 /;
#X obj 394 145 r \$0-samplelength;
#X obj 365 126 / 100;
#X obj 40 96 route grain-distance position grainsize pitch position%
;
#X obj 45 411 route random-grain-distance random-position random-position%
random-grainsize;
#X obj 253 526 r \$0-samplerate;
#X obj 253 550 / 1000;
#X obj 223 528 *;
#X obj 223 550 /;
#X obj 252 503 r \$0-samplelength;
#X obj 223 484 / 100;
#X obj 44 312 route playback-speed play record;
#X obj 406 850 s \$0-sf-path;
#X obj 406 831 symbol;
#X obj 310 850 != 0;
#X obj 310 871 s \$0-int_triggeronoffr;
#N canvas 255 219 728 433 set 0;
#X obj 346 57 inlet;
#X obj 99 241 array size;
#X obj 220 295 samplerate~;
#X obj 181 180 t b s b;
#N canvas 445 148 797 561 sondfile-info 0;
#X obj 172 519 s \$0-wfbg;
#X obj 107 135 /;
#X obj 57 202 / 60;
#X obj 57 222 i;
#X obj 162 202 mod 60;
#X obj 194 265 < 10;
#X obj 167 346 makefilename 0%d;
#X obj 162 240 t f f;
#X obj 137 287 list prepend;
#X obj 137 306 route 0 1;
#X obj 136 326 makefilename %d;
#X obj 107 158 t f f;
#X obj 80 36 inlet samp.length;
#X obj 114 261 < 10;
#X obj 36 350 makefilename 0%d;
#X obj 57 242 t f f;
#X obj 35 282 list prepend;
#X obj 35 301 route 0 1;
#X obj 2 330 makefilename %d;
#X msg 11 540 label \$4;
#X obj 11 562 s \$0-namecnv;
#X obj 80 60 t f b;
#X obj 252 105 samplerate~;
#X msg 172 495 label \$4___\$1:\$2___\$3Hz;
#X obj 172 473 pack s s f s;
#X obj 383 40 inlet set;
#X msg 105 542 \$4 \$1:\$2 \$3Hz;
#X obj 105 563 print pp.grainer~;
#X connect 1 0 11 0;
#X connect 2 0 3 0;
#X connect 3 0 15 0;
#X connect 4 0 7 0;
#X connect 5 0 8 1;
#X connect 6 0 24 1;
#X connect 7 0 8 0;
#X connect 7 1 5 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 1 6 0;
#X connect 10 0 24 1;
#X connect 11 0 2 0;
#X connect 11 1 4 0;
#X connect 12 0 21 0;
#X connect 13 0 16 1;
#X connect 14 0 24 0;
#X connect 15 0 16 0;
#X connect 15 1 13 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 17 1 14 0;
#X connect 18 0 24 0;
#X connect 19 0 20 0;
#X connect 21 0 1 0;
#X connect 21 1 22 0;
#X connect 22 0 1 1;
#X connect 22 0 24 2;
#X connect 23 0 0 0;
#X connect 24 0 23 0;
#X connect 24 0 26 0;
#X connect 24 0 19 0;
#X connect 25 0 24 3;
#X connect 26 0 27 0;
#X restore 51 315 pd sondfile-info;
#X obj 346 212 s \$0-set;
#X obj 346 83 symbol;
#X obj 108 263 s \$0-samplelength;
#X obj 220 318 s \$0-samplerate;
#X connect 0 0 6 0;
#X connect 1 0 4 0;
#X connect 1 0 7 0;
#X connect 2 0 8 0;
#X connect 3 0 1 0;
#X connect 3 1 1 1;
#X connect 3 1 4 1;
#X connect 3 2 2 0;
#X connect 6 0 3 0;
#X connect 6 0 5 0;
#X restore 360 842 pd set;
#X obj 453 808 symbol;
#X obj 453 828 s \$0-env-set;
#X obj 55 756 route env-type env-bias env-shape int.grain-trigger set
open set-env;
#N canvas 698 546 200 251 route 0;
#X obj 20 20 inlet;
#X obj 30 60 route save recall;
#X obj 30 85 route float;
#X obj 97 111 route float;
#X obj 30 136 s \$0-save;
#X obj 30 108 i;
#X obj 98 133 i;
#X obj 98 161 s \$0-recall;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 5 0;
#X connect 3 0 6 0;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X restore 51 47 pd route save-recall;
#N canvas 362 125 450 479 recall 0;
#X obj 49 145 outlet;
#N canvas 3 54 450 600 listsplit 0;
#X obj 158 23 inlet;
#X obj 220 87 list length;
#X obj 220 113 until;
#X obj 182 150 f;
#X obj 278 150 + 1;
#X msg 265 111 0;
#X obj 182 226 list store;
#X msg 182 202 get \$1 1;
#X obj 154 367 list split;
#X obj 222 342 f;
#X obj 154 334 list;
#X obj 98 124 list;
#X obj 182 389 list split 1;
#X obj 154 274 t bang bang bang;
#X obj 182 179 t f f;
#X obj 158 48 t l l l b;
#X obj 154 473 outlet;
#X obj 154 440 list trim;
#X obj 163 248 sel |;
#X text 275 197 hacky split list at "|";
#X connect 0 0 15 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 14 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 18 0;
#X connect 7 0 6 0;
#X connect 8 0 17 0;
#X connect 8 1 12 0;
#X connect 9 0 8 1;
#X connect 10 0 8 0;
#X connect 11 0 15 0;
#X connect 12 1 11 0;
#X connect 13 0 10 0;
#X connect 13 1 9 0;
#X connect 13 2 2 1;
#X connect 14 0 7 0;
#X connect 14 1 9 1;
#X connect 15 0 1 0;
#X connect 15 1 10 1;
#X connect 15 2 6 1;
#X connect 15 3 5 0;
#X connect 17 0 16 0;
#X connect 18 0 13 0;
#X restore 49 117 pd listsplit;
#X obj 49 24 r \$0-recall;
#X obj 49 54 pipe 1;
#X obj 221 409 text fromlist \$0-savestates;
#X obj 49 77 text get \$0-savestates;
#X msg 253 246 21;
#X obj 253 269 until;
#X obj 253 292 f;
#X obj 300 295 + 1;
#X obj 253 315 t b f;
#X obj 253 367 text set \$0-savestates;
#X obj 221 114 text tolist \$0-savestates;
#X msg 253 342 list empty_slot;
#X obj 221 160 t a b;
#X obj 151 166 loadbang;
#X obj 221 137 savestate;
#X obj 221 33 text define \$0-savestates;
#X obj 151 189 del 0;
#X msg 298 199 0;
#X obj 253 220 spigot 1;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 10 0 13 0;
#X connect 10 1 11 1;
#X connect 12 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 4 0;
#X connect 14 1 19 0;
#X connect 15 0 18 0;
#X connect 16 0 14 0;
#X connect 16 1 12 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 6 0;
#X restore 118 70 pd recall;
#X obj 614 787 == 0;
#X obj 556 787 spigot 1;
#X obj 614 766 r \$0-int_triggeronoff;
#X obj 556 810 route bang float;
#X obj 602 880 s \$0-in.trigger;
#X obj 602 834 i;
#X obj 602 857 clip 0 127;
#X connect 0 0 38 0;
#X connect 0 0 55 0;
#X connect 12 0 17 0;
#X connect 12 1 18 0;
#X connect 12 2 19 0;
#X connect 12 3 13 0;
#X connect 13 0 20 0;
#X connect 13 1 21 0;
#X connect 13 2 54 0;
#X connect 25 0 22 0;
#X connect 26 0 23 0;
#X connect 27 0 24 0;
#X connect 28 0 29 0;
#X connect 31 0 5 0;
#X connect 31 1 6 0;
#X connect 31 2 30 0;
#X connect 31 3 7 0;
#X connect 31 4 8 0;
#X connect 31 5 46 0;
#X connect 32 0 33 0;
#X connect 33 0 35 1;
#X connect 34 0 35 0;
#X connect 35 0 2 0;
#X connect 36 0 34 1;
#X connect 37 0 34 0;
#X connect 38 0 1 0;
#X connect 38 1 2 0;
#X connect 38 2 3 0;
#X connect 38 3 4 0;
#X connect 38 4 37 0;
#X connect 38 5 31 0;
#X connect 39 0 15 0;
#X connect 39 1 14 0;
#X connect 39 2 45 0;
#X connect 39 3 16 0;
#X connect 39 4 12 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 14 0;
#X connect 44 0 42 1;
#X connect 45 0 42 0;
#X connect 46 0 10 0;
#X connect 46 1 11 0;
#X connect 46 2 28 0;
#X connect 46 3 39 0;
#X connect 48 0 47 0;
#X connect 49 0 50 0;
#X connect 52 0 53 0;
#X connect 54 0 25 0;
#X connect 54 1 26 0;
#X connect 54 2 27 0;
#X connect 54 3 49 0;
#X connect 54 4 51 0;
#X connect 54 5 48 0;
#X connect 54 6 52 0;
#X connect 54 7 58 0;
#X connect 56 0 38 0;
#X connect 57 0 58 1;
#X connect 58 0 60 0;
#X connect 59 0 57 0;
#X connect 60 0 9 0;
#X connect 60 1 62 0;
#X connect 62 0 63 0;
#X connect 63 0 61 0;
#X restore 457 127 pd in;
#X text 470 523 philipp schmalfuß \, 2018;
#X obj 181 383 r \$0-in.trigger;
#X msg 181 406 \$1 bang;
#X connect 1 0 2 0;
#X connect 2 0 7 0;
#X connect 3 0 25 0;
#X connect 8 0 1 0;
#X connect 9 0 11 0;
#X connect 10 0 13 1;
#X connect 11 0 2 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 11 0;
#X connect 14 1 11 1;
#X connect 17 0 30 0;
#X connect 18 0 19 0;
#X connect 20 0 3 0;
#X connect 25 0 4 0;
#X connect 25 1 5 0;
#X connect 26 0 21 0;
#X connect 32 0 33 0;
#X connect 33 0 25 0;
#X coords 0 -1 1 1 180 33 1 100 100;