From c6be69970a25abc8a22c350e9486455aaec086eb Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Tue, 25 Nov 2008 05:56:16 +0000 Subject: - 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 --- arduino.pd | 102 +++++++++++++++++++++++++++++++++++-------------------------- 1 file changed, 59 insertions(+), 43 deletions(-) (limited to 'arduino.pd') 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; -- cgit v1.2.1