__Granular4.pd | searchcode

/abs/__Granular4.pd

http://github.com/djiamnot/Re-Collect
Unknown | 713 lines | 713 code | 0 blank | 0 comment | 0 complexity | f14e85dacea9aed0331b060f420a2ee1 MD5 | raw file

#N canvas 139 26 788 512 12;

#X obj 533 202 s rndm;

#X obj 370 152 / 2;

#X obj 355 181 - 0;

#X obj 533 139 + 5;

#N canvas 62 100 420 320 seq_engine 0;

#X obj 80 148 sel 0;

#X obj 79 305 outlet~;

#X obj 176 25 r sample_length;

#X obj 79 276 *~ 1000;

#X obj 80 126 * 1;

#X obj 80 200 phasor~;

#X obj 82 175 expr 1000 / $f1;

#X obj 185 86 t b f;

#X obj 56 88 expr 1 / $f1;

#X obj 58 60 sel 0;

#X floatatom 196 130 5 0 0 0 - - -;

#X floatatom 160 272 5 0 0 0 - - -;

#X obj 58 29 inlet;

#X floatatom 16 159 5 0 0 0 - - -;

#X msg 189 165 0;

#X msg 19 85 0;

#X connect 0 0 14 0;

#X connect 0 1 6 0;

#X connect 2 0 7 0;

#X connect 2 0 3 1;

#X connect 3 0 1 0;

#X connect 4 0 0 0;

#X connect 5 0 3 0;

#X connect 6 0 5 0;

#X connect 6 0 11 0;

#X connect 7 0 4 0;

#X connect 7 1 4 1;

#X connect 7 1 10 0;

#X connect 8 0 4 0;

#X connect 9 0 15 0;

#X connect 9 1 8 0;

#X connect 12 0 9 0;

#X connect 13 0 5 0;

#X connect 14 0 5 0;

#X connect 15 0 4 0;

#X restore 165 77 pd seq_engine;

#N canvas 58 80 266 186 pos_rndm 0;

#X obj 60 83 +~ 1;

#X obj 60 108 *~ 0;

#X obj 102 82 / 2;

#X obj 108 31 inlet;

#X obj 60 143 outlet~;

#X obj 61 57 noise~;

#X connect 0 0 1 0;

#X connect 1 0 4 0;

#X connect 2 0 1 1;

#X connect 3 0 2 0;

#X connect 5 0 0 0;

#X restore 87 194 pd pos_rndm;

#X floatatom 675 158 0 0 0 0 - - -;

#X floatatom 652 128 0 0 0 0 - - -;

#X obj 284 72 s gain;

#X msg 355 207 \$1 5;

#X obj 86 169 r rndm;

#X obj 9 194 +~;

#X floatatom 533 176 0 0 0 0 - - -;

#X obj 355 233 line~;

#X text 27 31 Control mode;

#N canvas 3 22 947 456 windowstuff 0;

#X text 445 123 window shape;

#X obj 21 22 loadbang;

#X obj 85 75 soundfiler;

#X msg 86 50 read -resize tri wndw;

#X obj 85 105 s trisize;

#X obj 19 159 soundfiler;

#X obj 20 183 s playsize;

#X obj 272 -1 loadbang;

#X text 322 32 cosine window;

#X text 86 34 triangle window;

#X text 498 35 rectangle window;

#X obj 294 -35 route 0 1 2 3 4;

#X msg 295 -59 \$1 bang;

#X text 673 -26 trapezoid window;

#X msg 499 54 \; wndw const 0.4;

#X obj 708 166 pack;

#X msg 678 216 \; wndw \$2 \$1;

#X msg 296 77 \; wndw cosinesum \$1 0.5 -0.5;

#X msg 274 23 512;

#X obj 277 49 t 0 0;

#X obj 279 112 s trisize;

#X obj 731 70 line;

#X obj 762 110 int;

#X obj 791 111 + 1;

#X obj 767 22 t 0 b;

#X msg 822 53 0;

#X obj 731 90 t 0 b;

#X obj 789 216 -;

#X obj 815 197 r trisize;

#X msg 775 306 \; wndw \$2 \$1;

#X obj 775 283 pack;

#X obj 792 235 * -1;

#X obj 836 241 + 1;

#X msg 805 18 \; wndw const 1;

