got PWM control working from Pd

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

1 files changed, 69 insertions, 261 deletions

diff --git a/arduino.pd b/arduino.pd
index e00bcad..2c3c665 100644
--- a/arduino.pd
+++ b/arduino.pd
@@ -1,47 +1,8 @@
-#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>

+#N canvas 81 0 548 475 10;

+#X obj 388 -14 import cyclone zexy;

+#X text 331 417 released under the GNU GPL;

+#X text 117 402 (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;

@@ -87,226 +48,73 @@ window to see if it connected successfully:;
 #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

+#X restore 144 130 pd alternate;

+#X msg 89 99 reset;

+#X obj 207 171 +;

+#X obj 207 192 trigger bang float;

+#X obj 215 324 pack symbol float;

+#X obj 197 248 +;

+#X obj 225 248 float;

+#X msg 226 227 0;

+#X msg 197 227 1;

+#X obj 197 278 + 64;

+#X obj 349 135 gate 4;

+#X obj 340 159 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

+#X obj 358 159 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

+#X obj 377 159 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

+#X obj 396 159 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 387 114 metro 400;

+#X obj 388 94 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;

+#X obj 316 61 float;

+#X obj 359 61 + 1;

+#X obj 316 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

+-1;

+#X obj 402 59 bang;

+#X msg 335 27 1;

+#X obj 316 83 moses 5;

+#X obj 89 73 select 255;

+#X obj 223 150 * 128;

+#X obj 89 -1 inlet;

+#X obj 10 373 outlet;

+#X obj 235 380 outlet;

+#X obj 197 301 makefilename arduino%c;

+#X obj 89 45 comport \$1 9600;

+#X connect 3 0 5 0;

+#X connect 3 1 27 0;

+#X connect 4 0 3 0;

+#X connect 4 0 10 0;

+#X connect 5 0 6 0;

+#X connect 6 0 11 0;

+#X connect 6 1 7 1;

+#X connect 7 0 29 0;

+#X connect 8 0 9 0;

+#X connect 8 0 12 0;

+#X connect 9 0 8 1;

+#X connect 10 0 9 0;

+#X connect 11 0 8 0;

+#X connect 12 0 31 0;

+#X connect 13 0 14 0;

+#X connect 13 1 15 0;

+#X connect 13 2 16 0;

+#X connect 13 3 17 0;

+#X connect 18 0 13 1;

+#X connect 19 0 18 0;

+#X connect 20 0 25 0;

+#X connect 21 0 20 1;

+#X connect 22 0 20 0;

+#X connect 23 0 24 0;

+#X connect 24 0 20 0;

+#X connect 25 0 21 0;

+#X connect 25 0 13 0;

+#X connect 25 1 23 0;

+#X connect 26 0 4 0;

+#X connect 26 1 3 0;

+#X connect 27 0 5 1;

+#X connect 28 0 32 0;

+#X connect 31 0 7 0;

+#X connect 32 0 29 0;