#N canvas 11 50 1905 999 10;
#N canvas 0 50 450 278 (subpatch) 0;
#X array \$1-array 425255 float 2;
#X coords 0 1 425255 -1 335 251 1 0 0;
#X restore 895 233 graph;
#X obj 1251 368 soundfiler;
#X floatatom 1251 399 10 0 0 0 - - -, f 10;
#X floatatom 1251 458 10 0 0 0 - - -, f 10;
#X obj 1251 427 / 44.1;
#X text 1307 427 sample rate / 1000;
#X obj 216 692 line~;
#X obj 73 222 inlet;
#X obj 73 258 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 52 549 pack 0 0;
#X floatatom 105 491 5 0 0 0 - - -, f 5;
#X floatatom 70 421 5 0 0 0 - - -, f 5;
#X obj 52 447 f;
#X obj 52 499 * 44.1;
#X obj 1251 489 s \$1-duration;
#X obj 217 719 tabread4~ \$1-array;
#X obj 105 465 r \$1-duration;
#X obj 70 396 r \$1-duration;
#X obj 1251 170 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 1251 196 symbol \$1-array;
#X obj 1251 282 list prepend -resize;
#X obj 1251 310 list prepend read;
#X obj 1251 338 list trim;
#X obj 1251 143 loadbang;
#X text 1131 98 construct the read message using the sound file name
(\$1);
#X obj 1251 218 list;
#X obj 1251 249 list prepend \$1;
#X obj 212 -19 r notes;
#X obj 217 842 throw~ samp_voice_out;
#X obj 105 513 f;
#X text 287 206 second argument (key number);
#X text 429 0 loads and plays sound file;
#X text 430 22 argument 1: soundfile to load;
#X text 431 43 argument 2: key number to play;
#X text 327 137 allow all midi notes to trigger samples...;
#X obj 175 358 t b b b;
#X text 1327 457 milliseconds;
#X obj 216 763 *~;
#X obj 217 797 hip~ 5;
#X text 297 799 cut DC;
#X floatatom 230 78 5 0 0 0 - - -, f 5;
#X floatatom 270 78 5 0 0 0 - - -, f 5;
#X obj 230 130 abs;
#X obj 241 104 expr if ($f1 > 59 \, $f1 - 60 \, $f1 - 12);
#X obj 212 177 i;
#X obj 212 199 sel \$2;
#X obj 213 252 route 1;
#X floatatom 450 484 5 0 0 0 - - -, f 5;
#X obj 425 518 pack;
#X msg 423 547 \$1 \$2;
#X msg 214 442 0 0;
#X obj 548 360 r \$1-duration;
#X floatatom 545 387 5 0 0 0 - - -, f 5;
#X obj 482 431 *;
#X text 402 328 release set by knob 2 \, up to 100% of sample length
;
#X obj 212 19 t b a;
#X obj 230 54 unpack;
#X obj 274 307 t b b;
#X msg 374 503 0 1;
#X obj 362 600 line~;
#X obj 274 329 delay 2;
#X msg 317 490 1 1;
#X obj 472 454 + 5;
#X obj 262 -19 r notes_seq;
#X obj 342 -19 r zero_notes;
#X obj 213 273 sel 0;
#X obj 212 229 pack 1 1, f 9;
#X obj 230 152 % 48;
#X obj 108 19 r transpose;
#X obj 140 65 -;
#X obj 464 387 r release;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 14 0;
#X connect 4 0 3 0;
#X connect 6 0 15 0;
#X connect 7 0 8 0;
#X connect 8 0 35 0;
#X connect 9 0 6 0;
#X connect 10 0 29 0;
#X connect 11 0 12 1;
#X connect 12 0 13 0;
#X connect 13 0 9 0;
#X connect 15 0 37 0;
#X connect 16 0 10 0;
#X connect 17 0 11 0;
#X connect 18 0 19 0;
#X connect 19 0 25 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 1 0;
#X connect 23 0 18 0;
#X connect 25 0 26 0;
#X connect 26 0 20 0;
#X connect 27 0 55 0;
#X connect 29 0 9 1;
#X connect 35 0 12 0;
#X connect 35 1 50 0;
#X connect 35 2 61 0;
#X connect 37 0 38 0;
#X connect 38 0 28 0;
#X connect 40 0 43 0;
#X connect 41 0 66 1;
#X connect 42 0 67 0;
#X connect 43 0 42 0;
#X connect 44 0 45 0;
#X connect 45 0 66 0;
#X connect 46 0 65 0;
#X connect 47 0 48 1;
#X connect 48 0 49 0;
#X connect 49 0 59 0;
#X connect 50 0 6 0;
#X connect 51 0 52 0;
#X connect 52 0 53 1;
#X connect 53 0 62 0;
#X connect 55 0 44 0;
#X connect 55 1 56 0;
#X connect 56 0 69 0;
#X connect 56 1 41 0;
#X connect 57 0 60 0;
#X connect 57 1 58 0;
#X connect 58 0 59 0;
#X connect 59 0 37 1;
#X connect 60 0 35 0;
#X connect 61 0 59 0;
#X connect 62 0 47 0;
#X connect 63 0 55 0;
#X connect 64 0 55 0;
#X connect 65 0 48 0;
#X connect 65 1 57 0;
#X connect 66 0 46 0;
#X connect 67 0 44 1;
#X connect 68 0 69 1;
#X connect 69 0 40 0;
#X connect 70 0 53 0;
