added support for mmmap, removed declare/import, lots of tidying

svn path=/trunk/abstractions/sfruit/; revision=10371

4 files changed, 477 insertions, 398 deletions

diff --git a/controctopus/cc-learner.pd b/controctopus/cc-learner.pd
index 9e2a883..0f13eb3 100644
--- a/controctopus/cc-learner.pd
+++ b/controctopus/cc-learner.pd
@@ -1,145 +1,188 @@
-#N canvas 730 32 629 668 10;
-#X obj 60 46 nbx 3 14 0 127 0 1 \$0-ccNumber \$0-ccNumberLearn CC 42
-8 0 11 -194624 -1 -1 1 256;
-#X obj 63 64 bng 13 250 50 0 \$0-learnOn \$0nullR empty 0 -6 0 8 -259541
--1 -1;
-#X obj 353 200 r \$0-ccNumber;
-#X obj 81 67 bng 8 250 50 0 empty \$0lite1 empty 0 -6 0 8 -1 -262085
+#N canvas 62 131 629 668 10;
+#X obj 60 46 nbx 3 14 0 127 0 1 \$0.cc.s \$0.cc.r CC 42 8 0 11 -194624
+-1 -1 1 256;
+#X obj 63 64 bng 13 250 50 0 \$0.learn-on \$0.nullR empty 0 -6 0 8
+-259541 -1 -1;
+#X obj 330 208 r \$0.cc.v;
+#X obj 81 67 bng 8 250 50 0 empty \$0.lite1 empty 0 -6 0 8 -1 -262085
 -1;
-#X obj 92 67 bng 8 250 50 0 empty \$0lite2 empty 0 -6 0 8 -1 -262085
+#X obj 92 67 bng 8 250 50 0 empty \$0.lite2 empty 0 -6 0 8 -1 -262085
 -1;
-#X obj 103 67 bng 8 250 50 0 empty \$0lite3 empty 0 -6 0 8 -1 -262085
+#X obj 103 67 bng 8 250 50 0 empty \$0.lite3 empty 0 -6 0 8 -1 -262085
 -1;
-#X obj 300 -1 ctlin;
-#X obj 60 81 nbx 2 14 1 64 0 0 \$0devNo \$1/devNo Dev 32 8 0 11 -110565
--1 -1 1 256;
+#X obj 268 49 ctlin;
+#X obj 60 81 nbx 2 14 1 64 0 0 \$0.device-number.s \$0.device-number.r
+Dev 32 8 0 11 -110565 -1 -1 1 256;
 #X obj 315 181 spigot;
-#X obj 300 257 spigot;
+#X obj 268 267 spigot;
 #X obj 268 181 / 127;
-#N canvas 0 22 458 308 midiLearn 0;
-#X obj 217 143 inlet;
-#X obj 162 38 r \$0-learnOn;
-#X obj 217 177 spigot;
-#X obj 74 188 metro 250;
-#X obj 58 221 count 3;
-#X obj 29 126 t b b;
-#X msg 29 189 reset;
-#X obj 217 199 s \$0-ccNumberLearn;
-#X obj 162 75 pipe 1000;
-#X msg 255 74 1;
-#X msg 274 118 0;
-#X msg 74 150 0;
-#X msg 106 150 1;
-#X obj 58 251 sel 0 1 2;
-#X obj 58 281 s \$0lite1;
-#X obj 138 281 s \$0lite2;
-#X obj 218 281 s \$0lite3;
-#X connect 0 0 2 0;
-#X connect 1 0 8 0;
-#X connect 1 0 9 0;
-#X connect 1 0 12 0;
-#X connect 2 0 7 0;
-#X connect 3 0 4 0;
-#X connect 4 0 13 0;
-#X connect 5 0 6 0;
-#X connect 5 1 11 0;
-#X connect 6 0 4 0;
-#X connect 8 0 5 0;
-#X connect 8 0 10 0;
-#X connect 9 0 2 1;
-#X connect 10 0 2 1;
-#X connect 11 0 3 0;
-#X connect 12 0 3 0;
-#X connect 13 0 14 0;
-#X connect 13 1 15 0;
-#X connect 13 2 16 0;
-#X restore 178 180 pd midiLearn;
-#X obj 337 229 ==;
-#X obj 352 101 div 16;
-#X obj 352 161 ==;
-#X obj 368 139 r \$0devNo;
-#X obj 443 115 mod 16;
-#X obj 413 85 t f f;
+#X obj 315 237 ==;
 #X obj 349 566 list append;
 #X obj 333 611 s;
-#X obj 443 135 s \$0channel;
-#X msg 224 287 set \$1;
-#X obj 300 365 s \$0data;
-#X obj 210 467 r \$0data;
-#X obj 333 431 r \$0data;
-#X obj 493 17 loadbang;
-#X msg 493 39 1;
+#X msg 294 292 set \$1;
+#X obj 268 367 s \$0.data;
+#X obj 210 467 r \$0.data;
+#X obj 333 431 r \$0.data;
+#X obj 32 231 loadbang;
+#X msg 32 253 1;
 #X obj 391 544 t b f;
-#X obj 391 522 r \$0channel;
-#X obj 352 120 + 1;
+#X obj 391 522 r \$0.channel;
 #X obj 349 500 list append \$2;
 #X obj 10 570 r \$1/getControls;
 #X obj 10 620 s \$1/controlsList;
 #X obj 10 594 list append \$2;
-#X obj 224 307 s \$1\$2/GUIR;
+#X obj 294 312 s \$1\$2/GUIR;
 #X obj 210 567 s \$1\$2;
-#X obj 224 338 r \$1\$2/GUI;
+#X obj 294 343 r \$1\$2/GUI;
 #X msg 349 587 symbol \$1\$2/Ch\$3;
 #X obj 349 478 list append \$1;
 #X text 208 594 Omni;
 #X obj 10 492 r \$1/setChannel;