#X msg 749 49 0 \, 1 \$1;

#X msg 463 -7 4000;

#X obj 294 -85 inlet;

#X msg 21 139 read -resize Speech00.wav playobject;

#X text 737 -11 (ugly implementation - LP);

#X connect 1 0 37 0;

#X connect 2 0 4 0;

#X connect 3 0 2 0;

#X connect 5 0 6 0;

#X connect 7 0 18 0;

#X connect 11 0 3 0;

#X connect 11 1 18 0;

#X connect 11 2 14 0;

#X connect 11 3 35 0;

#X connect 12 0 11 0;

#X connect 15 0 16 0;

#X connect 18 0 19 0;

#X connect 19 0 20 0;

#X connect 19 1 17 0;

#X connect 21 0 26 0;

#X connect 22 0 23 0;

#X connect 22 0 15 1;

#X connect 22 0 27 0;

#X connect 23 0 22 1;

#X connect 24 0 34 0;

#X connect 24 1 25 0;

#X connect 24 1 33 0;

#X connect 25 0 22 1;

#X connect 26 0 15 0;

#X connect 26 0 30 0;

#X connect 26 1 22 0;

#X connect 27 0 31 0;

#X connect 28 0 27 1;

#X connect 30 0 29 0;

#X connect 31 0 32 0;

#X connect 32 0 30 1;

#X connect 34 0 21 0;

#X connect 35 0 24 0;

#X connect 36 0 12 0;

#X connect 37 0 5 0;

#X coords 0 0 0.00127226 0.00187266 200 140 0;

#X restore 11 395 pd windowstuff;

#N canvas 0 22 452 302 (subpatch) 0;

#X array playobject 173719 float 0;

#X coords 0 1 173718 -1 100 70 1;

#X restore 437 377 graph;

#X obj 358 75 hsl 190 15 1 128 0 0 empty grainInitMaxPos max 20 8 0

12 -261681 -1 -1 4300 1;

#X obj 358 50 hsl 190 15 1 128 0 0 empty grainInitMinPos min 20 8 0

12 -261689 -1 -1 0 1;

#X obj 10 136 polygate~ 2 100;

#N canvas 255 224 475 351 init 0;

#X obj 90 28 loadbang;

#X text 26 263 dur;

#X text 100 260 base pitch;

#X text 84 275 playback speed;

#X msg 44 144 50;

#X msg 181 149 0.25;

#X obj 285 209 s grainInitMinPos;

#X obj 274 233 s grainInitMaxPos;

#X obj 149 213 s grainInitGain;

#X obj 95 235 s playSpeed;

#X obj 10 208 s grainInitDur;

#X msg 261 69 \; pd dsp 1;

#X msg 113 150 0.9;

#X msg 261 147 0;

#X connect 0 0 12 0;

#X connect 0 0 4 0;

#X connect 0 0 5 0;

#X connect 0 0 13 0;

#X connect 0 0 11 0;

#X connect 4 0 10 0;

#X connect 5 0 8 0;

#X connect 12 0 9 0;

#X connect 13 0 6 0;

#X connect 13 0 7 0;

#X restore 8 259 pd init;

#X obj 10 33 bng 15 250 50 0 empty grainInitDur empty 20 8 0 8 -262144

-1 -1;

#X floatatom 286 164 5 0 0 0 - - -;

#X obj 268 136 r playPos;

#X obj 9 227 s~ control;

#N canvas 155 153 362 229 xypad 0;

#X obj -54 111 s playPos;

#X floatatom -54 14 5 0 0 0 - - -;

#X floatatom 133 21 5 0 0 0 - - -;

#X obj 130 79 s playPitch;

#X obj 19 51 s playSpeed;

#X obj 19 28 / 100;

#X obj 132 39 / 100;

#X obj -16 72 r sample_length;

#X obj -54 38 / 200;

#X obj -54 90 * 1;

#X obj -50 -34 inlet;

#X obj 14 -34 inlet;

#X connect 1 0 5 0;

#X connect 1 0 8 0;

#X connect 2 0 6 0;

#X connect 5 0 4 0;

#X connect 6 0 3 0;

#X connect 7 0 9 1;

#X connect 8 0 9 0;

#X connect 9 0 0 0;

#X connect 10 0 1 0;

#X connect 11 0 2 0;

