#N canvas 122 22 1000 667 10;
#X obj 115 575 soundfiler;
#X msg 34 171 open \$1 \$2;
#X obj 85 91 hradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
-1 0;
#X obj 34 67 openpanel;
#X obj 34 47 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 34 147 pack s f;
#X obj 530 48 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X floatatom 581 50 5 0 0 0 - - -;
#X obj 530 118 f;
#X floatatom 596 176 5 0 0 0 - - -;
#X floatatom 607 195 5 0 0 0 - - -;
#X floatatom 654 216 5 0 0 0 - - -;
#X floatatom 668 236 5 0 0 0 - - -;
#X floatatom 717 255 5 0 0 0 - - -;
#X floatatom 728 272 5 0 0 0 - - -;
#X obj 33 576 *~ 0.1;
#X obj 34 614 dac~;
#X obj 596 150 line;
#X obj 546 96 hradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
-1 0;
#X obj 530 363 pack f 0 0 50 0 69 0 1 0;
#X floatatom 749 312 5 0 0 0 - - -;
#X floatatom 760 329 5 0 0 0 - - -;
#X text 286 24 ch 2005_04_10;
#X msg 90 353 window cos;
#X msg 65 199 table foo 44100;
#X text 74 216 use a specific table for the audio source;
#X msg 84 257 table reset;
#X obj 530 71 metro 25;
#X msg 596 127 0 \, 1 1000;
#N canvas 148 50 1061 709 help 0;
#X obj 216 107 table realtime 441000;
#X obj 49 161 tabwrite~ realtime;
#X obj 49 131 adc~;
#X obj 29 102 metro 10000;
#X obj 29 51 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X text 54 51 loop recording on a table;
#X obj 29 75 t f f;
#X msg 29 190 0 \, 1 10000;
#X text 122 193 position of the recording in the table;
#X obj 29 386 f;
#X text 195 161 record something in a table;
#X msg 43 500 table realtime 441000;
#X obj 43 478 loadbang;
#X obj 29 423 t b f;
#X obj 29 449 pack 0 0 0.1 300 0 69 0 1 0;
#X obj 29 271 line 0 150;
#X text 42 293 change the line time grain to adjust to played grain
size;
#X text 60 388 center of the reding position (0.1 * 10s after writing
in the table);
#X obj 569 383 f;
#X msg 583 497 table realtime 441000;
#X obj 583 475 loadbang;
#X obj 569 420 t b f;
#X obj 569 247 spigot 0;
#X obj 620 209 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X text 398 208 add an other granulator latter;
#X obj 569 446 pack 0 0 0.5 60 0 69 5 1 0;
#X obj 569 272 line 0 30;
#X obj 29 315 - 0.1;
#X obj 29 339 moses 0;
#X obj 29 361 + 1;
#X text 88 315 10% before the position of the writing index;
#X text 93 342 to keep the number from 0 to 1;
#X obj 569 312 - 0.5;
#X obj 569 337 moses 0;
#X obj 569 360 + 1;
#X text 631 360 float modulo;
#X obj 29 523 granulator~;
#X obj 569 523 granulator~;
#X connect 2 0 1 0;
#X connect 2 1 1 0;
#X connect 3 0 1 0;
#X connect 3 0 7 0;
#X connect 4 0 6 0;
#X connect 6 0 3 0;
#X connect 7 0 15 0;
#X connect 7 0 22 0;
#X connect 9 0 13 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 13 1 14 1;
#X connect 14 0 36 0;
#X connect 15 0 27 0;
#X connect 18 0 21 0;
#X connect 19 0 37 0;
#X connect 20 0 19 0;
#X connect 21 0 25 0;
#X connect 21 1 25 1;
#X connect 22 0 26 0;
#X connect 23 0 22 1;
#X connect 25 0 37 0;
#X connect 26 0 32 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 28 1 9 0;
#X connect 29 0 9 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 33 1 18 0;
#X connect 34 0 18 0;
#X restore 34 664 pd help RealTime Granulator;
#X text 260 7 granular synthesys with pd;
#X text 65 46 open a sound file;
#X text 8 111 table number (8 diferents files can be open in the same
time);
#X text 689 95 table to read;
#X text 722 236 Random;
#X text 776 272 Random;
#X text 810 330 Random;
#X text 645 175 grain position in the sound file (0 - 1);
#X text 655 196 Random on this position;
#X text 704 215 grain size (ms);
#X text 766 254 pich (midi);
#X text 798 311 amplitude (0 - 1);
#X text 539 383 Table number \, position \, Random \, size \, random
\, frequency \, random \, ampitude \, random;
#X text 224 353 default windowing for the grain;
#X text 210 399 load a soundfile for the windowing;
#X text 196 572 always connect a soundfiler here : it help locating
the sound relatively to the patch folder \, and not to the abstraction
folder;
#X text 95 279 to get back to the internal tables;
#X text 74 232 (user has to fill it manually : used for live granulation)
;
#X msg 102 374 window examples/hanning.wav;
#X obj 34 552 granulator~;
#X connect 0 0 49 1;
#X connect 1 0 49 0;
#X connect 2 0 5 1;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 5 0 1 0;
#X connect 6 0 27 0;
#X connect 7 0 27 1;
#X connect 8 0 19 0;
#X connect 9 0 19 1;
#X connect 10 0 19 2;
#X connect 11 0 19 3;
#X connect 12 0 19 4;
#X connect 13 0 19 5;
#X connect 14 0 19 6;
#X connect 15 0 16 0;
#X connect 15 0 16 1;
#X connect 17 0 9 0;
#X connect 18 0 8 1;
#X connect 19 0 49 0;
#X connect 20 0 19 7;
#X connect 21 0 19 8;
#X connect 23 0 49 0;
#X connect 24 0 49 0;
#X connect 26 0 49 0;
#X connect 27 0 8 0;
#X connect 28 0 17 0;
#X connect 48 0 49 0;
#X connect 49 0 15 0;
#X connect 49 1 0 0;