-#X obj 10 517 s \$0channel;
+#X obj 10 517 s \$0.channel;
 #X obj 51 31 cnv 12 75 12 empty empty \$2 2 7 0 11 -83692 -262144 0
 ;
 #X obj 315 98 t a;
 #X obj 268 98 t a;
-#X obj 352 69 t a;
-#X obj 198 1 r sft.ctlin;
-#X obj 198 28 unpack f f f;
-#X obj 493 65 s \$0channel;
+#X obj 348 99 t a;
+#X obj 32 279 s \$0.channel;
 #X obj 222 493 outlet;
 #X obj 51 98 cnv 10 75 10 empty empty \$1 1 6 0 8 -66577 -171136 0
 ;
-#X obj 32 129 sssadie/sssad-lg \$2-cc \$0;
-#X obj 32 151 sssadie/sssad-lg \$2-device \$0;
-#X connect 0 0 51 1;
-#X connect 2 0 12 1;
-#X connect 6 0 44 0;
-#X connect 6 1 43 0;
-#X connect 6 2 45 0;
-#X connect 7 0 52 1;
-#X connect 8 0 12 0;
-#X connect 9 0 21 0;
-#X connect 9 0 22 0;
+#X obj 308 49 nr PDCTLIN 3;
+#X obj 32 304 r \$1/devNo;
+#X obj 32 329 s \$0.device-number.r;
+#N canvas 0 22 450 300 sssad 0;
+#X obj 43 89 sssadie/sssadiez \$1 \$2 cc 0 1024 \$0 round;
+#X obj 43 109 sssadie/sssadiez \$1 \$2 device-number 0 1024 \$0 round
+;
+#X restore 26 198 pd sssad;
+#N canvas 0 22 458 308 midi-learn 0;
+#X obj 217 143 inlet;
+#X obj 162 38 r \$0.learn-on;
+#X obj 217 177 spigot;
+#X obj 74 188 metro 250;
+#X obj 29 126 t b b;
+#X obj 217 199 s \$0.cc.r;
+#X obj 162 75 pipe 1000;
+#X msg 255 74 1;
+#X msg 274 118 0;
+#X msg 74 150 0;
+#X msg 106 150 1;
+#X obj 58 251 sel 0 1 2;
+#X obj 58 281 s \$0.lite1;
+#X obj 138 281 s \$0.lite2;
+#X obj 218 281 s \$0.lite3;
+#X msg 29 189 0;
+#X obj 58 221 f;
+#X obj 85 221 + 1;
+#X obj 112 221 mod 3;
+#X connect 0 0 2 0;
+#X connect 1 0 6 0;
+#X connect 1 0 7 0;
+#X connect 1 0 10 0;
+#X connect 2 0 5 0;
+#X connect 3 0 16 0;
+#X connect 4 0 15 0;
+#X connect 4 1 9 0;
+#X connect 6 0 4 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 1;
+#X connect 8 0 2 1;
+#X connect 9 0 3 0;
+#X connect 10 0 3 0;
+#X connect 11 0 12 0;
+#X connect 11 1 13 0;
+#X connect 11 2 14 0;
+#X connect 15 0 16 1;
+#X connect 16 0 11 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 17 0 16 1;
+#X connect 18 0 17 1;
+#X restore 366 133 pd midi-learn;
+#N canvas 872 119 244 290 parse-channel 0;
+#X obj 55 34 inlet;
+#X obj 55 241 outlet;
+#X obj 55 137 div 16;
+#X obj 55 197 ==;
+#X obj 71 175 r \$0.device-number;
+#X obj 82 88 mod 16;
+#X obj 55 67 t f f;
+#X obj 82 108 s \$0.channel;
+#X obj 55 156 + 1;
+#X connect 0 0 6 0;
+#X connect 2 0 8 0;
+#X connect 3 0 1 0;
+#X connect 4 0 3 1;
+#X connect 5 0 7 0;
+#X connect 6 0 2 0;
+#X connect 6 1 5 0;
+#X connect 8 0 3 0;
+#X restore 348 156 pd parse-channel;
+#N canvas 833 52 478 437 midi-sensory 0;
+#X obj 73 159 spigot;
+#X obj 73 100 r \$0.data;
+#X obj 106 134 r MMMAP_SENSING?;
+#X obj 219 61 keycommand ¬ MMMAP_SENSING? 1;
+#X obj 219 86 keycommand Escape MMMAP_SENSING? 0;
+#X obj 73 204 list append \$2;
+#X obj 73 181 t b b;
+#X msg 110 181 0;
+#X obj 139 181 s MMMAP_SENSING?;
+#X obj 73 231 s \$1.sensed;
+#X obj 77 288 r MMMAP_SENSING?;
+#X obj 137 372 s \$1\$2/GUIR;
+#X msg 137 348 color \$1 -1 -1;
+#X obj 77 313 list-idx-list 0 15;
+#X obj 198 288 r \$1\$2.assigning?;
+#X obj 198 313 list-idx-list 0 19;
+#X connect 0 0 6 0;
+#X connect 1 0 0 0;
+#X connect 2 0 0 1;
+#X connect 5 0 9 0;
+#X connect 6 0 5 0;
+#X connect 6 1 7 0;
+#X connect 7 0 8 0;
+#X connect 10 0 13 0;
+#X connect 12 0 11 0;
+#X connect 13 0 12 0;
+#X connect 14 0 15 0;
+#X connect 15 0 12 0;
+#X restore 485 392 pd midi-sensory;
+#X text 195 15 cc-learner /unit /control;
+#X connect 2 0 11 1;
+#X connect 6 0 36 0;
+#X connect 6 1 35 0;
+#X connect 6 2 37 0;
+#X connect 8 0 11 0;
+#X connect 9 0 14 0;
+#X connect 9 0 15 0;
 #X connect 10 0 9 0;
