aboutsummaryrefslogtreecommitdiff
path: root/patches/percussionist.pd
diff options
context:
space:
mode:
Diffstat (limited to 'patches/percussionist.pd')
-rwxr-xr-xpatches/percussionist.pd975
1 files changed, 975 insertions, 0 deletions
diff --git a/patches/percussionist.pd b/patches/percussionist.pd
new file mode 100755
index 0000000..c7ec609
--- /dev/null
+++ b/patches/percussionist.pd
@@ -0,0 +1,975 @@
+#N canvas 0 0 1011 709 12;
+#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 474 324 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 1
+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 13;
+#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
+3;
+#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 1;
+#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 71.75 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 3493 1;
+#X obj 730 226 vsl 15 128 0 1 0 0 empty empty riempimento 0 -8 0 8
+-262144 -1 -1 7937 1;
+#X obj 788 239 vsl 15 128 0 1 0 0 empty empty aderenza 0 -8 0 8 -262144
+-1 -1 5239 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 840 155 loadbang;
+#X obj 850 243 loadbang;
+#X msg 851 263 0.8;
+#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 851 203 pd varia2;
+#X msg 839 178 0.01;
+#X obj 918 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 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 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 1 1 1 1 1 1 1 0 0 0 0 1 0 1;
+#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 1 0 1 0 1 0 0 1 0 1 1 0 0 0 1 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 1 1 1 0 1 0 0 0 1 0 0 0 1 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 1 0 0 1 0 0 1 0 1 1 1 0 0 0 1 1;
+#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 obj 577 408 outlet;
+#X obj 675 76 r variazione;
+#X obj 706 117 r riempimento;
+#X obj 830 75 r aderenza;
+#N canvas 0 0 644 564 messages 0;
+#X obj 117 252 outlet;
+#X msg 105 174 reinit;
+#X obj 106 131 r reinit;
+#X obj 106 153 bang;
+#X msg 205 177 reinsert_src \$1;
+#X msg 356 171 reinsert_last \$1;
+#X msg 41 159 help;
+#X msg 234 94 prob_crossover \$1;
+#X msg 384 95 prob_mutation \$1;
+#X obj 204 153 r reinsert_src;
+#X obj 357 147 r reinsert_last;
+#X obj 234 70 r prob_crossover;
+#X obj 385 70 r prob_mutation;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 0 0;
+#X connect 5 0 0 0;
+#X connect 6 0 0 0;
+#X connect 7 0 0 0;
+#X connect 8 0 0 0;
+#X connect 9 0 4 0;
+#X connect 10 0 5 0;
+#X connect 11 0 7 0;
+#X connect 12 0 8 0;
+#X restore 498 546 pd messages;
+#X obj 211 105 r tempo;
+#X obj 440 201 s msec-beat;
+#X connect 0 0 32 0;
+#X connect 0 0 53 0;
+#X connect 1 0 0 0;
+#X connect 2 0 11 0;
+#X connect 3 0 2 1;
+#X connect 3 0 8 0;
+#X connect 3 0 12 0;
+#X connect 3 0 67 0;
+#X connect 4 0 5 0;
+#X connect 4 0 31 0;
+#X connect 5 0 20 0;
+#X connect 6 0 2 0;
+#X connect 7 0 22 0;
+#X connect 7 0 35 0;
+#X connect 9 0 10 0;
+#X connect 9 1 52 0;
+#X connect 10 0 51 0;
+#X connect 11 0 7 0;
+#X connect 12 0 11 1;
+#X connect 16 0 38 0;
+#X connect 17 0 40 0;
+#X connect 20 0 3 0;
+#X connect 22 0 9 0;
+#X connect 22 0 61 0;
+#X connect 23 0 51 0;
+#X connect 24 0 23 0;
+#X connect 24 0 28 0;
+#X connect 25 0 23 1;
+#X connect 25 0 29 0;
+#X connect 26 0 23 2;
+#X connect 26 0 30 0;
+#X connect 27 0 1 0;
+#X connect 32 0 38 0;
+#X connect 33 0 32 1;
+#X connect 34 0 48 0;
+#X connect 35 0 27 0;
+#X connect 35 1 18 4;
+#X connect 35 2 15 0;
+#X connect 35 3 13 0;
+#X connect 35 4 14 0;
+#X connect 35 5 36 0;
+#X connect 35 6 37 0;
+#X connect 38 0 54 0;
+#X connect 39 0 38 1;
+#X connect 39 0 40 1;
+#X connect 40 0 55 0;
+#X connect 41 0 49 0;
+#X connect 42 0 46 0;
+#X connect 43 0 44 0;
+#X connect 44 0 26 0;
+#X connect 45 0 25 0;
+#X connect 46 0 45 0;
+#X connect 47 0 45 1;
+#X connect 48 0 33 0;
+#X connect 49 0 39 0;
+#X connect 53 0 18 0;
+#X connect 53 1 18 1;
+#X connect 53 2 18 2;
+#X connect 53 3 18 3;
+#X connect 56 0 6 0;
+#X connect 57 0 53 0;
+#X connect 58 0 53 1;
+#X connect 59 0 53 2;
+#X connect 60 0 53 3;
+#X connect 62 0 24 0;
+#X connect 63 0 25 0;
+#X connect 64 0 26 0;
+#X connect 65 0 51 0;
+#X connect 66 0 20 0;