worked out 2-way protocol, everything seems to work from Pd; the data sending is commented out, but it should still work...

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

1 files changed, 312 insertions, 0 deletions

diff --git a/arduino.pd b/arduino.pd
new file mode 100644
index 0000000..e00bcad
--- /dev/null
+++ b/arduino.pd
@@ -0,0 +1,312 @@
+#N canvas 375 1 618 657 10;

+#X obj 478 -14 import cyclone zexy;

+#X obj 9 25 nbx 6 16 -1e+037 1e+037 0 0 empty empty empty 0 -6 0 14

+-3754 -1 -1 8191 256;

+#X obj 110 25 nbx 6 16 -1e+037 1e+037 0 0 empty empty empty 0 -6 0

+14 -3754 -1 -1 27606 256;

+#X text 239 179 On Mac OS X \, set this to the right value:;

+#X msg 179 158 open \$1;

+#X text 12 101 You might need to select another port \, check the Pd

+window to see if it connected successfully:;

+#N canvas 162 133 530 380 serin 0;

+#X obj 120 61 cnv 15 15 15 empty \$0-number-canvas 2 4 7 0 14 -233017

+-1 0;

+#X obj 200 225 s \$0-number-canvas;

+#X obj 60 61 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -225271 -1

+-1 2;

+#X obj 59 147 outlet;

+#X obj 60 13 inlet;

+#X msg 200 202 label \$1;

+#X obj 200 180 makefilename %d;

+#X obj 59 108 float;

+#X connect 2 0 7 0;

+#X connect 4 0 2 0;

+#X connect 5 0 1 0;

+#X connect 6 0 5 0;

+#X connect 7 0 3 0;

+#X connect 7 0 6 0;

+#X coords 0 -1 1 1 76 17 1 60 60;

+#X restore 179 135 pd serin;

+#X text 260 136 serial port #;

+#X text 278 620 released under the GNU GPL;

+#X text 64 605 (C) Copyright 2006 Hans-Christoph Steiner <hans@at.or.at>

+;

+#X obj 211 25 nbx 6 16 -1e+037 1e+037 0 0 empty empty empty 0 -6 0

+14 -3754 -1 -1 0 256;

+#X obj 312 25 nbx 6 16 -1e+037 1e+037 0 0 empty empty empty 0 -6 0

+14 -3754 -1 -1 0 256;

+#X obj 413 25 nbx 6 16 -1e+037 1e+037 0 0 empty empty empty 0 -6 0

+14 -3754 -1 -1 0 256;

+#X obj 179 246 spigot;

+#X obj 229 248 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+1;

+#X msg 239 158 close;

+#X obj 64 570 print --------------------;

+#N canvas 630 546 462 312 alternate 0;

+#X obj 87 8 inlet;

+#X obj 151 244 outlet;

+#X obj 319 247 outlet;

+#X obj 159 197 spigot;

+#X obj 319 191 spigot;

+#X obj 158 57 trigger anything bang;

+#X obj 196 152 abs;

+#X floatatom 212 198 5 0 0 0 - - -;

+#X obj 356 147 abs;

+#X msg 295 77 1;

+#X obj 196 173 float;

+#X obj 355 168 float;

+#X obj 86 34 route reset;

+#X obj 356 128 -;

+#X obj 196 133 -;

+#X obj 15 35 loadbang;

+#X obj 86 54 bang;

+#X msg 73 82 1;

+#X msg 103 82 0;

+#X connect 0 0 12 0;

+#X connect 3 0 1 0;

+#X connect 4 0 2 0;

+#X connect 5 0 3 0;

+#X connect 5 0 4 0;

+#X connect 5 1 9 0;

+#X connect 6 0 10 0;

+#X connect 8 0 11 0;

+#X connect 9 0 13 0;

+#X connect 9 0 14 0;

+#X connect 10 0 3 1;

+#X connect 10 0 7 0;

+#X connect 10 0 14 1;

+#X connect 11 0 4 1;

+#X connect 11 0 13 1;

+#X connect 12 0 16 0;

+#X connect 12 1 5 0;