-#X connect 12 0 9 1;
-#X connect 13 0 29 0;
-#X connect 14 0 8 1;
-#X connect 15 0 14 1;
-#X connect 16 0 20 0;
+#X connect 11 0 9 1;
+#X connect 12 0 29 0;
+#X connect 14 0 26 0;
+#X connect 16 0 27 0;
+#X connect 16 0 39 0;
 #X connect 17 0 13 0;
-#X connect 17 1 16 0;
-#X connect 18 0 37 0;
-#X connect 21 0 34 0;
-#X connect 23 0 35 0;
-#X connect 23 0 49 0;
-#X connect 24 0 19 0;
-#X connect 25 0 26 0;
-#X connect 26 0 48 0;
-#X connect 27 0 38 0;
-#X connect 27 1 18 1;
-#X connect 28 0 27 0;
-#X connect 29 0 14 0;
-#X connect 30 0 18 0;
-#X connect 31 0 33 0;
-#X connect 33 0 32 0;
-#X connect 36 0 22 0;
-#X connect 37 0 19 1;
-#X connect 38 0 30 0;
-#X connect 40 0 41 0;
-#X connect 43 0 11 0;
-#X connect 43 0 8 0;
-#X connect 44 0 10 0;
-#X connect 45 0 17 0;
-#X connect 46 0 47 0;
-#X connect 47 0 44 0;
-#X connect 47 1 43 0;
-#X connect 47 2 45 0;
-#X connect 51 0 0 0;
-#X connect 52 0 7 0;
+#X connect 18 0 19 0;
+#X connect 19 0 38 0;
+#X connect 20 0 30 0;
+#X connect 20 1 12 1;
+#X connect 21 0 20 0;
+#X connect 22 0 12 0;
+#X connect 23 0 25 0;
+#X connect 25 0 24 0;
+#X connect 28 0 15 0;
+#X connect 29 0 13 1;
+#X connect 30 0 22 0;
+#X connect 32 0 33 0;
+#X connect 35 0 45 0;
+#X connect 35 0 8 0;
+#X connect 36 0 10 0;
+#X connect 37 0 46 0;
+#X connect 41 0 36 0;
+#X connect 41 1 35 0;
+#X connect 41 2 37 0;
+#X connect 42 0 43 0;
+#X connect 46 0 8 1;
 #X coords 0 -1 1 1 77 79 2 50 30;
diff --git a/controctopus/midi-tentacle-multi.pd b/controctopus/midi-tentacle-multi.pd
index 3ee186e..2b5086a 100644
--- a/controctopus/midi-tentacle-multi.pd
+++ b/controctopus/midi-tentacle-multi.pd
@@ -120,22 +120,22 @@
 #X connect 23 0 22 0;
 #X restore 31 315 pd listops;
 #N canvas 935 166 242 368 16channelOuts 0;
-#X obj 18 23 rchannel-multi \$0 \$1 \$2 \$3 \$4 1;
-#X obj 18 43 rchannel-multi \$0 \$1 \$2 \$3 \$4 2;
-#X obj 18 63 rchannel-multi \$0 \$1 \$2 \$3 \$4 3;
-#X obj 18 83 rchannel-multi \$0 \$1 \$2 \$3 \$4 4;
-#X obj 18 103 rchannel-multi \$0 \$1 \$2 \$3 \$4 5;
-#X obj 18 123 rchannel-multi \$0 \$1 \$2 \$3 \$4 6;
-#X obj 18 143 rchannel-multi \$0 \$1 \$2 \$3 \$4 7;
-#X obj 18 163 rchannel-multi \$0 \$1 \$2 \$3 \$4 8;
-#X obj 18 183 rchannel-multi \$0 \$1 \$2 \$3 \$4 9;
-#X obj 18 203 rchannel-multi \$0 \$1 \$2 \$3 \$4 10;
-#X obj 18 223 rchannel-multi \$0 \$1 \$2 \$3 \$4 11;
-#X obj 18 263 rchannel-multi \$0 \$1 \$2 \$3 \$4 13;
-#X obj 18 283 rchannel-multi \$0 \$1 \$2 \$3 \$4 14;
-#X obj 18 303 rchannel-multi \$0 \$1 \$2 \$3 \$4 15;
-#X obj 18 323 rchannel-multi \$0 \$1 \$2 \$3 \$4 16;
-#X obj 18 243 rchannel-multi \$0 \$1 \$2 \$3 \$4 12;
+#X obj 18 23 rchannel-multi \$0 \$1 \$2 \$3 1;
+#X obj 18 43 rchannel-multi \$0 \$1 \$2 \$3 2;
+#X obj 18 63 rchannel-multi \$0 \$1 \$2 \$3 3;
+#X obj 18 83 rchannel-multi \$0 \$1 \$2 \$3 4;
+#X obj 18 103 rchannel-multi \$0 \$1 \$2 \$3 5;
+#X obj 18 123 rchannel-multi \$0 \$1 \$2 \$3 6;
+#X obj 18 143 rchannel-multi \$0 \$1 \$2 \$3 7;
+#X obj 18 163 rchannel-multi \$0 \$1 \$2 \$3 8;
+#X obj 18 183 rchannel-multi \$0 \$1 \$2 \$3 9;
+#X obj 18 203 rchannel-multi \$0 \$1 \$2 \$3 10;
+#X obj 18 223 rchannel-multi \$0 \$1 \$2 \$3 11;
+#X obj 18 263 rchannel-multi \$0 \$1 \$2 \$3 13;
+#X obj 18 283 rchannel-multi \$0 \$1 \$2 \$3 14;
+#X obj 18 303 rchannel-multi \$0 \$1 \$2 \$3 15;
+#X obj 18 323 rchannel-multi \$0 \$1 \$2 \$3 16;
+#X obj 18 243 rchannel-multi \$0 \$1 \$2 \$3 12;
 #X restore 31 293 pd 16channelOuts;
 #X obj 166 61 list-extend;
 #X obj 189 405 r \$0getParams;