#X coords 0 0 0.00212766 0.003125 200 140 0;

#X restore 256 437 pd xypad;

#X obj 437 304 bng 30 250 50 0 empty empty empty 0 -6 0 8 -24198 -1

-1;

#X obj 11 372 hradio 15 1 0 4 empty empty Windowing_Type 0 -6 0 12

-260818 -1 -1 0;

#N canvas 0 22 460 310 loadsample 0;

#X obj 116 112 s raw_length;

#X obj 89 141 r rndm;

#X obj 62 167 expr $f2 - $f1;

#X obj 62 190 s sample_length;

#X obj 63 58 soundfiler;

#X obj 62 83 sampstoms;

#X obj 62 142 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1

-1;

#X obj 62 -10 openpanel;

#X msg 64 13 read -resize \$1 playobject;

#X obj 146 61 r playsize;

#X obj 65 -33 inlet;

#X msg 104 37 read -resize Speech00.wav playobject;

#X connect 1 0 2 0;

#X connect 2 0 3 0;

#X connect 4 0 5 0;

#X connect 5 0 0 0;

#X connect 5 0 2 1;

#X connect 5 0 6 0;

#X connect 6 0 2 0;

#X connect 7 0 8 0;

#X connect 8 0 4 0;

#X connect 9 0 5 0;

#X connect 10 0 7 0;

#X connect 11 0 4 0;

#X restore 437 341 pd loadsample;

#X obj 388 128 r gfreq;

#N canvas 74 83 474 324 surroundSetup 0;

#X obj 143 248 _surroundRouting;

#X obj 22 137 catch~ sfx3d_L;

#X obj 63 164 catch~ sfx3d_R;

#X obj 148 138 catch~ sfx3d_C;

#X obj 191 165 catch~ sfx3d_Lf;

#X obj 276 139 catch~ sfx3d_Ls;

#X obj 320 166 catch~ sfx3d_Rs;

#X obj 19 233 tgl 15 0 empty empty RecordOutput 0 -6 0 8 -262144 -1

-1 0 1;

#X text 87 269 change in here for true surround;

#X connect 1 0 0 1;

#X connect 2 0 0 2;

#X connect 3 0 0 3;

#X connect 4 0 0 4;

#X connect 5 0 0 5;

#X connect 6 0 0 6;

#X connect 7 0 0 0;

#X restore 8 329 pd surroundSetup;

#N canvas 243 93 443 474 surround 0;

#X obj 17 -8 loadbang;

#X msg 16 19 goto 64 60;

#N canvas 0 22 470 320 initSurround 0;

#X obj 9 45 _3dVoiceCalc Voice1;

#X obj 290 4 loadbang;

#X msg 360 55 \; Voice5_x 0 \, \; Voice5_y -4 \, \; Voice6_x 0 \, \;

Voice6_y -4 \, \; Voice7_x 0 \, \; Voice7_y -4 \, \; Voice8_x 0 \,

\; Voice8_y -4;

#X msg 232 55 \; Voice1_x 0 \, \; Voice1_y -4 \, \; Voice2_x 0 \, \;

Voice2_y -4 \, \; Voice3_x 0 \, \; Voice3_y -4 \, \; Voice4_x 0 \,

\; Voice4_y -4;

#X text 7 24 3d Surround by Leonard Paul;

#X obj 10 69 _3dVoiceCalc Voice2;

#X obj 10 92 _3dVoiceCalc Voice3;

#X obj 11 115 _3dVoiceCalc Voice4;

#X obj 11 141 _3dVoiceCalc Voice5;

#X obj 12 165 _3dVoiceCalc Voice6;

#X obj 13 188 _3dVoiceCalc Voice7;

#X obj 13 211 _3dVoiceCalc Voice8;

#X connect 1 0 3 0;

#X connect 1 0 2 0;

#X restore 271 29 pd initSurround;

#X obj 16 46 s surroundInitPos;

#X connect 0 0 1 0;

#X connect 1 0 3 0;

#X restore 8 306 pd surround;

#X msg 687 62 \; pd dsp \$1;

#X obj 687 35 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

;

#X obj 224 287 grid grid1 128 0 199 128 0 199 1 1 1 10 10 263 338;

#N canvas 268 144 480 330 grains 0;

#X msg 2 32 0;

#X msg 71 32 0.25;

