- got analog input working

- version reporting works, but checkInput() isn't run enough, so it misses the
  data if there is a lot of traffic on the serial port

svn path=/trunk/externals/hardware/arduino/; revision=7444

1 files changed, 174 insertions, 167 deletions

diff --git a/arduino.pd b/arduino.pd
index f00a5bc..2210291 100644
--- a/arduino.pd
+++ b/arduino.pd
@@ -1,12 +1,10 @@
-#N canvas 497 22 624 356 10;
-#X obj 323 8 import hardware flatspace iemlib mapping;
-#X text 415 317 released under the GNU GPL;
-#X text 10 317 (C) Copyright 2006 Hans-Christoph Steiner <hans@at.or.at>
-;
-#X obj 11 61 inlet;
-#X obj 10 281 outlet;
-#X obj 494 281 outlet;
-#N canvas 382 102 637 357 command 0;
+#N canvas 602 43 640 372 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 382 102 653 373 command 0;
 #X obj 24 7 inlet;
 #X obj 281 289 outlet;
 #X obj 210 93 clip 0 1;
@@ -82,14 +80,14 @@ to input;
 #X restore 280 93 pd pinMode;
 #X obj 139 133 + 160;
 #X obj 210 135 + 150;
-#N canvas 291 228 424 356 pwm 0;
+#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 458 308 list-rev 0;
+#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;
@@ -157,11 +155,11 @@ to input;
 #X connect 14 1 1 0;
 #X restore 24 94 pd pwm;
 #X msg 359 93 info;
-#X msg 483 118 240;
 #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 connect 0 0 12 0;
+#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;
@@ -170,73 +168,101 @@ to input;
 #X connect 7 0 1 0;
 #X connect 8 0 1 0;
 #X connect 9 0 1 0;
-#X connect 10 0 1 0;
-#X connect 11 0 4 0;
-#X connect 11 1 10 0;
-#X connect 11 2 1 0;
-#X connect 12 0 8 0;
-#X connect 12 2 13 0;
-#X connect 12 3 2 0;
-#X connect 12 4 5 0;
-#X connect 12 5 9 0;
-#X connect 12 6 11 0;
-#X connect 13 0 6 0;
-#X restore 11 92 pd command processing;
-#X text 257 282 DEBUG/RAW data (this will change);
-#X obj 379 59 inlet;
-#X text 354 40 raw input;
-#X text 10 39 processed input;
-#N canvas 505 101 491 417 make 0;
-#X obj 37 8 inlet;
-#X obj 37 37 moses 128;
-#X obj 65 135 float;
-#N canvas 382 81 514 364 alternate 0;
-#X obj 34 280 outlet;
-#X obj 209 277 outlet;
-#X obj 34 210 spigot;
-#X obj 209 204 spigot;
-#X obj 33 87 trigger anything bang;
-#X msg 175 107 1;
-#X obj 71 186 float;
-#X obj 245 181 float;
-#X obj 357 41 loadbang;
-#X obj 342 74 bang;
-#X obj 246 158 !=;
-#X obj 71 163 !=;
-#X obj 342 7 inlet;
-#X text 384 6 reset;
-#X obj 33 12 inlet;
-#X msg 329 102 1;
-#X msg 359 102 0;
-#X connect 2 0 0 0;
-#X connect 3 0 1 0;
-#X connect 4 0 2 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 61 136 comport \$1 115200;
+#X obj 410 88 loadbang;
+#N canvas 0 22 454 304 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 connect 4 1 5 0;
-#X connect 5 0 10 0;
-#X connect 5 0 11 0;
-#X connect 6 0 2 1;
-#X connect 6 0 11 1;
-#X connect 7 0 3 1;
-#X connect 7 0 10 1;
+#X restore 231 113 pd report firmware version;
+#X text 335 299 DEBUG/RAW data (this will change);
+#N canvas 72 70 439 393 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 0 15 0;
-#X connect 10 0 7 0;
-#X connect 11 0 6 0;
-#X connect 12 0 9 0;
-#X connect 14 0 4 0;
-#X connect 15 0 11 1;
-#X connect 16 0 10 1;
-#X restore 37 81 pd alternate;
-#X obj 37 114 trigger bang float;
-#X obj 116 61 bang;
-#X obj 131 322 outlet;
-#X obj 223 322 print UNKNOWN_INPUT_COMMAND;
-#X obj 65 155 pack float float float;
-#X obj 65 198 route 240 151;
-#X msg 20 247 version \$2 \$1;
-#N canvas 123 202 614 291 digital 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;
@@ -289,95 +315,76 @@ to input;
 #X connect 17 0 4 0;
 #X connect 18 0 4 0;
 #X connect 19 0 4 0;