diff --git a/controctopus/midi-tentacle.pd b/controctopus/midi-tentacle.pd
index f25d02c..3e6f67f 100644
--- a/controctopus/midi-tentacle.pd
+++ b/controctopus/midi-tentacle.pd
@@ -1,13 +1,14 @@
 #N canvas 228 148 514 657 10;
+
 #X obj 141 161 cnv 15 158 78 empty empty \$1\$2->\$3 4 14 0 10 -86277
 -260097 0;
 #X obj 145 188 popup 150 25 #ee0000 No-Destination press 'get' to load
 parameters;
 #X obj 65 126 r \$0popup;
 #X obj 157 216 hradio 10 1 0 8 \$0chRow1 \$0chRow1R empty 0 -8 0 10
--166441 -166441 -166441 2;
+-166441 -166441 -166441 0;
 #X obj 157 226 hradio 10 1 0 8 \$0chRow2 \$0chRow2R empty 0 -8 0 10
--166441 -166441 -166441 5;
+-166441 -166441 -166441 0;
 #X obj 240 219 cnv 15 37 15 empty \$0channelDisp Omni 2 7 0 10 -66577
 -260818 0;
 #N canvas 259 247 434 288 init 0;
@@ -132,22 +133,22 @@ parameters;
 7 -249808 -1 -262144;
 #X obj 31 527 r \$0getParams;
 #N canvas 713 160 242 368 16channelOuts 0;
-#X obj 18 23 rchannel \$0 \$1 \$2 \$3 \$4 1;
-#X obj 18 43 rchannel \$0 \$1 \$2 \$3 \$4 2;
-#X obj 18 63 rchannel \$0 \$1 \$2 \$3 \$4 3;
-#X obj 18 83 rchannel \$0 \$1 \$2 \$3 \$4 4;
-#X obj 18 103 rchannel \$0 \$1 \$2 \$3 \$4 5;
-#X obj 18 123 rchannel \$0 \$1 \$2 \$3 \$4 6;
-#X obj 18 143 rchannel \$0 \$1 \$2 \$3 \$4 7;
-#X obj 18 163 rchannel \$0 \$1 \$2 \$3 \$4 8;
-#X obj 18 183 rchannel \$0 \$1 \$2 \$3 \$4 9;
-#X obj 18 203 rchannel \$0 \$1 \$2 \$3 \$4 10;
-#X obj 18 223 rchannel \$0 \$1 \$2 \$3 \$4 11;
-#X obj 18 263 rchannel \$0 \$1 \$2 \$3 \$4 13;
-#X obj 18 283 rchannel \$0 \$1 \$2 \$3 \$4 14;
-#X obj 18 303 rchannel \$0 \$1 \$2 \$3 \$4 15;
-#X obj 18 323 rchannel \$0 \$1 \$2 \$3 \$4 16;
-#X obj 18 243 rchannel \$0 \$1 \$2 \$3 \$4 12;
+#X obj 18 23 rchannel \$0 \$1 \$2 \$3 1;
+#X obj 18 43 rchannel \$0 \$1 \$2 \$3 2;
+#X obj 18 63 rchannel \$0 \$1 \$2 \$3 3;
+#X obj 18 83 rchannel \$0 \$1 \$2 \$3 4;
+#X obj 18 103 rchannel \$0 \$1 \$2 \$3 5;
+#X obj 18 123 rchannel \$0 \$1 \$2 \$3 6;
+#X obj 18 143 rchannel \$0 \$1 \$2 \$3 7;
+#X obj 18 163 rchannel \$0 \$1 \$2 \$3 8;
+#X obj 18 183 rchannel \$0 \$1 \$2 \$3 9;
+#X obj 18 203 rchannel \$0 \$1 \$2 \$3 10;
+#X obj 18 223 rchannel \$0 \$1 \$2 \$3 11;
+#X obj 18 263 rchannel \$0 \$1 \$2 \$3 13;
+#X obj 18 283 rchannel \$0 \$1 \$2 \$3 14;
+#X obj 18 303 rchannel \$0 \$1 \$2 \$3 15;
+#X obj 18 323 rchannel \$0 \$1 \$2 \$3 16;
+#X obj 18 243 rchannel \$0 \$1 \$2 \$3 12;
 #X restore 31 293 pd 16channelOuts;
 #X obj 241 64 r \$1/clearParams;
 #X obj 145 220 hradio 12 1 0 1 \$0chRow0 \$0chRow0R empty 0 -8 0 10
@@ -268,6 +269,7 @@ parameters;
 #X connect 7 0 6 1;
 #X restore 134 293 pd omniOut;
 #X obj 65 152 popup-fix;
+#X text 159 328 [midi-tentacle /controller /control /system-name];
 #X connect 1 0 31 1;
 #X connect 1 1 7 0;
 #X connect 2 0 31 0;