#X msg 232 33 0.375;

#X msg 157 33 0.125;

#X msg 2 87 0.5;

#X msg 71 85 0.75;

#X msg 154 86 0.625;

#X msg 234 89 0.875;

#X obj 178 162 loadbang;

#X obj 173 183 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

-1;

#X obj 199 180 r grainDur;

#X obj 5 211 throw~ Voice1_3dVoiceOutput;

#X obj 7 234 throw~ Voice2_3dVoiceOutput;

#X obj 8 256 throw~ Voice3_3dVoiceOutput;

#X obj 10 279 throw~ Voice4_3dVoiceOutput;

#X obj 173 214 throw~ Voice5_3dVoiceOutput;

#X obj 175 237 throw~ Voice6_3dVoiceOutput;

#X obj 175 259 throw~ Voice7_3dVoiceOutput;

#X obj 179 282 throw~ Voice8_3dVoiceOutput;

#X obj 232 58 grain~;

#X obj 3 56 grain~;

#X obj 72 57 grain~;

#X obj 156 58 grain~;

#X obj 232 113 grain~;

#X obj 154 112 grain~;

#X obj 72 112 grain~;

#X obj 3 111 grain~;

#X connect 0 0 20 0;

#X connect 1 0 21 0;

#X connect 2 0 19 0;

#X connect 3 0 22 0;

#X connect 4 0 26 0;

#X connect 5 0 25 0;

#X connect 6 0 24 0;

#X connect 7 0 23 0;

#X connect 8 0 9 0;

#X connect 9 0 7 0;

#X connect 9 0 2 0;

#X connect 9 0 3 0;

#X connect 9 0 6 0;

#X connect 9 0 1 0;

#X connect 9 0 5 0;

#X connect 9 0 0 0;

#X connect 9 0 4 0;

#X connect 10 0 9 0;

#X connect 19 0 14 0;

#X connect 20 0 11 0;

#X connect 21 0 12 0;

#X connect 22 0 13 0;

#X connect 23 0 18 0;

#X connect 24 0 17 0;

#X connect 25 0 16 0;

#X connect 26 0 15 0;

#X restore 8 283 pd grains;

#X text 399 161 play pos(ms);

#N canvas 0 22 450 300 (subpatch) 0;

#X array wndw 516 float 0;

#X coords 0 1 515 -1 50 35 1;

#X restore 138 380 graph;

#N canvas 74 320 472 322 grains 0;

#X obj 28 50 inlet;

#X obj 93 54 inlet;

#X obj 166 56 inlet;

#X obj 236 49 inlet;

#N canvas 98 93 688 454 random_pitch 0;

#X obj 47 58 loadbang;

#X floatatom 431 165 0 0 0 0 - - -;

#X msg 500 244 2;

#X msg 500 223 bang;

#X msg 431 239 1;

#X obj 431 201 sel 0;

#X obj 54 137 expr (random (-1000\,1000) / 1000.)* $f2;

#X obj 474 309 expr int ($f1/$f2) * $f2;

#X floatatom 240 77 0 0 0 0 - - -;

#X obj 431 340 * 1;

#X obj 54 166 expr pow(2.\,$f1);

#X text 78 19 duration;

#X text 257 58 random width;

#X text 240 104 0 ~ 3;

#X text 470 167 0 ~1.0;

#X text 326 182 pitch quantize;

#N canvas 192 270 548 310 switch 0;

#X obj 41 187 spigot;

#X obj 132 188 spigot;

#X obj 240 187 spigot;

#X obj 361 187 spigot;

#X obj 44 19 inlet;

#X obj 78 106 i 1;

#X obj 400 105 i 1;

#X obj 278 106 i 1;

#X obj 169 105 i 1;

#X obj 247 6 inlet;

#X obj 89 136 i 0;

#X obj 180 135 i 0;

#X obj 289 136 i 0;

#X obj 411 135 i 0;

#X obj 45 236 outlet;

#X obj 133 232 outlet;

#X obj 240 233 outlet;

#X obj 361 236 outlet;

#X obj 247 56 select 1 2 3 4;

#X connect 0 0 14 0;

#X connect 1 0 15 0;

#X connect 2 0 16 0;

#X connect 3 0 17 0;

#X connect 4 0 0 0;

#X connect 4 0 1 0;

