aboutsummaryrefslogtreecommitdiff
path: root/controctopus/note-learner.pd
diff options
context:
space:
mode:
Diffstat (limited to 'controctopus/note-learner.pd')
-rw-r--r--controctopus/note-learner.pd95
1 files changed, 49 insertions, 46 deletions
diff --git a/controctopus/note-learner.pd b/controctopus/note-learner.pd
index ac5b53d..b25dabb 100644
--- a/controctopus/note-learner.pd
+++ b/controctopus/note-learner.pd
@@ -3,34 +3,34 @@
#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 13 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 48 256;
+#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 15 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 50 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
+#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 \$0.lite1 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 \$0.lite2 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 \$0.lite3 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 369 231 r \$0.note.v;
-#X obj 351 308 r \$0.pad.v;
+#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 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 2 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 722 204 / 127;
+#X obj 722 214 / 127;
#X obj 378 104 / 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 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
;
@@ -40,15 +40,15 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#X obj 24 145 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X text 287 62 Learn Time-Window;
-#X obj 180 141 s \$0.note-r;
+#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 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 obj 24 281 s \$0-lite1;
+#X obj 104 281 s \$0-lite2;
+#X obj 184 281 s \$0-lite3;
#X obj 77 197 mod 3;
#X connect 1 0 3 0;
#X connect 1 0 7 0;
@@ -74,7 +74,7 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#X obj 336 104 t a;
#X obj 471 104 t a;
#X obj 349 53 notein;
-#X text 345 33 Intercepts for looping back MIDI (e.g. from sft.schoen)
+#X text 345 33 Intercepts for looping back MIDI (e.g. from sft-schoen)
;
#X obj 755 273 ==;
#X obj 27 18 loadbang;
@@ -116,28 +116,28 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#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 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 obj 27 196 s \$0-solo?;
#X msg 87 166 0;
-#X obj 336 142 ifspigot \$0.solo? t 1;
+#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;
+#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 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 103 122 s \$0-channel;
#X obj 76 174 + 1;
#X connect 0 0 6 0;
#X connect 2 0 8 0;
@@ -155,10 +155,10 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#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 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 103 122 s \$0-channel;
#X obj 76 174 + 1;
#X connect 0 0 6 0;
#X connect 2 0 8 0;
@@ -169,16 +169,16 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#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 13;
+#N canvas 282 148 271 319 send-polytouch 1;
+#X msg 51 116 15;
#X obj 51 148 pack;
#X msg 110 99 set \$1;
-#X obj 110 75 r \$0.pad.v;
+#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 obj 55 222 list prepend \$3;
-#X obj 55 202 r \$0.pad.v;
+#X obj 55 202 r \$0-pad-v;
#X obj 40 63 inlet;
#X msg 55 243 symbol \$1*\$2/polytouch/in;
#X connect 0 0 1 0;
@@ -195,16 +195,16 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#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 172 r \$0-pad-v;
#X obj 236 193 list prepend \$3;
-#X obj 221 132 r \$0.velocity;
+#X obj 221 132 r \$0-velocity;
#X obj 61 237 s;
-#X obj 76 172 r \$0.pad.v;
+#X obj 76 172 r \$0-pad-v;
#X obj 76 193 list prepend \$3;
-#X obj 61 132 r \$0.note;
-#X obj 412 132 r \$0.trigger;
+#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 178 r \$0-pad-v;
#X obj 427 199 list prepend \$3;
#X obj 412 154 != 0;
#X msg 76 214 symbol \$1*\$2/note/in;
@@ -234,15 +234,17 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#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 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 132 46 s \$0-device-number.r;
+#X obj 41 436 s \$0-pad.r;
#X obj 26 553 sssadie/sssadiez \$1 \$2 note 0 256 \$0;
#X obj 26 573 sssadie/sssadiez \$1 \$2 pad 0 256 \$0;
#X obj 26 533 sssadie/sssadiez \$1 \$2 device-number 0 256 \$0;
#X text 344 3 [note-learner /device /pad# /group(nonumber)];
+#X obj 722 190 sel 0;
+#X text 761 183 ignore zeros so it doesn't jump on noteoff;
#X connect 0 0 3 0;
#X connect 1 0 34 0;
#X connect 1 0 43 0;
@@ -272,7 +274,7 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#X connect 27 0 18 1;
#X connect 28 0 29 0;
#X connect 29 0 52 0;
-#X connect 31 0 20 0;
+#X connect 31 0 69 0;
#X connect 32 0 16 0;
#X connect 33 0 56 0;
#X connect 34 1 40 0;
@@ -299,4 +301,5 @@ empty 0 -6 0 10 -110565 -1 -1 1 256;
#X connect 60 0 2 1;
#X connect 61 0 39 0;
#X connect 62 0 63 0;
+#X connect 69 1 20 0;
#X coords 0 -1 1 1 81 60 1 100 250;