diff --git a/controctopus/note-learner.pd b/controctopus/note-learner.pd
index 69ca14d..10921f1 100644
--- a/controctopus/note-learner.pd
+++ b/controctopus/note-learner.pd
@@ -1,285 +1,319 @@
-#N canvas 377 506 1051 667 10;
-#X declare -lib nsend -lib list-abs -lib creb;
-#X obj 358 266 select;
-#X obj 385 327 f;
-#X obj 358 389 pack;
-#X obj 358 297 t b b;
-#X obj 102 293 nbx 2 14 1 128 0 0 \$0-padNumber \$0-padNumberR Pad
-32 7 0 11 -154432 -1 -1 65 256;
-#X obj 102 276 nbx 2 14 0 127 0 0 \$0-noteNumber \$0-noteNumberLearn
-Note 32 7 0 11 -260624 -1 -1 0 256;
-#X obj 442 406 outlet;
-#X obj 137 263 bng 13 250 50 0 \$0-learnOn empty empty 0 -6 0 8 -259541
+#N canvas 311 44 1053 650 10;
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+#X obj 336 251 select;
+#X obj 363 337 f;
+#X obj 336 506 pack;
+#X obj 336 277 t b b;
+#X obj 102 293 nbx 2 14 1 128 0 0 \$0.pad.s \$0.pad.r Pad 32 7 0 11
+-154432 -1 -1 1 256;
+#X obj 102 276 nbx 2 14 0 127 0 0 \$0.note.s \$0.note.r Note 32 7 0
+11 -260624 -1 -1 0 256;
+#X obj 420 523 outlet;
+#X obj 137 263 bng 13 250 50 0 \$0.learn-on empty empty 0 -6 0 8 -259541
 -1 -1;
-#X obj 103 265 bng 8 250 50 0 empty empty empty 0 -6 0 8 -1 -262085
+#X obj 103 265 bng 8 250 50 0 empty \$0.lite1 empty 0 -6 0 8 -1 -262085
 -1;
-#X obj 114 265 bng 8 250 50 0 empty empty empty 0 -6 0 8 -1 -262085
+#X obj 114 265 bng 8 250 50 0 empty \$0.lite2 empty 0 -6 0 8 -1 -262085
 -1;
-#X obj 125 265 bng 8 250 50 0 empty empty empty 0 -6 0 8 -1 -262085
+#X obj 125 265 bng 8 250 50 0 empty \$0.lite3 empty 0 -6 0 8 -1 -262085
 -1;
-#X obj 412 249 r \$0-noteNumber;
-#X obj 267 327 r \$0-padNumber;
-#X obj 358 229 spigot;
-#X obj 152 263 nbx 2 13 1 64 0 0 \$0devNo \$1/devNo empty 0 -6 0 10
--110565 -1 -1 1 256;
-#X msg 733 461 65;
-#X obj 733 493 pack;
-#X msg 792 444 set \$1;
-#X obj 801 336 r \$0-noteNumber;
-#X obj 792 420 r \$0-padNumber;
-#X obj 755 314 spigot;
-#X obj 724 62 polytouchin;
-#X obj 722 383 spigot;
-#X obj 733 435 t b f;
+#X obj 369 231 r \$0.note.v;
+#X obj 351 308 r \$0.pad.v;
+#X obj 336 209 spigot;
+#X obj 152 263 nbx 2 13 1 64 0 0 \$0.device-number.s \$0.device-number.r
+empty 0 -6 0 10 -110565 -1 -1 1 256;
+#X obj 801 256 r \$0.note.v;
+#X obj 755 234 spigot;
+#X obj 722 112 polytouchin;
+#X obj 722 303 spigot;
 #X obj 41 411 instance lnote;
-#X obj 41 436 s \$0-padNumberR;
-#X obj 722 284 / 127;
-#X obj 400 297 / 127;
-#N canvas 73 463 470 331 midiLearn 0;
-#X text 288 89 Route Number;
-#X obj 24 18 r \$0-learnOn;
-#X obj 230 119 spigot;
-#X obj 267 95 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+#X obj 722 204 / 127;
+#X obj 378 278 / 127;
+#N canvas 73 463 404 329 midi-learn 0;
+#X text 238 89 Route Number;
+#X obj 24 18 r \$0.learn-on;
+#X obj 180 119 spigot;
+#X obj 217 95 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
 ;
 #X obj 24 170 metro 250;
-#X obj 24 198 count 3;
 #X obj 24 227 route 0 1 2;
 #X obj 73 80 t b b;
 #X obj 24 145 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
 ;
-#X msg 73 141 reset;
-#X text 337 62 Learn Time-Window;
-#X obj 230 141 s \$0-noteNumberLearn;
-#X obj 267 62 pipe 1000;
-#X obj 24 300 outlet;
-#X obj 48 280 outlet;
-#X obj 72 260 outlet;
-#X obj 230 14 inlet;
+#X text 287 62 Learn Time-Window;
+#X obj 180 141 s \$0.note-r;
+#X obj 217 62 pipe 1000;
+#X obj 180 14 inlet;
+#X obj 24 197 f 0;
+#X obj 51 197 + 1;
+#X obj 77 197 mod \$1;
+#X msg 73 141 0;
+#X obj 24 281 s \$0.lite1;
+#X obj 104 281 s \$0.lite2;
+#X obj 184 281 s \$0.lite3;
 #X connect 1 0 3 0;
-#X connect 1 0 8 0;
-#X connect 1 0 12 0;
-#X connect 2 0 11 0;
+#X connect 1 0 7 0;
+#X connect 1 0 10 0;
+#X connect 2 0 9 0;
 #X connect 3 0 2 1;
-#X connect 4 0 5 0;
-#X connect 5 0 6 0;
-#X connect 6 0 13 0;
-#X connect 6 1 14 0;
-#X connect 6 2 15 0;
-#X connect 7 0 9 0;
-#X connect 7 1 8 0;
-#X connect 8 0 4 0;
-#X connect 9 0 5 0;
-#X connect 12 0 3 0;
-#X connect 12 0 7 0;
-#X connect 16 0 2 0;
-#X restore 80 164 pd midiLearn;
+#X connect 4 0 12 0;
+#X connect 5 0 16 0;
+#X connect 5 1 17 0;
+#X connect 5 2 18 0;
+#X connect 6 0 15 0;
+#X connect 6 1 7 0;
+#X connect 7 0 4 0;
+#X connect 10 0 3 0;
+#X connect 10 0 6 0;
+#X connect 11 0 2 0;
+#X connect 12 0 13 0;
+#X connect 12 0 5 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 1;
+#X connect 15 0 12 1;
+#X restore 241 104 pd midi-learn;
 #X obj 336 104 t a;
 #X obj 365 104 t a;
 #X obj 395 104 t a;
 #X obj 349 53 notein;
 #X text 351 17 Intercepts for looping back MIDI (e.g. from sft.schoen)
 ;
