kollabs/midi_bi.pd

#N canvas 109 22 1140 756 10;
#X text 138 884 (c)2011 \, Marian Weger;
#X obj 327 166 spigot 1;
#X obj 327 266 route ctl;
#X msg 327 288 \$3 \$2 \$1;
#X obj 327 119 r /\$1/midi/in;
#X obj 327 335 route 0;
#X obj 366 312 r /\$1\$2/midi/channel;
#N canvas 668 110 585 428 init 0;
#X obj 66 37 loadbang;
#X obj 213 35 loadbang;
#X obj 213 129 s /\$1\$2/midi/scaling;
#X msg 213 101 1;
#X obj 60 173 loadbang;
#X obj 218 175 loadbang;
#X obj 60 217 s /\$1\$2/midi/value2;
#X obj 218 219 s /\$1\$2/midi/channel;
#X obj 213 57 f \$6;
#X obj 60 195 f \$4;
#X obj 218 197 f \$5;
#X obj 58 265 loadbang;
#X obj 58 287 f \$7;
#X obj 58 309 s /\$1\$2/midi/offset;
#X obj 218 265 loadbang;
#X obj 218 287 f \$8;
#X obj 218 309 s /\$1\$2/midi/line/time;
#X obj 368 265 loadbang;
#X obj 368 287 f \$9;
#X obj 368 355 s /\$1\$2/midi/line/grain;
#X obj 368 309 sel 0;
#X msg 368 331 20;
#X obj 213 79 sel 0;
#X obj 66 59 symbol \$3;
#X obj 66 81 sel 0;
#X obj 66 125 s /\$1\$2/midi/type/name;
#X msg 66 103 ctl;
#X connect 0 0 23 0;
#X connect 1 0 8 0;
#X connect 3 0 2 0;
#X connect 4 0 9 0;
#X connect 5 0 10 0;
#X connect 8 0 22 0;
#X connect 9 0 6 0;
#X connect 10 0 7 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 18 0;
#X connect 18 0 20 0;
#X connect 20 0 21 0;
#X connect 20 1 19 0;
#X connect 21 0 19 0;
#X connect 22 0 3 0;
#X connect 22 1 2 0;
#X connect 23 0 24 0;
#X connect 24 0 26 0;
#X connect 24 1 25 0;
#X connect 26 0 25 0;
#X restore 463 18 pd init;
#X obj 366 754 line 0 20;
#X obj 417 719 r /\$1\$2/midi/line/grain;
#X obj 411 628 r /\$1\$2/midi/line/time;
#X obj 327 669 kdemux2;
#X obj 327 384 route 0;
#X obj 366 362 r /\$1\$2/midi/value2;
#X obj 342 430 r /\$1\$2/midi/scaling;
#X obj 342 504 r /\$1\$2/midi/offset;
#X obj 327 527 + 0;
#X text 441 738 (only Pd version >= 0.43);
#X obj 366 696 pack f 0;
#X text 33 14 midi_bi: <domain> <name> <type> <cc#/note#/prg#/...>
<ch#> <scalin> <offset> <interpol.time>;
#X obj 37 162 spigot 1;
#X obj 37 697 s \$1/midi/out;
#X obj 37 531 list prepend ctl;
#X obj 37 80 r \$2;
#X obj 37 490 + 0.5;
#X obj 37 510 int;
#X obj 52 412 r /\$1\$2/midi/scaling;
#X obj 112 561 r /\$1\$2/midi/value2;
#X obj 37 583 list append 0;
#X obj 112 612 r /\$1\$2/midi/channel;
#X obj 37 635 list append 0;
#X obj 52 361 r /\$1\$2/midi/offset;
#X obj 327 815 t b a b;
#X msg 366 841 0;
#X obj 346 866 s \$2;
#X msg 327 841 1;
#X obj 37 218 spigot 1;
#X obj 37 384 - 0;
#X obj 327 455 * 1;
#X obj 327 406 / 127;
#X obj 37 436 / 1;
#X obj 37 458 * 127;
#X obj 372 142 r /\$1\$2/midi/in/state;
#X obj 82 134 r /\$1\$2/midi/out/state;
#X obj 346 571 spigot;
#X obj 379 549 r /\$1\$2/midi/in/print;
#X obj 346 593 print \$2 MIDI_IN;
#X obj 55 291 spigot;
#X obj 55 313 print \$2 MIDI_OUT;
#X obj 641 107 inlet out-state;
#X obj 792 107 inlet in-state;
#X obj 641 129 s /\$1\$2/midi/out/state;
#X obj 792 129 s /\$1\$2/midi/in/state;
#X obj 88 269 r /\$1\$2/midi/out/print;
#X msg 688 336 ctl;
#X msg 718 336 note;
#X msg 756 336 bend;
#X msg 796 336 pgm;
#X msg 826 336 touch;
#X obj 688 251 change;
#X msg 725 629 0;
#X msg 763 629 1;
#X msg 802 629 2;
#X msg 840 629 3;
#X msg 879 629 4;
#X msg 917 629 5;
#X obj 688 229 r /\$1\$2/midi/type/number;
#X obj 725 583 r /\$1\$2/midi/type;
#X obj 725 711 list trim;
#X obj 725 689 list prepend set;
#X obj 688 274 sel 0 1 2 3 4 5;
#X obj 725 607 route ctl note bend pgm touch polytouch;
#X obj 725 736 s /\$1\$2/midi/type/number/set;
#X obj 688 458 s /\$1\$2/midi/type;
#X obj 688 430 list trim;
#X obj 688 408 list prepend symbol;
#X msg 867 336 polytouch;
#X obj 378 214 list prepend symbol;
#X obj 378 236 list trim;
#X obj 130 469 list prepend symbol;
#X obj 130 491 list trim;
#N canvas 821 254 450 300 register 0;
#X obj 62 55 ds_reg_settings \$1 \$2/midi/offset;
#X obj 62 75 ds_reg_settings \$1 \$2/midi/scaling;
#X obj 62 95 ds_reg_settings \$1 \$2/midi/value2;
#X obj 62 115 ds_reg_settings \$1 \$2/midi/channel;
#X obj 62 135 ds_reg_settings \$1 \$2/midi/line/time;
#X obj 62 155 ds_reg_settings \$1 \$2/midi/line/grain;
#X restore 463 50 pd register;
#X obj 130 447 r /\$1\$2/midi/type;
#X obj 378 192 r /\$1\$2/midi/type;
#X obj 37 102 route float;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 12 0;
#X connect 6 0 5 1;
#X connect 8 0 32 0;
#X connect 9 0 8 2;
#X connect 10 0 11 1;
#X connect 10 0 18 1;
#X connect 11 0 32 0;
#X connect 11 1 18 0;
#X connect 12 0 39 0;
#X connect 13 0 12 1;
#X connect 14 0 38 1;
#X connect 15 0 16 1;
#X connect 16 0 11 0;
#X connect 16 0 44 0;
#X connect 18 0 8 0;
#X connect 20 0 36 0;
#X connect 22 0 28 0;
#X connect 23 0 84 0;
#X connect 24 0 25 0;
#X connect 25 0 22 0;
#X connect 26 0 40 1;
#X connect 27 0 28 1;
#X connect 28 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 21 0;
#X connect 31 0 37 1;
#X connect 32 0 35 0;
#X connect 32 1 34 0;
#X connect 32 2 33 0;
#X connect 33 0 36 1;
#X connect 35 0 36 1;
#X connect 36 0 47 0;
#X connect 36 0 37 0;
#X connect 37 0 40 0;
#X connect 38 0 16 0;
#X connect 39 0 38 0;
#X connect 40 0 41 0;
#X connect 41 0 24 0;
#X connect 42 0 1 1;
#X connect 43 0 20 1;
#X connect 44 0 46 0;
#X connect 45 0 44 1;
#X connect 47 0 48 0;
#X connect 49 0 51 0;
#X connect 50 0 52 0;
#X connect 53 0 47 1;
#X connect 54 0 75 0;
#X connect 55 0 75 0;
#X connect 56 0 75 0;
#X connect 57 0 75 0;
#X connect 58 0 75 0;
#X connect 59 0 70 0;
#X connect 60 0 69 0;
#X connect 61 0 69 0;
#X connect 62 0 69 0;
#X connect 63 0 69 0;
#X connect 64 0 69 0;
#X connect 65 0 69 0;
#X connect 66 0 59 0;
#X connect 67 0 71 0;
#X connect 68 0 72 0;
#X connect 69 0 68 0;
#X connect 70 0 54 0;
#X connect 70 1 55 0;
#X connect 70 2 56 0;
#X connect 70 3 57 0;
#X connect 70 4 58 0;
#X connect 70 5 76 0;
#X connect 71 0 60 0;
#X connect 71 1 61 0;
#X connect 71 2 62 0;
#X connect 71 3 63 0;
#X connect 71 4 64 0;
#X connect 71 5 65 0;
#X connect 74 0 73 0;
#X connect 75 0 74 0;
#X connect 76 0 75 0;
#X connect 77 0 78 0;
#X connect 78 0 2 1;
#X connect 79 0 80 0;
#X connect 80 0 22 1;
#X connect 82 0 79 0;
#X connect 83 0 77 0;
#X connect 84 0 20 0;