1 files changed, 160 insertions, 0 deletions
diff --git a/tof/sample_play~.pd b/tof/sample_play~.pd
new file mode 100644
index 0000000..1010ef4
--- /dev/null
+++ b/tof/sample_play~.pd
@@ -0,0 +1,160 @@
+#N canvas 1162 3 729 673 10;
+#X obj 19 -42 inlet;
+#X obj 51 439 *~ 0;
+#X obj 55 578 outlet~;
+#X msg 314 243 0;
+#X obj 44 355 tof/phasorshot~;
+#X obj 51 502 tabread4~;
+#X obj 212 582 outlet~;
+#X obj 219 512 tabread4~;
+#X obj 36 292 *~ 0;
+#X obj 29 235 sig~ 1;
+#X obj 280 24 inlet speed;
+#X msg 343 247 1;
+#X msg 184 208 0;
+#X msg 422 429 1;
+#X msg 353 427 0;
+#X obj 260 127 sel 0;
+#X obj 513 -6 loadbang;
+#X obj 513 26 tof/argument 1;
+#X msg 517 57 sample \$1;
+#N canvas 0 0 450 300 find_freq 0;
+#X obj 83 241 outlet;
+#N canvas 0 0 450 300 smpToFreq 0;
+#X obj 41 35 inlet;
+#X obj 236 181 samplerate~;
+#X obj 65 346 outlet;
+#X obj 126 104 t f b;
+#X obj 131 281 expr $f2/$f1;
+#X obj 41 67 sel 0;
+#X msg 46 154 0;
+#X connect 0 0 5 0;
+#X connect 1 0 4 1;
+#X connect 3 0 4 0;
+#X connect 3 1 1 0;
+#X connect 4 0 2 0;
+#X connect 5 0 6 0;
+#X connect 5 1 3 0;
+#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 477 252 pd find_freq;
+#N canvas 0 0 450 300 set_tables 0;
+#X obj 42 22 inlet basename;
+#X obj 246 21 inlet channels;
+#X obj 71 253 outlet left;
+#X obj 269 249 outlet right;
+#X obj 242 59 > 1;
+#X obj 135 133 zexy/demultiplex;
+#X msg 123 186 set 0-\$1;
+#X msg 188 186 set 0-\$1;
+#X msg 273 187 set 1-\$1;
+#X connect 0 0 5 0;
+#X connect 1 0 4 0;
+#X connect 4 0 5 1;
+#X connect 5 0 6 0;
+#X connect 5 0 7 0;
+#X connect 5 1 8 0;
+#X connect 5 1 6 0;
+#X connect 6 0 2 0;
+#X connect 7 0 3 0;
+#X connect 8 0 3 0;
+#X restore 569 250 pd set_tables;
+#N canvas 0 0 450 300 start_phase 0;
+#X obj 76 249 outlet;
+#X obj 76 115 f;
+#X obj 244 26 inlet speed;
+#X obj 68 28 inlet bang;
+#X obj 74 145 < 0;
+#X connect 1 0 4 0;
+#X connect 2 0 1 1;
+#X connect 3 0 1 0;
+#X connect 4 0 0 0;
+#X restore 77 225 pd start_phase;
+#X msg 225 209 1;
+#X obj 96 397 spigot;
+#X msg 392 191 0;
+#X obj 258 409 t b b;
+#X msg 260 431 0;
+#X obj 368 510 line~;
+#X obj 64 547 *~;
+#X obj 218 551 *~;
+#X msg 368 484 \$1 5;
+#X obj 513 147 sample_unpack;
+#X obj 575 211 -;
+#X obj 51 466 +~ 0;
+#X obj 41 46 route bang float;
+#X obj 19 150 t b b b b b;
+#X obj 320 162 t b b b b b;
+#X connect 0 0 34 0;
+#X connect 1 0 33 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 4 1 23 0;
+#X connect 4 2 23 0;
+#X connect 5 0 28 0;
+#X connect 7 0 29 0;
+#X connect 8 0 4 0;
+#X connect 9 0 8 0;
+#X connect 10 0 9 0;
+#X connect 10 0 21 1;
+#X connect 11 0 4 2;
+#X connect 12 0 4 2;
+#X connect 13 0 30 0;
+#X connect 14 0 30 0;
+#X connect 15 0 14 0;
+#X connect 15 1 36 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 18 0 31 0;
+#X connect 19 0 8 1;
+#X connect 20 0 5 0;
+#X connect 20 1 7 0;
+#X connect 21 0 4 1;
+#X connect 22 0 23 1;
+#X connect 23 0 25 0;
+#X connect 24 0 23 1;
+#X connect 25 0 26 0;
+#X connect 25 1 14 0;
+#X connect 26 0 23 1;
+#X connect 27 0 29 1;
+#X connect 27 0 28 1;
+#X connect 28 0 2 0;
+#X connect 29 0 6 0;
+#X connect 30 0 27 0;
+#X connect 31 0 19 0;
+#X connect 31 3 20 0;
+#X connect 31 4 20 1;
+#X connect 31 5 32 0;
+#X connect 31 6 32 1;
+#X connect 31 6 33 1;
+#X connect 32 0 19 1;
+#X connect 32 0 1 1;
+#X connect 33 0 5 0;
+#X connect 33 0 7 0;
+#X connect 34 0 35 0;
+#X connect 34 1 15 0;
+#X connect 34 2 31 0;
+#X connect 35 0 13 0;
+#X connect 35 1 21 0;
+#X connect 35 2 12 0;
+#X connect 35 3 22 0;
+#X connect 35 4 31 0;
+#X connect 36 0 3 0;
+#X connect 36 1 11 0;
+#X connect 36 2 13 0;
+#X connect 36 3 24 0;
+#X connect 36 4 31 0;