view projects/heavy/pd/hello-midi/hv_ctlin.pd @ 198:62f6269f4b3e

Added support for MidiIn to heavy (with example patch and subpatches).

#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;