1 files changed, 68 insertions, 0 deletions
diff --git a/s-midimemory.pd b/s-midimemory.pd
new file mode 100644
index 0000000..bc21ec6
--- /dev/null
+++ b/s-midimemory.pd
@@ -0,0 +1,68 @@
+#N canvas 32 141 598 499 10;
+#X obj 81 239 f;
+#X floatatom 161 63 5 0 0 0 - - -;
+#X obj 9 64 moses 127;
+#X obj 51 156 spigot;
+#X msg 13 90 1;
+#X msg 49 89 0;
+#X obj 20 27 t f f;
+#X floatatom 118 224 5 0 0 0 - - -;
+#X obj 104 158 spigot;
+#X msg 69 216 bang;
+#X obj 299 287 spigot;
+#X msg 97 90 1;
+#X msg 144 92 0;
+#X obj 350 350 line;
+#X obj 386 73 table \$0-knobmem \$1;
+#X obj 161 40 mod \$1;
+#X obj 243 16 inlet;
+#X obj 17 5 inlet;
+#X obj 53 484 outlet;
+#X obj 276 231 tabread \$0-knobmem;
+#X obj 352 316 pack f 50;
+#X obj 93 264 tabwrite \$0-knobmem;
+#X obj 301 106 \$3;
+#X obj 301 81 loadbang;
+#X obj 300 131 select 0;
+#X msg 299 156 127;
+#X obj 315 178 s \$0-height;
+#X obj 63 5 r \$0-height;
+#X obj 160 17 r \$2/tick;
+#X obj 396 275 r \$2/ticklength;
+#X text 322 6 args: [length] [timername] [height];
+#X connect 0 0 21 0;
+#X connect 1 0 8 0;
+#X connect 1 0 19 0;
+#X connect 1 0 21 1;
+#X connect 2 0 4 0;
+#X connect 2 0 12 0;
+#X connect 2 0 18 0;
+#X connect 2 1 5 0;
+#X connect 2 1 11 0;
+#X connect 3 0 7 0;
+#X connect 4 0 3 1;
+#X connect 4 0 8 1;
+#X connect 5 0 3 1;
+#X connect 5 0 8 1;
+#X connect 6 0 2 0;
+#X connect 6 1 3 0;
+#X connect 7 0 0 1;
+#X connect 8 0 9 0;
+#X connect 9 0 0 0;
+#X connect 10 0 20 0;
+#X connect 11 0 10 1;
+#X connect 12 0 10 1;
+#X connect 13 0 18 0;
+#X connect 15 0 1 0;
+#X connect 16 0 15 0;
+#X connect 17 0 6 0;
+#X connect 19 0 10 0;
+#X connect 20 0 13 0;
+#X connect 22 0 24 0;
+#X connect 23 0 22 0;
+#X connect 24 0 25 0;
+#X connect 24 1 26 0;
+#X connect 25 0 26 0;
+#X connect 27 0 2 1;
+#X connect 28 0 15 0;
+#X connect 29 0 20 1;