Mercurial > hg > beaglert
diff projects/heavy/pd/hello-midi/hv_ctlin.pd @ 198:62f6269f4b3e
Added support for MidiIn to heavy (with example patch and subpatches).
author | Giulio Moro <giuliomoro@yahoo.it> |
---|---|
date | Fri, 05 Feb 2016 06:17:35 +0000 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/projects/heavy/pd/hello-midi/hv_ctlin.pd Fri Feb 05 06:17:35 2016 +0000 @@ -0,0 +1,84 @@ +#N canvas 554 204 703 475 10; +#X obj -107 -439 outlet; +#X obj -52 -441 outlet; +#X obj -61 -743 r ctlin; +#X obj -68 -719 unpack f f f; +#X obj -6 -441 outlet; +#X obj -74 -548 spigot; +#X text -109 -420 value; +#X text -55 -420 number; +#X obj 51 -732 loadbang; +#X obj 17 -677 \$1; +#X obj -34 -656 == \$1; +#X obj -41 -571 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +0 1; +#X obj -76 -521 unpack f f f; +#X obj -17 -623 ||; +#X obj 17 -653 == 0; +#X text -90 -859 Emulates ctlin \, except number of outlets is fixed. +; +#X obj 68 -623 ||; +#X obj 102 -653 == 0; +#X obj 52 -656 == \$2; +#X obj 102 -677 \$2; +#X obj 17 -593 &&; +#X obj 51 -707 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X text 13 -571 If (inputController==\$1 || \$1==0) && (inputChannel==\$2 +|| \$2==0); +#X text 37 -818 Known issue: trying to select inputController 0 will +result i accepting all controllers (because a pd external cannot tell +the difference between \$1 been explicitely set to 0 and the patch +not having any argument); +#X text 2 -420 channel; +#X obj -104 -678 pack f f f; +#X obj -80 -462 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X floatatom -79 -488 5 0 0 0 - - -; +#X obj -39 -458 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X floatatom -38 -484 5 0 0 0 - - -; +#X obj 12 -464 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X floatatom 13 -490 5 0 0 0 - - -; +#X msg -44 -818 1 2 3; +#X msg -6 -805 1 5 7; +#X msg -97 -815 1 5 6; +#X msg -100 -776 1 4 7; +#X obj -96 -841 r hv_ctlin; +#X obj -38 -778 s ctlin; +#X connect 2 0 3 0; +#X connect 3 0 25 0; +#X connect 3 1 10 0; +#X connect 3 1 25 1; +#X connect 3 2 18 0; +#X connect 3 2 25 2; +#X connect 5 0 12 0; +#X connect 8 0 21 0; +#X connect 9 0 14 0; +#X connect 10 0 13 0; +#X connect 11 0 5 1; +#X connect 12 0 0 0; +#X connect 12 0 27 0; +#X connect 12 1 1 0; +#X connect 12 1 29 0; +#X connect 12 2 4 0; +#X connect 12 2 31 0; +#X connect 13 0 20 0; +#X connect 14 0 13 1; +#X connect 16 0 20 1; +#X connect 17 0 16 1; +#X connect 18 0 16 0; +#X connect 19 0 17 0; +#X connect 20 0 11 0; +#X connect 21 0 9 0; +#X connect 21 0 19 0; +#X connect 25 0 5 0; +#X connect 27 0 26 0; +#X connect 29 0 28 0; +#X connect 31 0 30 0; +#X connect 32 0 37 0; +#X connect 33 0 37 0; +#X connect 34 0 37 0; +#X connect 35 0 37 0; +#X connect 36 0 37 0;