/usr/share/sitplus/pd/ballon.pd

#N canvas 19 10 1205 674 10;
#X obj 85 56 dumpOSC 50000;
#X obj 503 177 print other;
#X msg -18 183 \; pd dsp 1;
#X obj -18 55 loadbang;
#X obj 7 158 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj -18 91 delay 500;
#X text -53 32 Workaround delay \, don't touch!;
#X obj 86 157 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 58 184 \; pd dsp 0;
#X msg 132 186 \; pd quit;
#X obj 139 156 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 85 94 route /audioOn /audioOff /quit;
#X obj 428 143 route /ballon;
#X obj 44 320 unpack f f f;
#X floatatom 14 367 5 0 0 0 - - -;
#X text 11 347 Stage;
#X floatatom 71 367 5 0 0 0 - - -;
#X floatatom 140 366 5 0 0 0 - - -;
#X text 67 346 Motion;
#X text 140 345 Size;
#X text -53 17 BALLON;
#N canvas 529 48 582 608 notes-reverb 0;
#N canvas 44 72 986 609 fft 0;
#X obj 18 500 *~;
#X obj 291 455 *~;
#X obj 258 454 *~;
#X obj 356 456 *~;
#X obj 324 455 *~;
#X obj 324 477 +~;
#X obj 258 479 -~;
#X obj 560 383 *~;
#X obj 54 124 *~;
#X obj 22 124 *~;
#X obj 22 145 +~;
#X obj 325 82 *~;
#X obj 293 82 *~;
#X obj 608 312 *~;
#X obj 576 312 *~;
#X obj 93 63 *~;
#X obj 18 522 outlet~;
#X obj 18 475 *~;
#X obj 126 63 inlet~;
#X obj 93 84 rfft~;
#X obj 18 451 rifft~;
#X obj 576 334 rsqrt~;
#X obj 293 103 +~;
#X obj 484 383 *~;
#X obj 56 499 sig~ 0.0002;
#N canvas 167 161 699 396 decision 0;
#X obj 49 101 inlet~;
#X obj 50 341 outlet~;
#X obj 50 183 -~;
#X obj 50 226 clip~ 0 1;
#X obj 50 204 *~ 1e+020;
#X obj 196 98 inlet~;
#X text 137 213 stronger than;
#X text 139 228 old one;
#X obj 274 202 -~;
#X obj 288 177 lrshift~ 1;
#X obj 274 250 clip~ 0 1;
#X obj 274 228 *~ 1e+020;
#X obj 450 202 -~;
#X obj 450 250 clip~ 0 1;
#X obj 450 228 *~ 1e+020;
#X obj 464 177 lrshift~ -1;
#X obj 50 283 *~;
#X obj 50 312 *~;
#X text 135 199 1 if new signal;
#X text 55 73 new;
#X text 203 70 old;
#X text 51 12 Choose whether to replace the "lod" signal with the "new"
one. The "new" one must be stronger than the old one and also must
be stronger than its two neighboring channels;
#X text 267 283 1 if we're louder than neighbor;
#X connect 0 0 2 0;
#X connect 0 0 9 0;
#X connect 0 0 8 0;
#X connect 0 0 12 0;
#X connect 0 0 15 0;
#X connect 2 0 4 0;
#X connect 3 0 16 0;
#X connect 4 0 3 0;
#X connect 5 0 2 1;
#X connect 8 0 11 0;
#X connect 9 0 8 1;
#X connect 10 0 16 1;
#X connect 11 0 10 0;
#X connect 12 0 14 0;
#X connect 13 0 17 1;
#X connect 14 0 13 0;
#X connect 15 0 12 1;
#X connect 16 0 17 0;
#X connect 17 0 1 0;
#X restore 23 172 pd decision;
#X obj 576 356 *~;
#N canvas 276 481 755 363 divide-by-prev 0;
#X obj 283 99 inlet~;
#X obj 385 101 inlet~;
#X obj 284 249 outlet~;
#X obj 386 249 outlet~;
#X obj 107 251 outlet~;
#X obj 208 253 outlet~;
#X obj 250 180 *~;
#X obj 217 180 *~;
#X obj 182 181 *~;
#X obj 149 181 *~;
#X obj 149 203 +~;
#X obj 217 202 -~;
#X obj 92 49 tabreceive~ \$0-last-real;
#X obj 190 72 tabreceive~ \$0-last-imag;
#X connect 0 0 2 0;
#X connect 0 0 9 0;
#X connect 0 0 6 0;
#X connect 1 0 3 0;
#X connect 1 0 8 0;
#X connect 1 0 7 0;
#X connect 6 0 11 1;
#X connect 7 0 11 0;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 4 0;
#X connect 11 0 5 0;
#X connect 12 0 9 1;
#X connect 12 0 7 1;
#X connect 13 0 8 1;
#X connect 13 0 6 1;
#X restore 603 192 pd divide-by-prev;
#N canvas 353 165 602 327 switch 0;
#X obj 19 163 inlet~;
#X obj 107 99 inlet~;
#X obj 169 100 inlet~;
#X obj 273 97 inlet~;
#X obj 333 97 inlet~;
#X obj 367 185 -~;
#X obj 338 231 +~;
#X obj 372 229 *~;
#X obj 250 182 -~;
#X obj 220 228 +~;
#X obj 254 228 *~;
#X obj 219 278 outlet~;
#X obj 338 274 outlet~;
#X text 46 28 switch between two pairs of inputs. If first inlet is
one \, take the left-hand pair \, otherwise the right-hand one.;
#X text 15 140 switch;
#X text 92 76 pass this if one;
#X text 269 77 pass this if zero;
#X connect 0 0 10 1;
#X connect 0 0 7 1;
#X connect 1 0 8 0;
#X connect 2 0 5 0;
#X connect 3 0 9 0;
#X connect 3 0 8 1;
#X connect 4 0 6 0;
#X connect 4 0 5 1;
#X connect 5 0 7 0;
#X connect 6 0 12 0;
#X connect 7 0 6 1;
#X connect 8 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X restore 327 275 pd switch;
#N canvas 650 183 602 327 switch 0;
#X obj 19 163 inlet~;
#X obj 107 99 inlet~;
#X obj 169 100 inlet~;
#X obj 273 97 inlet~;
#X obj 333 97 inlet~;
#X obj 367 185 -~;
#X obj 338 231 +~;
#X obj 372 229 *~;
#X obj 250 182 -~;
#X obj 220 228 +~;
#X obj 254 228 *~;
#X obj 219 278 outlet~;
#X obj 338 274 outlet~;
#X text 46 28 switch between two pairs of inputs. If first inlet is
one \, take the left-hand pair \, otherwise the right-hand one.;
#X text 15 140 switch;
#X text 92 76 pass this if one;
#X text 269 77 pass this if zero;
#X connect 0 0 10 1;
#X connect 0 0 7 1;
#X connect 1 0 8 0;
#X connect 2 0 5 0;
#X connect 3 0 9 0;
#X connect 3 0 8 1;
#X connect 4 0 6 0;
#X connect 4 0 5 1;
#X connect 5 0 7 0;
#X connect 6 0 12 0;
#X connect 7 0 6 1;
#X connect 8 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X restore 484 266 pd switch;
#X obj 655 270 r revtime;
#X obj 54 476 tabreceive~ \$0-hann;
#X obj 94 35 tabreceive~ \$0-hann;
#X obj 505 112 tabreceive~ \$0-inc-real;
#X obj 587 134 tabreceive~ \$0-inc-imag;
#X obj 752 220 tabsend~ \$0-last-imag;
#X obj 702 243 tabsend~ \$0-last-real;
#X obj 559 426 tabsend~ \$0-inc-imag;
#X obj 484 449 tabsend~ \$0-inc-real;
#X msg 665 293 set \$1;
#X obj 665 317 s revtime-set;
#X obj 800 483 loadbang;
#X msg 800 509 \; pd dsp 1 \; window-size 4096 \; revtime 20;
#X obj 800 411 r window-size;
#X msg 800 433 set \$1 4;
#X obj 800 455 block~;
#X obj 655 341 expr 1 - 0.2/max(0.2 \, $f1);
#X text 20 206 choose whether to;
#X text 18 224 punch in new (amplitude \,;
#X text 16 243 increment) pair;
#X obj 367 26 tabreceive~ \$0-amp-real;
#X obj 443 50 tabreceive~ \$0-amp-imag;
#X obj 325 537 tabsend~ \$0-amp-imag;
#X obj 258 560 tabsend~ \$0-amp-real;
#X text 361 6 previous output amplitude \, encoding both magnitude
and phase;
#X text 453 87 previous phase increment (unit-magnitude complex number)
;
#X obj 506 134 +~ 1e-015;
#X obj 366 50 +~ 1e-015;
#X text 363 482 propagate amplitudes by multiplying in the;
#X text 361 499 increments \, which advance the phase and drop;
#X text 365 514 magnitude according to revtime.;
#X text 608 370 normalize increments between 0 and;
#X text 606 388 1 according to revtime.;
#X text 78 453 IFFT and output;
#X connect 0 0 16 0;
#X connect 1 0 6 1;
#X connect 2 0 6 0;
#X connect 3 0 5 1;
#X connect 4 0 5 0;
#X connect 5 0 52 0;
#X connect 6 0 53 0;
#X connect 7 0 1 0;
#X connect 7 0 3 0;
#X connect 7 0 37 0;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 25 0;
#X connect 11 0 22 1;
#X connect 12 0 22 0;
#X connect 13 0 21 0;
#X connect 14 0 21 0;
#X connect 15 0 19 0;
#X connect 17 0 0 0;
#X connect 18 0 15 1;
#X connect 19 0 9 0;
#X connect 19 0 9 1;
#X connect 19 0 27 0;
#X connect 19 0 28 1;
#X connect 19 1 8 0;
#X connect 19 1 8 1;
#X connect 19 1 27 1;
#X connect 19 1 28 2;
#X connect 20 0 17 0;
#X connect 21 0 26 0;
#X connect 22 0 25 1;
#X connect 23 0 2 0;
#X connect 23 0 4 0;
#X connect 23 0 38 0;
#X connect 24 0 0 1;
#X connect 25 0 28 0;
#X connect 25 0 29 0;
#X connect 26 0 23 1;
#X connect 26 0 7 1;
#X connect 27 0 29 1;
#X connect 27 1 29 2;
#X connect 27 2 36 0;
#X connect 27 3 35 0;
#X connect 28 0 20 0;
#X connect 28 0 3 1;
#X connect 28 0 2 1;
#X connect 28 1 20 1;
#X connect 28 1 1 1;
#X connect 28 1 4 1;
#X connect 29 0 14 0;
#X connect 29 0 14 1;
#X connect 29 0 23 0;
#X connect 29 1 13 0;
#X connect 29 1 13 1;
#X connect 29 1 7 0;
#X connect 30 0 39 0;
#X connect 30 0 46 0;
#X connect 31 0 17 1;
#X connect 32 0 15 0;
#X connect 33 0 56 0;
#X connect 34 0 29 4;
#X connect 39 0 40 0;
#X connect 41 0 42 0;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 46 0 26 1;
#X connect 50 0 57 0;
#X connect 51 0 11 0;
#X connect 51 0 11 1;
#X connect 51 0 28 4;
#X connect 56 0 29 3;
#X connect 57 0 12 0;
#X connect 57 0 12 1;
#X connect 57 0 28 3;
#X restore 56 229 pd fft;
#X floatatom 115 97 0 0 0 0 - - -;
#X text 327 234 reverb time;
#N canvas 0 0 508 303 test-sound 0;
#X obj 36 33 inlet;
#X obj 36 144 osc~;
#X obj 164 173 line~;
#X obj 36 71 mtof;
#X obj 36 169 cos~;
#X obj 36 193 hip~ 20;
#X obj 36 118 t f b;
#X obj 164 63 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 209 144 pack 0 30;
#X obj 194 90 del 20;
#X obj 164 116 pack 1 20;
#X obj 37 224 *~;
#X obj 38 258 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 4 0;
#X connect 2 0 11 1;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 11 0;
#X connect 6 0 1 0;
#X connect 6 1 7 0;
#X connect 7 0 9 0;
#X connect 7 0 10 0;
#X connect 8 0 2 0;
#X connect 9 0 8 0;
#X connect 10 0 2 0;
#X connect 11 0 12 0;
#X restore 56 183 pd test-sound;
#X obj 293 255 s revtime;
#N canvas 0 110 565 454 hann-window 0;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-hann 4096 float 0;
#X coords 0 1 4095 0 300 100 1;
#X restore 82 311 graph;
#X obj 378 165 osc~;
#X obj 378 190 *~ -0.5;
#X obj 378 214 +~ 0.5;
#X obj 331 247 tabwrite~ \$0-hann;
#X obj 37 88 r window-size;
#X obj 38 173 /;
#X obj 127 142 samplerate~;
#X obj 38 251 s window-sec;
#X obj 177 204 swap;
#X obj 177 228 /;
#X obj 177 252 s window-hz;
#X obj 49 201 * 1000;
#X obj 49 228 s window-msec;
#X obj 38 115 t f b f;
#X msg 173 92 resize \$1;
#X obj 173 116 s \$0-hann;
#X obj 330 105 r window-hz;
#X msg 382 130 0;
#X obj 330 131 t f b;
#X text 15 8 calculate Hann window table (variable window size) and
constants window-hz (fundamental frequency of analysis) \, window-sec
and window-msec (analysis window size in seconds and msec).;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 5 0 14 0;
#X connect 6 0 8 0;
#X connect 6 0 12 0;
#X connect 7 0 6 1;
#X connect 7 0 9 1;
#X connect 9 0 10 0;
#X connect 9 1 10 1;
#X connect 10 0 11 0;
#X connect 12 0 13 0;
#X connect 14 0 6 0;
#X connect 14 0 9 0;
#X connect 14 1 7 0;
#X connect 14 2 15 0;
#X connect 15 0 16 0;
#X connect 17 0 19 0;
#X connect 18 0 1 1;
#X connect 19 0 1 0;
#X connect 19 1 4 0;
#X connect 19 1 18 0;
#X restore 158 411 pd hann-window;
#N canvas 52 71 774 520 tables 0;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-last-real 2048 float 0;
#X coords 0 500 2048 -500 200 150 1;
#X restore 103 15 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-last-imag 2048 float 0;
#X coords 0 500 2048 500 200 150 1;
#X restore 497 6 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-amp-real 2048 float 0;
#X coords 0 500 2048 -500 200 150 1;
#X restore 105 185 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-amp-imag 2048 float 0;
#X coords 0 500 2048 -500 200 150 1;
#X restore 501 178 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-inc-real 2048 float 0;
#X coords 0 1 2048 -1 200 150 1;
#X restore 105 357 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-inc-imag 2048 float 0;
#X coords 0 1 2048 -1 200 150 1;
#X restore 503 342 graph;
#X restore 158 435 pd tables;
#X obj 55 281 *~ 0.5;
#N canvas 44 72 986 609 fft 0;
#X obj 18 500 *~;
#X obj 291 455 *~;
#X obj 258 454 *~;
#X obj 356 456 *~;
#X obj 324 455 *~;
#X obj 324 477 +~;
#X obj 258 479 -~;
#X obj 560 383 *~;
#X obj 54 124 *~;
#X obj 22 124 *~;
#X obj 22 145 +~;
#X obj 325 82 *~;
#X obj 293 82 *~;
#X obj 608 312 *~;
#X obj 576 312 *~;
#X obj 93 63 *~;
#X obj 18 522 outlet~;
#X obj 18 475 *~;
#X obj 126 63 inlet~;
#X obj 93 84 rfft~;
#X obj 18 451 rifft~;
#X obj 576 334 rsqrt~;
#X obj 293 103 +~;
#X obj 484 383 *~;
#X obj 56 499 sig~ 0.0002;
#N canvas 167 161 699 396 decision 0;
#X obj 49 101 inlet~;
#X obj 50 341 outlet~;
#X obj 50 183 -~;
#X obj 50 226 clip~ 0 1;
#X obj 50 204 *~ 1e+020;
#X obj 196 98 inlet~;
#X text 137 213 stronger than;
#X text 139 228 old one;
#X obj 274 202 -~;
#X obj 288 177 lrshift~ 1;
#X obj 274 250 clip~ 0 1;
#X obj 274 228 *~ 1e+020;
#X obj 450 202 -~;
#X obj 450 250 clip~ 0 1;
#X obj 450 228 *~ 1e+020;
#X obj 464 177 lrshift~ -1;
#X obj 50 283 *~;
#X obj 50 312 *~;
#X text 135 199 1 if new signal;
#X text 55 73 new;
#X text 203 70 old;
#X text 51 12 Choose whether to replace the "lod" signal with the "new"
one. The "new" one must be stronger than the old one and also must
be stronger than its two neighboring channels;
#X text 267 283 1 if we're louder than neighbor;
#X connect 0 0 2 0;
#X connect 0 0 9 0;
#X connect 0 0 8 0;
#X connect 0 0 12 0;
#X connect 0 0 15 0;
#X connect 2 0 4 0;
#X connect 3 0 16 0;
#X connect 4 0 3 0;
#X connect 5 0 2 1;
#X connect 8 0 11 0;
#X connect 9 0 8 1;
#X connect 10 0 16 1;
#X connect 11 0 10 0;
#X connect 12 0 14 0;
#X connect 13 0 17 1;
#X connect 14 0 13 0;
#X connect 15 0 12 1;
#X connect 16 0 17 0;
#X connect 17 0 1 0;
#X restore 23 172 pd decision;
#X obj 576 356 *~;
#N canvas 276 481 755 363 divide-by-prev 0;
#X obj 283 99 inlet~;
#X obj 385 101 inlet~;
#X obj 284 249 outlet~;
#X obj 386 249 outlet~;
#X obj 107 251 outlet~;
#X obj 208 253 outlet~;
#X obj 250 180 *~;
#X obj 217 180 *~;
#X obj 182 181 *~;
#X obj 149 181 *~;
#X obj 149 203 +~;
#X obj 217 202 -~;
#X obj 92 49 tabreceive~ \$0-last-real;
#X obj 190 72 tabreceive~ \$0-last-imag;
#X connect 0 0 2 0;
#X connect 0 0 9 0;
#X connect 0 0 6 0;
#X connect 1 0 3 0;
#X connect 1 0 8 0;
#X connect 1 0 7 0;
#X connect 6 0 11 1;
#X connect 7 0 11 0;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 4 0;
#X connect 11 0 5 0;
#X connect 12 0 9 1;
#X connect 12 0 7 1;
#X connect 13 0 8 1;
#X connect 13 0 6 1;
#X restore 603 192 pd divide-by-prev;
#N canvas 353 165 602 327 switch 0;
#X obj 19 163 inlet~;
#X obj 107 99 inlet~;
#X obj 169 100 inlet~;
#X obj 273 97 inlet~;
#X obj 333 97 inlet~;
#X obj 367 185 -~;
#X obj 338 231 +~;
#X obj 372 229 *~;
#X obj 250 182 -~;
#X obj 220 228 +~;
#X obj 254 228 *~;
#X obj 219 278 outlet~;
#X obj 338 274 outlet~;
#X text 46 28 switch between two pairs of inputs. If first inlet is
one \, take the left-hand pair \, otherwise the right-hand one.;
#X text 15 140 switch;
#X text 92 76 pass this if one;
#X text 269 77 pass this if zero;
#X connect 0 0 10 1;
#X connect 0 0 7 1;
#X connect 1 0 8 0;
#X connect 2 0 5 0;
#X connect 3 0 9 0;
#X connect 3 0 8 1;
#X connect 4 0 6 0;
#X connect 4 0 5 1;
#X connect 5 0 7 0;
#X connect 6 0 12 0;
#X connect 7 0 6 1;
#X connect 8 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X restore 327 275 pd switch;
#N canvas 650 183 602 327 switch 0;
#X obj 19 163 inlet~;
#X obj 107 99 inlet~;
#X obj 169 100 inlet~;
#X obj 273 97 inlet~;
#X obj 333 97 inlet~;
#X obj 367 185 -~;
#X obj 338 231 +~;
#X obj 372 229 *~;
#X obj 250 182 -~;
#X obj 220 228 +~;
#X obj 254 228 *~;
#X obj 219 278 outlet~;
#X obj 338 274 outlet~;
#X text 46 28 switch between two pairs of inputs. If first inlet is
one \, take the left-hand pair \, otherwise the right-hand one.;
#X text 15 140 switch;
#X text 92 76 pass this if one;
#X text 269 77 pass this if zero;
#X connect 0 0 10 1;
#X connect 0 0 7 1;
#X connect 1 0 8 0;
#X connect 2 0 5 0;
#X connect 3 0 9 0;
#X connect 3 0 8 1;
#X connect 4 0 6 0;
#X connect 4 0 5 1;
#X connect 5 0 7 0;
#X connect 6 0 12 0;
#X connect 7 0 6 1;
#X connect 8 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X restore 484 266 pd switch;
#X obj 655 270 r revtime;
#X obj 54 476 tabreceive~ \$0-hann;
#X obj 94 35 tabreceive~ \$0-hann;
#X obj 505 112 tabreceive~ \$0-inc-real;
#X obj 587 134 tabreceive~ \$0-inc-imag;
#X obj 752 220 tabsend~ \$0-last-imag;
#X obj 702 243 tabsend~ \$0-last-real;
#X obj 559 426 tabsend~ \$0-inc-imag;
#X obj 484 449 tabsend~ \$0-inc-real;
#X msg 665 293 set \$1;
#X obj 665 317 s revtime-set;
#X obj 800 483 loadbang;
#X msg 800 509 \; pd dsp 1 \; window-size 4096 \; revtime 20;
#X obj 800 411 r window-size;
#X msg 800 433 set \$1 4;
#X obj 800 455 block~;
#X obj 655 341 expr 1 - 0.2/max(0.2 \, $f1);
#X text 20 206 choose whether to;
#X text 18 224 punch in new (amplitude \,;
#X text 16 243 increment) pair;
#X obj 367 26 tabreceive~ \$0-amp-real;
#X obj 443 50 tabreceive~ \$0-amp-imag;
#X obj 325 537 tabsend~ \$0-amp-imag;
#X obj 258 560 tabsend~ \$0-amp-real;
#X text 361 6 previous output amplitude \, encoding both magnitude
and phase;
#X text 453 87 previous phase increment (unit-magnitude complex number)
;
#X obj 506 134 +~ 1e-015;
#X obj 366 50 +~ 1e-015;
#X text 363 482 propagate amplitudes by multiplying in the;
#X text 361 499 increments \, which advance the phase and drop;
#X text 365 514 magnitude according to revtime.;
#X text 608 370 normalize increments between 0 and;
#X text 606 388 1 according to revtime.;
#X text 78 453 IFFT and output;
#X connect 0 0 16 0;
#X connect 1 0 6 1;
#X connect 2 0 6 0;
#X connect 3 0 5 1;
#X connect 4 0 5 0;
#X connect 5 0 52 0;
#X connect 6 0 53 0;
#X connect 7 0 1 0;
#X connect 7 0 3 0;
#X connect 7 0 37 0;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 25 0;
#X connect 11 0 22 1;
#X connect 12 0 22 0;
#X connect 13 0 21 0;
#X connect 14 0 21 0;
#X connect 15 0 19 0;
#X connect 17 0 0 0;
#X connect 18 0 15 1;
#X connect 19 0 9 0;
#X connect 19 0 9 1;
#X connect 19 0 27 0;
#X connect 19 0 28 1;
#X connect 19 1 8 0;
#X connect 19 1 8 1;
#X connect 19 1 27 1;
#X connect 19 1 28 2;
#X connect 20 0 17 0;
#X connect 21 0 26 0;
#X connect 22 0 25 1;
#X connect 23 0 2 0;
#X connect 23 0 4 0;
#X connect 23 0 38 0;
#X connect 24 0 0 1;
#X connect 25 0 28 0;
#X connect 25 0 29 0;
#X connect 26 0 23 1;
#X connect 26 0 7 1;
#X connect 27 0 29 1;
#X connect 27 1 29 2;
#X connect 27 2 36 0;
#X connect 27 3 35 0;
#X connect 28 0 20 0;
#X connect 28 0 3 1;
#X connect 28 0 2 1;
#X connect 28 1 20 1;
#X connect 28 1 1 1;
#X connect 28 1 4 1;
#X connect 29 0 14 0;
#X connect 29 0 14 1;
#X connect 29 0 23 0;
#X connect 29 1 13 0;
#X connect 29 1 13 1;
#X connect 29 1 7 0;
#X connect 30 0 39 0;
#X connect 30 0 46 0;
#X connect 31 0 17 1;
#X connect 32 0 15 0;
#X connect 33 0 56 0;
#X connect 34 0 29 4;
#X connect 39 0 40 0;
#X connect 41 0 42 0;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 46 0 26 1;
#X connect 50 0 57 0;
#X connect 51 0 11 0;
#X connect 51 0 11 1;
#X connect 51 0 28 4;
#X connect 56 0 29 3;
#X connect 57 0 12 0;
#X connect 57 0 12 1;
#X connect 57 0 28 3;
#X restore 156 228 pd fft;
#N canvas 0 0 508 303 test-sound 0;
#X obj 36 44 inlet;
#X obj 36 144 osc~;
#X obj 164 173 line~;
#X obj 36 79 mtof;
#X obj 36 169 cos~;
#X obj 36 193 hip~ 20;
#X obj 36 118 t f b;
#X obj 164 63 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 209 144 pack 0 30;
#X obj 194 90 del 20;
#X obj 164 116 pack 1 20;
#X obj 37 223 *~;
#X obj 38 254 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 4 0;
#X connect 2 0 11 1;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 11 0;
#X connect 6 0 1 0;
#X connect 6 1 7 0;
#X connect 7 0 9 0;
#X connect 7 0 10 0;
#X connect 8 0 2 0;
#X connect 9 0 8 0;
#X connect 10 0 2 0;
#X connect 11 0 12 0;
#X restore 156 182 pd test-sound;
#X obj 157 281 *~ 0.5;
#X obj 115 58 * 100;
#X floatatom 293 211 5 0 0 0 - - -;
#X obj 115 11 inlet;
#X obj 275 12 inlet;
#X obj 422 12 inlet;
#X obj 293 183 * 90;
#X obj 156 153 + 7;
#X msg 422 60 3;
#X obj 56 342 send~ Notesreverb-outE;
#X obj 156 374 send~ Notesreverb-outD;
#X text 110 -19 Size controla les notes;
#X text 274 -18 Motion controla el temps de reverb;
#X connect 0 0 7 0;
#X connect 1 0 3 0;
#X connect 1 0 17 0;
#X connect 3 0 0 0;
#X connect 7 0 19 0;
#X connect 8 0 10 0;
#X connect 9 0 8 0;
#X connect 10 0 20 0;
#X connect 11 0 1 0;
#X connect 12 0 4 0;
#X connect 13 0 11 0;
#X connect 14 0 16 0;
#X connect 15 0 18 0;
#X connect 16 0 12 0;
#X connect 17 0 9 0;
#X connect 18 0 12 0;
#X restore 44 670 pd notes-reverb;
#X obj 44 565 gate;
#X obj 119 567 gate;
#X msg 8 532 1;
#X msg 119 529 1;
#X msg 158 529 0;
#X obj 14 428 sel 1 2;
#X floatatom 395 204 5 0 0 0 - - -;
#X obj 395 236 gate 4;
#X obj 255 322 unpack f f f;
#X floatatom 224 368 5 0 0 0 - - -;
#X text 221 348 Stage;
#X floatatom 281 368 5 0 0 0 - - -;
#X floatatom 350 367 5 0 0 0 - - -;
#X text 277 347 Motion;
#X text 350 346 Size;
#N canvas 20 21 1200 656 sequencies-sonores 0;
#X msg 32 212 start;
#X obj 32 256 readsf~ 2;
#X obj 104 302 *~ 0.5;
#X obj 23 303 *~ 0.5;
#X obj 306 259 readsf~ 2;
#X obj 372 321 *~ 0.5;
#X obj 297 322 *~ 0.5;
#X msg 559 212 start;
#X obj 559 251 readsf~ 2;
#X obj 619 307 *~ 0.5;
#X obj 560 308 *~ 0.5;
#X msg 809 209 start;
#X obj 809 248 readsf~ 2;
#X obj 857 304 *~ 0.5;
#X obj 800 305 *~ 0.5;
#X obj 472 -153 inlet;
#X obj 632 -153 inlet;
#X obj 1086 -137 inlet;
#X obj 1105 227 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 869 576 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 1034 572 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 954 502 / 100;
#X obj 1181 572 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 1331 568 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X msg 306 217 start;
#X obj 472 -23 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 604 212 open SOUND3.aif;
#X msg 866 208 open SOUND4.aif;
#X msg 80 216 open SOUND1.aif;
#X msg 361 217 open SOUND2.aif;
#X obj 71 98 pipe 15000;
#X obj 32 68 t b b b;
#X obj 93 157 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 93 127 gate;
#X obj 345 112 pipe 15000;
#X obj 306 82 t b b b;
#X obj 367 171 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 367 141 gate;
#X obj 598 108 pipe 15000;
#X obj 559 78 t b b b;
#X obj 620 167 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 620 137 gate;
#X obj 860 117 pipe 15000;
#X obj 821 87 t b b b;
#X obj 882 176 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 882 146 gate;
#X obj 93 69 r gate-seq;
#X obj 367 79 r gate-seq;
#X obj 620 74 r gate-seq;
#X obj 882 80 r gate-seq;
#X obj 472 -120 t b b;
#X msg 499 -92 1;
#X obj 499 -67 s gate-seq;
#X text 469 -172 Activar Sequencies sonores;
#X text 630 -172 Desactivar Sequencies sonores;
#X obj 632 -95 s gate-seq;
#X msg 632 -120 0;
#X obj 1341 -142 inlet;
#X obj 590 -43 s volum-seq;
#X obj 103 364 *~ 0.5;
#X obj 22 368 *~ 0.5;
#X obj 136 333 r volum-seq;
#X obj 373 380 *~ 0.5;
#X obj 296 381 *~ 0.5;
#X obj 406 346 r volum-seq;
#X obj 618 376 *~ 0.5;
#X obj 559 377 *~ 0.5;
#X obj 651 342 r volum-seq;
#X obj 856 372 *~ 0.5;
#X obj 799 373 *~ 0.5;
#X obj 889 338 r volum-seq;
#X obj 938 -143 inlet;
#X msg 1124 345 set seq2_table;
#X obj 1113 377 tabread seq2_table;
#X obj 1123 399 table seq2_table;
#X msg 1284 345 set seq3_table;
#X msg 1444 344 set seq4_table;
#X obj 1273 377 tabread seq3_table;
#X obj 1427 376 tabread seq4_table;
#X obj 1275 400 table seq3_table;
#X text 1380 -141 Velocitat;
#X obj 1430 400 table seq4_table;
#X obj 1299 261 loadbang;
#X obj 1086 -94 * 100;
#X obj 954 529 * 1.25;
#X obj 1031 502 / 100;
#X obj 1178 504 / 100;
#X obj 1328 504 / 100;
#X obj 411 587 send~ Seq-outE;
#X obj 506 587 send~ Seq-outD;
#X text 1079 -169 Size - controla el numero i amplitud de les sequencies
activades;
#X text 937 -169 Motion;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 1 1 2 0;
#X connect 2 0 59 0;
#X connect 3 0 60 0;
#X connect 4 0 6 0;
#X connect 4 1 5 0;
#X connect 5 0 62 0;
#X connect 6 0 63 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 8 1 9 0;
#X connect 9 0 65 0;
#X connect 10 0 66 0;
#X connect 11 0 12 0;
#X connect 12 0 14 0;
#X connect 12 1 13 0;
#X connect 13 0 68 0;
#X connect 14 0 69 0;
#X connect 15 0 50 0;
#X connect 16 0 56 0;
#X connect 17 0 83 0;
#X connect 18 0 21 0;
#X connect 18 0 73 0;
#X connect 18 0 77 0;
#X connect 18 0 78 0;
#X connect 19 0 3 1;
#X connect 19 0 2 1;
#X connect 20 0 6 1;
#X connect 20 0 5 1;
#X connect 21 0 84 0;
#X connect 22 0 10 1;
#X connect 22 0 9 1;
#X connect 23 0 14 1;
#X connect 23 0 13 1;
#X connect 24 0 4 0;
#X connect 25 0 31 0;
#X connect 25 0 35 0;
#X connect 25 0 39 0;
#X connect 25 0 43 0;
#X connect 26 0 8 0;
#X connect 27 0 12 0;
#X connect 28 0 1 0;
#X connect 29 0 4 0;
#X connect 30 0 33 1;
#X connect 31 0 0 0;
#X connect 31 1 28 0;
#X connect 31 2 30 0;
#X connect 32 0 31 0;
#X connect 33 0 32 0;
#X connect 34 0 37 1;
#X connect 35 0 24 0;
#X connect 35 1 29 0;
#X connect 35 2 34 0;
#X connect 36 0 35 0;
#X connect 37 0 36 0;
#X connect 38 0 41 1;
#X connect 39 0 7 0;
#X connect 39 1 26 0;
#X connect 39 2 38 0;
#X connect 40 0 39 0;
#X connect 41 0 40 0;
#X connect 42 0 45 1;
#X connect 43 0 11 0;
#X connect 43 1 27 0;
#X connect 43 2 42 0;
#X connect 44 0 43 0;
#X connect 45 0 44 0;
#X connect 46 0 33 0;
#X connect 47 0 37 0;
#X connect 48 0 41 0;
#X connect 49 0 45 0;
#X connect 50 0 25 0;
#X connect 50 1 51 0;
#X connect 51 0 52 0;
#X connect 51 0 58 0;
#X connect 56 0 55 0;
#X connect 56 0 58 0;
#X connect 59 0 89 0;
#X connect 60 0 88 0;
#X connect 61 0 59 1;
#X connect 61 0 60 1;
#X connect 62 0 89 0;
#X connect 63 0 88 0;
#X connect 64 0 62 1;
#X connect 64 0 63 1;
#X connect 65 0 89 0;
#X connect 66 0 88 0;
#X connect 67 0 65 1;
#X connect 67 0 66 1;
#X connect 68 0 89 0;
#X connect 69 0 88 0;
#X connect 70 0 68 1;
#X connect 70 0 69 1;
#X connect 72 0 73 0;
#X connect 73 0 85 0;
#X connect 75 0 77 0;
#X connect 76 0 78 0;
#X connect 77 0 86 0;
#X connect 78 0 87 0;
#X connect 82 0 72 0;
#X connect 82 0 75 0;
#X connect 82 0 76 0;
#X connect 83 0 18 0;
#X connect 84 0 19 0;
#X connect 85 0 20 0;
#X connect 86 0 22 0;
#X connect 87 0 23 0;
#X restore 785 657 pd sequencies-sonores;
#X obj 568 308 unpack f f f;
#X floatatom 542 354 5 0 0 0 - - -;
#X text 539 334 Stage;
#X floatatom 599 354 5 0 0 0 - - -;
#X floatatom 668 353 5 0 0 0 - - -;
#X text 595 333 Motion;
#X text 668 332 Size;
#X text 307 205 CURRENT SHAPE;
#X msg 395 168 1;
#X obj 542 524 gate;
#X obj 611 526 gate;
#X msg 542 485 1;
#X msg 611 488 1;
#X msg 650 488 0;
#X obj 542 409 sel 1 2;
#N canvas 54 16 1159 688 pulsacio 0;
#X obj 532 -162 inlet;
#X obj 337 -164 inlet;
#X obj 847 -163 inlet;
#X floatatom 234 129 4 0 127 0 - - -;
#X text 275 124 center;
#X obj 234 200 line~;
#X obj 234 171 pack 0 50;
#X floatatom 168 129 4 0 127 0 - - -;
#X text 83 122 fundamental;
#X floatatom 360 -1 4 0 127 0 - - -;
#X obj 360 220 line~;
#X obj 95 472 *~;
#X obj 360 186 pack 0 50;
#X obj 95 521 cos~;
#X obj 168 202 mtof;
#X obj 257 230 expr 1/$f1;
#X obj 234 149 mtof;
#X text 274 139 freq.;
#X obj 235 254 *~;
#X text 409 -34 bandwidth;
#X obj 360 160 mtof;
#X obj 359 263 *~;
#X text 400 255 divide by fundamental;
#X text 76 136 (MIDI units);
#X obj 42 307 phasor~;
#X obj 434 365 +~ 0.5;
#X obj 434 390 wrap~;
#X text 405 310 second phase signal;
#X text 406 325 out of phase from;
#X text 404 342 first one;
#X obj 95 544 +~ 1;
#X obj 41 408 -~ 0.5;
#X obj 98 578 +~;
#X obj 40 472 *~;
#X obj 40 495 cos~;
#X obj 177 442 samphold~;
#X obj 89 441 samphold~;
#X obj 39 520 *~;
#X obj 95 496 clip~ -0.5 0.5;
#X obj 335 483 *~;
#X obj 335 532 cos~;
#X obj 335 555 +~ 1;
#X obj 281 419 -~ 0.5;
#X obj 280 483 *~;
#X obj 280 506 cos~;
#X obj 417 453 samphold~;
#X obj 329 452 samphold~;
#X obj 279 531 *~;
#X obj 335 507 clip~ -0.5 0.5;
#X obj 359 287 max~ 1;
#X obj 261 1000 *~ 0.5;
#X obj 167 -36 * 90;
#X obj 168 59 gate;
#X obj 167 -7 t i i;
#X obj 168 29 < 80;
#X obj 360 -32 * 110;
#X floatatom 726 132 4 0 127 0 - - -;
#X text 767 127 center;
#X obj 726 203 line~;
#X obj 726 174 pack 0 50;
#X floatatom 660 132 4 0 127 0 - - -;
#X text 581 120 fundamental;
#X obj 852 223 line~;
#X obj 587 475 *~;
#X obj 852 189 pack 0 50;
#X obj 587 524 cos~;
#X obj 660 205 mtof;
#X obj 749 233 expr 1/$f1;
#X obj 726 152 mtof;
#X text 766 142 freq.;
#X obj 727 257 *~;
#X obj 852 163 mtof;
#X obj 851 266 *~;
#X text 892 258 divide by fundamental;
#X text 577 136 (MIDI units);
#X obj 534 310 phasor~;
#X obj 926 368 +~ 0.5;
#X obj 926 393 wrap~;
#X text 897 313 second phase signal;
#X text 898 328 out of phase from;
#X text 896 345 first one;
#X obj 587 547 +~ 1;
#X obj 533 411 -~ 0.5;
#X obj 590 581 +~;
#X obj 532 475 *~;
#X obj 532 498 cos~;
#X obj 669 445 samphold~;
#X obj 581 444 samphold~;
#X obj 531 523 *~;
#X obj 587 499 clip~ -0.5 0.5;
#X obj 827 486 *~;
#X obj 827 535 cos~;
#X obj 827 558 +~ 1;
#X obj 773 422 -~ 0.5;
#X obj 772 486 *~;
#X obj 772 509 cos~;
#X obj 909 456 samphold~;
#X obj 821 455 samphold~;
#X obj 771 534 *~;
#X obj 827 510 clip~ -0.5 0.5;
#X obj 851 290 max~ 1;
#X obj 490 1010 *~ 0.5;
#X obj 659 -37 * 90;
#X obj 660 58 gate;
#X obj 659 -8 t i i;
#X floatatom 852 58 4 0 127 0 - - -;
#X obj 852 134 * -1;
#X msg 363 535 0;
#X obj 660 28 < 80;
#X obj 726 108 + 7;
#X msg 357 895 0;
#X msg 389 895 0.5;
#X obj 357 871 sel 0 1;
#X obj 168 167 - 12;
#X obj 660 174 + 12;
#X obj 97 831 *~ 1;
#X msg 134 684 1;
#X msg 205 684 0;
#X msg 166 685 0;
#X msg 239 685 1;
#X obj 605 842 *~ 1;
#N canvas 255 168 467 541 chorus1 0;
#X obj 19 26 inlet~;
#X obj 327 25 inlet;
#X obj 343 170 switch~;
#X obj 345 111 != 0;
#X obj 42 83 delwrite~ \$0-mychorus1 200;
#X obj 83 183 vd~ \$0-mychorus1 500;
#X obj 138 234 delwrite~ \$0-mychorus2 200;
#X obj 171 291 vd~ \$0-mychorus2 500;
#X obj 171 261 * 1.7;
#X obj 130 358 outlet~ r;
#X obj 47 355 outlet~ l;
#X obj 221 271 * 0.5;
#X obj 39 271 *~ 0.5;
#X obj 130 325 *~ 0.5;
#X connect 0 0 4 0;
#X connect 0 0 12 0;
#X connect 1 0 3 0;
#X connect 1 0 5 0;
#X connect 1 0 8 0;
#X connect 3 0 2 0;
#X connect 5 0 6 0;
#X connect 5 0 13 0;
#X connect 7 0 13 0;
#X connect 8 0 7 0;
#X connect 12 0 10 0;
#X connect 13 0 9 0;
#X restore 141 830 pd chorus1;
#N canvas 297 138 467 541 chorus2 0;
#X obj 19 26 inlet~;
#X obj 327 25 inlet;
#X obj 343 170 switch~;
#X obj 345 111 != 0;
#X obj 171 261 * 1.7;
#X obj 129 346 outlet~ r;
#X obj 48 343 outlet~ l;
#X obj 42 83 delwrite~ \$0-mychorus3 200;
#X obj 83 183 vd~ \$0-mychorus3 500;
#X obj 138 234 delwrite~ \$0-mychorus4 200;
#X obj 171 291 vd~ \$0-mychorus4 500;
#X obj 49 281 *~ 0.5;
#X obj 128 319 *~ 0.5;
#X connect 0 0 7 0;
#X connect 0 0 11 0;
#X connect 1 0 3 0;
#X connect 1 0 4 0;
#X connect 1 0 8 0;
#X connect 3 0 2 0;
#X connect 4 0 10 0;
#X connect 8 0 9 0;
#X connect 8 0 12 0;
#X connect 10 0 12 0;
#X connect 11 0 6 0;
#X connect 12 0 5 0;
#X restore 649 841 pd chorus2;
#X obj 234 93 + 5;
#X obj 360 88 * -1;
#X obj 360 59 - 110;
#X obj 852 -10 * 90;
#X obj 852 105 - 90;
#X obj 706 785 + 50;
#X obj 198 768 + 50;
#X obj 847 -131 s volum-pulsacio;
#X obj 357 831 r volum-pulsacio;
#X obj 261 1045 send~ pulsacio-outE;
#X obj 489 1047 send~ pulsacio-outD;
#X text 333 -183 Size controla la fundamental;
#X text 525 -185 Motion controla bandwidth;
#X obj 97 755 *~ 1;
#X obj 132 756 *~ 1;
#X obj 605 766 *~ 1;
#X obj 643 767 *~ 1;
#X obj 192 -163 inlet;
#X obj 192 -134 s stage-pulsacio;
#X obj 139 620 sel 1 2;
#X obj 139 588 r stage-pulsacio;
#X obj 139 647 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 158 647 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 654 703 1;
#X msg 725 703 0;
#X msg 686 704 0;
#X msg 759 704 1;
#X obj 659 639 sel 1 2;
#X obj 659 607 r stage-pulsacio;
#X obj 659 666 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 678 666 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 384 633 r current-shape;
#X obj 384 662 sel 2;
#X obj 384 692 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 219 801 5 0 0 0 - - -;
#X obj 198 738 random 450;
#X obj 706 757 random 600;
#X connect 0 0 55 0;
#X connect 0 0 126 0;
#X connect 1 0 51 0;
#X connect 1 0 102 0;
#X connect 2 0 130 0;
#X connect 3 0 16 0;
#X connect 5 0 18 0;
#X connect 6 0 5 0;
#X connect 7 0 113 0;
#X connect 9 0 125 0;
#X connect 10 0 21 0;
#X connect 11 0 38 0;
#X connect 12 0 10 0;
#X connect 13 0 30 0;
#X connect 14 0 15 0;
#X connect 14 0 24 0;
#X connect 15 0 18 1;
#X connect 15 0 21 1;
#X connect 16 0 6 0;
#X connect 18 0 36 0;
#X connect 18 0 46 0;
#X connect 20 0 12 0;
#X connect 21 0 49 0;
#X connect 24 0 25 0;
#X connect 24 0 31 0;
#X connect 24 0 36 1;
#X connect 24 0 35 1;
#X connect 25 0 26 0;
#X connect 26 0 42 0;
#X connect 26 0 46 1;
#X connect 26 0 45 1;
#X connect 30 0 37 1;
#X connect 31 0 11 0;
#X connect 31 0 33 0;
#X connect 32 0 136 0;
#X connect 32 0 137 0;
#X connect 33 0 34 0;
#X connect 34 0 37 0;
#X connect 35 0 11 1;
#X connect 36 0 33 1;
#X connect 37 0 32 0;
#X connect 38 0 13 0;
#X connect 39 0 48 0;
#X connect 40 0 41 0;
#X connect 41 0 47 1;
#X connect 42 0 39 0;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 39 1;
#X connect 46 0 43 1;
#X connect 47 0 32 1;
#X connect 48 0 40 0;
#X connect 49 0 35 0;
#X connect 49 0 45 0;
#X connect 50 0 132 0;
#X connect 51 0 53 0;
#X connect 52 0 7 0;
#X connect 52 0 123 0;
#X connect 53 0 52 1;
#X connect 53 1 54 0;
#X connect 54 0 52 0;
#X connect 55 0 9 0;
#X connect 56 0 68 0;
#X connect 58 0 70 0;
#X connect 59 0 58 0;
#X connect 60 0 114 0;
#X connect 62 0 72 0;
#X connect 63 0 89 0;
#X connect 64 0 62 0;
#X connect 65 0 81 0;
#X connect 66 0 67 0;
#X connect 66 0 75 0;
#X connect 67 0 70 1;
#X connect 67 0 72 1;
#X connect 68 0 59 0;
#X connect 70 0 87 0;
#X connect 70 0 97 0;
#X connect 71 0 64 0;
#X connect 72 0 100 0;
#X connect 75 0 76 0;
#X connect 75 0 82 0;
#X connect 75 0 87 1;
#X connect 75 0 86 1;
#X connect 76 0 77 0;
#X connect 77 0 93 0;
#X connect 77 0 97 1;
#X connect 77 0 96 1;
#X connect 81 0 88 1;
#X connect 82 0 63 0;
#X connect 82 0 84 0;
#X connect 83 0 138 0;
#X connect 83 0 139 0;
#X connect 84 0 85 0;
#X connect 85 0 88 0;
#X connect 86 0 63 1;
#X connect 87 0 84 1;
#X connect 88 0 83 0;
#X connect 89 0 65 0;
#X connect 90 0 99 0;
#X connect 91 0 92 0;
#X connect 92 0 98 1;
#X connect 93 0 90 0;
#X connect 93 0 94 0;
#X connect 94 0 95 0;
#X connect 95 0 98 0;
#X connect 96 0 90 1;
#X connect 97 0 94 1;
#X connect 98 0 83 1;
#X connect 99 0 91 0;
#X connect 100 0 86 0;
#X connect 100 0 96 0;
#X connect 101 0 133 0;
#X connect 102 0 104 0;
#X connect 103 0 60 0;
#X connect 103 0 109 0;
#X connect 104 0 103 1;
#X connect 104 1 108 0;
#X connect 105 0 127 0;
#X connect 106 0 71 0;
#X connect 108 0 103 0;
#X connect 109 0 56 0;
#X connect 110 0 50 1;
#X connect 110 0 101 1;
#X connect 111 0 50 1;
#X connect 111 0 101 1;
#X connect 112 0 110 0;
#X connect 112 1 111 0;
#X connect 113 0 14 0;
#X connect 114 0 66 0;
#X connect 115 0 50 0;
#X connect 116 0 136 1;
#X connect 117 0 136 1;
#X connect 118 0 137 1;
#X connect 119 0 137 1;
#X connect 120 0 101 0;
#X connect 121 0 50 0;
#X connect 121 1 50 0;
#X connect 122 0 101 0;
#X connect 122 1 101 0;
#X connect 123 0 3 0;
#X connect 124 0 20 0;
#X connect 125 0 124 0;
#X connect 126 0 105 0;
#X connect 127 0 106 0;
#X connect 128 0 122 1;
#X connect 129 0 121 1;
#X connect 129 0 157 0;
#X connect 131 0 112 0;
#X connect 136 0 115 0;
#X connect 137 0 121 0;
#X connect 138 0 120 0;
#X connect 139 0 122 0;
#X connect 140 0 141 0;
#X connect 142 0 144 0;
#X connect 142 1 145 0;
#X connect 143 0 142 0;
#X connect 144 0 116 0;
#X connect 144 0 118 0;
#X connect 145 0 117 0;
#X connect 145 0 119 0;
#X connect 146 0 138 1;
#X connect 147 0 138 1;
#X connect 148 0 139 1;
#X connect 149 0 139 1;
#X connect 150 0 152 0;
#X connect 150 1 153 0;
#X connect 151 0 150 0;
#X connect 152 0 146 0;
#X connect 152 0 148 0;
#X connect 153 0 147 0;
#X connect 153 0 149 0;
#X connect 154 0 155 0;
#X connect 155 0 156 0;
#X connect 156 0 158 0;
#X connect 156 0 159 0;
#X connect 158 0 129 0;
#X connect 159 0 128 0;
#X restore 246 664 pd pulsacio;
#N canvas 61 42 1095 647 espectre 0;
#X obj 970 -363 inlet;
#X obj 128 359 cos~;
#X floatatom 179 162 4 0 200 0 - - -;
#X obj 179 185 / 10;
#X text 149 67 center;
#X text 149 87 freq. (in;
#X text 149 107 tenths of;
#X text 149 127 fundamental);
#X floatatom 76 170 4 0 0 0 - - -;
#X text 16 107 fundamental;
#X text 16 126 (= mod freq);
#X text 259 184 index;
#X text 259 204 (percent);
#X floatatom 257 227 4 0 500 0 - - -;
#X obj 257 296 line~;
#X obj 207 316 *~;
#X obj 257 250 / 100;
#X obj 257 273 pack 0 50;
#X obj 128 336 +~;
#X text 208 338 modulating;
#X text 213 355 oscillator;
#X obj 128 406 hip~;
#X obj 179 234 *;
#X obj 179 211 t b f;
#X obj 207 293 osc~;
#X obj 128 300 phasor~;
#X text 77 286 carrier;
#X text 51 303 oscillator;
#X obj 127 440 *~ 0.5;
#X obj 458 324 cos~;
#X floatatom 509 127 4 0 200 0 - - -;
#X obj 509 150 / 10;
#X text 505 43 center;
#X text 505 63 freq. (in;
#X text 505 83 tenths of;
#X text 505 103 fundamental);
#X floatatom 406 135 4 0 0 0 - - -;
#X text 394 70 fundamental;
#X text 394 90 (= mod freq);
#X text 587 151 index;
#X text 587 171 (percent);
#X floatatom 587 192 4 0 500 0 - - -;
#X obj 587 261 line~;
#X obj 537 281 *~;
#X obj 587 215 / 100;
#X obj 587 238 pack 0 50;
#X obj 458 301 +~;
#X text 535 300 modulating;
#X text 540 317 oscillator;
#X obj 458 371 hip~;
#X obj 509 199 *;
#X obj 509 176 t b f;
#X obj 537 258 osc~;
#X obj 458 265 phasor~;
#X text 412 248 carrier;
#X text 386 265 oscillator;
#X obj 970 -159 + 1;
#X obj 724 340 cos~;
#X floatatom 775 143 4 0 200 0 - - -;
#X obj 775 166 / 10;
#X text 775 62 center;
#X text 775 82 freq. (in;
#X text 775 102 tenths of;
#X text 775 122 fundamental);
#X floatatom 672 151 4 0 0 0 - - -;
#X text 648 104 fundamental;
#X text 648 124 (= mod freq);
#X text 855 165 index;
#X text 855 185 (percent);
#X floatatom 853 208 4 0 500 0 - - -;
#X obj 853 277 line~;
#X obj 803 297 *~;
#X obj 853 231 / 100;
#X obj 853 254 pack 0 50;
#X obj 724 317 +~;
#X text 806 323 modulating;
#X text 811 340 oscillator;
#X obj 724 387 hip~;
#X obj 775 215 *;
#X obj 775 192 t b f;
#X obj 803 274 osc~;
#X obj 724 281 phasor~;
#X text 681 262 carrier;
#X text 655 279 oscillator;
#X obj 1054 305 cos~;
#X floatatom 1105 108 4 0 200 0 - - -;
#X obj 1105 131 / 10;
#X text 1105 27 center;
#X text 1105 47 freq. (in;
#X text 1105 67 tenths of;
#X text 1105 87 fundamental);
#X floatatom 1003 115 4 0 0 0 - - -;
#X text 979 68 fundamental;
#X text 979 88 (= mod freq);
#X text 1183 132 index;
#X text 1183 152 (percent);
#X floatatom 1183 173 4 0 500 0 - - -;
#X obj 1183 242 line~;
#X obj 1133 262 *~;
#X obj 1183 196 / 100;
#X obj 1183 219 pack 0 50;
#X obj 1054 282 +~;
#X text 1136 288 modulating;
#X text 1141 305 oscillator;
#X obj 1054 352 hip~;
#X obj 1105 180 *;
#X obj 1105 157 t b f;
#X obj 1133 239 osc~;
#X obj 1054 246 phasor~;
#X text 1001 232 carrier;
#X text 975 249 oscillator;
#X obj 970 -186 * 150;
#X obj 724 421 *~ 0.4;
#X obj 231 -167 * 2;
#X obj 266 -165 * 4;
#X obj 296 -166 * 8;
#X obj 331 -164 * 16;
#X obj 1363 280 cos~;
#X floatatom 1414 83 4 0 200 0 - - -;
#X obj 1414 106 / 10;
#X text 1414 2 center;
#X text 1414 22 freq. (in;
#X text 1414 42 tenths of;
#X text 1414 62 fundamental);
#X floatatom 1311 91 4 0 0 0 - - -;
#X text 1287 44 fundamental;
#X text 1287 64 (= mod freq);
#X text 1492 107 index;
#X text 1492 127 (percent);
#X floatatom 1492 148 4 0 500 0 - - -;
#X obj 1492 217 line~;
#X obj 1442 237 *~;
#X obj 1492 171 / 100;
#X obj 1492 194 pack 0 50;
#X obj 1363 257 +~;
#X text 1445 263 modulating;
#X text 1450 280 oscillator;
#X obj 1363 327 hip~;
#X obj 1414 155 *;
#X obj 1414 132 t b f;
#X obj 1442 214 osc~;
#X obj 1363 221 phasor~;
#X text 1312 203 carrier;
#X text 1294 224 oscillator;
#X obj 1363 391 *~ 0.3;
#X obj 668 -160 * 2;
#X obj 703 -158 * 4;
#X obj 733 -159 * 8;
#X obj 768 -157 * 16;
#X floatatom 668 -211 5 0 0 0 - - -;
#X obj 231 -338 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 459 405 *~ 0.5;
#X obj 1053 398 *~ 0.4;
#X obj 1139 -362 inlet;
#X obj 1309 -360 inlet;
#X obj 629 799 r volum-espectre;
#X obj 1309 -303 s volum-espectre;
#X obj 1139 -299 s vibrato;
#X obj 231 -316 random 4;
#N canvas 0 0 647 497 vibrato2 0;
#X obj 166 -110 outlet~;
#X obj 167 -326 inlet~;
#X obj 167 -138 *~;
#X obj 193 -173 +~;
#X obj 217 -205 line~;
#X msg 217 -239 \$1 50;
#X obj 289 -236 cycle~ 20;
#X obj 290 -208 +~ 0;
#X obj 289 -312 r vibrato;
#X obj 217 -327 loadbang;
#X msg 217 -292 0.7;
#X obj 289 -286 * 15;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X connect 7 0 3 1;
#X connect 8 0 11 0;
#X connect 9 0 10 0;
#X connect 10 0 5 0;
#X connect 11 0 6 0;
#X restore 920 814 pd vibrato2;
#X obj 736 901 send~ Espectre-outE;
#X obj 793 933 send~ Espectre-outD;
#X obj 231 -291 + 3;
#X obj 258 -291 + 4;
#X obj 231 -369 inlet;
#X text 230 -389 Fonamental;
#X text 660 -236 Centre Freq;
#X msg 565 690 0;
#X obj 620 646 sel 1 2;
#X msg 597 690 1;
#X msg 684 691 1;
#X msg 652 691 0;
#X obj 620 589 r stage-espectre;
#X obj 736 780 *~ 1;
#X obj 793 780 *~ 1;
#X obj 837 780 *~ 1;
#X obj 894 780 *~ 1;
#X obj 735 871 *~ 1;
#X obj 792 871 *~ 1;
#X text 968 -384 Size controla index;
#X text 1135 -384 Motion controla el vibrato;
#N canvas 29 21 647 497 vibrato1 0;
#X obj 166 -110 outlet~;
#X obj 167 -326 inlet~;
#X obj 167 -138 *~;
#X obj 193 -173 +~;
#X obj 217 -205 line~;
#X msg 217 -239 \$1 50;
#X obj 289 -236 cycle~ 20;
#X obj 290 -208 +~ 0;
#X obj 289 -312 r vibrato;
#X obj 217 -327 loadbang;
#X msg 217 -292 0.7;
#X obj 289 -286 * 15;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 2 1;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X connect 7 0 3 1;
#X connect 8 0 11 0;
#X connect 9 0 10 0;
#X connect 10 0 5 0;
#X connect 11 0 6 0;
#X restore 837 816 pd vibrato1;
#X obj 736 670 *~ 0.6;
#X obj 794 669 *~ 0.6;
#X connect 0 0 111 0;
#X connect 1 0 21 0;
#X connect 2 0 3 0;
#X connect 3 0 23 0;
#X connect 8 0 22 0;
#X connect 8 0 24 0;
#X connect 13 0 16 0;
#X connect 14 0 15 1;
#X connect 15 0 18 1;
#X connect 16 0 17 0;
#X connect 17 0 14 0;
#X connect 18 0 1 0;
#X connect 21 0 28 0;
#X connect 22 0 25 0;
#X connect 23 0 22 0;
#X connect 23 1 22 1;
#X connect 24 0 15 0;
#X connect 25 0 18 0;
#X connect 28 0 182 0;
#X connect 29 0 49 0;
#X connect 30 0 31 0;
#X connect 31 0 51 0;
#X connect 36 0 50 0;
#X connect 36 0 52 0;
#X connect 41 0 44 0;
#X connect 42 0 43 1;
#X connect 43 0 46 1;
#X connect 44 0 45 0;
#X connect 45 0 42 0;
#X connect 46 0 29 0;
#X connect 49 0 151 0;
#X connect 50 0 53 0;
#X connect 51 0 50 0;
#X connect 51 1 50 1;
#X connect 52 0 43 0;
#X connect 53 0 46 0;
#X connect 56 0 13 0;
#X connect 56 0 41 0;
#X connect 56 0 69 0;
#X connect 56 0 96 0;
#X connect 56 0 129 0;
#X connect 57 0 77 0;
#X connect 58 0 59 0;
#X connect 59 0 79 0;
#X connect 64 0 78 0;
#X connect 64 0 80 0;
#X connect 69 0 72 0;
#X connect 70 0 71 1;
#X connect 71 0 74 1;
#X connect 72 0 73 0;
#X connect 73 0 70 0;
#X connect 74 0 57 0;
#X connect 77 0 112 0;
#X connect 78 0 81 0;
#X connect 79 0 78 0;
#X connect 79 1 78 1;
#X connect 80 0 71 0;
#X connect 81 0 74 0;
#X connect 84 0 104 0;
#X connect 85 0 86 0;
#X connect 86 0 106 0;
#X connect 91 0 105 0;
#X connect 91 0 107 0;
#X connect 96 0 99 0;
#X connect 97 0 98 1;
#X connect 98 0 101 1;
#X connect 99 0 100 0;
#X connect 100 0 97 0;
#X connect 101 0 84 0;
#X connect 104 0 152 0;
#X connect 105 0 108 0;
#X connect 106 0 105 0;
#X connect 106 1 105 1;
#X connect 107 0 98 0;
#X connect 108 0 101 0;
#X connect 111 0 56 0;
#X connect 112 0 182 0;
#X connect 113 0 36 0;
#X connect 114 0 64 0;
#X connect 115 0 91 0;
#X connect 116 0 124 0;
#X connect 117 0 137 0;
#X connect 118 0 119 0;
#X connect 119 0 139 0;
#X connect 124 0 138 0;
#X connect 124 0 140 0;
#X connect 129 0 132 0;
#X connect 130 0 131 1;
#X connect 131 0 134 1;
#X connect 132 0 133 0;
#X connect 133 0 130 0;
#X connect 134 0 117 0;
#X connect 137 0 144 0;
#X connect 138 0 141 0;
#X connect 139 0 138 0;
#X connect 139 1 138 1;
#X connect 140 0 131 0;
#X connect 141 0 134 0;
#X connect 144 0 182 0;
#X connect 145 0 30 0;
#X connect 146 0 58 0;
#X connect 147 0 85 0;
#X connect 148 0 118 0;
#X connect 149 0 145 0;
#X connect 149 0 146 0;
#X connect 149 0 147 0;
#X connect 149 0 148 0;
#X connect 149 0 2 0;
#X connect 150 0 158 0;
#X connect 151 0 183 0;
#X connect 152 0 183 0;
#X connect 153 0 157 0;
#X connect 154 0 156 0;
#X connect 155 0 177 1;
#X connect 155 0 178 1;
#X connect 158 0 162 0;
#X connect 158 0 163 0;
#X connect 159 0 178 0;
#X connect 162 0 8 0;
#X connect 162 0 113 0;
#X connect 162 0 114 0;
#X connect 162 0 115 0;
#X connect 162 0 116 0;
#X connect 163 0 149 0;
#X connect 164 0 150 0;
#X connect 167 0 175 1;
#X connect 167 0 176 1;
#X connect 168 0 167 0;
#X connect 168 0 169 0;
#X connect 168 1 171 0;
#X connect 168 1 170 0;
#X connect 169 0 173 1;
#X connect 169 0 174 1;
#X connect 170 0 175 1;
#X connect 170 0 176 1;
#X connect 171 0 173 1;
#X connect 171 0 174 1;
#X connect 172 0 168 0;
#X connect 173 0 177 0;
#X connect 174 0 178 0;
#X connect 175 0 181 0;
#X connect 176 0 159 0;
#X connect 177 0 160 0;
#X connect 178 0 161 0;
#X connect 181 0 177 0;
#X connect 182 0 173 0;
#X connect 182 0 175 0;
#X connect 183 0 174 0;
#X connect 183 0 176 0;
#X restore 521 660 pd espectre;
#X obj 829 307 unpack f f f;
#X floatatom 801 353 5 0 0 0 - - -;
#X text 798 333 Stage;
#X floatatom 858 353 5 0 0 0 - - -;
#X floatatom 927 352 5 0 0 0 - - -;
#X text 854 332 Motion;
#X text 927 331 Size;
#X obj 801 408 sel 1 2;
#X obj 447 237 s current-shape;
#X obj 428 270 s gate4;
#X obj 829 282 r gate4;
#N canvas 92 71 529 442 AUDIO-OUT 0;
#X obj 10 196 *~ 0.5;
#X obj -91 197 *~ 0.5;
#X obj -49 243 dac~;
#X obj 115 150 / 100;
#X obj 115 114 inlet;
#X obj -123 148 receive~ Seq-outE;
#X obj -4 148 receive~ Seq-outD;
#X obj -140 75 receive~ Espectre-outE;
#X obj 18 75 receive~ Espectre-outD;
#X obj -131 18 receive~ Notesreverb-outE;
#X obj 41 19 receive~ Notesreverb-outD;
#X obj -89 -12 receive~ pulsacio-outE;
#X obj 83 -11 receive~ pulsacio-outD;
#X connect 0 0 2 1;
#X connect 1 0 2 0;
#X connect 3 0 0 1;
#X connect 3 0 1 1;
#X connect 4 0 3 0;
#X connect 5 0 1 0;
#X connect 6 0 0 0;
#X connect 7 0 1 0;
#X connect 8 0 0 0;
#X connect 9 0 1 0;
#X connect 10 0 0 0;
#X connect 11 0 1 0;
#X connect 12 0 0 0;
#X restore -54 260 pd AUDIO-OUT;
#X floatatom -54 233 5 0 100 0 - - -;
#X msg -54 204 100;
#X obj 568 281 r gate3;
#X obj 417 297 s gate3;
#X obj 785 591 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 812 592 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 785 522 r current-shape;
#X obj 785 551 sel 4;
#X obj 503 631 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 503 562 r current-shape;
#X obj 503 591 sel 3;
#X obj 612 565 r current-shape;
#X obj 612 594 sel 3;
#X msg 612 620 1;
#X msg 639 621 0;
#X obj 480 386 s stage-espectre;
#X obj 255 292 r gate2;
#X obj 44 289 r gate1;
#X obj 395 336 s gate1;
#X obj 406 366 s gate2;
#X obj 328 549 r current-shape;
#X msg 328 604 1;
#X msg 355 605 0;
#X obj 328 578 sel 2;
#X connect 0 0 11 0;
#X connect 3 0 5 0;
#X connect 3 0 68 0;
#X connect 4 0 2 0;
#X connect 5 0 2 0;
#X connect 5 0 46 0;
#X connect 7 0 8 0;
#X connect 10 0 9 0;
#X connect 11 0 4 0;
#X connect 11 1 7 0;
#X connect 11 2 10 0;
#X connect 11 3 12 0;
#X connect 12 0 29 1;
#X connect 12 1 1 0;
#X connect 13 0 14 0;
#X connect 13 1 16 0;
#X connect 13 2 17 0;
#X connect 14 0 27 0;
#X connect 16 0 23 1;
#X connect 17 0 22 1;
#X connect 22 0 21 0;
#X connect 23 0 21 1;
#X connect 24 0 22 0;
#X connect 25 0 23 0;
#X connect 26 0 23 0;
#X connect 27 0 24 0;
#X connect 27 0 26 0;
#X connect 27 0 21 2;
#X connect 27 1 24 0;
#X connect 27 1 25 0;
#X connect 28 0 29 0;
#X connect 28 0 63 0;
#X connect 29 0 85 0;
#X connect 29 1 86 0;
#X connect 29 2 70 0;
#X connect 29 3 64 0;
#X connect 30 0 31 0;
#X connect 30 1 33 0;
#X connect 30 2 34 0;
#X connect 31 0 53 0;
#X connect 33 0 53 2;
#X connect 34 0 53 1;
#X connect 38 0 39 0;
#X connect 38 1 41 0;
#X connect 38 2 42 0;
#X connect 39 0 52 0;
#X connect 39 0 82 0;
#X connect 41 0 48 1;
#X connect 42 0 47 1;
#X connect 46 0 28 0;
#X connect 47 0 54 1;
#X connect 48 0 54 2;
#X connect 49 0 47 0;
#X connect 50 0 48 0;
#X connect 51 0 48 0;
#X connect 52 0 49 0;
#X connect 52 0 51 0;
#X connect 52 1 50 0;
#X connect 55 0 56 0;
#X connect 55 1 58 0;
#X connect 55 2 59 0;
#X connect 56 0 62 0;
#X connect 58 0 37 4;
#X connect 59 0 37 3;
#X connect 62 0 37 2;
#X connect 62 1 37 2;
#X connect 65 0 55 0;
#X connect 67 0 66 0;
#X connect 68 0 67 0;
#X connect 69 0 38 0;
#X connect 71 0 37 0;
#X connect 72 0 37 1;
#X connect 73 0 74 0;
#X connect 74 0 71 0;
#X connect 74 1 72 0;
#X connect 75 0 54 0;
#X connect 76 0 77 0;
#X connect 77 0 75 0;
#X connect 78 0 79 0;
#X connect 79 0 80 0;
#X connect 79 1 81 0;
#X connect 80 0 54 3;
#X connect 81 0 54 3;
#X connect 83 0 30 0;
#X connect 84 0 13 0;
#X connect 87 0 90 0;
#X connect 88 0 53 3;
#X connect 89 0 53 3;
#X connect 90 0 88 0;
#X connect 90 1 89 0;
sitplus-data 1.0.3-5.1build5 / usr / share / sitplus / pd / ballon.pd
