Added rrad.evo33.pd and help, an abstraction for easily getting midi controller

data from a Evolution UC-33 faderbox or similar devices into the rradical OSC
namespace.

svn path=/trunk/abstractions/rradical/; revision=2147

2 files changed, 356 insertions, 0 deletions

diff --git a/control/rrad.evo33-help.pd b/control/rrad.evo33-help.pd
new file mode 100644
index 0000000..4ac4639
--- /dev/null
+++ b/control/rrad.evo33-help.pd
@@ -0,0 +1,44 @@
+#N canvas 123 65 764 661 10;
+#X obj 10 520 careGUI;
+#X msg 8 597 set;
+#X obj 7 617 s SET_ALL_RRADICALS;
+#X obj 6 238 print a1;
+#X obj 194 239 print a2;
+#X obj 382 238 print a3;
+#X obj 571 240 print a4;
+#X obj 7 471 print a5;
+#X obj 195 472 print a6;
+#X obj 383 469 print a7;
+#X obj 572 473 print a8;
+#X msg 177 10 /a1/preset \$1;
+#X obj 277 9 hradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
+-1 1;
+#X obj 6 29 rrad.evo33 /a1;
+#X text 326 517 rrad.evo33 is a bridge between a midi controller and
+OSC. It was designed with the author's Evolution UC-33 in mind \, which
+has 8 columns of 3 knobs and one slider each. Orange bang initiates
+a midi learn. You have some seconds to move a controller after banging
+it. The target symbols let you set the OSC string to be prepended to
+each controller. Default strings are \$1/k1 \, \$1/k2 \, \$1/k3 for
+the three top knobs and \$1/s for the vertical slider.;
+#X text 326 630 All controllers are expected to be in the range 0-127.
+;
+#X obj 194 30 rrad.evo33 /a2;
+#X obj 382 31 rrad.evo33 /a3;
+#X obj 571 29 rrad.evo33 /a4;
+#X obj 7 262 rrad.evo33 /a5;
+#X obj 195 263 rrad.evo33 /a6;
+#X obj 383 264 rrad.evo33 /a7;
+#X obj 572 262 rrad.evo33 /a8;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 11 0 13 1;
+#X connect 12 0 11 0;
+#X connect 13 0 3 0;
+#X connect 16 0 4 0;
+#X connect 17 0 5 0;
+#X connect 18 0 6 0;
+#X connect 19 0 7 0;
+#X connect 20 0 8 0;
+#X connect 21 0 9 0;
+#X connect 22 0 10 0;
diff --git a/control/rrad.evo33.pd b/control/rrad.evo33.pd
new file mode 100644
index 0000000..2bbba7f
--- /dev/null
+++ b/control/rrad.evo33.pd
@@ -0,0 +1,312 @@
+#N canvas 31 370 190 213 10;
+#X obj 3 24 cnv 15 180 180 empty \$0-background-cnv empty 20 12 1 14
+-233017 -66577 0;
+#X obj 78 3 inlet;
+#X obj 305 5 inlet OSC;
+#N canvas 183 51 1077 824 saves 0;
+#X obj 45 160 originator \$1 \$0;
+#X obj 152 132 inlet OSC;
+#X obj 47 55 r \$0-substate;
+#X obj 15 13 inlet substate;
+#X obj 15 35 route substate;
+#X obj 159 55 r \$0-copy;
+#X msg 159 76 copy;
+#X obj 243 50 r \$0-paste;
+#X msg 241 71 paste;
+#X text 154 15 This is the originator \, including some ready to use
+standard functionality.;
+#X text 505 34 Put your commun sends here \, if you like.;
+#X msg 15 91 setsub \$1;
+#X msg 17 281 svdir \$1;
+#X obj 18 236 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 18 260 savepanel;
+#X obj 152 189 outlet OSC;
+#X msg 108 214 svxdir /tmp/svdir.xml;
+#X msg 78 241 ldxdir /tmp/svdir.xml;
+#X obj 281 204 s \$0-substate-r;
+#X obj 281 151 OSCroute \$1;
+#X obj 281 177 OSCroute /preset;
+#X obj 299 366 ctlearn 0 127;
+#X obj 598 75 r \$0-k1;
+#X obj 600 146 s \$0-k1;
+#X obj 600 121 commun /k1 \$0;
+#X obj 501 71 r \$0-s;
+#X obj 503 117 commun /s \$0;
+#X obj 499 144 s \$0-s;
+#X obj 703 74 r \$0-k2;
+#X obj 703 118 commun /k2 \$0;
+#X obj 703 145 s \$0-k2;
+#X obj 807 70 r \$0-k3;
+#X obj 807 116 commun /k3 \$0;
+#X obj 807 141 s \$0-k3;
+#X msg 298 346 learn;
+#X text 878 332 learns;
+#X text 742 530 targets;
+#X obj 540 367 ctlearn 0 127;
+#X msg 539 347 learn;
+#X obj 776 365 ctlearn 0 127;
+#X msg 775 345 learn;
+#X obj 38 363 ctlearn 0 127;
+#X msg 37 343 learn;
+#X obj 153 364 commun /k1-cc \$0;
+#X obj 38 388 s \$0-k1;
+#X obj 37 318 r \$0-k1learn;
+#X obj 298 321 r \$0-k2learn;
+#X obj 540 392 s \$0-k3;
+#X obj 655 368 commun /k3-cc \$0;
+#X obj 541 322 r \$0-k3learn;
+#X obj 775 320 r \$0-slearn;
+#X obj 776 390 s \$0-s;
+#X obj 891 366 commun /s-cc \$0;
+#X obj 44 516 commun /starget \$0;
+#X obj 44 495 r \$0-starget;
+#X obj 44 539 symbol;
+#X obj 44 569 s \$0-starget-r;
+#X obj 210 539 symbol;
+#X obj 363 541 symbol;
+#X obj 504 540 symbol;
+#X obj 210 495 r \$0-k1target;
+#X obj 210 516 commun /k1target \$0;
+#X obj 210 569 s \$0-k1target-r;
+#X obj 363 497 r \$0-k2target;
+#X obj 363 518 commun /k2target \$0;
+#X obj 363 571 s \$0-k2target-r;
+#X obj 504 496 r \$0-k3target;
+#X obj 504 517 commun /k3target \$0;
+#X obj 504 570 s \$0-k3target-r;
+#X obj 414 369 commun /k2-cc \$0;
+#X obj 299 391 s \$0-k2;
+#X text 513 182 sliders: restoring is disabled intentionalls;
+#X floatatom 670 683 5 0 0 0 - - -;
+#X obj 507 94 route float;
+#X obj 599 98 route float;
+#X obj 697 94 route float;
+#X obj 802 93 route float;
+#X obj 666 740 s \$0-c1;
+#X msg 663 709 color \$1;
+#X text 728 684 10: grey;
+#X text 730 706 46: green highlight;
+#X connect 0 2 15 0;
+#X connect 0 2 19 0;
+#X connect 1 0 0 1;
+#X connect 2 0 11 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 0;
+#X connect 4 1 0 0;
+#X connect 5 0 6 0;
+#X connect 6 0 0 0;
+#X connect 7 0 8 0;
+#X connect 8 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 0;
+#X connect 16 0 0 0;
+#X connect 17 0 0 0;
+#X connect 19 0 20 0;
+#X connect 20 0 18 0;
+#X connect 21 0 70 0;
+#X connect 21 2 69 0;
+#X connect 22 0 74 0;
+#X connect 25 0 73 0;
+#X connect 28 0 75 0;
+#X connect 31 0 76 0;
+#X connect 34 0 21 0;
+#X connect 37 0 47 0;
+#X connect 37 2 48 0;
+#X connect 38 0 37 0;
+#X connect 39 0 51 0;
+#X connect 39 2 52 0;
+#X connect 40 0 39 0;
+#X connect 41 0 44 0;
+#X connect 41 2 43 0;
+#X connect 42 0 41 0;
+#X connect 43 0 41 1;
+#X connect 45 0 42 0;
+#X connect 46 0 34 0;
+#X connect 48 0 37 1;
+#X connect 49 0 38 0;
+#X connect 50 0 40 0;
+#X connect 52 0 39 1;
+#X connect 53 0 55 0;
+#X connect 54 0 53 0;
+#X connect 55 0 56 0;
+#X connect 57 0 62 0;
+#X connect 58 0 65 0;
+#X connect 59 0 68 0;
+#X connect 60 0 61 0;
+#X connect 61 0 57 0;
+#X connect 63 0 64 0;
+#X connect 64 0 58 0;
+#X connect 66 0 67 0;
+#X connect 67 0 59 0;
+#X connect 69 0 21 1;
+#X connect 72 0 78 0;
+#X connect 73 0 26 0;
+#X connect 74 0 24 0;
+#X connect 75 0 29 0;
+#X connect 76 0 32 0;
+#X connect 78 0 77 0;
+#X restore 243 5 pd saves;
+#X text 8 2 look! ==>;
+#X obj 275 33 outlet OSC;
+#X obj 7 128 vsl 15 56 0 127 0 0 \$0-s \$0-s s 6 20 0 8 -128992 -262144
+-262144 0 1;
+#X obj 9 42 hsl 32 15 0 127 0 0 \$0-k1 \$0-k1 k1 -2 -6 0 8 -195568
+-1 -1 146 1;
+#X obj 9 70 hsl 32 15 0 127 0 0 \$0-k2 \$0-k2 k2 -2 -6 0 8 -195568
+-1 -1 0 1;
+#X obj 9 98 hsl 32 15 0 127 0 0 \$0-k3 \$0-k3 k3 -2 -6 0 8 -195568
+-1 -1 0 1;
+#X obj 31 126 bng 15 250 50 0 \$0-slearn \$0-slearn orange=midi_learn
+20 9 1 10 -260818 -1 -1;
+#X obj 48 42 bng 15 250 50 0 \$0-k1learn \$0-k1learn empty 18 9 0 8
+-260818 -1 -1;
+#X obj 48 70 bng 15 250 50 0 \$0-k2learn \$0-k2learn empty 18 9 0 8
+-260818 -1 -1;
+#X obj 48 98 bng 15 250 50 0 \$0-k3learn \$0-k3learn empty 18 9 0 8
+-260818 -1 -1;
+#X obj 200 108 outlet;
+#N canvas 0 0 829 493 osc 0;
+#X obj 295 471 outlet;
+#X obj 107 126 r \$0-k1target;
+#X obj 125 158 r \$0-k1target-r;
+#X obj 56 198 pack 0 s;
+#X msg 56 229 \$2 \$1;
+#X obj 56 148 r \$0-k1;
+#X obj 56 255 s \$0-out;
+#X obj 295 449 r \$0-out;
+#X obj 249 198 pack 0 s;
+#X msg 249 229 \$2 \$1;
+#X obj 249 255 s \$0-out;
+#X obj 436 197 pack 0 s;
+#X msg 436 228 \$2 \$1;
+#X obj 436 254 s \$0-out;
+#X obj 632 198 pack 0 s;
+#X msg 632 229 \$2 \$1;
+#X obj 632 255 s \$0-out;
+#X obj 249 148 r \$0-k2;
+#X obj 300 126 r \$0-k2target;
+#X obj 318 158 r \$0-k2target-r;
+#X obj 487 125 r \$0-k3target;
+#X obj 505 157 r \$0-k3target-r;
+#X obj 436 147 r \$0-k3;
+#X obj 632 148 r \$0-s;
+#X obj 683 126 r \$0-starget;
+#X obj 701 158 r \$0-starget-r;
+#X obj 126 36 loadbang;
+#X obj 126 60 symbol \$1;
+#X obj 127 92 makefilename %s/k1;
+#X obj 301 38 loadbang;
+#X obj 301 62 symbol \$1;
+#X obj 488 37 loadbang;
+#X obj 488 61 symbol \$1;
+#X obj 672 37 loadbang;
+#X obj 672 61 symbol \$1;
+#X obj 302 94 makefilename %s/k2;
+#X obj 489 93 makefilename %s/k3;
+#X obj 673 91 makefilename %s/s;
+#X obj 50 315 change;
+#X msg 116 389 color 10;
+#X obj 50 336 t b;
+#X obj 116 368 del 100;
+#X obj 255 311 change;
+#X msg 321 385 color 10;
+#X obj 255 332 t b;
+#X obj 321 364 del 100;
+#X obj 444 314 change;
+#X msg 510 388 color 10;
+#X obj 444 335 t b;
+#X obj 510 367 del 100;
+#X obj 630 306 change;
+#X msg 696 380 color 10;
+#X obj 630 327 t b;
+#X obj 696 359 del 100;
+#X obj 630 418 s \$0-c4;
+#X obj 444 426 s \$0-c3;
+#X obj 255 423 s \$0-c2;
+#X obj 50 427 s \$0-c1;
+#X text 672 325 colorize movements;
+#X msg 50 374 color 46;
+#X msg 255 370 color 46;
+#X msg 444 373 color 46;
+#X msg 630 365 color 46;
+#X connect 1 0 3 1;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 6 0;
+#X connect 5 0 3 0;
+#X connect 5 0 38 0;
+#X connect 7 0 0 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 17 0 8 0;
+#X connect 17 0 42 0;
+#X connect 18 0 8 1;
+#X connect 19 0 8 1;
+#X connect 20 0 11 1;
+#X connect 21 0 11 1;
+#X connect 22 0 11 0;
+#X connect 22 0 46 0;
+#X connect 23 0 14 0;
+#X connect 23 0 50 0;
+#X connect 24 0 14 1;
+#X connect 25 0 14 1;
+#X connect 26 0 27 0;
+#X connect 27 0 28 0;
+#X connect 28 0 3 1;
+#X connect 29 0 30 0;
+#X connect 30 0 35 0;
+#X connect 31 0 32 0;
+#X connect 32 0 36 0;
+#X connect 33 0 34 0;
+#X connect 34 0 37 0;
+#X connect 35 0 8 1;
+#X connect 36 0 11 1;
+#X connect 37 0 14 1;
+#X connect 38 0 40 0;
+#X connect 39 0 57 0;
+#X connect 40 0 59 0;
+#X connect 40 0 41 0;
+#X connect 41 0 39 0;
+#X connect 42 0 44 0;
+#X connect 43 0 56 0;
+#X connect 44 0 60 0;
+#X connect 44 0 45 0;
+#X connect 45 0 43 0;
+#X connect 46 0 48 0;
+#X connect 47 0 55 0;
+#X connect 48 0 61 0;
+#X connect 48 0 49 0;
+#X connect 49 0 47 0;
+#X connect 50 0 52 0;
+#X connect 51 0 54 0;
+#X connect 52 0 62 0;
+#X connect 52 0 53 0;
+#X connect 53 0 51 0;
+#X connect 59 0 57 0;
+#X connect 60 0 56 0;
+#X connect 61 0 55 0;
+#X connect 62 0 54 0;
+#X restore 200 79 pd osc;
+#X obj 67 42 cnv 15 114 16 empty \$0-c1 empty 20 12 0 14 -233017 -262144
+0;
+#X symbolatom 68 43 16 0 0 0 - #0-k1target-r #0-k1target;
+#X obj 67 71 cnv 15 114 16 empty \$0-c2 empty 20 12 0 14 -233017 -262144
+0;
+#X obj 67 99 cnv 15 114 16 empty \$0-c3 empty 20 12 0 14 -233017 -262144
+0;
+#X symbolatom 67 99 16 0 0 0 - #0-k3target-r #0-k3target;
+#X symbolatom 67 71 16 0 0 0 - #0-k2target-r #0-k2target;
+#X obj 32 159 cnv 15 126 16 empty \$0-c4 empty 20 12 0 14 -233017 -262144
+0;
+#X symbolatom 31 160 18 0 0 3 target #0-starget-r #0-starget;
+#X connect 2 0 3 1;
+#X connect 3 0 5 0;
+#X connect 15 0 14 0;
+#X coords 0 0 1 1 184 205 1;