1 files changed, 57 insertions, 0 deletions
diff --git a/s-midictlbuddy.pd b/s-midictlbuddy.pd
new file mode 100644
index 0000000..fb76a08
--- /dev/null
+++ b/s-midictlbuddy.pd
@@ -0,0 +1,57 @@
+#N canvas 484 13 756 493 10;
+#X obj 58 227 ctlin;
+#X obj 58 394 spigot;
+#X obj 58 454 outlet;
+#X obj 173 182 loadbang;
+#X obj 173 227 == 0;
+#X obj 88 250 spigot;
+#X obj 58 341 spigot;
+#X obj 125 228 != 0;
+#X obj 120 431 spigot;
+#X obj 178 335 loadbang;
+#X msg 178 399 1;
+#X msg 236 399 0;
+#X obj 308 181 inlet;
+#X obj 308 202 route set;
+#X obj 308 225 unpack f f;
+#X obj 88 284 == \$3;
+#X obj 173 204 \$3;
+#X obj 120 455 s \$2;
+#X obj 178 377 select \$2;
+#X obj 178 356 symbol \$2;
+#X obj 95 371 == \$1;
+#X obj 5 19 tgl 16 0 \$0/record \$0/record record 20 8 0 8 -260818
+-1 -1 0 1;
+#X floatatom 116 22 5 0 0 0 - - -;
+#X floatatom 157 22 5 0 0 0 - - -;
+#X text 235 6 s-midictl [ctrl-num] [send-name] [channel];
+#X obj 402 110 ctlin;
+#X obj 458 110 r \$0/record;
+#X obj 425 164 spigot;
+#X connect 0 0 6 0;
+#X connect 0 1 20 0;
+#X connect 0 2 5 0;
+#X connect 1 0 2 0;
+#X connect 1 0 8 0;
+#X connect 3 0 16 0;
+#X connect 4 0 6 1;
+#X connect 5 0 15 0;
+#X connect 6 0 1 0;
+#X connect 7 0 5 1;
+#X connect 8 0 17 0;
+#X connect 9 0 19 0;
+#X connect 10 0 8 1;
+#X connect 11 0 8 1;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 20 1;
+#X connect 14 1 15 1;
+#X connect 14 1 16 0;
+#X connect 15 0 6 1;
+#X connect 16 0 4 0;
+#X connect 16 0 7 0;
+#X connect 18 0 10 0;
+#X connect 18 1 11 0;
+#X connect 19 0 18 0;
+#X connect 20 0 1 1;
+#X coords 0 -1 1 1 200 40 1 0 0;