-#X obj 755 353 ==;
-#X obj 722 610 s;
-#X obj 391 138 div 16;
-#X obj 391 198 ==;
-#X obj 406 176 r \$0devNo;
-#X obj 483 151 mod 16;
-#X obj 456 121 t f f;
-#X obj 483 171 s \$0channel;
-#X obj 576 132 loadbang;
-#X msg 576 154 1;
-#X obj 391 157 + 1;
-#X obj 788 224 div 16;
-#X obj 788 284 ==;
-#X obj 804 262 r \$0devNo;
-#X obj 880 238 mod 16;
-#X obj 853 207 t f f;
-#X obj 880 258 s \$0channel;
-#X obj 788 243 + 1;
-#X obj 358 549 s \$1\$2/note;
-#X obj 733 522 s \$1\$2/tch;
+#X obj 755 273 ==;
+#X obj 27 18 loadbang;
+#X msg 27 40 1;
+#X obj 336 583 s \$1\$2/note;
 #X obj 722 166 t a;
 #X obj 755 166 t a;
-#X obj 791 166 t a;
-#X obj 722 408 t a;
-#X obj 415 327 sel 0;
-#X text 532 345 Relay initial velocity;
-#X text 532 361 to polytouch to remove;
-#X text 532 377 delay;
-#X obj 241 53 nr sft.notein 3;
-#X obj 814 62 nr sft.polytouchin 3;
-#X obj 388 438 prepent set;
-#X obj 388 460 s \$1\$2/GUIR;
-#X obj 388 487 r \$1\$2/GUI;
-#X obj 358 327 f;
-#N canvas 0 22 447 370 padSelect 0;
+#X obj 788 166 t a;
+#X obj 393 337 sel 0;
+#X text 850 296 Relay initial velocity;
+#X text 850 312 to polytouch to remove;
+#X text 850 328 delay;
+#X obj 336 337 f;
+#N canvas 0 22 447 370 pad-select 0;
 #X obj 80 39 inlet;
 #X obj 99 141 spigot 1;
-#X obj 235 99 r padSelect;
 #X obj 99 277 outlet;
 #X obj 126 234 s lastPad;
 #X obj 126 207 spigot;
 #X obj 159 183 r lastPadTgl;
 #X obj 235 124 == 0;
-#X obj 80 112 s padSelect;
 #X msg 80 91 0;
 #X obj 80 68 t a a a;
 #X obj 168 68 spigot;
 #X obj 168 89 s lastPad;
-#X connect 0 0 10 0;
-#X connect 1 0 5 0;
-#X connect 1 0 3 0;
-#X connect 2 0 7 0;
-#X connect 2 0 11 1;
-#X connect 5 0 4 0;
-#X connect 6 0 5 1;
-#X connect 7 0 1 1;
+#X obj 80 112 s padSelect;
+#X obj 235 99 r padSelect;
+#X connect 0 0 8 0;
+#X connect 1 0 4 0;
+#X connect 1 0 2 0;
+#X connect 4 0 3 0;
+#X connect 5 0 4 1;
+#X connect 6 0 1 1;
+#X connect 7 0 11 0;
+#X connect 8 0 7 0;
+#X connect 8 1 1 0;
+#X connect 8 2 9 0;
+#X connect 9 0 10 0;
+#X connect 12 0 6 0;
+#X connect 12 0 9 1;
+#X restore 336 456 pd pad-select;
+#X obj 420 358 s \$0.velocity;
+#X obj 767 303 r \$0.velocity;
+#X obj 336 400 s \$0.note;
+#X obj 363 379 s \$0.trigger;
+#X obj 27 86 r \$1/solo;
+#X obj 27 108 sel 0;
+#X obj 54 132 sel \$2;
+#X msg 27 166 1;
+#X obj 27 196 s \$0.solo?;
+#X msg 87 166 0;
+#X obj 336 142 ifspigot \$0.solo? t 1;
+#X obj 736 16 import-disabled nsend list-abs;
+#X obj 27 63 s \$0.channel;
+#N canvas 0 22 265 307 parse-channel 0;
+#X obj 76 35 inlet;
+#X obj 76 254 outlet;
+#X obj 76 155 div 16;
+#X obj 76 221 ==;
+#X obj 91 199 r \$0.device-number.v;
+#X obj 103 102 mod 16;
+#X obj 76 72 t f f;
+#X obj 103 122 s \$0.channel;
+#X obj 76 174 + 1;
+#X connect 0 0 6 0;
+#X connect 2 0 8 0;
+#X connect 3 0 1 0;
+#X connect 4 0 3 1;
+#X connect 5 0 7 0;
+#X connect 6 0 2 0;
+#X connect 6 1 5 0;
+#X connect 8 0 3 0;
+#X restore 395 169 pd parse-channel;
+#X obj 396 54 nr PDNOTEIN 3;
+#X obj 814 112 nr PDPOLYTOUCHIN 3;
+#N canvas 0 22 265 307 parse-channel 0;
+#X obj 76 35 inlet;
+#X obj 76 254 outlet;
+#X obj 76 155 div 16;
+#X obj 76 221 ==;
+#X obj 91 199 r \$0.device-number.v;
+#X obj 103 102 mod 16;
+#X obj 76 72 t f f;
+#X obj 103 122 s \$0.channel;
+#X obj 76 174 + 1;
+#X connect 0 0 6 0;
+#X connect 2 0 8 0;
+#X connect 3 0 1 0;
+#X connect 4 0 3 1;
+#X connect 5 0 7 0;
+#X connect 6 0 2 0;
+#X connect 6 1 5 0;
+#X connect 8 0 3 0;
+#X restore 788 197 pd parse-channel;
+#N canvas 282 148 271 319 send-polytouch 0;
+#X msg 51 116 1;
+#X obj 51 148 pack;
+#X msg 110 99 set \$1;
+#X obj 110 75 r \$0.pad.v;
+#X obj 51 90 t b f;
+#X obj 40 265 s;
+#X obj 51 177 s \$1\$2/polytouch;
+#X msg 55 243 symbol \$1\$2/polytouch/in;
+#X obj 55 222 list prepend \$3;
+#X obj 55 202 r \$0.pad.v;
+#X obj 40 63 inlet;
+#X connect 0 0 1 0;
+#X connect 1 0 6 0;
+#X connect 2 0 0 0;
+#X connect 3 0 2 0;
+#X connect 4 0 0 0;
+#X connect 4 1 1 1;
+#X connect 7 0 5 1;
+#X connect 8 0 7 0;
 #X connect 9 0 8 0;