#X connect 4 0 2 0;

#X connect 4 0 3 0;

#X connect 5 0 0 1;

#X connect 6 0 3 1;

#X connect 7 0 2 1;

#X connect 8 0 1 1;

#X connect 9 0 18 0;

#X connect 10 0 0 1;

#X connect 11 0 1 1;

#X connect 12 0 2 1;

#X connect 13 0 3 1;

#X connect 18 0 5 0;

#X connect 18 0 11 0;

#X connect 18 0 12 0;

#X connect 18 0 13 0;

#X connect 18 1 8 0;

#X connect 18 1 10 0;

#X connect 18 1 12 0;

#X connect 18 1 13 0;

#X connect 18 2 7 0;

#X connect 18 2 10 0;

#X connect 18 2 11 0;

#X connect 18 2 13 0;

#X connect 18 3 6 0;

#X connect 18 3 10 0;

#X connect 18 3 11 0;

#X connect 18 3 12 0;

#X restore 433 275 pd switch;

#X obj 28 16 inlet;

#X obj 240 23 inlet;

#X obj 431 30 inlet;

#X obj 431 364 outlet;

#X obj 52 88 tgl 15 0 empty empty empty 20 8 0 8 -262144 -1 -1 1 1

;

#X obj 55 111 metro 0;

#X obj 487 366 sig~;

#X obj 488 394 s~ gdur;

#X connect 0 0 21 0;

#X connect 0 0 4 0;

#X connect 1 0 5 0;

#X connect 2 0 16 1;

#X connect 3 0 2 0;

#X connect 4 0 16 1;

#X connect 5 0 4 0;

#X connect 5 1 3 0;

#X connect 5 1 7 1;

#X connect 6 0 10 0;

#X connect 7 0 9 0;

#X connect 8 0 6 1;

#X connect 9 0 20 0;

#X connect 9 0 23 0;

#X connect 10 0 16 0;

#X connect 16 0 9 0;

#X connect 16 1 7 0;

#X connect 17 0 9 1;

#X connect 18 0 8 0;

#X connect 19 0 1 0;

#X connect 21 0 22 0;

#X connect 22 0 6 0;

#X connect 23 0 24 0;

#X restore 153 92 pd random_pitch;

#X obj 108 268 s gfreq;

#X obj 113 174 t b f;

#X floatatom 103 143 0 0 0 0 - - -;

#X obj 106 202 expr 1000 / $f1 * $f2;

#X text -7 110 pitch randomness;

#X obj 109 236 * 0.42;

#X obj 123 118 r playPitch;

#X obj 159 167 s grainDur;

#X floatatom 75 84 5 0 0 0 - - -;

#X connect 0 0 13 0;

#X connect 1 0 12 0;

#X connect 1 0 7 0;

#X connect 2 0 4 1;

#X connect 3 0 4 2;

#X connect 6 0 8 0;

#X connect 6 1 8 1;

#X connect 7 0 6 0;

#X connect 8 0 10 0;

#X connect 10 0 5 0;

#X connect 11 0 7 0;

#X connect 13 0 4 0;

#X connect 13 0 8 0;

#X restore 608 183 pd grains;

#N canvas 496 424 402 302 sliders 0;

#X obj 130 130 / 127;

#X obj 130 173 * 1;

#X obj 130 107 abs;

#X obj 130 82 -;

#X obj 75 135 * 1;

#X obj 197 74 r raw_length;

#X obj 75 92 / 127;

#X obj 75 53 inlet;

#X obj 61 208 outlet;

#X obj 122 210 outlet;

#X obj 172 12 inlet;

#X floatatom 205 155 5 0 0 0 - - -;

#X obj 144 45 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1

-1;

#X connect 0 0 1 0;

#X connect 1 0 9 0;

#X connect 2 0 0 0;

#X connect 3 0 2 0;

#X connect 4 0 8 0;

#X connect 5 0 4 1;

#X connect 5 0 1 1;

#X connect 5 0 11 0;

#X connect 6 0 4 0;

#X connect 7 0 6 0;

#X connect 7 0 3 0;

#X connect 10 0 3 1;

#X connect 10 0 12 0;

#X connect 12 0 3 0;

#X restore 355 103 pd sliders;

#X floatatom 630 85 0 0 0 0 - - -;

