Mercurial > hg > beaglert
diff projects/heavy/pd/midi-poly-fm/bela_pgmin.pd @ 322:dde921ea256b Doxy prerelease
libpd and heavy examples added
author | Robert Jack <robert.h.jack@gmail.com> |
---|---|
date | Mon, 30 May 2016 12:47:17 +0100 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/projects/heavy/pd/midi-poly-fm/bela_pgmin.pd Mon May 30 12:47:17 2016 +0100 @@ -0,0 +1,53 @@ +#N canvas 623 197 587 546 10; +#X obj 73 413 outlet; +#X obj 174 411 outlet; +#X obj 106 304 spigot; +#X obj 197 126 loadbang; +#X obj 197 175 \$1; +#X obj 146 196 == \$1; +#X obj 139 281 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 163 229 ||; +#X obj 197 199 == 0; +#X obj 197 151 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 89 111 unpack f f; +#X obj 106 332 unpack f f; +#X text 52 436 program number; +#X text 182 432 channel; +#X text 193 281 If (channel==\$1 || \$1==0); +#X text 167 45 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 262 132 It'd be nicer with [t l l] but have to compensate for +the fact that it is not supported by heavy; +#X obj 77 183 pack f f; +#X floatatom 72 355 5 0 0 0 - - -, f 5; +#X obj 63 379 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X floatatom 150 361 5 0 0 0 - - -, f 5; +#X obj 141 385 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 91 63 s pgmin; +#X obj 93 87 r pgmin; +#X obj 89 42 r bela_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 20 0; +#X connect 17 0 2 0; +#X connect 18 0 19 0; +#X connect 20 0 21 0; +#X connect 23 0 10 0; +#X connect 24 0 22 0;