path: root/arduino.pd

#N canvas 365 27 652 384 10;
#X obj 377 9 import hardware flatspace iemlib mapping;
#X text 321 336 released under the GNU GPL;
#X obj 61 19 inlet;
#X obj 61 297 outlet;
#X obj 544 297 outlet;
#N canvas 405 22 673 393 command 0;
#X obj 24 7 inlet;
#X obj 281 289 outlet;
#X obj 210 93 clip 0 1;
#X obj 210 114 int;
#N canvas 729 244 495 303 digital-out 0;
#X obj 26 12 inlet;
#X obj 218 219 outlet;
#X obj 181 137 trigger bang float;
#X obj 97 172 float;
#X obj 26 31 trigger anything bang;
#X obj 27 137 trigger float bang;
#X obj 218 171 float;
#X obj 26 77 route 0 1 2 3 4 5 6 7 8 9 10 11 12 13;
#X obj 181 115 bytemask -----;
#X obj 27 115 bytemask ---------;
#X msg 404 92 144;
#X connect 0 0 4 0;
#X connect 2 0 3 0;
#X connect 2 1 6 0;
#X connect 3 0 1 0;
#X connect 4 0 7 0;
#X connect 4 1 10 0;
#X connect 5 0 3 0;
#X connect 5 1 6 0;
#X connect 6 0 1 0;
#X connect 7 0 9 0;
#X connect 7 1 9 1;
#X connect 7 2 9 2;
#X connect 7 3 9 3;
#X connect 7 4 9 4;
#X connect 7 5 9 5;
#X connect 7 6 9 6;
#X connect 7 7 8 0;
#X connect 7 8 8 1;
#X connect 7 9 8 2;
#X connect 7 10 8 3;
#X connect 7 11 8 4;
#X connect 7 12 8 5;
#X connect 7 13 8 6;
#X connect 8 0 2 0;
#X connect 9 0 5 0;
#X connect 10 0 1 0;
#X restore 377 118 pd digital-out;
#N canvas 310 221 536 343 pinMode 0;
#X obj 190 11 inlet;
#X obj 289 307 outlet;
#X obj 60 91 unpack float float;
#X text 27 90 pin#;
#X text 177 92 mode;
#X obj 60 146 moses 128;
#X obj 165 144 select 0;
#X msg 165 167 0;
#X msg 210 167 1;
#X text 54 125 do bounds checking to be safe;
#X obj 190 35 trigger list bang;
#X msg 289 256 244;
#X obj 138 254 float;
#X obj 36 202 trigger bang float;
#X connect 0 0 10 0;
#X connect 2 0 5 0;
#X connect 2 1 6 0;
#X connect 5 0 13 0;
#X connect 6 0 7 0;
#X connect 6 1 8 0;
#X connect 7 0 12 1;
#X connect 8 0 12 1;
#X connect 10 0 2 0;
#X connect 10 1 11 0;
#X connect 11 0 1 0;
#X connect 12 0 1 0;
#X connect 13 0 12 0;
#X connect 13 1 1 0;
#X restore 280 93 pd pinMode;
#X obj 139 133 + 160;
#X obj 210 135 + 150;
#N canvas 291 228 432 364 pwm 0;
#X obj 44 14 inlet;
#X msg 327 220 251;
#X obj 114 312 outlet;
#X obj 232 185 * 255;
#X obj 232 164 clip 0 1;
#X obj 232 205 int;
#N canvas 0 22 462 312 list-rev 0;
#X obj 92 29 inlet;
#N canvas 0 22 533 407 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 4 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 7 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 5 0 8 0;
#X connect 8 0 1 0;
#X connect 8 1 2 1;
#X restore 92 94 pd drip;
#X obj 148 141 t l;
#X obj 92 141 list;
#X obj 136 207 list;
#X obj 136 259 outlet;
#X text 174 95 drip list;
#X text 174 210 intermediate store \, bang'd on list end.;
#X text 178 140 repack in reverse order;
#X obj 92 54 t a b b;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 1 1 4 0;
#X connect 2 0 3 1;
#X connect 3 0 2 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 9 0 1 0;
#X connect 9 1 3 1;
#X connect 9 2 4 1;
#X restore 44 54 pd list-rev;
#X obj 44 113 route off;
#X msg 74 170 250;
#X obj 44 83 list trim;
#X text 361 222 PWM on;
#X obj 44 145 t f b;
#X text 105 170 PWM off;
#X obj 232 141 unpack f f;
#X obj 297 195 t f b;
#X connect 0 0 6 0;
#X connect 1 0 2 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 9 0;
#X connect 7 0 11 0;
#X connect 7 1 13 0;
#X connect 8 0 2 0;
#X connect 9 0 7 0;
#X connect 11 0 2 0;
#X connect 11 1 8 0;
#X connect 13 0 4 0;
#X connect 13 1 14 0;
#X connect 14 0 2 0;
#X connect 14 1 1 0;
#X restore 24 94 pd pwm;
#X msg 359 93 info;
#X obj 412 91 route digital version;
#X obj 24 51 route pwm analog analogIns digitalIns pinMode info;
#X obj 139 93 clip 0 9;
#X msg 473 118 249;
#X connect 0 0 11 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 1 0;
#X connect 7 0 1 0;
#X connect 8 0 1 0;
#X connect 9 0 1 0;
#X connect 10 0 4 0;
#X connect 10 1 13 0;
#X connect 10 2 1 0;
#X connect 11 0 8 0;
#X connect 11 2 12 0;
#X connect 11 3 2 0;
#X connect 11 4 5 0;
#X connect 11 5 9 0;
#X connect 11 6 10 0;
#X connect 12 0 6 0;
#X connect 13 0 1 0;
#X restore 61 52 pd command processing;
#X obj 319 19 inlet;
#X text 306 1 raw input;
#X text 57 1 processed input;
#X obj 410 88 loadbang;
#N canvas 0 22 458 308 report 0;
#X obj 95 26 inlet;
#X obj 97 186 print [arduino];
#X msg 93 87 version_1.0;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 410 112 pd report object version;
#N canvas 0 22 466 316 report 0;
#X obj 66 7 inlet;
#X obj 66 36 route open;
#X obj 66 60 select 1;
#X obj 67 147 outlet;
#X msg 66 82 version;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 4 0 3 0;
#X restore 231 113 pd report firmware version;
#X text 335 299 DEBUG/RAW data (this will change);
#N canvas 72 70 443 397 make 0;
#X obj 79 6 inlet;
#X obj 184 337 outlet;
#X obj 79 72 moses 128;
#X obj 130 96 trigger float float;
#N canvas 102 52 649 354 set 0;
#X obj 26 3 inlet;
#X obj 34 307 outlet;
#X text 85 31 0xF0;
#X obj 26 31 moses 240;
#X text 79 307 length in byte count;
#X obj 431 254 select 240 247;
#X text 522 256 SysEx;
#X msg 291 122 2;
#X obj 26 60 & 240;
#X obj 26 101 select 144 160 176 192 208 224;
#X text 29 86 0x90 0xA0 0xB0 0xC0 0xD0 0xE0;
#X msg 251 122 2;
#X text 283 83 0xF4 0xF9;
#X obj 251 101 select 244 249;
#X obj 281 199 print [arduino]_WARNING_currently_unsupported;
#X msg 55 122 160;
#X msg 26 122 2;
#X msg 85 122 176;
#X msg 114 122 1;
#X msg 144 122 1;
#X msg 173 122 2;
#X connect 0 0 3 0;
#X connect 3 0 8 0;
#X connect 3 1 13 0;
#X connect 7 0 1 0;
#X connect 8 0 9 0;
#X connect 9 0 16 0;
#X connect 9 1 15 0;
#X connect 9 2 17 0;
#X connect 9 3 18 0;
#X connect 9 4 19 0;
#X connect 9 5 20 0;
#X connect 11 0 1 0;
#X connect 13 0 11 0;
#X connect 13 1 7 0;
#X connect 13 2 14 0;
#X connect 15 0 14 0;
#X connect 16 0 1 0;
#X connect 17 0 14 0;
#X connect 18 0 1 0;
#X connect 19 0 1 0;
#X connect 20 0 1 0;
#X restore 241 123 pd set message length;
#X obj 184 258 mapping/tolist;
#X obj 79 210 select 0;
#X obj 79 188 float;
#X obj 117 188 - 1;
#X obj 79 128 trigger bang float;
#X text 140 72 only process command bytes;
#N canvas 0 22 470 320 convert 0;
#X obj 142 218 outlet;
#X obj 257 218 print UNKNOWN_INPUT_COMMAND;
#N canvas 123 202 626 303 digital 0;
#X obj 163 16 inlet;
#X obj 252 255 outlet;
#X obj 163 42 unpack float float;
#X obj 284 71 mapping/debytemask;
#X msg 252 229 digital \$1 \$2;
#X obj 117 71 mapping/debytemask;
#X msg 4 119 0 \$1;
#X msg 42 119 1 \$1;
#X msg 80 119 2 \$1;
#X msg 118 119 3 \$1;
#X msg 156 119 4 \$1;
#X msg 194 119 5 \$1;
#X msg 232 119 6 \$1;
#X msg 274 119 7 \$1;
#X msg 312 119 8 \$1;
#X msg 350 119 9 \$1;
#X msg 388 119 10 \$1;
#X msg 432 119 11 \$1;
#X msg 480 119 12 \$1;
#X msg 527 119 13 \$1;
#X connect 0 0 2 0;
#X connect 2 0 5 0;
#X connect 2 1 3 0;
#X connect 3 0 13 0;
#X connect 3 1 14 0;
#X connect 3 2 15 0;
#X connect 3 3 16 0;
#X connect 3 4 17 0;
#X connect 3 5 18 0;
#X connect 3 6 19 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 5 1 7 0;
#X connect 5 2 8 0;
#X connect 5 3 9 0;
#X connect 5 4 10 0;
#X connect 5 5 11 0;
#X connect 5 6 12 0;
#X connect 6 0 4 0;
#X connect 7 0 4 0;
#X connect 8 0 4 0;
#X connect 9 0 4 0;
#X connect 10 0 4 0;
#X connect 11 0 4 0;
#X connect 12 0 4 0;
#X connect 13 0 4 0;
#X connect 14 0 4 0;
#X connect 15 0 4 0;
#X connect 16 0 4 0;
#X connect 17 0 4 0;
#X connect 18 0 4 0;
#X connect 19 0 4 0;
#X restore 143 114 pd digital messages;
#N canvas 134 58 331 263 analog 0;
#X obj 65 6 inlet;
#X obj 65 203 outlet;
#X msg 65 180 analog \$1 \$2;
#X obj 65 159 pack float float;
#X obj 65 42 unpack float float float;
#X obj 158 88 +;
#X obj 158 113 / 1023;
#X text 203 114 scale to 0-1;
#X obj 206 63 << 7;
#X obj 65 63 & 15;
#X connect 0 0 4 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 9 0;
#X connect 4 1 5 0;
#X connect 4 2 8 0;
#X connect 5 0 6 0;
#X connect 6 0 3 1;
#X connect 8 0 5 1;
#X connect 9 0 3 0;
#X restore 286 113 pd analog messages;
#X obj 85 13 inlet;
#X msg 40 114 version \$2 \$1;
#X obj 85 65 route 249 144;
#X text 114 50 0xF9 0x90;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 6 0;
#X connect 5 0 0 0;
#X connect 6 0 5 0;
#X connect 6 1 2 0;
#X connect 6 2 3 0;
#X restore 184 294 pd convert to symbolic commands;
#X connect 0 0 2 0;
#X connect 2 0 9 0;
#X connect 2 1 3 0;
#X connect 3 0 9 0;
#X connect 3 1 4 0;
#X connect 4 0 7 1;
#X connect 5 0 11 0;
#X connect 6 0 5 1;
#X connect 7 0 8 0;
#X connect 7 0 6 0;
#X connect 8 0 7 1;
#X connect 9 0 7 0;
#X connect 9 1 5 0;
#X connect 11 0 1 0;
#X restore 62 199 pd make lists;
#N canvas 0 22 501 245 check 0;
#X obj 47 62 inlet;
#X obj 47 88 route version;
#X obj 47 109 unpack float float;
#X obj 92 153 print [arduino]_WARNING_INCOMPATIBLE_FIRMWARE_VERSION
;
#X obj 47 131 select 1;
#X text 102 132 <-- this sets the firmware version this is compatible
with;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 4 1 3 0;
#X restore 92 242 pd check version;
#X text 10 337 (C) Copyright 2006 Free Software Foundation;
#X obj 61 136 comport \$1 57600;
#X connect 2 0 5 0;
#X connect 5 0 16 0;
#X connect 6 0 16 0;
#X connect 9 0 10 0;
#X connect 11 0 5 0;
#X connect 13 0 14 0;
#X connect 13 0 3 0;
#X connect 16 0 4 0;
#X connect 16 0 13 0;
#X connect 16 1 11 0;