#X obj 284 48 nbx 3 16 -1e+037 1e+037 0 0 empty grainInitGain Gain

0 -6 0 11 -241291 -1 -1 0.76 256;

#X obj 165 52 nbx 3 16 -1e+037 1e+037 0 0 empty playSpeed Speed 0 -8

0 11 -44926 -1 -1 0.6 256;

#X obj 608 57 nbx 3 16 -1e+037 1e+037 0 0 empty grainInitDur Dur 0

-6 0 11 -141374 -1 -1 471 256;

#X text 354 335 pitch;

#X text 256 413 position;

#X obj 124 113 r~ grainLinePos;

#X obj 355 258 s~ grainLinePos;

#X obj 9 -32 cnv 15 700 60 empty empty Granular_Synthesis(5.1_Surround)

20 24 2 32 -175629 -66577 0;

#N canvas 0 22 701 384 followPan 0;

#X obj 12 50 inlet;

#X obj 71 226 inlet;

#X obj 7 159 line;

#X obj 7 109 - 64;

#X obj 66 278 - 64;

#X obj 7 182 s Voice1_x;

#X obj 71 161 line;

#X obj 138 161 line;

#X obj 202 163 line;

#X msg 201 140 \$1 1000;

#X obj 273 165 line;

#X obj 337 167 line;

#X obj 404 167 line;

#X obj 468 169 line;

#X obj 138 184 s Voice3_x;

#X obj 200 185 s Voice4_x;

#X obj 273 188 s Voice5_x;

#X msg 7 136 \$1 250;

#X msg 70 138 \$1 500;

#X msg 138 138 \$1 750;

#X msg 273 142 \$1 1250;

#X msg 336 144 \$1 1500;

#X msg 404 144 \$1 1750;

#X obj 72 184 s Voice2_x;

#X obj 337 190 s Voice6_x;

#X obj 404 190 s Voice7_x;

#X obj 466 192 s Voice8_x;

#X obj 68 322 line;

#X obj 132 324 line;

#X obj 199 324 line;

#X obj 263 326 line;

#X msg 262 303 \$1 1000;

#X obj 334 328 line;

#X obj 398 330 line;

#X obj 465 330 line;

#X obj 529 332 line;

#X msg 68 299 \$1 250;

#X msg 131 301 \$1 500;

#X msg 199 301 \$1 750;

#X msg 334 305 \$1 1250;

#X msg 397 307 \$1 1500;

#X msg 465 307 \$1 1750;

#X obj 68 345 s Voice1_y;

#X obj 133 347 s Voice2_y;

#X obj 199 347 s Voice3_y;

#X obj 261 348 s Voice4_y;

#X obj 334 351 s Voice5_y;

#X obj 398 353 s Voice6_y;

#X obj 466 352 s Voice7_y;

#X obj 527 355 s Voice8_y;

#X msg 467 146 \$1 2000;

#X msg 528 309 \$1 2000;

#X connect 0 0 3 0;

#X connect 1 0 4 0;

#X connect 2 0 5 0;

#X connect 3 0 17 0;

#X connect 3 0 18 0;

#X connect 3 0 19 0;

#X connect 3 0 9 0;

#X connect 3 0 20 0;

#X connect 3 0 21 0;

#X connect 3 0 22 0;

#X connect 3 0 50 0;

#X connect 4 0 36 0;

#X connect 4 0 37 0;

#X connect 4 0 38 0;

#X connect 4 0 31 0;

#X connect 4 0 39 0;

#X connect 4 0 40 0;

#X connect 4 0 41 0;

#X connect 4 0 51 0;

#X connect 6 0 23 0;

#X connect 7 0 14 0;

#X connect 8 0 15 0;

#X connect 9 0 8 0;

#X connect 10 0 16 0;

#X connect 11 0 24 0;

#X connect 12 0 25 0;

#X connect 13 0 26 0;

#X connect 17 0 2 0;

#X connect 18 0 6 0;

#X connect 19 0 7 0;

#X connect 20 0 10 0;

#X connect 21 0 11 0;

#X connect 22 0 12 0;

#X connect 27 0 42 0;

#X connect 28 0 43 0;

#X connect 29 0 44 0;

#X connect 30 0 45 0;

#X connect 31 0 30 0;

#X connect 32 0 46 0;

#X connect 33 0 47 0;

