From 35994ca3a4ef6a136a16cac63b4f68540d0434e1 Mon Sep 17 00:00:00 2001 From: Frank Barknecht Date: Fri, 23 Apr 2004 16:22:42 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r1630, which included commits to RCS files with non-trunk default branches. svn path=/trunk/abstractions/rradical/; revision=1631 --- control/ctlearn.pd | 114 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 114 insertions(+) create mode 100644 control/ctlearn.pd (limited to 'control/ctlearn.pd') 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; -- cgit v1.2.1