From 6a59a3a53803ecf4ffc7b1d4b914d8fa014d1472 Mon Sep 17 00:00:00 2001 From: Davide Morelli Date: Sat, 10 Dec 2005 03:28:48 +0000 Subject: adding the patch actually used in a performace as example svn path=/trunk/externals/frankenstein/; revision=4180 --- patches/percussionist.pd | 975 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 975 insertions(+) create mode 100755 patches/percussionist.pd (limited to 'patches/percussionist.pd') 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; -- cgit v1.2.1