- added a "port" message for sending a complete port at a time, directly

  reflecting the underlying digital message and the fact that digital outputs
  on a microcrontroller are handled on an 8-bit port basis.


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

1 files changed, 59 insertions, 43 deletions

diff --git a/arduino.pd b/arduino.pd
index 1619834..eee184d 100644
--- a/arduino.pd
+++ b/arduino.pd
@@ -1,39 +1,40 @@
-#N canvas 486 297 585 366 10;
+#N canvas 559 528 585 366 10;
 #X obj 32 26 inlet;
 #X obj 32 304 outlet;
 #X obj 515 304 outlet;
-#N canvas 100 292 813 345 command 1;
+#N canvas 100 292 813 345 command 0;
 #X obj 24 7 inlet;
 #X obj 281 289 outlet;
-#N canvas 176 407 597 479 digital-out 0;
-#X obj 3 15 inlet;
-#X obj 283 440 outlet;
-#X msg 372 88 \$1;
-#X text 401 87 add channel to command;
-#X text 410 131 0x90;
-#X obj 372 132 + 144;
-#X obj 372 110 div 8;
-#X obj 211 391 float;
-#X obj 144 391 float;
-#X obj 408 16 inlet;
-#X text 453 17 state from port-out;
-#X msg 156 84 \$2;
-#X obj 235 143 <<;
-#X msg 235 122 1 \$1;
-#X obj 283 242 * 8;
-#X obj 171 371 >> 7;
-#X obj 238 371 & 127;
-#X obj 248 314 &;
-#X msg 289 267 255 \$1;
-#X obj 289 288 <<;
-#X obj 4 55 trigger bang bang bang anything anything anything;
-#X obj 193 255 float;
-#X obj 254 338 >>;
-#X obj 222 215 |;
-#X obj 218 173 float;
-#X obj 157 172 float;
-#X obj 156 115 select 0 1;
-#X obj 84 215 expr ~$f1 & $f2;
+#N canvas 75 439 547 478 digital-out 0;
+#X obj 4 15 inlet;
+#X obj 284 440 outlet;
+#X msg 373 158 \$1;
+#X text 402 157 add channel to command;
+#X text 411 201 0x90;
+#X obj 373 202 + 144;
+#X obj 373 180 div 8;
+#X obj 212 391 float;
+#X obj 145 391 float;
+#X obj 459 16 inlet;
+#X text 339 15 state from port-out;
+#X msg 157 84 \$2;
+#X obj 236 143 <<;
+#X msg 236 122 1 \$1;
+#X obj 284 242 * 8;
+#X obj 172 371 >> 7;
+#X obj 239 371 & 127;
+#X obj 249 314 &;
+#X msg 290 267 255 \$1;
+#X obj 290 288 <<;
+#X obj 5 55 trigger bang bang bang anything anything anything;
+#X obj 194 255 float;
+#X obj 255 338 >>;
+#X obj 223 215 |;
+#X obj 219 173 float;
+#X obj 158 172 float;
+#X obj 157 115 select 0 1;
+#X obj 85 215 expr ~$f1 & $f2;
+#X floatatom 462 49 0 0 0 0 - - -;
 #X connect 0 0 20 0;
 #X connect 2 0 6 0;
 #X connect 5 0 1 0;
@@ -41,6 +42,8 @@
 #X connect 6 0 14 0;
 #X connect 7 0 1 0;
 #X connect 8 0 1 0;
+#X connect 9 0 23 0;
+#X connect 9 0 28 0;
 #X connect 11 0 26 0;
 #X connect 12 0 24 1;
 #X connect 12 0 25 1;
@@ -239,23 +242,26 @@
 #X connect 17 0 3 1;
 #X restore 662 136 pd sysex;
 #X obj 662 114 route sysex string;
-#N canvas 481 623 569 343 port-out 0;
+#N canvas 107 510 569 343 port-out 0;
 #X obj 13 15 inlet;
 #X obj 167 281 outlet;
 #X msg 244 82 \$1;
-#X text 273 81 add channel to command;
-#X text 309 187 0x90;
-#X obj 271 188 + 144;
-#X obj 244 106 moses;
+#X text 343 149 add channel to command;
+#X text 309 190 0x90;
+#X obj 271 191 + 144;
+#X obj 244 129 moses;
 #X obj 13 55 trigger bang anything anything anything;
-#X obj 271 126 moses 16;
-#X obj 353 196 print [arduino];
-#X msg 353 174 ERROR: no such channel: \$1;
+#X obj 271 149 moses 16;
+#X obj 353 219 print [arduino];
+#X msg 353 197 ERROR: no such channel: \$1;
 #X msg 167 82 \$2;
 #X msg 90 82 \$2;
-#X obj 167 106 & 127;
-#X obj 90 106 & 128;
-#X obj 90 131 == 128;
+#X obj 167 129 & 127;
+#X obj 90 130 & 128;
+#X obj 90 151 == 128;
+#X obj 21 285 outlet;
+#X obj 36 230 * 8;
+#X obj 21 251 <<;
 #X connect 0 0 7 0;
 #X connect 2 0 6 0;
 #X connect 5 0 1 0;
@@ -265,13 +271,17 @@
 #X connect 7 2 11 0;
 #X connect 7 3 2 0;
 #X connect 8 0 5 0;
+#X connect 8 0 17 0;
 #X connect 8 1 10 0;
 #X connect 10 0 9 0;
 #X connect 11 0 13 0;
 #X connect 12 0 14 0;
+#X connect 12 0 18 0;
 #X connect 13 0 1 0;
 #X connect 14 0 15 0;
 #X connect 15 0 1 0;
+#X connect 17 0 18 1;
+#X connect 18 0 16 0;
 #X restore 425 122 pd port-out;
 #X obj 361 77 route digital port version firmware;
 #X connect 0 0 12 0;
@@ -296,7 +306,8 @@
 #X connect 14 0 13 0;
 #X connect 14 1 13 1;
 #X connect 14 2 1 0;
-#X connect 15 0 1 0;
+#X connect 15 0 2 1;
+#X connect 15 1 1 0;
 #X connect 16 0 2 0;
 #X connect 16 1 15 0;
 #X connect 16 2 10 0;
@@ -706,6 +717,9 @@ byte left over;
 #X restore 32 229 pd convert to symbolic commands;
 #X text 27 331 (C) Copyright 2006-2008 Free Software Foundation;
 #X text 334 330 released under the GNU GPL v2 or later;
+#X obj 188 203 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 188 181 route open;
 #X connect 0 0 3 0;
 #X connect 3 0 10 0;
 #X connect 5 0 6 0;
@@ -714,6 +728,8 @@ byte left over;
 #X connect 10 0 8 0;
 #X connect 10 1 7 0;
 #X connect 10 1 2 0;
+#X connect 10 1 15 0;
 #X connect 11 0 1 0;
 #X connect 11 0 9 0;
 #X connect 11 1 2 0;
+#X connect 15 0 14 0;