switched over to [digital 5 1( message format for output, . next for the hard part, switch over analog and digital to this message format

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

1 files changed, 294 insertions, 274 deletions

diff --git a/arduino.pd b/arduino.pd
index a505faf..dbc7186 100644
--- a/arduino.pd
+++ b/arduino.pd
@@ -1,274 +1,294 @@
-#N canvas 396 63 681 397 10;

-#X obj 462 15 import flatspace;

-#X text 415 287 released under the GNU GPL;

-#X text 10 287 (C) Copyright 2006 Hans-Christoph Steiner <hans@at.or.at>

-;

-#X obj 11 21 inlet;

-#X obj 11 196 outlet;

-#X obj 494 241 outlet;

-#N canvas 484 367 648 373 command 0;

-#X obj 46 8 inlet;

-#X obj 148 269 outlet;

-#X obj 100 94 clip 0 6;

-#X obj 171 94 clip 0 1;

-#X obj 171 115 int;

-#N canvas 614 548 486 336 digital-out 0;

-#X obj 65 20 inlet;

-#X obj 85 280 outlet;

-#X obj 65 108 route float;

-#X obj 209 209 & 127;

-#X obj 140 208 & 127;

-#X obj 140 164 trigger float float bang;

-#X text 104 89 break up digital-out bitmask;

-#X obj 209 187 >> 7;

-#X msg 279 188 229;

-#X connect 0 0 2 0;

-#X connect 2 0 5 0;

-#X connect 2 1 1 0;

-#X connect 3 0 1 0;

-#X connect 4 0 1 0;

-#X connect 5 0 4 0;

-#X connect 5 1 7 0;

-#X connect 5 2 8 0;

-#X connect 7 0 3 0;

-#X connect 8 0 1 0;

-#X restore 449 93 pd digital-out;

-#N canvas 49 547 528 335 outputMode 0;

-#X obj 60 11 inlet;

-#X obj 175 275 outlet;

-#X obj 175 87 unpack float float;

-#X obj 175 176 +;

-#X obj 175 197 + 130;

-#X obj 296 126 * 70;

-#X text 222 198 input commands = 130-143;

-#X text 334 127 output commands = 200-213;

-#X msg 61 229 151;

-#X obj 60 48 trigger bang anything;

-#X obj 61 182 float;

-#X text 142 86 pin#;

-#X text 312 87 mode;

-#X text 89 229 send 151/ENABLE_DIGITAL_INPUT whenever a pin is set

-to input;

-#X obj 61 202 select 0;

-#X connect 0 0 9 0;

-#X connect 2 0 3 0;

-#X connect 2 1 5 0;

-#X connect 2 1 10 1;

-#X connect 3 0 4 0;

-#X connect 4 0 1 0;

-#X connect 5 0 3 1;

-#X connect 8 0 1 0;

-#X connect 9 0 10 0;

-#X connect 9 1 2 0;

-#X connect 10 0 14 0;

-#X connect 14 0 8 0;

-#X restore 241 94 pd outputMode;

-#X obj 100 135 + 160;

-#X obj 171 137 + 150;

-#N canvas 291 228 420 352 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 450 300 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 30 94 pd pwm;

-#X msg 340 94 info;

-#X obj 46 52 route pwm analogIns digitalIns outputMode info version

-;

-#X msg 390 93 240;

-#X connect 0 0 11 0;

-#X connect 2 0 7 0;

-#X connect 3 0 4 0;

-#X connect 4 0 8 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 1 0;

-#X connect 11 0 9 0;

-#X connect 11 1 2 0;

-#X connect 11 2 3 0;

-#X connect 11 3 6 0;

-#X connect 11 4 10 0;

-#X connect 11 5 12 0;

-#X connect 11 6 5 0;

-#X connect 12 0 1 0;

-#X restore 11 52 pd command processing;

-#X text 257 242 DEBUG/RAW data (this will change);

-#X obj 379 19 inlet;

-#X text 354 0 raw input;

-#X text 10 -1 processed input;

-#N canvas 182 25 384 447 make 0;

-#X obj 147 8 inlet;

-#X obj 71 334 outlet;

-#X obj 147 37 moses 128;

-#X obj 27 198 float;

-#N canvas 382 81 506 356 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 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 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 147 130 pd alternate;

-#X obj 27 173 trigger bang float;

-#X obj 226 111 bang;

-#N canvas 0 22 580 356 convert 0;

-#X obj 98 22 inlet;

-#X obj 163 314 outlet;

-#X obj 365 204 print UNKNOWN_INPUT_COMMAND;

-#X obj 98 68 select 151 240;

-#X obj 191 89 moses 161;

-#X obj 250 113 moses 167;

-#X obj 188 195 makefilename analog%c;

-#X obj 188 174 - 113;

-#X msg 117 131 symbol version;

-#X msg 8 131 symbol digital;

-#X connect 0 0 3 0;

-#X connect 3 0 9 0;

-#X connect 3 1 8 0;

-#X connect 3 2 4 0;

-#X connect 4 0 2 0;

-#X connect 4 1 5 0;

-#X connect 5 0 7 0;

-#X connect 5 1 2 0;

-#X connect 6 0 1 0;

-#X connect 7 0 6 0;

-#X connect 8 0 1 0;

-#X connect 9 0 1 0;

-#X restore 27 219 pd convert commands;

-#X obj 70 296 list trim;

-#X obj 70 273 pack symbol float;

-#X obj 184 219 +;

-#X obj 200 197 * 128;

-#X connect 0 0 2 0;

-#X connect 2 0 4 0;

-#X connect 2 1 3 1;

-#X connect 2 1 6 0;

-#X connect 3 0 7 0;

-#X connect 4 0 5 0;

-#X connect 4 1 11 0;

-#X connect 5 0 3 0;

-#X connect 5 1 10 0;

-#X connect 6 0 4 1;

-#X connect 7 0 9 0;

-#X connect 8 0 1 0;

-#X connect 9 0 8 0;

-#X connect 10 0 9 1;

-#X connect 11 0 10 1;

-#X restore 10 165 pd make lists;

-#X obj 190 89 spigot;

-#X obj 221 67 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0

-1;

-#X obj 102 117 print comport;

-#X obj 11 96 comport \$1 19200;

-#X obj 190 112 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;

+#N canvas 361 22 682 319 10;
+#X text 415 287 released under the GNU GPL;
+#X text 10 287 (C) Copyright 2006 Hans-Christoph Steiner <hans@at.or.at>
+;
+#X obj 11 21 inlet;
+#X obj 11 196 outlet;
+#X obj 494 241 outlet;
+#N canvas 382 102 637 357 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 487 295 digital-out 0;
+#X obj 26 12 inlet;
+#X obj 218 219 outlet;
+#X msg 404 92 229;
+#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 connect 0 0 5 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 3 1 7 0;
+#X connect 4 0 1 0;
+#X connect 5 0 8 0;
+#X connect 5 1 2 0;
+#X connect 6 0 4 0;
+#X connect 6 1 7 0;
+#X connect 7 0 1 0;
+#X connect 8 0 10 0;
+#X connect 8 1 10 1;
+#X connect 8 2 10 2;
+#X connect 8 3 10 3;
+#X connect 8 4 10 4;
+#X connect 8 5 10 5;
+#X connect 8 6 10 6;
+#X connect 8 7 9 0;
+#X connect 8 8 9 1;
+#X connect 8 9 9 2;
+#X connect 8 10 9 3;
+#X connect 8 11 9 4;
+#X connect 8 12 9 5;
+#X connect 8 13 9 6;
+#X connect 9 0 3 0;
+#X connect 10 0 6 0;
+#X restore 377 118 pd digital-out;
+#N canvas 49 547 528 335 pinMode 0;
+#X obj 60 11 inlet;
+#X obj 175 275 outlet;
+#X obj 175 87 unpack float float;
+#X obj 175 176 +;
+#X obj 175 197 + 130;
+#X obj 296 126 * 70;
+#X text 222 198 input commands = 130-143;
+#X text 334 127 output commands = 200-213;
+#X msg 61 229 151;
+#X obj 60 48 trigger bang anything;
+#X obj 61 182 float;
+#X text 142 86 pin#;
+#X text 312 87 mode;
+#X text 89 229 send 151/ENABLE_DIGITAL_INPUT whenever a pin is set
+to input;
+#X obj 61 202 select 0;
+#X connect 0 0 9 0;
+#X connect 2 0 3 0;
+#X connect 2 1 5 0;
+#X connect 2 1 10 1;
+#X connect 3 0 4 0;
+#X connect 4 0 1 0;
+#X connect 5 0 3 1;
+#X connect 8 0 1 0;
+#X connect 9 0 10 0;
+#X connect 9 1 2 0;
+#X connect 10 0 14 0;
+#X connect 14 0 8 0;
+#X restore 280 93 pd pinMode;
+#X obj 139 133 + 160;
+#X obj 210 135 + 150;
+#N canvas 291 228 424 356 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;
+#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 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 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 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 52 pd command processing;
+#X text 257 242 DEBUG/RAW data (this will change);
+#X obj 379 19 inlet;
+#X text 354 0 raw input;
+#X text 10 -1 processed input;
+#N canvas 182 25 396 459 make 0;
+#X obj 147 8 inlet;
+#X obj 71 334 outlet;
+#X obj 147 37 moses 128;
+#X obj 27 198 float;
+#N canvas 382 81 506 356 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 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 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 147 130 pd alternate;
+#X obj 27 173 trigger bang float;
+#X obj 226 111 bang;
+#N canvas 0 22 588 364 convert 0;
+#X obj 98 22 inlet;
+#X obj 163 314 outlet;
+#X obj 365 204 print UNKNOWN_INPUT_COMMAND;
+#X obj 98 68 select 151 240;
+#X obj 191 89 moses 161;
+#X obj 188 195 makefilename analog%c;
+#X obj 188 174 - 113;
+#X msg 117 131 symbol version;
+#X msg 8 131 symbol digital;
+#X obj 250 113 moses 170;
+#X connect 0 0 3 0;
+#X connect 3 0 8 0;
+#X connect 3 1 7 0;
+#X connect 3 2 4 0;
+#X connect 4 0 2 0;
+#X connect 4 1 9 0;
+#X connect 5 0 1 0;
+#X connect 6 0 5 0;
+#X connect 7 0 1 0;
+#X connect 8 0 1 0;
+#X connect 9 0 6 0;
+#X connect 9 1 2 0;
+#X restore 27 219 pd convert commands;
+#X obj 70 296 list trim;
+#X obj 70 273 pack symbol float;
+#X obj 184 219 +;
+#X obj 200 197 * 128;
+#X connect 0 0 2 0;
+#X connect 2 0 4 0;
+#X connect 2 1 3 1;
+#X connect 2 1 6 0;
+#X connect 3 0 7 0;
+#X connect 4 0 5 0;
+#X connect 4 1 11 0;
+#X connect 5 0 3 0;
+#X connect 5 1 10 0;
+#X connect 6 0 4 1;
+#X connect 7 0 9 0;
+#X connect 8 0 1 0;
+#X connect 9 0 8 0;
+#X connect 10 0 9 1;
+#X connect 11 0 10 1;
+#X restore 10 165 pd make lists;
+#X obj 288 103 spigot;
+#X obj 319 81 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 118 116 print comport;
+#X obj 11 96 comport \$1 19200;
+#X obj 288 126 print command;
+#X obj 448 19 import flatspace iemlib mapping;
+#X connect 2 0 5 0;
+#X connect 5 0 11 0;
+#X connect 5 0 14 0;
+#X connect 7 0 14 0;
+#X connect 10 0 3 0;
+#X connect 11 0 15 0;
+#X connect 12 0 11 1;
+#X connect 14 0 4 0;
+#X connect 14 0 10 0;
+#X connect 14 1 13 0;