#N canvas 135 24 729 684 10;
#X obj 29 -23 inlet;
#X obj 71 321 *~ 0;
#X obj 260 598 outlet~;
#X obj 51 502 tabread4~;
#X obj 417 602 outlet~;
#X obj 219 512 tabread4~;
#X obj 223 565 *~;
#X obj 343 556 *~;
#X obj 132 401 +~ 0;
#X obj 41 46 route bang float;
#X obj 231 -20 inlet pitch;
#N canvas 0 0 892 551 player 0;
#X obj 702 496 outlet get_sample;
#X obj 91 29 inlet bang;
#X obj 253 38 inlet float;
#X obj 388 34 inlet pitch;
#X obj 85 501 outlet~ phase;
#X msg 172 265 0;
#X obj 80 318 tof/phasorshot~;
#X obj 75 249 sig~ 1;
#X msg 310 229 1;
#X msg 267 232 0;
#X msg 501 440 1;
#X msg 437 434 0;
#X obj 350 144 sel 0;
#N canvas 0 0 450 300 start_phase 0;
#X obj 76 249 outlet;
#X obj 244 26 inlet speed;
#X obj 68 28 inlet bang;
#X obj 74 145 < 0;
#X obj 76 115 f 1;
#X connect 1 0 4 1;
#X connect 2 0 4 0;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X restore 132 200 pd start_phase;
#X obj 271 365 spigot;
#X obj 377 395 t b b;
#X msg 380 430 0;
#X obj 283 310 == 0;
#X obj 254 266 t f f;
#X obj 94 107 t b b b;
#X obj 378 178 t b b b;
#X obj 519 292 t b b;
#X obj 561 38 inlet speed;
#X obj 416 516 line~;
#X msg 416 490 \$1 5;
#X obj 555 510 outlet~ output;
#X connect 1 0 19 0;
#X connect 2 0 12 0;
#X connect 3 0 13 1;
#X connect 5 0 6 1;
#X connect 6 0 4 0;
#X connect 6 1 14 0;
#X connect 6 2 14 0;
#X connect 7 0 6 0;
#X connect 8 0 18 0;
#X connect 9 0 18 0;
#X connect 10 0 24 0;
#X connect 11 0 24 0;
#X connect 12 0 11 0;
#X connect 12 1 20 0;
#X connect 13 0 6 1;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 15 1 11 0;
#X connect 16 0 14 1;
#X connect 16 0 24 0;
#X connect 17 0 14 1;
#X connect 18 0 6 2;
#X connect 18 1 17 0;
#X connect 19 0 13 0;
#X connect 19 1 9 0;
#X connect 19 2 21 0;
#X connect 20 0 5 0;
#X connect 20 1 8 0;
#X connect 20 2 21 0;
#X connect 21 0 10 0;
#X connect 21 1 0 0;
#X connect 22 0 7 0;
#X connect 23 0 25 0;
#X connect 24 0 23 0;
#X restore 70 220 pd player;
#N canvas 0 0 842 452 parse_sample 0;
#X obj 392 336 outlet end;
#X obj 493 335 outlet start;
#X obj 600 336 outlet length;
#X obj 265 336 outlet tables;
#X obj 127 338 outlet base_freq;
#N canvas 0 0 450 300 find_freq 0;
#X obj 83 241 outlet;
#N canvas 330 268 450 300 smpToFreq 0;
#X obj 41 35 inlet;
#X obj 135 179 samplerate~;
#X obj 65 346 outlet;
#X obj 41 67 sel 0;
#X msg 46 154 0;
#X obj 126 104 t b f;
#X obj 132 281 /;
#X connect 0 0 3 0;
#X connect 1 0 6 0;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 2 0;
#X connect 5 0 1 0;
#X connect 5 1 6 1;
#X connect 6 0 2 0;
#X restore 249 100 pd smpToFreq;
#X obj 120 96 samplerate~;
#X obj 87 67 t f b;
#X obj 80 169 *;
#X obj 78 119 /;
#X obj 269 12 inlet length;
#X obj 72 18 inlet samples;
#X connect 1 0 4 1;
#X connect 2 0 5 1;
#X connect 3 0 5 0;
#X connect 3 1 2 0;
#X connect 4 0 0 0;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 7 0 3 0;
#X restore 192 201 pd find_freq;
#X obj 356 160 -;
#X obj 277 72 sample_unpack;
#X obj 231 252 zexy/demultiplex;
#X obj 315 223 > 1;
#X msg 210 277 list 0-\$1 0-\$1;
#X msg 326 275 list 0-\$1 1-\$1;
#X obj 218 5 inlet;
#X obj 455 3 loadbang;
#X obj 455 35 tof/argument 1;
#X msg 459 66 sample \$1;
#X connect 5 0 4 0;
#X connect 6 0 5 1;
#X connect 6 0 2 0;
#X connect 7 0 5 0;
#X connect 7 2 8 0;
#X connect 7 3 9 0;
#X connect 7 4 6 0;
#X connect 7 4 0 0;
#X connect 7 5 6 1;
#X connect 7 5 1 0;
#X connect 8 0 10 0;
#X connect 8 1 11 0;
#X connect 9 0 8 1;
#X connect 10 0 3 0;
#X connect 11 0 3 0;
#X connect 12 0 7 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 7 0;
#X restore 309 212 pd parse_sample;
#X obj 163 199 *;
#X obj 311 390 unpack s s;
#X msg 306 419 set \$1;
#X msg 371 424 set \$1;
#X obj 167 143 f 1;
#X obj 190 167 t b f;
#X connect 0 0 9 0;
#X connect 1 0 8 0;
#X connect 3 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 2 0;
#X connect 7 0 4 0;
#X connect 8 0 3 0;
#X connect 8 0 5 0;
#X connect 9 0 11 0;
#X connect 9 1 11 1;
#X connect 9 2 12 0;
#X connect 10 0 11 2;
#X connect 10 0 17 0;
#X connect 11 0 1 0;
#X connect 11 1 6 1;
#X connect 11 1 7 1;
#X connect 12 0 18 0;
#X connect 12 1 14 0;
#X connect 12 3 8 1;
#X connect 12 4 1 1;
#X connect 13 0 11 3;
#X connect 14 0 15 0;
#X connect 14 1 16 0;
#X connect 15 0 3 0;
#X connect 16 0 5 0;
#X connect 17 0 13 0;
#X connect 18 0 17 0;
#X connect 18 1 13 1;