+#X connect 13 0 8 0;

+#X connect 14 0 6 0;

+#X connect 15 0 18 0;

+#X connect 15 0 17 0;

+#X connect 16 0 18 0;

+#X connect 16 0 17 0;

+#X connect 17 0 14 1;

+#X connect 18 0 13 1;

+#X restore 258 345 pd alternate;

+#X msg 179 299 reset;

+#X obj 297 304 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

+-1;

+#X obj 321 386 +;

+#X obj 321 407 trigger bang float;

+#X obj 329 539 pack symbol float;

+#X obj 311 517 makefilename \$0-%c;

+#X msg 330 562 \; \$1 \$2;

+#X obj 18 57 receive \$0-A;

+#X obj 9 5 receive \$0-B;

+#X obj 110 5 receive \$0-C;

+#X obj 211 5 receive \$0-D;

+#X obj 312 5 receive \$0-E;

+#X obj 413 5 receive \$0-F;

+#X obj 311 463 +;

+#X obj 339 463 float;

+#X msg 340 442 0;

+#X msg 311 442 1;

+#X obj 311 493 + 64;

+#X obj 3 525 spigot;

+#X obj 41 497 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

+;

+#X obj 439 335 gate 4;

+#X obj 430 359 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

+-1;

+#X obj 448 359 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

+-1;

+#X obj 467 359 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

+-1;

+#X obj 486 359 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

+-1;

+#X obj 477 314 metro 400;

+#X obj 478 294 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+1;

+#X obj 406 261 float;

+#X obj 449 261 + 1;

+#X obj 406 227 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

+-1;

+#X obj 492 259 bang;

+#X msg 425 227 1;

+#X obj 406 283 moses 5;

+#X obj 179 273 select 255;

+#X msg 243 197 devicename /dev/tty.usbserial-1913;

+#X obj 124 373 spigot;

+#X obj 162 345 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1

+1;

+#X obj 121 398 select 255;

+#X obj 510 25 nbx 6 16 -1e+037 1e+037 0 0 empty empty empty 0 -6 0

+14 -3754 -1 -1 0 256;

+#X obj 510 5 receive \$0-G;

+#X obj 179 225 comport 0 9600;

+#X obj 398 53 hradio 15 1 0 14 empty empty empty 0 -6 0 8 -262144 -1

+-1 0;

+#X obj 375 54 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

+;

+#X obj 394 126 +;

+#X obj 375 100 * 14;

+#X obj 394 147 + 200;

+#X floatatom 480 100 5 0 0 0 - - -;

+#X obj 398 72 t b f;

+#X obj 143 430 tolist;

+#X obj 146 538 print;

+#X obj 146 519 list;

+#X obj 170 452 list-len;

+#X obj 170 472 change;

+#X obj 40 369 spigot;

+#X obj 78 341 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

+;

+#X obj 37 394 select 255;

+#X obj 66 422 print;

+#X obj 172 493 bang;

+#X obj 337 365 * 128;

+#N canvas 295 269 586 307 decode 1;

+#X obj 241 26 inlet;

+#X obj 46 189 & 1;

+#X obj 72 189 & 2;

+#X obj 98 189 & 4;

+#X obj 46 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

+;

+#X obj 72 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 2

+;

+#X obj 98 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 4

+;

+#X obj 124 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 8

+8;

+#X obj 150 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+16;

+#X obj 182 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+32;

+#X obj 215 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+64;

+#X obj 248 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 128

+128;

+#X obj 287 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+256;

+#X obj 326 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+512;

+#X obj 365 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1024

+1024;

+#X obj 409 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+2048;

+#X obj 453 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+2;

+#X obj 499 213 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+4;

+#X obj 124 189 & 8;

+#X obj 150 189 & 16;

+#X obj 182 189 & 32;

+#X obj 215 189 & 64;

+#X obj 248 189 & 128;

+#X obj 287 189 & 256;

+#X obj 326 189 & 512;

+#X obj 365 189 & 1024;

+#X obj 409 189 & 2048;

+#X obj 453 189 & 4096;

