diff options
| author | Davide Morelli <morellid@users.sourceforge.net> | 2005-12-08 16:32:22 +0000 |
|---|---|---|
| committer | Davide Morelli <morellid@users.sourceforge.net> | 2005-12-08 16:32:22 +0000 |
| commit | b25f226536efda8462316c452daccf4a41231b43 (patch) | |
| tree | 295e14ef0d3c0269914b497f9be10e2c085e3064 | |
| parent | ac33aae33bcd8e334755dfa6a725ffbb51a84931 (diff) | |
adding example
svn path=/trunk/externals/frankenstein/; revision=4172
| -rwxr-xr-x | patches/sampleplayer.pd | 80 | ||||
| -rwxr-xr-x | patches/test-GArhythm.pd | 999 |
2 files changed, 1079 insertions, 0 deletions
diff --git a/patches/sampleplayer.pd b/patches/sampleplayer.pd new file mode 100755 index 0000000..adf6c9d --- /dev/null +++ b/patches/sampleplayer.pd @@ -0,0 +1,80 @@ +#N canvas -35 33 1009 703 12;
+#X obj 476 599 outlet~;
+#X obj 504 481 line~;
+#X obj 402 281 line~;
+#X obj 476 548 *~;
+#X msg 424 142 bang;
+#X obj 425 192 delay 5;
+#X text 477 142 <-- play the sample;
+#X text 349 223 sound off;
+#X msg 393 245 0 5;
+#X msg 612 32 1 \, 4.41e+008 1e+007 \;;
+#X msg 428 244 1 5;
+#X text 617 9 set line to play sample;
+#X obj 476 574 *~ 1;
+#X obj 394 42 table \$1-sampletable;
+#X obj 476 520 tabread4~ \$1-sampletable;
+#X obj 712 257 openpanel;
+#X obj 712 416 soundfiler;
+#X msg 712 230 bang;
+#X text 756 230 read file;
+#X obj 712 283 t s b;
+#X obj 751 318 symbol \$1-sampletable;
+#X msg 712 387 read -resize \$1 \$2;
+#X obj 712 356 pack s s;
+#X obj 713 196 inlet;
+#X obj 400 92 inlet;
+#X obj 103 139 inlet;
+#X obj 760 68 inlet;
+#X obj 658 196 symbol;
+#X obj 689 499 outlet;
+#X obj 172 141 inlet;
+#X obj 278 191 delay 10000;
+#X obj 492 418 pack 0 0;
+#X obj 551 388 * 4.41e+008;
+#X msg 492 283 bang;
+#X msg 501 449 \$1 \, \$2 1e+007 \;;
+#X obj 492 336 int 1;
+#X obj 250 142 inlet;
+#X obj 304 140 inlet;
+#X obj 551 336 float 1;
+#X obj 602 298 / 100;
+#X connect 1 0 14 0;
+#X connect 2 0 3 1;
+#X connect 3 0 12 0;
+#X connect 4 0 5 0;
+#X connect 4 0 8 0;
+#X connect 4 0 30 0;
+#X connect 5 0 9 0;
+#X connect 5 0 10 0;
+#X connect 5 0 33 0;
+#X connect 8 0 2 0;
+#X connect 10 0 2 0;
+#X connect 12 0 0 0;
+#X connect 14 0 3 0;
+#X connect 15 0 19 0;
+#X connect 15 0 28 0;
+#X connect 17 0 15 0;
+#X connect 19 0 22 0;
+#X connect 19 1 20 0;
+#X connect 20 0 22 1;
+#X connect 21 0 16 0;
+#X connect 22 0 21 0;
+#X connect 23 0 17 0;
+#X connect 24 0 4 0;
+#X connect 25 0 12 1;
+#X connect 26 0 27 0;
+#X connect 27 0 19 0;
+#X connect 27 0 28 0;
+#X connect 29 0 30 1;
+#X connect 30 0 8 0;
+#X connect 31 0 34 0;
+#X connect 32 0 31 1;
+#X connect 33 0 35 0;
+#X connect 33 0 38 0;
+#X connect 34 0 1 0;
+#X connect 35 0 31 0;
+#X connect 36 0 35 1;
+#X connect 37 0 39 0;
+#X connect 38 0 32 0;
+#X connect 39 0 38 0;
diff --git a/patches/test-GArhythm.pd b/patches/test-GArhythm.pd new file mode 100755 index 0000000..200736e --- /dev/null +++ b/patches/test-GArhythm.pd @@ -0,0 +1,999 @@ +#N canvas 0 0 1011 709 12;
+#X obj 22 629 dac~;
+#N canvas 4 65 458 308 perc 0;
+#X obj 351 17 inlet;
+#X obj 158 250 outlet~;
+#X obj 168 45 noise~;
+#X obj 180 190 line 0 50;
+#X obj 158 216 *~;
+#X msg 310 137 0 50;
+#X obj 156 112 *~ 0.5;
+#X msg 262 96 1 10;
+#X obj 316 90 delay 50;
+#X connect 0 0 7 0;
+#X connect 0 0 8 0;
+#X connect 2 0 6 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 3 0;
+#X connect 6 0 4 0;
+#X connect 7 0 3 0;
+#X connect 8 0 5 0;
+#X restore 53 459 pd perc;
+#X obj 54 441 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 361 183 metro;
+#N canvas 1 23 466 316 msecs 0;
+#X obj 58 19 inlet;
+#X obj 61 209 outlet;
+#X obj 57 147 /;
+#X obj 57 100 bang;
+#X obj 73 79 t f f;
+#X obj 57 174 / 4;
+#X msg 57 122 60000;
+#X connect 0 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 6 0;
+#X connect 4 0 3 0;
+#X connect 4 1 2 1;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X restore 425 154 pd msecs;
+#X obj 424 80 loadbang;
+#X msg 425 101 60;
+#X obj 361 160 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#N canvas 0 0 490 340 graph2 0;
+#X obj 122 9 inlet;
+#X obj 362 255 outlet;
+#X obj 171 33 int;
+#X obj 204 31 + 1;
+#X obj 185 57 % 4;
+#X obj 168 78 sel 0;
+#X obj 168 105 bng 15 250 50 0 empty empty beat 0 -6 0 8 -262144 -1
+-1;
+#X obj 263 86 sel 0;
+#X obj 264 108 bng 15 250 50 0 empty empty bar 0 -6 0 8 -262144 -1
+-1;
+#X obj 262 63 % 16;
+#X obj 69 278 hradio 10 1 0 16 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X obj 70 64 / 2;
+#X obj 71 87 int;
+#X obj 72 111 hradio 10 1 0 2 empty empty 1/8 0 -6 0 8 -262144 -1 -1
+0;
+#X obj 342 78 int;
+#X obj 73 220 hradio 10 1 0 4 empty empty 1/4 0 -6 0 8 -262144 -1 -1
+0;
+#X obj 341 55 / 4;
+#X obj 70 167 hradio 10 1 0 4 empty empty 1/16 0 -6 0 8 -262144 -1
+-1 0;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 2 1;
+#X connect 3 0 4 0;
+#X connect 3 0 9 0;
+#X connect 4 0 5 0;
+#X connect 4 0 17 0;
+#X connect 4 0 11 0;
+#X connect 5 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 7 0;
+#X connect 9 0 10 0;
+#X connect 9 0 16 0;
+#X connect 9 0 1 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 14 0 15 0;
+#X connect 16 0 14 0;
+#X coords 0 1 100 -1 200 140 1;
+#X restore 381 242 graph;
+#X floatatom 447 179 5 0 0 0 - - -;
+#X obj 475 424 t a a;
+#X obj 470 450 bang;
+#X obj 373 221 delay;
+#X obj 408 200 / 2;
+#N canvas 65 11 799 687 instr_bass 0;
+#X obj 72 43 inlet;
+#X obj 249 569 throw~ mainL;
+#X obj 355 563 throw~ mainR;
+#X obj 81 80 int;
+#X obj 45 132 select 1;
+#X obj 146 179 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 238 34 inlet;
+#X obj 223 299 bng 25 250 50 0 empty empty play 30 10 0 8 -258699 -241291
+-1;
+#X obj 253 322 bng 25 250 50 0 empty empty load 30 10 0 8 -258699 -241291
+-1;
+#X obj 223 276 r channel1;
+#X obj 136 382 sampleplayer 1;
+#X msg 250 356 samples/BD01.WAV;
+#X obj 401 522 outlet~;
+#X obj 96 214 r sampleinit;
+#X floatatom 62 338 5 0 0 0 - - -;
+#X text 57 320 length;
+#X floatatom 63 361 5 0 0 0 - - -;
+#X text 56 379 volume;
+#X floatatom 110 338 5 0 0 0 - - -;
+#X floatatom 159 338 5 0 0 0 - - -;
+#X text 159 318 pitch;
+#X text 111 319 start;
+#X obj 250 413 s lastload;
+#X msg 100 290 1;
+#X msg 62 290 440;
+#X msg 137 290 100;
+#X obj 337 509 *~ 0;
+#X obj 520 119 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 7620 1;
+#X obj 504 46 loadbang;
+#X obj 509 350 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 577 382 pd varia;
+#X obj 637 358 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X floatatom 583 435 5 0 0 0 - - -;
+#X msg 509 373 0.005;
+#X obj 542 462 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 610 494 pd varia;
+#X obj 670 470 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X floatatom 619 546 5 0 0 0 - - -;
+#X obj 609 521 * 20;
+#X msg 542 485 0.025;
+#X obj 300 460 bp~ 100 20;
+#X obj 576 409 * 100;
+#X msg 506 70 0.6;
+#X obj 81 104 tabread proposed1;
+#X connect 0 0 3 0;
+#X connect 3 0 43 0;
+#X connect 4 0 5 0;
+#X connect 4 0 7 0;
+#X connect 6 0 7 0;
+#X connect 7 0 10 4;
+#X connect 8 0 10 5;
+#X connect 9 0 7 0;
+#X connect 10 0 26 0;
+#X connect 10 1 22 0;
+#X connect 11 0 10 6;
+#X connect 13 0 11 0;
+#X connect 13 0 24 0;
+#X connect 13 0 23 0;
+#X connect 13 0 25 0;
+#X connect 14 0 10 1;
+#X connect 16 0 10 0;
+#X connect 18 0 10 2;
+#X connect 19 0 10 3;
+#X connect 23 0 18 0;
+#X connect 24 0 14 0;
+#X connect 25 0 19 0;
+#X connect 26 0 1 0;
+#X connect 26 0 2 0;
+#X connect 26 0 12 0;
+#X connect 27 0 26 1;
+#X connect 28 0 42 0;
+#X connect 29 0 33 0;
+#X connect 30 0 41 0;
+#X connect 31 0 30 1;
+#X connect 33 0 30 0;
+#X connect 34 0 39 0;
+#X connect 35 0 38 0;
+#X connect 36 0 35 1;
+#X connect 38 0 37 0;
+#X connect 38 0 40 2;
+#X connect 39 0 35 0;
+#X connect 41 0 32 0;
+#X connect 41 0 40 1;
+#X connect 42 0 27 0;
+#X connect 43 0 4 0;
+#X restore 325 431 pd instr_bass;
+#N canvas 65 11 787 675 instr_high 0;
+#X obj 72 43 inlet;
+#X obj 150 594 throw~ mainL;
+#X obj 274 591 throw~ mainR;
+#X obj 81 80 int;
+#X obj 45 132 select 1;
+#X obj 146 179 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 260 44 inlet;
+#X obj 229 309 bng 25 250 50 0 empty empty play 30 10 0 8 -258699 -241291
+-1;
+#X obj 259 332 bng 25 250 50 0 empty empty load 30 10 0 8 -258699 -241291
+-1;
+#X obj 378 570 outlet~;
+#X obj 106 227 r sampleinit;
+#X floatatom 68 348 5 0 0 0 - - -;
+#X text 63 330 length;
+#X floatatom 69 371 5 0 0 0 - - -;
+#X text 62 389 volume;
+#X floatatom 116 348 5 0 0 0 - - -;
+#X floatatom 165 348 5 0 0 0 - - -;
+#X text 165 328 pitch;
+#X text 117 329 start;
+#X obj 249 420 s lastload;
+#X msg 106 300 1;
+#X msg 68 300 440;
+#X obj 142 392 sampleplayer 2;
+#X obj 229 286 r channel2;
+#X msg 143 300 100;
+#X msg 256 366 samples/SD01.WAV;
+#X obj 250 525 *~ 0;
+#X obj 523 151 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 5080 1;
+#X obj 504 46 loadbang;
+#X obj 475 365 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 543 397 pd varia;
+#X obj 603 373 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X obj 266 477 bp~ 100 20;
+#X floatatom 549 450 5 0 0 0 - - -;
+#X obj 542 424 * 8000;
+#X msg 475 388 0.005;
+#X obj 508 477 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 576 509 pd varia;
+#X obj 636 485 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X floatatom 585 561 5 0 0 0 - - -;
+#X obj 575 536 * 20;
+#X msg 508 500 0.025;
+#X msg 506 70 0.4;
+#X obj 81 104 tabread proposed2;
+#X connect 0 0 3 0;
+#X connect 3 0 43 0;
+#X connect 4 0 5 0;
+#X connect 4 0 7 0;
+#X connect 6 0 7 0;
+#X connect 7 0 22 4;
+#X connect 8 0 22 5;
+#X connect 10 0 25 0;
+#X connect 10 0 21 0;
+#X connect 10 0 20 0;
+#X connect 10 0 24 0;
+#X connect 11 0 22 1;
+#X connect 13 0 22 0;
+#X connect 15 0 22 2;
+#X connect 16 0 22 3;
+#X connect 20 0 15 0;
+#X connect 21 0 11 0;
+#X connect 22 0 26 0;
+#X connect 22 1 19 0;
+#X connect 23 0 7 0;
+#X connect 24 0 16 0;
+#X connect 25 0 22 6;
+#X connect 26 0 9 0;
+#X connect 26 0 1 0;
+#X connect 26 0 2 0;
+#X connect 27 0 26 1;
+#X connect 28 0 42 0;
+#X connect 29 0 35 0;
+#X connect 30 0 34 0;
+#X connect 31 0 30 1;
+#X connect 34 0 32 1;
+#X connect 34 0 33 0;
+#X connect 35 0 30 0;
+#X connect 36 0 41 0;
+#X connect 37 0 40 0;
+#X connect 38 0 37 1;
+#X connect 40 0 32 2;
+#X connect 40 0 39 0;
+#X connect 41 0 37 0;
+#X connect 42 0 27 0;
+#X connect 43 0 4 0;
+#X restore 325 454 pd instr_high;
+#N canvas 48 52 595 565 metro 0;
+#X obj 64 231 throw~ mainL;
+#X obj 186 232 throw~ mainR;
+#X obj 83 33 inlet;
+#X obj 82 87 bang;
+#N canvas 4 65 458 308 perc 0;
+#X obj 351 17 inlet;
+#X obj 158 250 outlet~;
+#X obj 168 45 noise~;
+#X obj 180 190 line 0 50;
+#X obj 158 216 *~;
+#X msg 310 137 0 50;
+#X msg 262 96 1 10;
+#X obj 316 90 delay 50;
+#X obj 156 113 *~ 0.1;
+#X connect 0 0 6 0;
+#X connect 0 0 7 0;
+#X connect 2 0 8 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 3 0;
+#X connect 6 0 3 0;
+#X connect 7 0 5 0;
+#X connect 8 0 4 0;
+#X restore 83 149 pd perc;
+#X obj 103 185 *~ 0.3;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 0 0;
+#X restore 325 410 pd metro;
+#X obj 118 514 catch~ mainL;
+#X obj 118 536 catch~ mainR;
+#N canvas 23 68 811 352 capture 0;
+#X obj 713 29 inlet;
+#X obj 148 224 int;
+#X msg 58 204 1;
+#X obj 68 179 t a a;
+#X obj 101 200 bang;
+#X obj 43 247 tabwrite played1;
+#X obj 59 145 inlet;
+#X obj 305 227 int;
+#X msg 215 207 1;
+#X obj 225 182 t a a;
+#X obj 258 203 bang;
+#X obj 216 148 inlet;
+#X obj 458 227 int;
+#X msg 368 207 1;
+#X obj 378 182 t a a;
+#X obj 411 203 bang;
+#X obj 369 148 inlet;
+#X obj 607 227 int;
+#X msg 517 207 1;
+#X obj 527 182 t a a;
+#X obj 560 203 bang;
+#X obj 518 148 inlet;
+#X obj 200 250 tabwrite played2;
+#X obj 354 250 tabwrite played3;
+#X obj 502 250 tabwrite played4;
+#X connect 0 0 1 1;
+#X connect 0 0 7 1;
+#X connect 0 0 12 1;
+#X connect 0 0 17 1;
+#X connect 1 0 5 1;
+#X connect 2 0 5 0;
+#X connect 3 0 2 0;
+#X connect 3 1 4 0;
+#X connect 4 0 1 0;
+#X connect 6 0 3 0;
+#X connect 7 0 22 1;
+#X connect 8 0 22 0;
+#X connect 9 0 8 0;
+#X connect 9 1 10 0;
+#X connect 10 0 7 0;
+#X connect 11 0 9 0;
+#X connect 12 0 23 1;
+#X connect 13 0 23 0;
+#X connect 14 0 13 0;
+#X connect 14 1 15 0;
+#X connect 15 0 12 0;
+#X connect 16 0 14 0;
+#X connect 17 0 24 1;
+#X connect 18 0 24 0;
+#X connect 19 0 18 0;
+#X connect 19 1 20 0;
+#X connect 20 0 17 0;
+#X connect 21 0 19 0;
+#X restore 135 484 pd capture;
+#X text 37 224 this delay is to center the quantization;
+#X obj 426 130 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0
+10 -258699 -1 -1 60 256;
+#X text 29 30 test1: detect rhythmic pattern and proposes a counterpoint
+;
+#X obj 476 397 select 0;
+#N canvas 0 0 454 304 valori 0;
+#X obj 57 40 inlet;
+#X obj 136 42 inlet;
+#X obj 229 42 inlet;
+#X obj 58 215 outlet;
+#X msg 60 112 variazione \$1;
+#X msg 135 74 riempimento \$1;
+#X msg 231 133 aderenza \$1;
+#X connect 0 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 6 0;
+#X connect 4 0 3 0;
+#X connect 5 0 3 0;
+#X connect 6 0 3 0;
+#X restore 698 378 pd valori;
+#X obj 678 220 vsl 15 128 0 1 0 0 empty empty variazione 0 -8 0 8 -262144
+-1 -1 0 1;
+#X obj 730 226 vsl 15 128 0 1 0 0 empty empty riempimento 0 -8 0 8
+-262144 -1 -1 0 1;
+#X obj 788 239 vsl 15 128 0 1 0 0 empty empty aderenza 0 -8 0 8 -262144
+-1 -1 10160 1;
+#N canvas 0 4 458 308 ritmino 0;
+#X obj 216 31 inlet;
+#X obj 201 268 outlet;
+#X obj 48 131 select 0;
+#X obj 131 135 select 3;
+#X obj 211 136 select 6;
+#X obj 200 238 bang;
+#X obj 307 133 select 8;
+#X connect 0 0 2 0;
+#X connect 0 0 3 0;
+#X connect 0 0 4 0;
+#X connect 0 0 6 0;
+#X connect 2 0 5 0;
+#X connect 3 0 5 0;
+#X connect 4 0 5 0;
+#X connect 5 0 1 0;
+#X connect 6 0 5 0;
+#X restore 58 412 pd ritmino;
+#X floatatom 665 357 5 0 0 0 - - -;
+#X floatatom 719 359 5 0 0 0 - - -;
+#X floatatom 786 371 5 0 0 0 - - -;
+#X obj 460 101 s sampleinit;
+#X obj 59 507 *~ 1;
+#X obj 22 431 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 1270 1;
+#X obj 19 351 loadbang;
+#X obj 285 385 t a a a a a a a;
+#N canvas 65 11 783 671 instr3 0;
+#X obj 72 43 inlet;
+#X obj 242 561 throw~ mainL;
+#X obj 366 558 throw~ mainR;
+#X obj 81 80 int;
+#X obj 45 132 select 1;
+#X obj 146 179 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 260 44 inlet;
+#X obj 229 309 bng 25 250 50 0 empty empty play 30 10 0 8 -258699 -241291
+-1;
+#X obj 259 332 bng 25 250 50 0 empty empty load 30 10 0 8 -258699 -241291
+-1;
+#X obj 470 537 outlet~;
+#X obj 106 227 r sampleinit;
+#X floatatom 68 348 5 0 0 0 - - -;
+#X text 63 330 length;
+#X floatatom 69 371 5 0 0 0 - - -;
+#X text 62 389 volume;
+#X floatatom 116 348 5 0 0 0 - - -;
+#X floatatom 165 348 5 0 0 0 - - -;
+#X text 165 328 pitch;
+#X text 117 329 start;
+#X obj 249 420 s lastload;
+#X msg 106 300 1;
+#X msg 68 300 440;
+#X obj 229 286 r channel2;
+#X msg 143 300 100;
+#X obj 287 502 *~ 0;
+#X obj 523 151 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 5080 1;
+#X obj 504 46 loadbang;
+#X msg 256 366 samples/claps.WAV;
+#X obj 142 392 sampleplayer 3;
+#X obj 288 461 bp~ 100 20;
+#X obj 513 339 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 581 371 pd varia;
+#X obj 641 347 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X floatatom 587 424 5 0 0 0 - - -;
+#X obj 580 398 * 8000;
+#X msg 513 362 0.005;
+#X obj 546 451 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 614 483 pd varia;
+#X obj 674 459 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X floatatom 623 535 5 0 0 0 - - -;
+#X obj 613 510 * 20;
+#X msg 546 474 0.025;
+#X msg 506 70 0.4;
+#X obj 81 104 tabread proposed3;
+#X connect 0 0 3 0;
+#X connect 3 0 43 0;
+#X connect 4 0 5 0;
+#X connect 4 0 7 0;
+#X connect 6 0 7 0;
+#X connect 7 0 28 4;
+#X connect 8 0 28 5;
+#X connect 10 0 27 0;
+#X connect 10 0 21 0;
+#X connect 10 0 20 0;
+#X connect 10 0 23 0;
+#X connect 11 0 28 1;
+#X connect 13 0 28 0;
+#X connect 15 0 28 2;
+#X connect 16 0 28 3;
+#X connect 20 0 15 0;
+#X connect 21 0 11 0;
+#X connect 22 0 7 0;
+#X connect 23 0 16 0;
+#X connect 24 0 9 0;
+#X connect 24 0 1 0;
+#X connect 24 0 2 0;
+#X connect 25 0 24 1;
+#X connect 26 0 42 0;
+#X connect 27 0 28 6;
+#X connect 28 0 24 0;
+#X connect 28 1 19 0;
+#X connect 30 0 35 0;
+#X connect 31 0 34 0;
+#X connect 32 0 31 1;
+#X connect 34 0 33 0;
+#X connect 34 0 29 1;
+#X connect 35 0 31 0;
+#X connect 36 0 41 0;
+#X connect 37 0 40 0;
+#X connect 38 0 37 1;
+#X connect 40 0 39 0;
+#X connect 40 0 29 2;
+#X connect 41 0 37 0;
+#X connect 42 0 25 0;
+#X connect 43 0 4 0;
+#X restore 325 479 pd instr3;
+#N canvas 65 11 775 663 instr4 0;
+#X obj 72 43 inlet;
+#X obj 242 561 throw~ mainL;
+#X obj 366 558 throw~ mainR;
+#X obj 81 80 int;
+#X obj 45 132 select 1;
+#X obj 146 179 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 260 44 inlet;
+#X obj 229 309 bng 25 250 50 0 empty empty play 30 10 0 8 -258699 -241291
+-1;
+#X obj 259 332 bng 25 250 50 0 empty empty load 30 10 0 8 -258699 -241291
+-1;
+#X obj 470 537 outlet~;
+#X obj 106 227 r sampleinit;
+#X floatatom 68 348 5 0 0 0 - - -;
+#X text 63 330 length;
+#X floatatom 69 371 5 0 0 0 - - -;
+#X text 62 389 volume;
+#X floatatom 116 348 5 0 0 0 - - -;
+#X floatatom 165 348 5 0 0 0 - - -;
+#X text 165 328 pitch;
+#X text 117 329 start;
+#X obj 249 420 s lastload;
+#X msg 106 300 1;
+#X msg 68 300 440;
+#X obj 229 286 r channel2;
+#X msg 143 300 100;
+#X obj 294 505 *~ 0;
+#X obj 523 151 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 7620 1;
+#X obj 504 46 loadbang;
+#X obj 142 392 sampleplayer 4;
+#X msg 255 365 samples/SHAKE1.WAV;
+#X obj 529 338 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 597 370 pd varia;
+#X obj 657 346 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X floatatom 603 423 5 0 0 0 - - -;
+#X obj 596 397 * 8000;
+#X msg 529 361 0.005;
+#X obj 562 450 loadbang;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 630 482 pd varia;
+#X obj 690 458 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X floatatom 639 534 5 0 0 0 - - -;
+#X obj 629 509 * 20;
+#X msg 562 473 0.025;
+#X obj 316 454 bp~ 100 20;
+#X msg 506 70 0.6;
+#X obj 81 104 tabread proposed4;
+#X connect 0 0 3 0;
+#X connect 3 0 43 0;
+#X connect 4 0 5 0;
+#X connect 4 0 7 0;
+#X connect 6 0 7 0;
+#X connect 7 0 27 4;
+#X connect 8 0 27 5;
+#X connect 10 0 28 0;
+#X connect 10 0 21 0;
+#X connect 10 0 20 0;
+#X connect 10 0 23 0;
+#X connect 11 0 27 1;
+#X connect 13 0 27 0;
+#X connect 15 0 27 2;
+#X connect 16 0 27 3;
+#X connect 20 0 15 0;
+#X connect 21 0 11 0;
+#X connect 22 0 7 0;
+#X connect 23 0 16 0;
+#X connect 24 0 9 0;
+#X connect 24 0 1 0;
+#X connect 24 0 2 0;
+#X connect 25 0 24 1;
+#X connect 26 0 42 0;
+#X connect 27 0 24 0;
+#X connect 27 1 19 0;
+#X connect 28 0 27 6;
+#X connect 29 0 34 0;
+#X connect 30 0 33 0;
+#X connect 31 0 30 1;
+#X connect 33 0 32 0;
+#X connect 33 0 41 1;
+#X connect 34 0 30 0;
+#X connect 35 0 40 0;
+#X connect 36 0 39 0;
+#X connect 37 0 36 1;
+#X connect 39 0 38 0;
+#X connect 39 0 41 2;
+#X connect 40 0 36 0;
+#X connect 42 0 25 0;
+#X connect 43 0 4 0;
+#X restore 325 503 pd instr4;
+#X obj 72 590 *~;
+#X obj 158 565 vsl 15 40 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 3120 1;
+#X obj 104 588 *~;
+#X obj 190 565 loadbang;
+#X obj 109 72 loadbang;
+#X msg 109 95 0.001;
+#X obj 178 130 + 1;
+#X obj 812 155 loadbang;
+#X obj 177 154 * 50;
+#X obj 891 341 loadbang;
+#X msg 848 244 0.8;
+#N canvas 263 354 478 328 varia 0;
+#X obj 244 46 inlet;
+#X obj 135 193 outlet;
+#X obj 137 94 osc~ 0.001;
+#X obj 137 119 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 136 168 / 2;
+#X obj 131 48 inlet;
+#X obj 137 142 + 1;
+#X connect 0 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 0;
+#X connect 6 0 2 0;
+#X connect 7 0 5 0;
+#X restore 177 104 pd varia;
+#N canvas 186 160 510 360 varia2 0;
+#X obj 244 46 inlet;
+#X obj 94 275 outlet;
+#X obj 84 172 snapshot~;
+#X obj 244 110 metro 100;
+#X obj 60 53 inlet;
+#X obj 226 230 table varia2;
+#X obj 47 236 tabread varia2;
+#X obj 45 201 * 100;
+#X obj 53 121 phasor~ 0.01;
+#X connect 0 0 3 0;
+#X connect 2 0 7 0;
+#X connect 3 0 2 0;
+#X connect 4 0 8 0;
+#X connect 6 0 1 0;
+#X connect 7 0 6 0;
+#X connect 8 0 2 0;
+#X restore 823 203 pd varia2;
+#X msg 811 178 0.01;
+#X obj 237 80 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0 1
+;
+#X obj 890 182 tgl 15 0 empty empty empty 0 -6 0 8 -258699 -1 -1 0
+1;
+#X msg 21 375 0.1;
+#X msg 192 588 0.8;
+#N canvas 26 13 993 549 tables 0;
+#N canvas 0 0 450 300 graph1 0;
+#X array played1 16 float 1;
+#A 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 101 20 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 16 float 1;
+#A 0 1 0 0 1 0 0 1 0 1 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 494 25 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array proposed1 16 float 1;
+#A 0 1 0 0 1 1 0 1 0 1 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 483 257 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array proposed2 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 482 307 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array proposed3 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 482 354 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array proposed4 16 float 1;
+#A 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 482 401 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array played2 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 100 68 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 492 76 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array played3 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 97 117 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array src3 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 492 126 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array played4 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 96 168 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array src4 16 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1.5 15 -0.5 200 40 1;
+#X restore 491 178 graph;
+#X restore 303 104 pd tables;
+#X obj 380 599 GArhythm src1 src2 src3 src4 proposed1 proposed2 proposed3
+proposed4;
+#N canvas 0 0 454 304 avg_rhythms 0;
+#X obj 41 76 bang;
+#X obj 46 104 ritmo1 played1 src1;
+#X obj 45 125 ritmo1 played2 src2;
+#X obj 46 146 ritmo1 played3 src3;
+#X obj 45 165 ritmo1 played4 src4;
+#X obj 116 44 inlet;
+#X connect 0 0 1 0;
+#X connect 0 0 2 0;
+#X connect 0 0 3 0;
+#X connect 0 0 4 0;
+#X connect 5 0 0 0;
+#X restore 510 452 pd avg_rhythms;
+#N canvas 0 0 458 308 audio2bang 0;
+#X obj 54 38 inlet~;
+#X obj 53 61 bonk~ 64;
+#X obj 69 117 outlet;
+#X obj 155 42 inlet~;
+#X obj 154 65 bonk~ 64;
+#X obj 170 121 outlet;
+#X obj 240 41 inlet~;
+#X obj 239 64 bonk~ 64;
+#X obj 255 120 outlet;
+#X obj 333 45 inlet~;
+#X obj 332 68 bonk~ 64;
+#X obj 348 124 outlet;
+#X connect 0 0 1 0;
+#X connect 1 1 2 0;
+#X connect 3 0 4 0;
+#X connect 4 1 5 0;
+#X connect 6 0 7 0;
+#X connect 7 1 8 0;
+#X connect 9 0 10 0;
+#X connect 10 1 11 0;
+#X restore 128 328 pd audio2bang;
+#X obj 67 628 outlet~;
+#X obj 132 629 outlet~;
+#X obj 372 55 inlet;
+#X obj 90 295 adc~ 1;
+#X obj 141 296 adc~ 2;
+#X obj 194 296 adc~ 3;
+#X obj 247 295 adc~ 4;
+#X msg 450 512 reinit;
+#X msg 490 560 reinsert_src \$1;
+#X msg 642 562 reinsert_last \$1;
+#X floatatom 492 540 5 0 0 0 - - -;
+#X floatatom 645 539 5 0 0 0 - - -;
+#X msg 578 503 help;
+#X msg 658 511 prob_crossover \$1;
+#X msg 808 512 prob_mutation \$1;
+#X obj 659 475 vsl 10 30 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 0 1;
+#X obj 809 474 vsl 10 30 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 0 1;
+#X msg 659 453 0.9;
+#X msg 810 451 0.025;
+#X floatatom 672 490 5 0 0 0 - - -;
+#X floatatom 824 491 5 0 0 0 - - -;
+#X connect 1 0 33 0;
+#X connect 1 0 60 0;
+#X connect 2 0 1 0;
+#X connect 3 0 12 0;
+#X connect 4 0 3 1;
+#X connect 4 0 9 0;
+#X connect 4 0 13 0;
+#X connect 5 0 6 0;
+#X connect 5 0 32 0;
+#X connect 6 0 21 0;
+#X connect 7 0 3 0;
+#X connect 8 0 23 0;
+#X connect 8 0 36 0;
+#X connect 10 0 11 0;
+#X connect 10 1 59 0;
+#X connect 11 0 58 0;
+#X connect 12 0 8 0;
+#X connect 13 0 12 1;
+#X connect 17 0 39 0;
+#X connect 18 0 41 0;
+#X connect 21 0 4 0;
+#X connect 23 0 10 0;
+#X connect 24 0 58 0;
+#X connect 25 0 24 0;
+#X connect 25 0 29 0;
+#X connect 26 0 24 1;
+#X connect 26 0 30 0;
+#X connect 27 0 24 2;
+#X connect 27 0 31 0;
+#X connect 28 0 2 0;
+#X connect 33 0 39 0;
+#X connect 34 0 33 1;
+#X connect 35 0 55 0;
+#X connect 36 0 28 0;
+#X connect 36 1 19 4;
+#X connect 36 2 16 0;
+#X connect 36 3 14 0;
+#X connect 36 4 15 0;
+#X connect 36 5 37 0;
+#X connect 36 6 38 0;
+#X connect 39 0 0 0;
+#X connect 39 0 61 0;
+#X connect 40 0 39 1;
+#X connect 40 0 41 1;
+#X connect 41 0 0 1;
+#X connect 41 0 62 0;
+#X connect 42 0 56 0;
+#X connect 43 0 44 0;
+#X connect 44 0 50 0;
+#X connect 45 0 47 0;
+#X connect 46 0 52 0;
+#X connect 47 0 21 0;
+#X connect 48 0 49 0;
+#X connect 48 0 79 0;
+#X connect 48 0 78 0;
+#X connect 49 0 27 0;
+#X connect 50 0 45 0;
+#X connect 51 0 26 0;
+#X connect 52 0 51 0;
+#X connect 53 0 50 1;
+#X connect 54 0 51 1;
+#X connect 55 0 34 0;
+#X connect 56 0 40 0;
+#X connect 60 0 19 0;
+#X connect 60 1 19 1;
+#X connect 60 2 19 2;
+#X connect 60 3 19 3;
+#X connect 63 0 7 0;
+#X connect 64 0 60 0;
+#X connect 65 0 60 1;
+#X connect 66 0 60 2;
+#X connect 67 0 60 3;
+#X connect 68 0 58 0;
+#X connect 69 0 58 0;
+#X connect 70 0 58 0;
+#X connect 71 0 69 0;
+#X connect 72 0 70 0;
+#X connect 73 0 58 0;
+#X connect 74 0 58 0;
+#X connect 75 0 58 0;
+#X connect 76 0 74 0;
+#X connect 76 0 80 0;
+#X connect 77 0 75 0;
+#X connect 77 0 81 0;
+#X connect 78 0 76 0;
+#X connect 79 0 77 0;
|