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

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

#N canvas 623 197 587 546 10;
#X obj 108 68 outlet;
#X obj 209 66 outlet;
#X obj 141 -41 spigot;
#X obj 232 -219 loadbang;
#X obj 232 -170 \$1;
#X obj 181 -149 == \$1;
#X obj 174 -64 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 198 -116 ||;
#X obj 232 -146 == 0;
#X obj 232 -194 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 124 -234 unpack f f;
#X obj 141 -13 unpack f f;
#X text 87 91 program number;
#X text 217 87 channel;
#X text 228 -64 If (channel==\$1 || \$1==0);
#X text 202 -300 emulates pgmin except it always has 2 outlets and
requires the input parameters to be explicitely set. Set them to 0
to avoid filtering;
#X text 297 -213 It'd be nicer with [t l l] but have to compensate
for the fact that it is not supported by heavy;
#X obj 112 -162 pack f f;
#X floatatom 107 10 5 0 0 0 - - -;
#X msg 80 -270 2 3;
#X msg 63 -292 2 1;
#X obj 98 34 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X floatatom 185 16 5 0 0 0 - - -;
#X obj 176 40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 124 -303 r hv_pgmin;
#X obj 126 -282 s pgmin;
#X obj 128 -258 r pgmin;
#X connect 2 0 11 0;
#X connect 3 0 9 0;
#X connect 4 0 8 0;
#X connect 5 0 7 0;
#X connect 6 0 2 1;
#X connect 7 0 6 0;
#X connect 8 0 7 1;
#X connect 9 0 4 0;
#X connect 10 0 17 0;
#X connect 10 1 5 0;
#X connect 10 1 17 1;
#X connect 11 0 0 0;
#X connect 11 0 18 0;
#X connect 11 1 1 0;
#X connect 11 1 22 0;
#X connect 17 0 2 0;
#X connect 18 0 21 0;
#X connect 19 0 25 0;
#X connect 20 0 25 0;
#X connect 22 0 23 0;
#X connect 24 0 25 0;
#X connect 26 0 10 0;