#X connect 34 0 48 0;

#X connect 35 0 49 0;

#X connect 36 0 27 0;

#X connect 37 0 28 0;

#X connect 38 0 29 0;

#X connect 39 0 32 0;

#X connect 40 0 33 0;

#X connect 41 0 34 0;

#X connect 50 0 13 0;

#X connect 51 0 35 0;

#X restore 615 436 pd followPan;

#X obj 599 226 r surroundInitPos;

#X obj 578 250 cnv 15 170 180 empty empty O 0 110 1 220 -24198 -66577

0;

#X obj 653 254 cnv 15 20 20 empty empty C 4 10 1 14 -241291 -66577

0;

#X obj 581 254 cnv 15 20 20 empty empty L 4 10 1 14 -241291 -66577

0;

#X obj 724 254 cnv 15 20 20 empty empty R 4 10 1 14 -241291 -66577

0;

#X obj 581 407 cnv 15 28 20 empty empty Ls 4 10 1 14 -260818 -66577

0;

#X obj 719 406 cnv 15 28 20 empty empty Rs 4 10 1 14 -260818 -66577

0;

#X obj 599 275 grid grid1 128 0 128 128 0 128 1 1 1 10 10 645 361;

#X text 92 283 <- 8 grains;

#N canvas 0 22 473 308 README 0;

#X obj 3 45 cnv 15 440 100 empty empty empty 20 12 0 14 -36239 -66577

0;

#X text 24 44 Patch updated for demonstration for;

#X text 26 65 "Granular Synthesis in Next-Generation Games" by;

#X text 31 84 Leonard J. Paul - GDC 2006;

#X text 52 104 http://www.VideoGameAudio.com;

#X obj 3 149 cnv 15 440 100 empty empty empty 20 12 0 14 -72606 -66577

0;

#X text 6 147 Original granular synthesis patch by Nobuyasu Sakonda

;

#X text 5 171 Port to PD by Bill (Orcutt?);

#X text 25 230 See README.TXT for more details;

#X text 3 193 Surround features \, additional windowing by Leonard

Paul;

#X obj 3 -19 cnv 15 440 60 empty empty empty 20 12 0 14 -163334 -66577

0;

#X text 5 -17 Granular Synthesis PD Patch in 5.1 Surround;

#X text 50 124 info [at] VideoGameAudio.com;

#X text 28 19 Version 4 for GameSoundCon 2009 - San Francisco - Nov

2009;

#X restore 564 -14 pd README;

#X text 92 305 <- surround 5.1;

#X text 108 54 manual;

#X text 17 53 autoplay;

#X text 353 32 Grain Position / Range;

#X text 561 455 Grains follow position in 5.1;

#X obj 82 72 cnv 15 70 20 empty empty empty 20 12 0 14 -232576 -66577

0;

#X msg 86 72 choice 2;

#X obj 7 72 cnv 15 70 20 empty empty empty 20 12 0 14 -232576 -66577

0;

#X msg 10 72 choice 1;

#X text 405 285 Load new sample;

#X connect 1 0 2 1;

#X connect 2 0 9 0;

#X connect 3 0 12 0;

#X connect 4 0 19 0;

#X connect 5 0 11 1;

#X connect 6 0 38 3;

#X connect 7 0 38 2;

#X connect 9 0 13 0;

#X connect 10 0 5 0;

#X connect 11 0 24 0;

#X connect 12 0 0 0;

#X connect 13 0 47 0;

#X connect 17 0 39 1;

#X connect 18 0 39 0;

#X connect 19 0 11 0;

#X connect 21 0 68 0;

#X connect 22 0 2 0;

#X connect 23 0 22 0;

#X connect 26 0 28 0;

#X connect 27 0 15 0;

#X connect 29 0 1 0;

#X connect 33 0 32 0;

#X connect 34 0 25 0;

#X connect 34 1 25 1;

#X connect 39 0 2 0;

#X connect 39 1 3 0;

#X connect 40 0 38 1;

#X connect 41 0 8 0;

#X connect 42 0 4 0;

#X connect 43 0 38 0;

#X connect 46 0 19 1;

#X connect 50 0 57 0;

#X connect 57 0 49 0;

#X connect 57 1 49 1;

#X connect 66 0 19 0;

#X connect 68 0 19 0;