From f18d063d9312c95e25294e0777bc135ee9a3fd8a Mon Sep 17 00:00:00 2001
From: Thomas O Fredericks <mrtof@users.sourceforge.net>
Date: Sun, 25 Oct 2009 00:39:13 +0000
Subject: Adding mtl

svn path=/trunk/abstractions/mtl/; revision=12667
---
 indexer.pd | 138 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 138 insertions(+)
 create mode 100644 indexer.pd

(limited to 'indexer.pd')

diff --git a/indexer.pd b/indexer.pd
new file mode 100644
index 0000000..d8498d0
--- /dev/null
+++ b/indexer.pd
@@ -0,0 +1,138 @@
+#N canvas 1030 52 1018 711 10;
+#X obj 344 420 cyclone/coll;
+#C restore;
+#X obj 77 -19 inlet try_to_add;
+#X obj 39 155 spigot;
+#X obj 30 70 t s s b b;
+#X msg 109 101 1;
+#X msg 71 100 0;
+#X obj 344 482 t l b;
+#X msg 143 101 0;
+#X msg 117 219 1;
+#X obj 391 483 b;
+#X obj 37 217 t s b b;
+#X obj 120 294 + 1;
+#X obj 120 324 t f f f;
+#X msg 135 430 nstore \$1 \$2 \$1 \$2;
+#X obj 47 318 f;
+#X obj 46 365 pack f s;
+#X obj 47 282 t b s;
+#X obj 46 404 t l l;
+#X obj 285 595 outlet NEW;
+#X obj 62 597 outlet OLD;
+#X obj 480 -5 inlet clear/remove;
+#X obj 480 26 route bang;
+#X obj 527 124 cyclone/prepend remove;
+#X obj 452 61 t b b;
+#X obj 120 269 f -1;
+#X msg 417 116 -1;
+#X msg 460 95 clear;
+#X obj 84 22 route symbol list;
+#X obj 784 1 inlet test;
+#X obj 717 169 spigot;
+#X msg 782 121 1;
+#X msg 813 122 0;
+#X msg 810 144 3;
+#X obj 528 520 t a b;
+#X obj 673 589 outlet TEST;
+#X obj 935 24 inlet dump;
+#X msg 900 177 dump;
+#X obj 939 120 t b b;
+#X msg 972 185 4;
+#X obj 871 588 outlet DUMP;
+#X obj 203 147 spigot;
+#X obj 210 50 t l l b b;
+#X msg 255 84 1;
+#X msg 341 77 2;
+#X msg 276 116 0;
+#X obj 389 592 print indexer;
+#X obj 439 527 t l b;
+#X msg 389 564 Symbol \$2 is already at index \$1.;
+#X obj 716 120 t b a b b;
+#X obj 495 266 route symbol float;
+#X obj 467 289 symbol;
+#X obj 258 147 unpack f s;
+#X obj 260 201 spigot;
+#X obj 544 84 t b a b;
+#X obj 344 450 zexy/demultiplex 0 1 2 3 4;
+#X connect 0 0 54 0;
+#X connect 1 0 27 0;
+#X connect 2 0 10 0;
+#X connect 3 0 2 0;
+#X connect 3 1 0 0;
+#X connect 3 2 5 0;
+#X connect 3 3 4 0;
+#X connect 4 0 2 1;
+#X connect 5 0 54 1;
+#X connect 6 0 19 0;
+#X connect 6 1 7 0;
+#X connect 7 0 2 1;
+#X connect 8 0 54 1;
+#X connect 9 0 24 0;
+#X connect 10 0 16 0;
+#X connect 10 1 24 0;
+#X connect 10 2 8 0;
+#X connect 11 0 12 0;
+#X connect 12 0 0 0;
+#X connect 12 1 14 1;
+#X connect 12 2 24 1;
+#X connect 13 0 0 0;
+#X connect 14 0 15 0;
+#X connect 15 0 17 0;
+#X connect 16 0 14 0;
+#X connect 16 1 15 1;
+#X connect 17 0 18 0;
+#X connect 17 1 13 0;
+#X connect 20 0 21 0;
+#X connect 21 0 23 0;
+#X connect 21 1 53 0;
+#X connect 22 0 0 0;
+#X connect 23 0 25 0;
+#X connect 23 1 26 0;
+#X connect 24 0 11 0;
+#X connect 25 0 24 1;
+#X connect 26 0 0 0;
+#X connect 27 0 3 0;
+#X connect 27 1 41 0;
+#X connect 28 0 48 0;
+#X connect 29 0 34 0;
+#X connect 30 0 29 1;
+#X connect 31 0 29 1;
+#X connect 32 0 54 1;
+#X connect 33 0 34 0;
+#X connect 33 1 31 0;
+#X connect 35 0 37 0;
+#X connect 36 0 0 0;
+#X connect 37 0 36 0;
+#X connect 37 1 38 0;
+#X connect 38 0 54 1;
+#X connect 40 0 17 0;
+#X connect 41 0 40 0;
+#X connect 41 1 51 0;
+#X connect 41 2 42 0;
+#X connect 41 3 43 0;
+#X connect 42 0 40 1;
+#X connect 42 0 52 1;
+#X connect 43 0 54 1;
+#X connect 44 0 40 1;
+#X connect 44 0 52 1;
+#X connect 46 0 47 0;
+#X connect 46 1 44 0;
+#X connect 47 0 45 0;
+#X connect 48 0 29 0;
+#X connect 48 1 49 0;
+#X connect 48 2 32 0;
+#X connect 48 3 30 0;
+#X connect 49 0 50 0;
+#X connect 49 1 0 0;
+#X connect 50 0 0 0;
+#X connect 51 0 52 0;
+#X connect 51 1 0 0;
+#X connect 52 0 0 0;
+#X connect 53 0 25 0;
+#X connect 53 1 22 0;
+#X connect 54 0 6 0;
+#X connect 54 1 9 0;
+#X connect 54 2 46 0;
+#X connect 54 3 33 0;
+#X connect 54 4 39 0;
-- 
cgit v1.2.1