[PD-cvs] abstractions/nusmuk/gran granulator.pd, NONE, 1.1 hanning.wav, NONE, 1.1 help-granulator.pd, NONE, 1.1

[cyrille]

Update of /cvsroot/pure-data/abstractions/nusmuk/gran
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1504

Added Files:
	granulator.pd hanning.wav help-granulator.pd 
Log Message:
an other granulator synthesys abstraction...



--- NEW FILE: granulator.pd ---
#N canvas 51 92 1066 445 10;
#X obj 223 392 outlet;
#X obj 44 388 outlet~;
#X obj 220 14 inlet;
#X obj 513 25 inlet;
#X msg 514 351 \; \$1 \$2 \;;
#X obj 513 239 t b f;
#X obj 514 284 f;
#X obj 514 328 pack s f;
#N canvas 0 0 1139 604 choix_table 0;
#X obj 26 18 inlet;
#X obj 26 526 outlet;
#X obj 26 196 t f f;
#X obj 123 527 outlet;
#X obj 134 286 r \$0-table0;
#X msg 134 312 set \$1;
#X obj 123 258 sel 0 1 2 3 4 5 6 7;
#X msg 123 338 1024;
#X msg 226 313 set \$1;
[...6960 lines suppressed...]
#X connect 18 5 19 6;
#X connect 18 6 19 7;
#X connect 18 7 19 8;
#X connect 18 8 19 9;
#X connect 19 0 14 0;
#X connect 21 0 7 0;
#X connect 22 0 11 0;
#X connect 22 1 24 0;
#X connect 23 0 37 0;
#X connect 23 1 6 1;
#X connect 23 1 38 0;
#X connect 24 0 35 0;
#X connect 34 0 23 0;
#X connect 34 1 22 0;
#X connect 34 2 8 1;
#X connect 34 3 18 0;
#X connect 35 0 25 0;
#X connect 36 0 0 0;
#X connect 37 0 36 0;
#X connect 38 0 37 1;

--- NEW FILE: hanning.wav ---
(This appears to be a binary file; contents omitted.)

--- NEW FILE: help-granulator.pd ---
#N canvas 145 74 1000 707 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 105 352 window cos;
#X msg 105 374 window hanning.wav;
#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 520 granulator;
#X obj 29 523 granulator;
#X obj 569 312 - 0.5;
#X obj 569 337 moses 0;
#X obj 569 360 + 1;
#X text 631 360 float modulo;
#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 33 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 13 1 14 1;
#X connect 14 0 33 0;
#X connect 15 0 27 0;
#X connect 18 0 21 0;
#X connect 19 0 32 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 32 0;
#X connect 26 0 34 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 34 0 35 0;
#X connect 35 0 36 0;
#X connect 35 1 18 0;
#X connect 36 0 18 0;
#X restore 34 664 pd help RealTime Granulator;
#X obj 34 552 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 240 373 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 connect 0 0 31 1;
#X connect 1 0 31 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 28 0;
#X connect 7 0 28 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 31 0;
#X connect 20 0 19 7;
#X connect 21 0 19 8;
#X connect 23 0 31 0;
#X connect 24 0 31 0;
#X connect 25 0 31 0;
#X connect 27 0 31 0;
#X connect 28 0 8 0;
#X connect 29 0 17 0;
#X connect 31 0 15 0;
#X connect 31 1 0 0;