1 files changed, 114 insertions, 0 deletions
diff --git a/control/ctlearn.pd b/control/ctlearn.pd
new file mode 100644
index 0000000..9bebebc
--- /dev/null
+++ b/control/ctlearn.pd
@@ -0,0 +1,114 @@
+#N canvas 338 121 754 525 10;
+#X obj 157 32 inlet;
+#X obj 318 20 ctlin;
+#X text 360 104 midi channel;
+#X text 299 107 ctl #;
+#X obj 267 485 outlet;
+#X obj 226 271 select -1;
+#X obj 304 270 select -1;
+#X obj 284 197 f;
+#X obj 362 198 f;
+#X obj 189 325 spigot;
+#X msg 226 297 1;
+#X msg 317 349 1;
+#X obj 267 364 spigot;
+#X obj 288 318 t b;
+#X msg 288 339 0;
+#X obj 124 213 ctlin;
+#X obj 156 58 symbol;
+#X obj 300 156 spigot;
+#X obj 378 157 spigot;
+#X obj 214 108 f 1;
+#X obj 254 108 f 0;
+#X obj 156 145 del 3000;
+#X obj 156 84 select learn forget;
+#X obj 220 196 f -1;
+#X obj 425 392 outlet;
+#X obj 444 126 inlet;
+#X msg 425 354 set \$1 \$2;
+#X obj 444 156 unpack 0 0;
+#X obj 425 275 pack 0 0;
+#X obj 431 225 t b f;
+#X obj 156 176 t b;
+#X obj 604 288 f \$2;
+#X obj 604 371 / 127;
+#X obj 604 349 -;
+#X obj 642 265 f \$1;
+#X obj 604 396 s \$0-scale;
+#X obj 671 358 s \$0-offset;
+#X text 574 182 Calculate Range;
+#X obj 604 215 loadbang;
+#X obj 299 419 r \$0-offset;
+#X obj 283 391 r \$0-scale;
+#X obj 267 419 * 1;
+#X obj 267 448 + 0;
+#X obj 671 330 min;
+#X obj 77 363 loadbang;
+#X obj 77 385 f 1;
+#X obj 77 407 s \$0-onoff;
+#X obj 604 242 t b b;
+#X obj 514 357 outlet;
+#X msg 478 321 \$1 \$2;
+#X connect 0 0 16 0;
+#X connect 1 1 17 0;
+#X connect 1 2 18 0;
+#X connect 5 0 10 0;
+#X connect 5 1 13 0;
+#X connect 6 0 11 0;
+#X connect 6 1 13 0;
+#X connect 7 0 5 1;
+#X connect 7 0 28 0;
+#X connect 8 0 6 1;
+#X connect 8 0 29 0;
+#X connect 9 0 12 0;
+#X connect 10 0 9 1;
+#X connect 11 0 12 1;
+#X connect 12 0 41 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 1;
+#X connect 14 0 9 1;
+#X connect 15 0 9 0;
+#X connect 15 1 5 0;
+#X connect 15 2 6 0;
+#X connect 16 0 22 0;
+#X connect 17 0 7 1;
+#X connect 17 0 30 0;
+#X connect 18 0 8 1;
+#X connect 19 0 17 1;
+#X connect 19 0 18 1;
+#X connect 20 0 17 1;
+#X connect 20 0 18 1;
+#X connect 21 0 30 0;
+#X connect 22 0 19 0;
+#X connect 22 0 21 0;
+#X connect 22 1 23 0;
+#X connect 23 0 6 1;
+#X connect 23 0 5 1;
+#X connect 25 0 27 0;
+#X connect 26 0 24 0;
+#X connect 27 0 7 0;
+#X connect 27 1 8 0;
+#X connect 28 0 26 0;
+#X connect 28 0 49 0;
+#X connect 29 0 28 0;
+#X connect 29 1 28 1;
+#X connect 30 0 7 0;
+#X connect 30 0 8 0;
+#X connect 30 0 20 0;
+#X connect 31 0 33 0;
+#X connect 31 0 43 0;
+#X connect 32 0 35 0;
+#X connect 33 0 32 0;
+#X connect 34 0 43 1;
+#X connect 34 0 33 1;
+#X connect 38 0 47 0;
+#X connect 39 0 42 1;
+#X connect 40 0 41 1;
+#X connect 41 0 42 0;
+#X connect 42 0 4 0;
+#X connect 43 0 36 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 47 0 31 0;
+#X connect 47 1 34 0;
+#X connect 49 0 48 0;