midi_io.pd

#N canvas 114 39 1806 1114 12;
#X obj 1069 141 ctlin;
#X obj 1069 178 swap;
#X obj 1069 202 stripnote;
#X obj 695 555 ctlout;
#X obj 1285 139 notein 1;
#X obj 1285 163 stripnote;
#X floatatom 1285 187 5 0 0 0 - - -;
#X floatatom 1069 226 5 0 0 0 - - -;
#X floatatom 1344 186 5 0 0 0 - - -;
#X text 1212 189 MIDI NOTE;
#X text 1390 188 MIDI VELOCITY;
#X msg 1681 1032 61;
#X obj 1792 1008 sel 1 0;
#X text 1705 1030 color 1;
#X text 1802 1032 color 2;
#X obj 1703 1160 pack f f;
#X obj 1703 1217 noteout 1;
#X floatatom 695 632 5 0 0 0 - - -;
#X obj 541 541 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 541 590 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 562 617 i;
#X floatatom 562 641 5 0 0 0 - - -;
#X obj 593 617 + 1;
#X floatatom 562 688 5 0 0 0 - - -;
#X obj 541 565 metro 40;
#X floatatom 1723 1064 5 0 0 0 - - -;
#X msg 1642 1243 0 61;
#X msg 1598 1243 0 0;
#X msg 1773 1033 0;
#X msg 1642 1213 63 61;
#X msg 1598 1213 63 0;
#X obj 562 664 % 64;
#X obj 690 593 makenote 1 40;
#X obj 1430 996 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
0 1;
#X msg 1430 1016 set \$1;
#X obj 1356 1040 gate;
#X floatatom 1430 1040 5 0 0 0 - - -;
#X obj 1410 1041 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 1355 1117 noteout 1;
#X msg 1355 1066 \$1 61;
#X msg 1412 1068 \$1 0;
#X floatatom 1575 226 0 0 0 0 - - -;
#X floatatom 1538 247 0 0 0 0 - - -;
#X floatatom 1612 203 2 0 0 0 - - -;
#X obj 1538 176 polytouchin;
#X text 1631 204 channel;
#X text 1539 133 polyphonic aftertouch, f 10;
#X text 1569 249 aftertouch value;
#X text 1604 228 note;
#X obj 510 830 noteout 1;
#X obj 1427 391 array get launchpadx;
#X obj 1427 371 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 1427 415 print;
#X msg 1427 492 \; launchpadx 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0;
#X text 1426 472 Clear;
#X text 1426 552 Lit;
#X obj 1427 442 array define -yrange 0 128 launchpadx 64;
#X obj 1776 190 vuzi 64 0;
#X obj 1776 158 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 1836 222 5 0 0 0 - - -;
#X obj 1806 223 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 1776 223 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 1428 686 vuzi 64 0;
#X obj 1428 664 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 1488 709 5 0 0 0 - - -;
#X msg 1436 762 set \$1;
#X floatatom 1436 787 5 0 0 0 - - -;
#X obj 1436 810 pack f f;
#X obj 1488 762 array get launchpadx 0 1;
#X obj 1488 787 t b f;
#X obj 1488 732 t f f;
#X obj 1436 834 s launchpadx_values;
#X obj 1436 896 noteout 1;
#X obj 1436 858 r launchpadx_values;
#X msg 1427 571 \; launchpadx 0 63 63 63 63 63 63 63 63 63 63 63 63
63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63
63 63 63 63 63 63 63 20 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63
63 63 63 63 63 63;
#X obj 1386 581 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 1388 477 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 1398 557 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 510 741 set \$1;
#X floatatom 510 766 5 0 0 0 - - -;
#X obj 510 789 pack f f;
#X obj 562 766 t b f;
#X obj 562 711 t f f;
#X obj 612 664 %;
#X obj 1285 267 pack f f f;
#X msg 1285 210 set \$1;
#X floatatom 1285 234 5 0 0 0 - - -;
#X obj 1538 271 t b f;
#X text 1361 163 Remove Note Offs;
#X floatatom 123 137 5 0 0 0 - - -;
#X floatatom 163 137 5 0 0 0 - - -;
#X floatatom 203 137 5 0 0 0 - - -;
#X floatatom 174 56 5 0 0 0 - - -;
#X floatatom 243 137 5 0 0 0 - - -;
#N canvas 534 585 686 486 input_data_______________ 0;
#X obj 208 72 stripnote;
#X floatatom 208 96 5 0 0 0 - - -;
#X floatatom 267 95 5 0 0 0 - - -;
#X text 115 118 MIDI NOTE;
#X text 313 97 MIDI VELOCITY;
#X floatatom 478 155 0 0 0 0 - - -;
#X floatatom 441 176 0 0 0 0 - - -;
#X floatatom 515 132 2 0 0 0 - - -;
#X obj 441 105 polytouchin;
#X text 534 133 channel;
#X text 442 62 polyphonic aftertouch, f 10;
#X text 472 178 aftertouch value;
#X text 507 157 note;
#X obj 188 196 pack f f f;
#X msg 198 130 set \$1;
#X floatatom 188 167 5 0 0 0 - - -;
#X obj 441 200 t b f;
#X text 284 72 Remove Note Offs;
#X obj 188 240 s launchpad_note;
#X obj 156 280 outlet;
#X obj 206 280 outlet;
#X obj 256 280 outlet;
#X obj 316 280 outlet;
#X obj 366 280 outlet;
#X obj 416 280 outlet;
#X obj 208 48 notein;
#X floatatom 418 250 5 0 0 0 - - -;
#X obj 67 216 pack f f f f;
#X connect 0 0 1 0;
#X connect 0 1 2 0;
#X connect 1 0 14 0;
#X connect 1 0 20 0;
#X connect 1 0 27 1;
#X connect 2 0 21 0;
#X connect 2 0 13 1;
#X connect 2 0 27 2;
#X connect 5 0 23 0;
#X connect 6 0 16 0;
#X connect 6 0 22 0;
#X connect 7 0 26 0;
#X connect 8 0 6 0;
#X connect 8 1 5 0;
#X connect 8 2 7 0;
#X connect 14 0 15 0;
#X connect 15 0 13 0;
#X connect 16 0 15 0;
#X connect 16 1 13 2;
#X connect 16 1 27 3;
#X connect 25 0 0 0;
#X connect 25 1 0 1;
#X connect 25 2 26 0;
#X connect 26 0 24 0;
#X connect 26 0 27 0;
#X connect 27 0 19 0;
#X connect 27 0 18 0;
#X restore 20 24 pd input_data_______________;
#X obj 20 128 outlet;
#X text 125 118 Key;
#X text 166 119 Vel;
#X text 201 119 After;
#X text 242 120 Chan;
#X text 105 99 MIDI data;
#X text 517 486 MESSING AROUND WITH THE NOVATION LAUNCHPAD X CONTROLLER
;
#X obj 1196 539 r launchpad_note;
#X obj 1236 735 phasor~;
#X obj 1236 683 mtof;
#X floatatom 1236 613 5 0 0 0 - - -;
#X floatatom 1276 613 5 0 0 0 - - -;
#X floatatom 1316 613 5 0 0 0 - - -;
#X obj 1316 735 line~;
#X obj 1316 636 / 127;
#X floatatom 1316 660 5 0 0 0 - - -;
#X obj 1235 819 dac~;
#X msg 1316 683 \$1 10;
#X obj 1236 636 + 36;
#X floatatom 1236 660 5 0 0 0 - - -;
#X floatatom 1236 707 5 0 0 0 - - -;
#X obj 1236 767 *~;
#X obj 1032 496 r launchpad_note;
#X obj 1032 536 list prepend 0;
#X floatatom 925 588 5 0 0 0 - - -;
#X floatatom 965 588 5 0 0 0 - - -;
#X floatatom 1005 588 5 0 0 0 - - -;
#X obj 923 653 pack f f f f;
#X obj 925 611 t f f;
#X obj 923 921 clone clone_phasor 64;
#X msg 885 788 vis 20 1;
#X msg 885 819 vis 20 0;
#X obj 1014 787 poly 64;
#X obj 892 554 unpack f f f f;
#X floatatom 881 587 5 0 0 0 - - -;
#X obj 1196 589 unpack f f f f;
#X floatatom 1196 613 5 0 0 0 - - -;
#X obj 955 75 s launchpad_note;
#X floatatom 344 137 0 0 0 0 - - -;
#X floatatom 308 136 0 0 0 0 - - -;
#X floatatom 380 137 0 0 0 0 - - -;
#X obj 318 17 ctlin;
#X text 299 120 value;
#X text 362 16 (all controllers \, omni);
#X text 343 120 ctl;
#X text 381 120 chan;
#X obj 467 80 outlet;
#X obj 466 50 pack f f f;
#X obj 689 243 pack f s;
#X obj 689 279 list append;
#X obj 689 310 list prepend key;
#X obj 689 338 list prepend \$1;
#X obj 689 429 s \$1_control;
#X obj 782 429 outlet;
#X obj 689 369 gate;
#X obj 897 349 tgl 18 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 834 345 inlet;
#X symbolatom 915 349 10 0 0 0 - - -;
#X obj 916 243 loadbang;
#X obj 916 272 list prepend \$1;
#X obj 916 322 list trim;
#X obj 916 296 list prepend set;
#X obj 689 179 r global_keyname_L;
#X obj 742 201 r global_keyname_R;
#X obj 763 223 r global_keyup;
#X obj 773 245 r global_key;
#X obj 3 163 s global_midi_key;
#X obj 448 110 s global_midi_ctl;
#X obj 110 212 r global_midi_key;
#X obj 110 246 print;
#X obj 283 216 pack f f f f;
#X obj 283 240 s emily_midi;
#X obj 113 400 r hamilr4_midi;
#X obj 133 447 list trim;
#X msg 133 468 hamilr4 midi key 1 62 68 0;
#X obj 133 426 list prepend set;
#X obj 113 544 route hamilr4;
#X obj 113 568 route midi;
#X obj 113 612 route key;
#X obj 293 612 route ctl;
#X obj 142 654 list trim;
#X msg 142 675 1 62 68 0;
#X obj 142 633 list prepend set;
#X obj 113 519 list trim;
#X obj 323 654 list trim;
#X msg 323 675 35 1 1;
#X obj 323 633 list prepend set;
#X obj 113 706 unpack f f f f;
#X obj 293 706 unpack f f f;
#X floatatom 113 730 5 0 0 0 - - -;
#X floatatom 153 730 5 0 0 0 - - -;
#X floatatom 193 730 5 0 0 0 - - -;
#X floatatom 233 730 5 0 0 0 - - -;
#X floatatom 293 730 5 0 0 0 - - -;
#X floatatom 333 730 5 0 0 0 - - -;
#X floatatom 373 730 5 0 0 0 - - -;
#X text 292 758 Value \, Ctl \, Channel;
#X text 29 756 Channel \, Key \, Velocity \, Aftertouch;
#X connect 0 0 1 0;
#X connect 0 1 1 1;
#X connect 1 0 2 0;
#X connect 2 0 7 0;
#X connect 4 0 5 0;
#X connect 4 1 5 1;
#X connect 5 0 6 0;
#X connect 5 1 8 0;
#X connect 6 0 85 0;
#X connect 8 0 84 1;
#X connect 11 0 15 1;
#X connect 12 0 11 0;
#X connect 12 1 28 0;
#X connect 18 0 24 0;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 20 0 22 0;
#X connect 21 0 31 0;
#X connect 22 0 20 1;
#X connect 23 0 82 0;
#X connect 24 0 19 0;
#X connect 25 0 15 0;
#X connect 26 0 16 0;
#X connect 27 0 16 0;
#X connect 28 0 15 1;
#X connect 29 0 16 0;
#X connect 30 0 16 0;
#X connect 31 0 23 0;
#X connect 33 0 34 0;
#X connect 34 0 36 0;
#X connect 34 0 37 0;
#X connect 35 0 39 0;
#X connect 35 1 40 0;
#X connect 36 0 35 1;
#X connect 37 0 36 0;
#X connect 39 0 38 0;
#X connect 40 0 38 0;
#X connect 42 0 87 0;
#X connect 44 0 42 0;
#X connect 44 1 41 0;
#X connect 44 2 43 0;
#X connect 50 0 52 0;
#X connect 51 0 50 0;
#X connect 57 0 61 0;
#X connect 57 1 60 0;
#X connect 57 2 59 0;
#X connect 58 0 57 0;
#X connect 62 2 64 0;
#X connect 63 0 62 0;
#X connect 64 0 70 0;
#X connect 65 0 66 0;
#X connect 66 0 67 0;
#X connect 67 0 71 0;
#X connect 68 0 69 0;
#X connect 69 0 66 0;
#X connect 69 1 67 1;
#X connect 70 0 68 0;
#X connect 70 1 65 0;
#X connect 73 0 72 0;
#X connect 75 0 63 0;
#X connect 76 0 53 0;
#X connect 76 0 75 0;
#X connect 77 0 74 0;
#X connect 77 0 75 0;
#X connect 78 0 79 0;
#X connect 79 0 80 0;
#X connect 81 0 79 0;
#X connect 81 1 80 1;
#X connect 82 1 78 0;
#X connect 85 0 86 0;
#X connect 86 0 84 0;
#X connect 87 0 86 0;
#X connect 87 1 84 2;
#X connect 89 0 165 0;
#X connect 90 0 165 1;
#X connect 91 0 165 2;
#X connect 93 0 165 3;
#X connect 94 0 95 0;
#X connect 94 0 161 0;
#X connect 94 1 89 0;
#X connect 94 2 90 0;
#X connect 94 3 91 0;
#X connect 94 4 92 0;
#X connect 94 5 93 0;
#X connect 102 0 130 0;
#X connect 103 0 116 0;
#X connect 104 0 115 0;
#X connect 105 0 113 0;
#X connect 107 0 109 0;
#X connect 108 0 116 1;
#X connect 109 0 110 0;
#X connect 110 0 112 0;
#X connect 112 0 108 0;
#X connect 113 0 114 0;
#X connect 114 0 104 0;
#X connect 115 0 103 0;
#X connect 117 0 118 0;
#X connect 119 0 123 0;
#X connect 120 0 122 2;
#X connect 121 0 122 3;
#X connect 122 0 124 0;
#X connect 123 0 122 0;
#X connect 123 1 122 1;
#X connect 125 0 124 0;
#X connect 126 0 124 0;
#X connect 128 0 129 0;
#X connect 128 1 119 0;
#X connect 128 2 120 0;
#X connect 128 3 121 0;
#X connect 130 0 131 0;
#X connect 130 1 105 0;
#X connect 130 2 106 0;
#X connect 130 3 107 0;
#X connect 136 0 134 0;
#X connect 136 0 142 0;
#X connect 136 1 133 0;
#X connect 136 1 142 1;
#X connect 136 2 135 0;
#X connect 136 2 142 2;
#X connect 142 0 141 0;
#X connect 142 0 162 0;
#X connect 143 0 144 0;
#X connect 144 0 145 0;
#X connect 145 0 146 0;
#X connect 146 0 149 0;
#X connect 149 0 147 0;
#X connect 149 1 148 0;
#X connect 150 0 149 1;
#X connect 151 0 149 1;
#X connect 153 0 154 0;
#X connect 154 0 156 0;
#X connect 155 0 152 0;
#X connect 156 0 155 0;
#X connect 157 0 143 0;
#X connect 158 0 143 1;
#X connect 159 0 144 1;
#X connect 160 0 144 1;
#X connect 165 0 166 0;
#X connect 167 0 170 0;
#X connect 167 0 178 0;
#X connect 168 0 169 0;
#X connect 170 0 168 0;
#X connect 171 0 172 0;
#X connect 172 0 173 0;
#X connect 172 0 174 0;
#X connect 173 0 177 0;
#X connect 173 0 182 0;
#X connect 174 0 181 0;
#X connect 174 0 183 0;
#X connect 175 0 176 0;
#X connect 177 0 175 0;
#X connect 178 0 171 0;
#X connect 179 0 180 0;
#X connect 181 0 179 0;
#X connect 182 0 184 0;
#X connect 182 1 185 0;
#X connect 182 2 186 0;
#X connect 182 3 187 0;
#X connect 183 0 188 0;
#X connect 183 1 189 0;
#X connect 183 2 190 0;
#X coords 0 -1 1 1 340 60 2 100 100;