-#X connect 10 0 9 0;
-#X connect 10 1 1 0;
-#X connect 10 2 11 0;
-#X connect 11 0 12 0;
-#X restore 358 349 pd padSelect;
-#X obj 191 627 s;
-#X obj 206 562 r \$0-padNumber;
-#X obj 206 583 list prepend \$3;
-#X msg 206 604 symbol \$1\$2/velocity/in;
-#X obj 456 327 s \$0velocity;
-#X obj 625 391 r \$0velocity;
-#X obj 191 542 r \$0velocity;
-#X msg 737 588 symbol \$1\$2/polytouch/in;
-#X obj 737 567 list prepend \$3;
-#X obj 737 547 r \$0-padNumber;
-#X obj 268 354 s \$0note;
-#X obj 385 369 s \$0trigger;
-#X obj 51 627 s;
-#X obj 66 562 r \$0-padNumber;
-#X obj 66 583 list prepend \$3;
-#X msg 66 604 symbol \$1\$2/note/in;
-#X obj 51 542 r \$0note;
-#X obj 507 516 r \$0trigger;
-#X obj 507 627 s;
-#X obj 522 562 r \$0-padNumber;
-#X obj 522 583 list prepend \$3;
-#X msg 522 604 symbol \$1\$2/trigger/in;
-#X obj 507 538 != 0;
-#X obj 942 505 r \$1/solo;
-#X obj 942 527 sel 0;
-#X obj 969 551 sel \$2;
-#X msg 942 585 1;
-#X obj 942 615 s \$0.solo?;
-#X msg 1002 585 0;
-#X obj 229 162 ifspigot \$0.solo? t 1;
-#X obj 43 354 sssadie/sssad-lg \$1 \$2/pad;
-#X obj 43 335 sssadie/sssad-lg \$1 \$2/note;
-#X obj 43 316 sssadie/sssad-lg \$1 \$2/channel;
-#X floatatom 352 192 5 0 0 0 - - -;
-#X obj 1002 524 print;
-#X text 762 34 creb for [count] \, TODO remove;
-#X obj 736 16 import nsend list-abs creb;
+#X connect 10 0 4 0;
+#X connect 10 0 5 0;
+#X restore 722 334 pd send-polytouch;
+#N canvas 0 22 625 312 group-style-sends 0;
+#X obj 221 237 s;
+#X obj 236 172 r \$0.pad.v;
+#X obj 236 193 list prepend \$3;
+#X msg 236 214 symbol \$1\$2/velocity/in;
+#X obj 221 132 r \$0.velocity;
+#X obj 61 237 s;
+#X obj 76 172 r \$0.pad.v;
+#X obj 76 193 list prepend \$3;
+#X msg 76 214 symbol \$1\$2/note/in;
+#X obj 61 132 r \$0.note;
+#X obj 412 132 r \$0.trigger;
+#X obj 412 243 s;
+#X obj 427 178 r \$0.pad.v;
+#X obj 427 199 list prepend \$3;
+#X msg 427 220 symbol \$1\$2/trigger/in;
+#X obj 412 154 != 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 0 1;
+#X connect 4 0 0 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 5 1;
+#X connect 9 0 5 0;
+#X connect 10 0 15 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 11 1;
+#X connect 15 0 11 0;
+#X restore 451 457 pd group-style-sends;
+#N canvas 0 22 220 213 gui-relay 0;
+#X obj 56 77 prepent set;
+#X obj 56 99 s \$1\$2/GUIR;
+#X obj 56 126 r \$1\$2/GUI;
+#X obj 56 49 inlet;
+#X obj 56 157 outlet;
+#X connect 0 0 1 0;
+#X connect 2 0 4 0;
+#X connect 3 0 0 0;
+#X restore 372 547 pd gui-relay;
+#X obj 357 485 r \$0.trigger;
+#X obj 336 428 r \$0.note;
+#X obj 132 19 r \$1/devNo;
+#X obj 132 46 s \$0.device-number.r;
+#X obj 41 436 s \$0.pad.r;
+#X obj 66 533 sssadie/sssadiez \$1 \$2 channel 0 256 \$0;
+#X obj 66 553 sssadie/sssadiez \$1 \$2 note 0 256 \$0;
+#X obj 66 573 sssadie/sssadiez \$1 \$2 pad 0 256 \$0;
 #X connect 0 0 3 0;