+#X obj 499 189 & 8192;

+#X connect 0 0 1 0;

+#X connect 0 0 2 0;

+#X connect 0 0 3 0;

+#X connect 0 0 18 0;

+#X connect 0 0 19 0;

+#X connect 0 0 20 0;

+#X connect 0 0 21 0;

+#X connect 0 0 22 0;

+#X connect 0 0 23 0;

+#X connect 0 0 24 0;

+#X connect 0 0 25 0;

+#X connect 0 0 26 0;

+#X connect 0 0 27 0;

+#X connect 0 0 28 0;

+#X connect 1 0 4 0;

+#X connect 2 0 5 0;

+#X connect 3 0 6 0;

+#X connect 18 0 7 0;

+#X connect 19 0 8 0;

+#X connect 20 0 9 0;

+#X connect 21 0 10 0;

+#X connect 22 0 11 0;

+#X connect 23 0 12 0;

+#X connect 24 0 13 0;

+#X connect 25 0 14 0;

+#X connect 26 0 15 0;

+#X connect 27 0 16 0;

+#X connect 28 0 17 0;

+#X restore 34 133 pd decode buttons;

+#X msg 66 164 230 \, 128;

+#X msg 66 191 231 \, 64;

+#X msg 67 213 232 \, 32;

+#X connect 4 0 58 0;

+#X connect 6 0 4 0;

+#X connect 13 0 51 0;

+#X connect 14 0 13 1;

+#X connect 15 0 58 0;

+#X connect 17 0 20 0;

+#X connect 17 1 76 0;

+#X connect 18 0 17 0;

+#X connect 18 0 33 0;

+#X connect 19 0 17 0;

+#X connect 20 0 21 0;

+#X connect 21 0 34 0;

+#X connect 21 1 22 1;

+#X connect 22 0 24 0;

+#X connect 23 0 22 0;

+#X connect 25 0 36 0;

+#X connect 25 0 77 0;

+#X connect 26 0 1 0;

+#X connect 27 0 2 0;

+#X connect 31 0 32 0;

+#X connect 31 0 35 0;

+#X connect 32 0 31 1;

+#X connect 33 0 32 0;

+#X connect 34 0 31 0;

+#X connect 35 0 23 0;

+#X connect 36 0 16 0;

+#X connect 37 0 36 1;

+#X connect 38 0 39 0;

+#X connect 38 1 40 0;

+#X connect 38 2 41 0;

+#X connect 38 3 42 0;

+#X connect 43 0 38 1;

+#X connect 44 0 43 0;

+#X connect 45 0 50 0;

+#X connect 46 0 45 1;

+#X connect 47 0 45 0;

+#X connect 48 0 49 0;

+#X connect 49 0 45 0;

+#X connect 50 0 46 0;

+#X connect 50 0 38 0;

+#X connect 50 1 48 0;

+#X connect 51 0 18 0;

+#X connect 51 1 17 0;

+#X connect 52 0 58 0;

+#X connect 53 0 55 0;

+#X connect 54 0 53 1;

+#X connect 55 0 66 1;

+#X connect 55 1 66 0;

+#X connect 57 0 56 0;

+#X connect 58 0 13 0;

+#X connect 58 0 53 0;

+#X connect 58 0 71 0;

+#X connect 59 0 65 0;

+#X connect 60 0 62 0;

+#X connect 61 0 63 0;

+#X connect 62 0 61 0;

+#X connect 63 0 64 0;

+#X connect 63 0 58 0;

+#X connect 65 0 62 0;

+#X connect 65 1 61 1;

+#X connect 66 0 68 1;

+#X connect 66 0 69 0;

+#X connect 68 0 67 0;

+#X connect 69 0 70 0;

+#X connect 70 0 75 0;

+#X connect 71 0 73 0;

+#X connect 72 0 71 1;

+#X connect 73 0 16 0;

+#X connect 73 1 74 0;

+#X connect 75 0 68 0;

+#X connect 76 0 20 1;

+#X connect 78 0 58 0;

+#X connect 79 0 58 0;

+#X connect 80 0 58 0;