1 files changed, 248 insertions, 0 deletions
diff --git a/core/troute.pd b/core/troute.pd
new file mode 100644
index 0000000..d10175a
--- /dev/null
+++ b/core/troute.pd
@@ -0,0 +1,248 @@
+#N canvas 360 268 1084 595 10;
+#N canvas 122 62 399 252 \$0canvas 0;
+#X obj 0 20 r 1253-inlet0;
+#X obj 0 50 route j f g;
+#X obj 0 100 s 1253-outlet0;
+#X obj 150 100 s 1253-outlet1;
+#X obj 300 100 s 1253-outlet2;
+#X obj 450 100 s 1253-outlet3;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 1 1 3 0;
+#X connect 1 2 4 0;
+#X connect 1 3 5 0;
+#X restore 441 15 pd \$0canvas;
+#X obj 271 103 s \$0totalArgs;
+#X obj 480 92 t a a;
+#X obj 510 116 list length;
+#X obj 20 9 namecanvas \$0self;
+#X obj 510 137 s \$0totalArgs;
+#X obj 227 152 t b b a;
+#N canvas 518 172 903 672 connections 0;
+#X obj 362 60 inlet;
+#X msg 609 107 connect 0 0 1 0;
+#X obj 609 135 s pd-\$0canvas;
+#X msg 384 472 connect 1 \$1 \$2 0;
+#X obj 384 320 f;
+#X obj 414 320 + 1;
+#X obj 384 217 until;
+#X obj 384 179 f;
+#X obj 456 408 + 2;
+#X obj 384 441 list append;
+#X obj 384 504 s pd-\$0canvas;
+#X obj 215 505 s \$0self;
+#X obj 215 391 list append;
+#X msg 215 471 connect \$1 0 \$2 0;
+#X obj 400 251 r \$0reset;
+#X obj 287 360 + 1;
+#X obj 215 323 * 2;
+#X obj 215 344 t f f;
+#X obj 362 91 t b b b;
+#X obj 384 352 t f f;
+#X obj 216 295 f;
+#X obj 246 295 + 1;
+#X obj 216 192 until;
+#X obj 216 134 f;
+#X obj 232 111 r \$0checkedArgs;
+#X obj 215 429 list-apply + 21;
+#X obj 232 242 r \$0resetIfLess;
+#X obj 400 149 r \$0totalOuts;
+#X connect 0 0 18 0;
+#X connect 1 0 2 0;
+#X connect 3 0 10 0;
+#X connect 4 0 5 0;
+#X connect 4 0 19 0;
+#X connect 5 0 4 1;
+#X connect 6 0 4 0;
+#X connect 7 0 6 0;
+#X connect 8 0 9 1;
+#X connect 9 0 3 0;
+#X connect 12 0 25 0;
+#X connect 13 0 11 0;
+#X connect 14 0 4 1;
+#X connect 15 0 12 1;
+#X connect 16 0 17 0;
+#X connect 17 0 12 0;
+#X connect 17 1 15 0;
+#X connect 18 0 23 0;
+#X connect 18 1 7 0;
+#X connect 18 2 1 0;
+#X connect 19 0 9 0;
+#X connect 19 1 8 0;
+#X connect 20 0 21 0;
+#X connect 20 0 16 0;
+#X connect 21 0 20 1;
+#X connect 22 0 20 0;
+#X connect 23 0 22 0;
+#X connect 24 0 23 1;
+#X connect 25 0 13 0;
+#X connect 26 0 20 1;
+#X connect 27 0 7 1;
+#X restore 227 236 pd connections;
+#X obj 227 63 dollarg;
+#N canvas 906 445 436 308 initialSetup 0;
+#X obj 53 9 inlet;
+#X msg 97 71 0;
+#X obj 137 87 s \$0reset;
+#X obj 75 98 \$0;
+#X obj 75 153 s pd-\$0canvas;
+#X obj 53 230 s pd-\$0canvas;
+#X obj 53 178 list prepend obj 0 50 route;
+#X obj 53 204 list trim;
+#X obj 53 47 t a b b;
+#X msg 285 53 clear;
+#X obj 285 25 r \$0reset;
+#X obj 285 82 s pd-\$0canvas;
+#X msg 75 125 obj 0 20 r \$1-inlet0;
+#X obj 284 145 r \$0reset;
+#X obj 300 191 r \$0lessThan;
+#X obj 284 216 f;
+#X obj 284 168 t b;
+#X obj 284 240 sel 1;
+#X obj 284 285 s \$0resetIfLess;
+#X msg 284 262 0;
+#X connect 0 0 8 0;
+#X connect 1 0 2 0;
+#X connect 3 0 12 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 6 0;
+#X connect 8 1 3 0;
+#X connect 8 2 1 0;
+#X connect 9 0 11 0;
+#X connect 10 0 9 0;
+#X connect 12 0 4 0;
+#X connect 13 0 16 0;
+#X connect 14 0 15 1;
+#X connect 15 0 17 0;
+#X connect 16 0 15 0;
+#X connect 17 0 19 0;
+#X connect 19 0 18 0;
+#X restore 271 181 pd initialSetup;
+#N canvas 328 204 574 524 addOutlets 0;
+#X obj 54 18 inlet;
+#X obj 54 279 * 150;
+#X obj 54 144 until;
+#X obj 54 207 f;
+#X obj 87 207 + 1;
+#X obj 70 170 r \$0reset;
+#X msg 54 390 obj \$1 100 s \$2-outlet\$3;
+#X obj 54 301 list append \$0;
+#X obj 54 363 list append;
+#X obj 54 426 s pd-\$0canvas;
+#X obj 54 242 t a a;
+#X obj 54 120 f;
+#N canvas 392 28 506 356 selfhelp 0;
+#X obj 90 28 inlet;
+#X obj 120 210 s \$0self;
+#X obj 90 132 t a a;
+#X obj 127 65 r \$0lessThan;
+#X obj 90 107 spigot;
+#X obj 127 85 invert;
+#X msg 120 171 obj \$1 475 r \$2-outlet\$3;
+#X msg 90 240 obj \$1 500 outlet;
+#X connect 0 0 4 0;
+#X connect 2 0 7 0;
+#X connect 2 1 6 0;
+#X connect 3 0 5 0;
+#X connect 4 0 2 0;
+#X connect 5 0 4 1;
+#X connect 6 0 1 0;
+#X connect 7 0 1 0;
+#X restore 274 425 pd selfhelp;
+#X obj 274 299 * 150;
+#X obj 274 227 f;
+#X obj 307 227 + 1;
+#X obj 274 321 list append \$0;
+#X obj 274 383 list append;
+#X obj 274 262 t a a;
+#X obj 54 42 t b b;
+#X obj 274 118 until;
+#X obj 274 58 f;
+#X obj 290 34 r \$0checkedArgs;
+#X obj 70 76 r \$0totalOuts;
+#X obj 290 180 r \$0resetIfLess;
+#X connect 0 0 19 0;
+#X connect 1 0 7 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 10 0;
+#X connect 4 0 3 1;
+#X connect 5 0 3 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 0;
+#X connect 8 0 6 0;
+#X connect 10 0 1 0;
+#X connect 10 1 8 1;
+#X connect 11 0 2 0;
+#X connect 13 0 16 0;
+#X connect 14 0 15 0;
+#X connect 14 0 18 0;
+#X connect 15 0 14 1;
+#X connect 16 0 17 0;
+#X connect 17 0 12 0;
+#X connect 18 0 13 0;
+#X connect 18 1 17 1;
+#X connect 19 0 11 0;
+#X connect 19 1 21 0;
+#X connect 20 0 14 0;
+#X connect 21 0 20 0;
+#X connect 22 0 21 1;
+#X connect 23 0 11 1;
+#X connect 24 0 14 1;
+#X restore 249 210 pd addOutlets;
+#N canvas 228 24 433 398 checkArgs 0;
+#X obj 131 114 >;
+#X obj 183 114 f;
+#X obj 131 65 t f f;
+#X obj 131 149 sel 1;
+#X obj 183 149 t f f;
+#X obj 213 188 -;
+#X obj 37 130 invert;
+#X obj 37 162 s \$0lessThan;
+#X obj 161 313 f;
+#X obj 161 179 t b;
+#X obj 161 344 s \$0checkedArgs;
+#X obj 213 223 s \$0checkedArgs;
+#X obj 131 14 r \$0totalOuts;
+#X obj 177 278 r \$0totalOuts;
+#X connect 0 0 3 0;
+#X connect 0 0 6 0;
+#X connect 1 0 0 1;
+#X connect 1 0 4 0;
+#X connect 2 0 0 0;
+#X connect 2 1 1 1;
+#X connect 3 0 1 0;
+#X connect 3 1 9 0;
+#X connect 4 0 5 1;
+#X connect 4 1 5 0;
+#X connect 5 0 11 0;
+#X connect 6 0 7 0;
+#X connect 8 0 10 0;
+#X connect 9 0 8 0;
+#X connect 12 0 2 0;
+#X connect 13 0 8 1;
+#X restore 271 124 pd checkArgs;
+#X obj 21 49 inlet;
+#X obj 21 87 s \$0-inlet0;
+#X obj 480 44 inlet;
+#X obj 480 165 s \$0-inlet1;
+#X obj 144 87 r \$0-inlet1;
+#X obj 479 208 r \$0totalArgs;
+#X obj 479 252 s \$0totalOuts;
+#X obj 479 230 + 1;
+#X obj 227 39 initbang;
+#X connect 2 0 15 0;
+#X connect 2 1 3 0;
+#X connect 3 0 5 0;
+#X connect 6 0 7 0;
+#X connect 6 1 10 0;
+#X connect 6 2 9 0;
+#X connect 8 0 6 0;
+#X connect 8 1 1 0;
+#X connect 12 0 13 0;
+#X connect 14 0 2 0;
+#X connect 16 0 6 0;
+#X connect 17 0 19 0;
+#X connect 19 0 18 0;
+#X connect 20 0 8 0;