From de48ec637a407c162cd90f822383fe3f1b9d0b89 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Sat, 20 May 2006 10:18:14 +0000
Subject: got PWM control working from Pd

svn path=/trunk/externals/hardware/arduino/; revision=5093
---
 arduino.pd | 330 +++++++++++++------------------------------------------------
 1 file changed, 69 insertions(+), 261 deletions(-)

(limited to 'arduino.pd')

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;
-- 
cgit v1.2.1