-#X restore 123 247 pd digital messages;
-#N canvas 81 317 535 449 analog 0;
-#X obj 85 6 inlet;
-#X obj 63 383 outlet;
-#X obj 85 47 moses 161;
-#X obj 143 65 moses 170;
-#X obj 141 160 list;
-#X obj 385 383 outlet;
-#X msg 347 141 2;
-#X msg 219 141 1;
-#X obj 233 114 trigger bang bang;
-#X msg 63 360 analog \$1 \$2;
-#X obj 63 339 pack float float;
-#X text 241 384 unprocessed messages;
-#X obj 140 241 unpack float float float;
-#X obj 63 114 trigger float bang bang;
-#X obj 303 260 << 7;
-#X obj 221 285 +;
-#X obj 221 306 / 1023;
-#X obj 63 143 - 161;
-#X obj 85 26 trigger anything anything;
-#X obj 386 217 spigot;
-#X obj 423 198 == 2;
-#X obj 140 222 spigot;
-#X obj 177 203 == 1;
-#X obj 254 59 print ANYTHING;
-#X connect 0 0 18 0;
-#X connect 2 0 8 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 13 0;
-#X connect 3 1 8 0;
-#X connect 4 0 19 0;
-#X connect 4 0 21 0;
-#X connect 6 0 20 0;
-#X connect 6 0 22 0;
-#X connect 7 0 22 0;
-#X connect 7 0 20 0;
-#X connect 8 0 4 0;
-#X connect 8 1 6 0;
-#X connect 9 0 1 0;
-#X connect 10 0 9 0;
-#X connect 12 1 15 0;
-#X connect 12 2 14 0;
-#X connect 13 0 17 0;
-#X connect 13 1 4 0;
-#X connect 13 2 7 0;
-#X connect 14 0 15 1;
-#X connect 15 0 16 0;
-#X connect 16 0 10 1;
-#X connect 17 0 10 0;
-#X connect 18 0 2 0;
-#X connect 18 1 4 1;
-#X connect 19 0 5 0;
-#X connect 20 0 19 1;
-#X connect 21 0 12 0;
-#X connect 22 0 21 1;
-#X restore 266 246 pd analog messages;
+#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 454 304 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 connect 0 0 1 0;
-#X connect 1 0 3 0;
-#X connect 1 1 5 0;
-#X connect 1 1 2 1;
-#X connect 2 0 8 0;
-#X connect 3 0 4 0;
-#X connect 3 1 8 2;
-#X connect 4 0 2 0;
-#X connect 4 1 8 1;
-#X connect 5 0 3 1;
-#X connect 8 0 9 0;
-#X connect 9 0 10 0;
-#X connect 9 1 11 0;
-#X connect 9 2 12 0;
-#X connect 10 0 6 0;
-#X connect 11 0 6 0;
-#X connect 12 0 6 0;
-#X connect 12 1 7 0;
-#X restore 10 205 pd make lists;
-#X obj 288 143 spigot;
-#X obj 319 121 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
-1;
-#X obj 125 160 print comport;
-#X obj 11 136 comport \$1 115200;
-#X obj 288 166 print command;
-#X connect 3 0 6 0;
-#X connect 6 0 12 0;
-#X connect 6 0 15 0;
-#X connect 8 0 15 0;
-#X connect 11 0 4 0;
-#X connect 12 0 16 0;
-#X connect 13 0 12 1;
-#X connect 15 0 5 0;
-#X connect 15 0 11 0;
-#X connect 15 1 14 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 connect 2 0 5 0;
+#X connect 5 0 9 0;
+#X connect 6 0 9 0;
+#X connect 9 0 4 0;
+#X connect 9 0 14 0;
+#X connect 9 1 12 0;
+#X connect 10 0 11 0;
+#X connect 12 0 5 0;
+#X connect 14 0 15 0;
+#X connect 14 0 3 0;