-#X connect 1 0 2 1;
-#X connect 1 0 58 0;
-#X connect 1 0 80 0;
+#X connect 1 0 35 0;
+#X connect 1 0 44 0;
 #X connect 2 0 6 0;
-#X connect 2 0 64 0;
-#X connect 2 0 52 0;
-#X connect 3 0 67 0;
+#X connect 2 0 31 0;
+#X connect 2 0 60 0;
+#X connect 3 0 39 0;
 #X connect 3 1 1 0;
-#X connect 4 0 99 1;
-#X connect 5 0 100 1;
 #X connect 11 0 0 1;
-#X connect 12 0 67 1;
+#X connect 12 0 39 1;
 #X connect 13 0 0 0;
-#X connect 14 0 101 1;
-#X connect 15 0 16 0;
-#X connect 16 0 53 0;
-#X connect 17 0 15 0;
-#X connect 18 0 34 1;
-#X connect 19 0 17 0;
-#X connect 20 0 34 0;
-#X connect 21 0 54 0;
-#X connect 21 1 55 0;
-#X connect 21 2 56 0;
-#X connect 22 0 57 0;
-#X connect 23 0 15 0;
-#X connect 23 1 16 1;
-#X connect 24 0 25 0;
-#X connect 26 0 22 0;
-#X connect 27 0 1 1;
-#X connect 28 0 8 0;
-#X connect 28 1 9 0;
-#X connect 28 2 10 0;
-#X connect 29 0 28 0;
-#X connect 29 0 98 0;
-#X connect 30 0 27 0;
-#X connect 31 0 40 0;
-#X connect 32 0 29 0;
-#X connect 32 1 30 0;
-#X connect 32 2 31 0;
-#X connect 34 0 22 1;
-#X connect 36 0 44 0;
-#X connect 37 0 13 1;
-#X connect 38 0 37 1;
-#X connect 39 0 41 0;
-#X connect 40 0 36 0;
-#X connect 40 1 39 0;
-#X connect 42 0 43 0;
-#X connect 43 0 41 0;
-#X connect 44 0 37 0;
-#X connect 45 0 51 0;
-#X connect 46 0 20 1;
-#X connect 47 0 46 1;
-#X connect 48 0 50 0;
-#X connect 49 0 45 0;
-#X connect 49 1 48 0;
-#X connect 51 0 46 0;
-#X connect 54 0 26 0;
-#X connect 55 0 20 0;
-#X connect 56 0 49 0;
-#X connect 57 0 23 0;
-#X connect 57 0 35 0;
-#X connect 58 1 73 0;
-#X connect 62 0 29 0;
-#X connect 62 1 30 0;
-#X connect 62 2 31 0;
-#X connect 63 0 54 0;
-#X connect 63 1 55 0;
-#X connect 63 2 56 0;
-#X connect 64 0 65 0;
-#X connect 66 0 52 0;
-#X connect 67 0 68 0;
-#X connect 67 0 79 0;
-#X connect 68 0 2 0;
-#X connect 70 0 71 0;
-#X connect 71 0 72 0;
-#X connect 72 0 69 1;
-#X connect 74 0 57 0;
-#X connect 75 0 69 0;
-#X connect 76 0 35 1;
-#X connect 77 0 76 0;
-#X connect 78 0 77 0;
-#X connect 82 0 83 0;
-#X connect 83 0 84 0;
-#X connect 84 0 81 1;
-#X connect 85 0 81 0;
-#X connect 86 0 91 0;
-#X connect 88 0 89 0;
-#X connect 89 0 90 0;
-#X connect 90 0 87 1;
-#X connect 91 0 87 0;
-#X connect 92 0 93 0;
-#X connect 92 0 103 0;
-#X connect 93 0 95 0;
-#X connect 93 1 94 0;
-#X connect 94 0 95 0;
-#X connect 94 1 97 0;
-#X connect 95 0 96 0;
-#X connect 97 0 96 0;
-#X connect 98 0 13 0;
-#X connect 98 1 102 0;
-#X connect 99 0 4 0;
-#X connect 100 0 5 0;
-#X connect 101 0 14 0;
+#X connect 15 0 28 1;
+#X connect 16 0 28 0;
+#X connect 17 0 32 0;
+#X connect 17 1 33 0;
+#X connect 17 2 34 0;
+#X connect 18 0 58 0;
+#X connect 19 0 65 0;
+#X connect 20 0 18 0;
+#X connect 21 0 1 1;
+#X connect 23 0 22 0;
+#X connect 23 0 51 0;
+#X connect 24 0 21 0;
+#X connect 25 0 54 0;
+#X connect 26 0 23 0;
+#X connect 26 1 24 0;
+#X connect 26 2 25 0;
+#X connect 28 0 18 1;
+#X connect 29 0 30 0;
+#X connect 30 0 53 0;
+#X connect 32 0 20 0;
+#X connect 33 0 16 0;
+#X connect 34 0 57 0;
+#X connect 35 1 41 0;
+#X connect 39 0 43 0;
+#X connect 40 0 2 0;
+#X connect 42 0 58 0;
+#X connect 45 0 46 0;
+#X connect 46 0 48 0;
+#X connect 46 1 47 0;
+#X connect 47 0 48 0;
+#X connect 47 1 50 0;
+#X connect 48 0 49 0;
+#X connect 50 0 49 0;
+#X connect 51 0 13 0;
+#X connect 54 0 13 1;
+#X connect 55 0 23 0;
+#X connect 55 1 24 0;
+#X connect 55 2 25 0;
+#X connect 56 0 32 0;
+#X connect 56 1 33 0;
+#X connect 56 2 34 0;
+#X connect 57 0 16 1;
+#X connect 60 0 31 0;
+#X connect 61 0 2 1;
+#X connect 62 0 40 0;
+#X connect 63 0 64 0;
 #X coords 0 -1 1 1 81 60 1 100 250;