1 files changed, 236 insertions, 0 deletions
diff --git a/s-tracker.pd b/s-tracker.pd
new file mode 100644
index 0000000..ea2f4f0
--- /dev/null
+++ b/s-tracker.pd
@@ -0,0 +1,236 @@
+#N canvas 4 20 989 664 10;
+#X obj 394 236 makefilename \$0nbx%d;
+#X obj 394 168 until;
+#X obj 394 190 f;
+#X obj 422 190 + 1;
+#X obj 459 390 * 16;
+#X obj 413 145 0;
+#X obj 457 526 +;
+#X obj 497 440 * 3;
+#X obj 497 390 / 4;
+#X obj 497 417 int;
+#X obj 413 288 mod 4;
+#X obj 450 481 makefilename .%d;
+#X msg 464 337 symbol empty;
+#X obj 413 502 symbol;
+#X obj 413 312 select 0;
+#X obj 442 145 \$0;
+#X obj 830 9 namecanvas \$0tracker;
+#X obj 562 253 pack f f;
+#X obj 472 145 * 16;
+#X obj 613 208 +;
+#X obj 394 120 t f b b f f;
+#X obj 629 165 * 3;
+#X obj 629 145 / 4;
+#X obj 459 412 + 16;
+#X obj 613 230 + 16;
+#X obj 394 42 t b f;
+#X obj 394 97 f;
+#X obj 394 69 delay 100;
+#X obj 394 8 s-default \$2 16;
+#X obj 645 123 s-default \$3 4;
+#X obj 443 262 s-default \$3 4;
+#X obj 513 363 s-default \$3 4;
+#X text 508 11 Set up all the numberboxes;
+#X obj 921 36 inlet;
+#X obj 921 58 list;
+#X msg 921 80 \; \$1 \$2 \;;
+#N canvas 14 28 742 653 4399connectors 0;
+#X obj 575 4 namecanvas \$0connectors;
+#X restore 715 9 pd \$0connectors;
+#X msg 562 275 \; \$1tracker donecanvasdialog 1 -1 1 0 -1 0 \$2 80
+\$2 0 0;
+#X obj 828 628 table \$0data \$2;
+#X obj 828 505 s-default \$2 16;
+#X obj 828 527 t f b;
+#X msg 828 593 \; \$2data resize \$1;
+#X text 827 486 Resize the data table;
+#X obj 828 572 pack f f;
+#X obj 858 549 \$0;
+#N canvas 212 221 507 438 save 0;
+#X obj 58 10 r SSSAD_SAVE;
+#X obj 53 333 list prepend;
+#X obj 146 333 t l;
+#X obj 30 362 list;
+#X obj 30 386 outlet;
+#X obj 96 112 until;
+#X obj 96 135 f;
+#X obj 126 135 + 1;
+#X msg 141 112 0;
+#X obj 58 36 t b b b b;
+#X obj 96 89 16;
+#X obj 112 64 s-default \$2 16;
+#X obj 96 160 tabread \$0data;
+#X connect 0 0 9 0;
+#X connect 1 0 2 0;
+#X connect 1 0 3 1;
+#X connect 2 0 1 1;
+#X connect 3 0 4 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 6 0 12 0;
+#X connect 7 0 6 1;
+#X connect 8 0 6 1;
+#X connect 9 0 1 1;
+#X connect 9 1 3 0;
+#X connect 9 2 10 0;
+#X connect 9 3 8 0;
+#X connect 10 0 5 0;
+#X connect 11 0 10 1;
+#X connect 12 0 1 0;
+#X restore 923 164 pd save;
+#N canvas 64 35 650 643 load 0;
+#X obj 40 6 inlet;
+#X obj 40 65 until;
+#X obj 40 92 list append;
+#X obj 133 121 bang;
+#X obj 40 121 list split 1;
+#X obj 200 186 f;
+#X obj 230 186 + 1;
+#X msg 216 164 0;
+#X obj 40 147 t f b;
+#X obj 200 207 makefilename \$0nbx%d;
+#X obj 40 32 t b l b;
+#X obj 40 266 pack f s;
+#X msg 40 291 \; \$2 \$1 \;;
+#X connect 0 0 10 0;
+#X connect 1 0 2 0;
+#X connect 2 0 4 0;
+#X connect 3 0 1 1;
+#X connect 4 0 8 0;
+#X connect 4 1 2 1;
+#X connect 4 2 3 0;
+#X connect 5 0 6 0;
+#X connect 5 0 9 0;
+#X connect 6 0 5 1;
+#X connect 7 0 5 1;
+#X connect 8 0 11 0;
+#X connect 8 1 5 0;
+#X connect 9 0 11 1;
+#X connect 10 0 1 0;
+#X connect 10 1 2 1;
+#X connect 10 2 7 0;
+#X connect 11 0 12 0;
+#X restore 767 210 pd load;
+#X obj 767 186 sssad/sssad \$1/sequence;
+#N canvas 0 0 629 667 position 0;
+#X obj 18 13 inlet;
+#X obj 18 74 mod \$2;
+#X obj 55 51 s-default \$2 16;
+#X msg 560 118 bang;
+#X obj 18 102 t f f;
+#X obj 48 124 s \$0pos;
+#X obj 61 14 r \$4;
+#X obj 365 53 moses 0;
+#X msg 409 236 \; \$1 color 1 \;;
+#X obj 409 140 t a a b;
+#X obj 453 174 symbol;
+#X msg 453 199 \; \$1 color 944 \;;
+#X msg 365 140 bang;
+#X obj 365 29 r \$0pos;
+#X obj 460 53 s-default \$2 16;
+#X obj 409 76 moses 16;
+#X obj 409 118 makefilename \$0nbx%d;
+#X text 363 6 Coloration;
+#X obj 34 251 r \$0/out;
+#X obj 18 372 outlet;
+#X obj 71 372 s \$1/value;
+#X msg 48 215 \; \$1 bang \;;
+#X obj 18 168 makefilename \$0nbx%d;
+#X obj 18 335 f;
+#X obj 18 193 t b s;
+#X obj 34 274 route color;
+#X obj 106 297 select bang;
+#X connect 0 0 1 0;
+#X connect 1 0 4 0;
+#X connect 2 0 1 1;
+#X connect 3 0 10 0;
+#X connect 4 0 22 0;
+#X connect 4 1 5 0;
+#X connect 6 0 1 0;
+#X connect 7 0 12 0;
+#X connect 7 1 15 0;
+#X connect 9 0 8 0;
+#X connect 9 1 10 1;
+#X connect 9 2 10 0;
+#X connect 10 0 11 0;
+#X connect 12 0 10 0;
+#X connect 13 0 7 0;
+#X connect 14 0 15 1;
+#X connect 15 0 16 0;
+#X connect 15 1 3 0;
+#X connect 16 0 9 0;
+#X connect 18 0 25 0;
+#X connect 22 0 24 0;
+#X connect 23 0 19 0;
+#X connect 23 0 20 0;
+#X connect 24 0 23 0;
+#X connect 24 1 21 0;
+#X connect 25 1 26 0;
+#X connect 26 1 23 1;
+#X restore 824 381 pd position;
+#X obj 824 358 inlet;
+#X obj 824 404 outlet;
+#X obj 394 212 t f f f f f;
+#X obj 394 551 pack s s f f f;
+#X msg 394 575 \; \$4tracker obj 24 \$3 nbx 3 14 0 127 0 0 \$1 \$1
+\$2 -20 8 0 8 -260818 -1 -1 0 256 \; \$4connectors obj 5 \$3 s-connect
+\$1 \$4/out \; \$4connectors obj 210 \$3 s-tabval \$4 \$1 \$5 \;;
+#X connect 0 0 52 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 0 51 0;
+#X connect 3 0 2 1;
+#X connect 4 0 23 0;
+#X connect 5 0 2 1;
+#X connect 6 0 52 2;
+#X connect 7 0 6 1;
+#X connect 8 0 9 0;
+#X connect 9 0 7 0;
+#X connect 9 0 11 0;
+#X connect 10 0 14 0;
+#X connect 11 0 13 1;
+#X connect 12 0 13 0;
+#X connect 13 0 52 1;
+#X connect 14 0 13 0;
+#X connect 14 1 12 0;
+#X connect 15 0 17 0;
+#X connect 15 0 52 3;
+#X connect 17 0 37 0;
+#X connect 18 0 19 0;
+#X connect 19 0 24 0;
+#X connect 20 0 1 0;
+#X connect 20 1 5 0;
+#X connect 20 2 15 0;
+#X connect 20 3 18 0;
+#X connect 20 4 22 0;
+#X connect 21 0 19 1;
+#X connect 22 0 21 0;
+#X connect 23 0 6 0;
+#X connect 24 0 17 1;
+#X connect 25 0 27 0;
+#X connect 25 1 26 1;
+#X connect 26 0 20 0;
+#X connect 27 0 26 0;
+#X connect 28 0 25 0;
+#X connect 29 0 22 1;
+#X connect 30 0 10 1;
+#X connect 31 0 8 1;
+#X connect 33 0 34 0;
+#X connect 34 0 35 0;
+#X connect 39 0 40 0;
+#X connect 40 0 43 0;
+#X connect 40 1 44 0;
+#X connect 43 0 41 0;
+#X connect 44 0 43 1;
+#X connect 45 0 47 1;
+#X connect 47 0 46 0;
+#X connect 48 0 50 0;
+#X connect 49 0 48 0;
+#X connect 51 0 0 0;
+#X connect 51 1 10 0;
+#X connect 51 2 4 0;
+#X connect 51 3 8 0;
+#X connect 51 4 52 4;
+#X connect 52 0 53 0;
+#X coords 0 0 1 1 80 284 0;