1 files changed, 131 insertions, 0 deletions
diff --git a/controctopus/tentacle-pager.pd b/controctopus/tentacle-pager.pd
new file mode 100644
index 0000000..ef1f107
--- /dev/null
+++ b/controctopus/tentacle-pager.pd
@@ -0,0 +1,131 @@
+#N canvas 605 66 239 173 10;
+#N canvas 895 383 458 308 logic 0;
+#X obj 309 120 r \$0channel;
+#X obj 202 38 r \$0next;
+#X obj 100 38 r \$0prev;
+#X obj 115 70 r \$0channel;
+#X obj 100 99 f 1;
+#X obj 202 99 f 1;
+#X obj 202 126 + 1;
+#X obj 100 126 - 1;
+#X obj 152 252 s \$0channelR;
+#X obj 217 70 r \$0channel;
+#X obj 152 225 + 1;
+#X obj 309 143 s \$1/showChannel;
+#X obj 152 178 - 1;
+#X obj 152 200 mod 16;
+#X connect 0 0 11 0;
+#X connect 1 0 5 0;
+#X connect 2 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 7 0;
+#X connect 5 0 6 0;
+#X connect 6 0 12 0;
+#X connect 7 0 12 0;
+#X connect 9 0 5 1;
+#X connect 10 0 8 0;
+#X connect 12 0 13 0;
+#X connect 13 0 10 0;
+#X restore 138 146 pd logic;
+#X obj 35 44 hradio 10 1 0 8 \$0chRow1 \$0chRow1R empty 0 -8 0 10 -118016
+-62784 -166441 1;
+#X obj 35 54 hradio 10 1 0 8 \$0chRow2 \$0chRow2R empty 0 -8 0 10 -118016
+-118016 -166441 7;
+#N canvas 340 243 921 562 3RowRadio 0;
+#X obj 258 324 r \$0chRow1;
+#X obj 508 334 r \$0chRow2;
+#X obj 258 454 s \$0chRow1R;
+#X obj 508 455 s \$0chRow2R;
+#X obj 297 53 r \$0chRow1;
+#X obj 397 53 r \$0chRow2;
+#X obj 368 189 s \$0channel;
+#X obj 25 1 r \$0channelR;
+#X obj 64 77 moses 9;
+#X obj 103 100 - 9;
+#X obj 64 144 s \$0chRow1R;
+#X obj 103 122 s \$0chRow2R;
+#X obj 64 109 - 1;
+#X obj 572 116 r \$0channel;
+#X msg 645 159 label Ch.\$1;
+#X obj 572 181 s \$0channelDisp;
+#X obj 433 167 s \$0channelSet;
+#X msg 258 372 color -7.39328e+06 18 1;
+#X msg 268 395 color -7.39328e+06 -7.39328e+06 1;
+#X msg 508 372 color -7.39328e+06 18 1;
+#X msg 518 395 color -7.39328e+06 -7.39328e+06 1;
+#X obj 349 128 + 1;
+#X obj 572 137 sel 0;
+#X msg 572 159 label Omni;
+#X obj 217 53 r \$0chRow0;
+#X obj 28 334 r \$0chRow0;
+#X obj 25 54 moses 1;
+#X obj 25 166 s \$0chRow0R;
+#X obj 28 454 s \$0chRow0R;
+#X msg 284 419 color 1 1 1;
+#X msg 38 395 color 1 1 1;
+#X msg 534 419 color 1 1 1;
+#X obj 288 167 == 0;
+#X obj 288 189 s \$0omni;
+#X obj 349 150 t a a a;
+#X obj 752 98 r \$0omni;
+#X obj 752 121 sel 0 1;
+#X obj 752 181 s \$0channelDisp;
+#X msg 752 149 color 2 7;
+#X msg 816 149 color 2 14;
+#X msg 28 372 color 14 18 1;
+#X obj 297 86 + 0;
+#X obj 397 87 + 8;
+#X connect 0 0 17 0;
+#X connect 0 0 18 0;
+#X connect 0 0 29 0;
+#X connect 1 0 19 0;
+#X connect 1 0 20 0;
+#X connect 1 0 31 0;
+#X connect 4 0 41 0;
+#X connect 5 0 42 0;
+#X connect 7 0 26 0;
+#X connect 8 0 12 0;
+#X connect 8 1 9 0;
+#X connect 9 0 11 0;
+#X connect 12 0 10 0;
+#X connect 13 0 22 0;
+#X connect 14 0 15 0;
+#X connect 17 0 2 0;
+#X connect 18 0 3 0;
+#X connect 19 0 3 0;
+#X connect 20 0 2 0;
+#X connect 21 0 34 0;
+#X connect 22 0 23 0;
+#X connect 22 1 14 0;
+#X connect 23 0 15 0;
+#X connect 24 0 34 0;
+#X connect 25 0 40 0;
+#X connect 25 0 30 0;
+#X connect 26 0 27 0;
+#X connect 26 1 8 0;
+#X connect 29 0 28 0;
+#X connect 30 0 2 0;
+#X connect 30 0 3 0;
+#X connect 31 0 28 0;
+#X connect 32 0 33 0;
+#X connect 34 0 32 0;
+#X connect 34 1 6 0;
+#X connect 34 2 16 0;
+#X connect 35 0 36 0;
+#X connect 36 0 38 0;
+#X connect 36 1 39 0;
+#X connect 38 0 37 0;
+#X connect 39 0 37 0;
+#X connect 40 0 28 0;
+#X connect 41 0 21 0;
+#X connect 42 0 21 0;
+#X restore 138 123 pd 3RowRadio;
+#X obj 23 48 hradio 12 1 0 1 \$0chRow0 \$0chRow0R empty 0 -8 0 10 -166441
+-166441 -166441 0;
+#X obj 22 24 cnv 12 40 12 empty empty \$1 1 6 0 8 -262144 -66577 0
+;
+#X obj 78 23 bng 15 250 50 0 \$0next \$0nextR > 5 8 1 11 -261441 -1
+-1;
+#X obj 57 23 bng 15 250 50 0 \$0prev \$0prevR < 5 8 1 11 -261441 -1
+-1;
+#X coords 0 -1 1 1 98 47 2 20 20;