From 427db308048814ee3fb1bc21946397320e29bde5 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Mon, 30 Oct 2006 05:36:51 +0000 Subject: switched over to [digital 5 1( message format for output, . next for the hard part, switch over analog and digital to this message format svn path=/trunk/externals/hardware/arduino/; revision=6182 --- arduino.pd | 568 ++++++++++++++++++++++++++++++++----------------------------- 1 file changed, 294 insertions(+), 274 deletions(-) (limited to 'arduino.pd') diff --git a/arduino.pd b/arduino.pd index a505faf..dbc7186 100644 --- a/arduino.pd +++ b/arduino.pd @@ -1,274 +1,294 @@ -#N canvas 396 63 681 397 10; -#X obj 462 15 import flatspace; -#X text 415 287 released under the GNU GPL; -#X text 10 287 (C) Copyright 2006 Hans-Christoph Steiner -; -#X obj 11 21 inlet; -#X obj 11 196 outlet; -#X obj 494 241 outlet; -#N canvas 484 367 648 373 command 0; -#X obj 46 8 inlet; -#X obj 148 269 outlet; -#X obj 100 94 clip 0 6; -#X obj 171 94 clip 0 1; -#X obj 171 115 int; -#N canvas 614 548 486 336 digital-out 0; -#X obj 65 20 inlet; -#X obj 85 280 outlet; -#X obj 65 108 route float; -#X obj 209 209 & 127; -#X obj 140 208 & 127; -#X obj 140 164 trigger float float bang; -#X text 104 89 break up digital-out bitmask; -#X obj 209 187 >> 7; -#X msg 279 188 229; -#X connect 0 0 2 0; -#X connect 2 0 5 0; -#X connect 2 1 1 0; -#X connect 3 0 1 0; -#X connect 4 0 1 0; -#X connect 5 0 4 0; -#X connect 5 1 7 0; -#X connect 5 2 8 0; -#X connect 7 0 3 0; -#X connect 8 0 1 0; -#X restore 449 93 pd digital-out; -#N canvas 49 547 528 335 outputMode 0; -#X obj 60 11 inlet; -#X obj 175 275 outlet; -#X obj 175 87 unpack float float; -#X obj 175 176 +; -#X obj 175 197 + 130; -#X obj 296 126 * 70; -#X text 222 198 input commands = 130-143; -#X text 334 127 output commands = 200-213; -#X msg 61 229 151; -#X obj 60 48 trigger bang anything; -#X obj 61 182 float; -#X text 142 86 pin#; -#X text 312 87 mode; -#X text 89 229 send 151/ENABLE_DIGITAL_INPUT whenever a pin is set -to input; -#X obj 61 202 select 0; -#X connect 0 0 9 0; -#X connect 2 0 3 0; -#X connect 2 1 5 0; -#X connect 2 1 10 1; -#X connect 3 0 4 0; -#X connect 4 0 1 0; -#X connect 5 0 3 1; -#X connect 8 0 1 0; -#X connect 9 0 10 0; -#X connect 9 1 2 0; -#X connect 10 0 14 0; -#X connect 14 0 8 0; -#X restore 241 94 pd outputMode; -#X obj 100 135 + 160; -#X obj 171 137 + 150; -#N canvas 291 228 420 352 pwm 0; -#X obj 44 14 inlet; -#X msg 327 220 251; -#X obj 114 312 outlet; -#X obj 232 185 * 255; -#X obj 232 164 clip 0 1; -#X obj 232 205 int; -#N canvas 0 22 450 300 list-rev 0; -#X obj 92 29 inlet; -#N canvas 0 22 533 407 drip 0; -#X obj 64 206 list split 1; -#X obj 64 123 until; -#X obj 64 181 list append; -#X obj 194 206 bang; -#X obj 64 243 outlet; -#X obj 64 57 inlet; -#X text 237 44 From list-help.pd; -#X obj 143 243 outlet; -#X obj 64 86 t b a; -#X connect 0 0 4 0; -#X connect 0 1 2 1; -#X connect 0 2 3 0; -#X connect 0 2 7 0; -#X connect 1 0 2 0; -#X connect 2 0 0 0; -#X connect 3 0 1 1; -#X connect 5 0 8 0; -#X connect 8 0 1 0; -#X connect 8 1 2 1; -#X restore 92 94 pd drip; -#X obj 148 141 t l; -#X obj 92 141 list; -#X obj 136 207 list; -#X obj 136 259 outlet; -#X text 174 95 drip list; -#X text 174 210 intermediate store \, bang'd on list end.; -#X text 178 140 repack in reverse order; -#X obj 92 54 t a b b; -#X connect 0 0 9 0; -#X connect 1 0 3 0; -#X connect 1 1 4 0; -#X connect 2 0 3 1; -#X connect 3 0 2 0; -#X connect 3 0 4 1; -#X connect 4 0 5 0; -#X connect 9 0 1 0; -#X connect 9 1 3 1; -#X connect 9 2 4 1; -#X restore 44 54 pd list-rev; -#X obj 44 113 route off; -#X msg 74 170 250; -#X obj 44 83 list trim; -#X text 361 222 PWM on; -#X obj 44 145 t f b; -#X text 105 170 PWM off; -#X obj 232 141 unpack f f; -#X obj 297 195 t f b; -#X connect 0 0 6 0; -#X connect 1 0 2 0; -#X connect 3 0 5 0; -#X connect 4 0 3 0; -#X connect 5 0 2 0; -#X connect 6 0 9 0; -#X connect 7 0 11 0; -#X connect 7 1 13 0; -#X connect 8 0 2 0; -#X connect 9 0 7 0; -#X connect 11 0 2 0; -#X connect 11 1 8 0; -#X connect 13 0 4 0; -#X connect 13 1 14 0; -#X connect 14 0 2 0; -#X connect 14 1 1 0; -#X restore 30 94 pd pwm; -#X msg 340 94 info; -#X obj 46 52 route pwm analogIns digitalIns outputMode info version -; -#X msg 390 93 240; -#X connect 0 0 11 0; -#X connect 2 0 7 0; -#X connect 3 0 4 0; -#X connect 4 0 8 0; -#X connect 5 0 1 0; -#X connect 6 0 1 0; -#X connect 7 0 1 0; -#X connect 8 0 1 0; -#X connect 9 0 1 0; -#X connect 10 0 1 0; -#X connect 11 0 9 0; -#X connect 11 1 2 0; -#X connect 11 2 3 0; -#X connect 11 3 6 0; -#X connect 11 4 10 0; -#X connect 11 5 12 0; -#X connect 11 6 5 0; -#X connect 12 0 1 0; -#X restore 11 52 pd command processing; -#X text 257 242 DEBUG/RAW data (this will change); -#X obj 379 19 inlet; -#X text 354 0 raw input; -#X text 10 -1 processed input; -#N canvas 182 25 384 447 make 0; -#X obj 147 8 inlet; -#X obj 71 334 outlet; -#X obj 147 37 moses 128; -#X obj 27 198 float; -#N canvas 382 81 506 356 alternate 0; -#X obj 34 280 outlet; -#X obj 209 277 outlet; -#X obj 34 210 spigot; -#X obj 209 204 spigot; -#X obj 33 87 trigger anything bang; -#X msg 175 107 1; -#X obj 71 186 float; -#X obj 245 181 float; -#X obj 357 41 loadbang; -#X obj 342 74 bang; -#X obj 246 158 !=; -#X obj 71 163 !=; -#X obj 342 7 inlet; -#X text 384 6 reset; -#X obj 33 12 inlet; -#X msg 329 102 1; -#X msg 359 102 0; -#X connect 2 0 0 0; -#X connect 3 0 1 0; -#X connect 4 0 2 0; -#X connect 4 0 3 0; -#X connect 4 1 5 0; -#X connect 5 0 10 0; -#X connect 5 0 11 0; -#X connect 6 0 2 1; -#X connect 6 0 11 1; -#X connect 7 0 3 1; -#X connect 7 0 10 1; -#X connect 8 0 9 0; -#X connect 9 0 16 0; -#X connect 9 0 15 0; -#X connect 10 0 7 0; -#X connect 11 0 6 0; -#X connect 12 0 9 0; -#X connect 14 0 4 0; -#X connect 15 0 11 1; -#X connect 16 0 10 1; -#X restore 147 130 pd alternate; -#X obj 27 173 trigger bang float; -#X obj 226 111 bang; -#N canvas 0 22 580 356 convert 0; -#X obj 98 22 inlet; -#X obj 163 314 outlet; -#X obj 365 204 print UNKNOWN_INPUT_COMMAND; -#X obj 98 68 select 151 240; -#X obj 191 89 moses 161; -#X obj 250 113 moses 167; -#X obj 188 195 makefilename analog%c; -#X obj 188 174 - 113; -#X msg 117 131 symbol version; -#X msg 8 131 symbol digital; -#X connect 0 0 3 0; -#X connect 3 0 9 0; -#X connect 3 1 8 0; -#X connect 3 2 4 0; -#X connect 4 0 2 0; -#X connect 4 1 5 0; -#X connect 5 0 7 0; -#X connect 5 1 2 0; -#X connect 6 0 1 0; -#X connect 7 0 6 0; -#X connect 8 0 1 0; -#X connect 9 0 1 0; -#X restore 27 219 pd convert commands; -#X obj 70 296 list trim; -#X obj 70 273 pack symbol float; -#X obj 184 219 +; -#X obj 200 197 * 128; -#X connect 0 0 2 0; -#X connect 2 0 4 0; -#X connect 2 1 3 1; -#X connect 2 1 6 0; -#X connect 3 0 7 0; -#X connect 4 0 5 0; -#X connect 4 1 11 0; -#X connect 5 0 3 0; -#X connect 5 1 10 0; -#X connect 6 0 4 1; -#X connect 7 0 9 0; -#X connect 8 0 1 0; -#X connect 9 0 8 0; -#X connect 10 0 9 1; -#X connect 11 0 10 1; -#X restore 10 165 pd make lists; -#X obj 190 89 spigot; -#X obj 221 67 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 -1; -#X obj 102 117 print comport; -#X obj 11 96 comport \$1 19200; -#X obj 190 112 print command; -#X connect 3 0 6 0; -#X connect 6 0 12 0; -#X connect 6 0 15 0; -#X connect 8 0 15 0; -#X connect 11 0 4 0; -#X connect 12 0 16 0; -#X connect 13 0 12 1; -#X connect 15 0 5 0; -#X connect 15 0 11 0; -#X connect 15 1 14 0; +#N canvas 361 22 682 319 10; +#X text 415 287 released under the GNU GPL; +#X text 10 287 (C) Copyright 2006 Hans-Christoph Steiner +; +#X obj 11 21 inlet; +#X obj 11 196 outlet; +#X obj 494 241 outlet; +#N canvas 382 102 637 357 command 0; +#X obj 24 7 inlet; +#X obj 281 289 outlet; +#X obj 210 93 clip 0 1; +#X obj 210 114 int; +#N canvas 729 244 487 295 digital-out 0; +#X obj 26 12 inlet; +#X obj 218 219 outlet; +#X msg 404 92 229; +#X obj 181 137 trigger bang float; +#X obj 97 172 float; +#X obj 26 31 trigger anything bang; +#X obj 27 137 trigger float bang; +#X obj 218 171 float; +#X obj 26 77 route 0 1 2 3 4 5 6 7 8 9 10 11 12 13; +#X obj 181 115 bytemask -----; +#X obj 27 115 bytemask ---------; +#X connect 0 0 5 0; +#X connect 2 0 1 0; +#X connect 3 0 4 0; +#X connect 3 1 7 0; +#X connect 4 0 1 0; +#X connect 5 0 8 0; +#X connect 5 1 2 0; +#X connect 6 0 4 0; +#X connect 6 1 7 0; +#X connect 7 0 1 0; +#X connect 8 0 10 0; +#X connect 8 1 10 1; +#X connect 8 2 10 2; +#X connect 8 3 10 3; +#X connect 8 4 10 4; +#X connect 8 5 10 5; +#X connect 8 6 10 6; +#X connect 8 7 9 0; +#X connect 8 8 9 1; +#X connect 8 9 9 2; +#X connect 8 10 9 3; +#X connect 8 11 9 4; +#X connect 8 12 9 5; +#X connect 8 13 9 6; +#X connect 9 0 3 0; +#X connect 10 0 6 0; +#X restore 377 118 pd digital-out; +#N canvas 49 547 528 335 pinMode 0; +#X obj 60 11 inlet; +#X obj 175 275 outlet; +#X obj 175 87 unpack float float; +#X obj 175 176 +; +#X obj 175 197 + 130; +#X obj 296 126 * 70; +#X text 222 198 input commands = 130-143; +#X text 334 127 output commands = 200-213; +#X msg 61 229 151; +#X obj 60 48 trigger bang anything; +#X obj 61 182 float; +#X text 142 86 pin#; +#X text 312 87 mode; +#X text 89 229 send 151/ENABLE_DIGITAL_INPUT whenever a pin is set +to input; +#X obj 61 202 select 0; +#X connect 0 0 9 0; +#X connect 2 0 3 0; +#X connect 2 1 5 0; +#X connect 2 1 10 1; +#X connect 3 0 4 0; +#X connect 4 0 1 0; +#X connect 5 0 3 1; +#X connect 8 0 1 0; +#X connect 9 0 10 0; +#X connect 9 1 2 0; +#X connect 10 0 14 0; +#X connect 14 0 8 0; +#X restore 280 93 pd pinMode; +#X obj 139 133 + 160; +#X obj 210 135 + 150; +#N canvas 291 228 424 356 pwm 0; +#X obj 44 14 inlet; +#X msg 327 220 251; +#X obj 114 312 outlet; +#X obj 232 185 * 255; +#X obj 232 164 clip 0 1; +#X obj 232 205 int; +#N canvas 0 22 458 308 list-rev 0; +#X obj 92 29 inlet; +#N canvas 0 22 533 407 drip 0; +#X obj 64 206 list split 1; +#X obj 64 123 until; +#X obj 64 181 list append; +#X obj 194 206 bang; +#X obj 64 243 outlet; +#X obj 64 57 inlet; +#X text 237 44 From list-help.pd; +#X obj 143 243 outlet; +#X obj 64 86 t b a; +#X connect 0 0 4 0; +#X connect 0 1 2 1; +#X connect 0 2 3 0; +#X connect 0 2 7 0; +#X connect 1 0 2 0; +#X connect 2 0 0 0; +#X connect 3 0 1 1; +#X connect 5 0 8 0; +#X connect 8 0 1 0; +#X connect 8 1 2 1; +#X restore 92 94 pd drip; +#X obj 148 141 t l; +#X obj 92 141 list; +#X obj 136 207 list; +#X obj 136 259 outlet; +#X text 174 95 drip list; +#X text 174 210 intermediate store \, bang'd on list end.; +#X text 178 140 repack in reverse order; +#X obj 92 54 t a b b; +#X connect 0 0 9 0; +#X connect 1 0 3 0; +#X connect 1 1 4 0; +#X connect 2 0 3 1; +#X connect 3 0 2 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 9 0 1 0; +#X connect 9 1 3 1; +#X connect 9 2 4 1; +#X restore 44 54 pd list-rev; +#X obj 44 113 route off; +#X msg 74 170 250; +#X obj 44 83 list trim; +#X text 361 222 PWM on; +#X obj 44 145 t f b; +#X text 105 170 PWM off; +#X obj 232 141 unpack f f; +#X obj 297 195 t f b; +#X connect 0 0 6 0; +#X connect 1 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 3 0; +#X connect 5 0 2 0; +#X connect 6 0 9 0; +#X connect 7 0 11 0; +#X connect 7 1 13 0; +#X connect 8 0 2 0; +#X connect 9 0 7 0; +#X connect 11 0 2 0; +#X connect 11 1 8 0; +#X connect 13 0 4 0; +#X connect 13 1 14 0; +#X connect 14 0 2 0; +#X connect 14 1 1 0; +#X restore 24 94 pd pwm; +#X msg 359 93 info; +#X msg 483 118 240; +#X obj 412 91 route digital version; +#X obj 24 51 route pwm analog analogIns digitalIns pinMode info; +#X obj 139 93 clip 0 9; +#X connect 0 0 12 0; +#X connect 2 0 3 0; +#X connect 3 0 7 0; +#X connect 4 0 1 0; +#X connect 5 0 1 0; +#X connect 6 0 1 0; +#X connect 7 0 1 0; +#X connect 8 0 1 0; +#X connect 9 0 1 0; +#X connect 10 0 1 0; +#X connect 11 0 4 0; +#X connect 11 1 10 0; +#X connect 11 2 1 0; +#X connect 12 0 8 0; +#X connect 12 2 13 0; +#X connect 12 3 2 0; +#X connect 12 4 5 0; +#X connect 12 5 9 0; +#X connect 12 6 11 0; +#X connect 13 0 6 0; +#X restore 11 52 pd command processing; +#X text 257 242 DEBUG/RAW data (this will change); +#X obj 379 19 inlet; +#X text 354 0 raw input; +#X text 10 -1 processed input; +#N canvas 182 25 396 459 make 0; +#X obj 147 8 inlet; +#X obj 71 334 outlet; +#X obj 147 37 moses 128; +#X obj 27 198 float; +#N canvas 382 81 506 356 alternate 0; +#X obj 34 280 outlet; +#X obj 209 277 outlet; +#X obj 34 210 spigot; +#X obj 209 204 spigot; +#X obj 33 87 trigger anything bang; +#X msg 175 107 1; +#X obj 71 186 float; +#X obj 245 181 float; +#X obj 357 41 loadbang; +#X obj 342 74 bang; +#X obj 246 158 !=; +#X obj 71 163 !=; +#X obj 342 7 inlet; +#X text 384 6 reset; +#X obj 33 12 inlet; +#X msg 329 102 1; +#X msg 359 102 0; +#X connect 2 0 0 0; +#X connect 3 0 1 0; +#X connect 4 0 2 0; +#X connect 4 0 3 0; +#X connect 4 1 5 0; +#X connect 5 0 10 0; +#X connect 5 0 11 0; +#X connect 6 0 2 1; +#X connect 6 0 11 1; +#X connect 7 0 3 1; +#X connect 7 0 10 1; +#X connect 8 0 9 0; +#X connect 9 0 16 0; +#X connect 9 0 15 0; +#X connect 10 0 7 0; +#X connect 11 0 6 0; +#X connect 12 0 9 0; +#X connect 14 0 4 0; +#X connect 15 0 11 1; +#X connect 16 0 10 1; +#X restore 147 130 pd alternate; +#X obj 27 173 trigger bang float; +#X obj 226 111 bang; +#N canvas 0 22 588 364 convert 0; +#X obj 98 22 inlet; +#X obj 163 314 outlet; +#X obj 365 204 print UNKNOWN_INPUT_COMMAND; +#X obj 98 68 select 151 240; +#X obj 191 89 moses 161; +#X obj 188 195 makefilename analog%c; +#X obj 188 174 - 113; +#X msg 117 131 symbol version; +#X msg 8 131 symbol digital; +#X obj 250 113 moses 170; +#X connect 0 0 3 0; +#X connect 3 0 8 0; +#X connect 3 1 7 0; +#X connect 3 2 4 0; +#X connect 4 0 2 0; +#X connect 4 1 9 0; +#X connect 5 0 1 0; +#X connect 6 0 5 0; +#X connect 7 0 1 0; +#X connect 8 0 1 0; +#X connect 9 0 6 0; +#X connect 9 1 2 0; +#X restore 27 219 pd convert commands; +#X obj 70 296 list trim; +#X obj 70 273 pack symbol float; +#X obj 184 219 +; +#X obj 200 197 * 128; +#X connect 0 0 2 0; +#X connect 2 0 4 0; +#X connect 2 1 3 1; +#X connect 2 1 6 0; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 4 1 11 0; +#X connect 5 0 3 0; +#X connect 5 1 10 0; +#X connect 6 0 4 1; +#X connect 7 0 9 0; +#X connect 8 0 1 0; +#X connect 9 0 8 0; +#X connect 10 0 9 1; +#X connect 11 0 10 1; +#X restore 10 165 pd make lists; +#X obj 288 103 spigot; +#X obj 319 81 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 118 116 print comport; +#X obj 11 96 comport \$1 19200; +#X obj 288 126 print command; +#X obj 448 19 import flatspace iemlib mapping; +#X connect 2 0 5 0; +#X connect 5 0 11 0; +#X connect 5 0 14 0; +#X connect 7 0 14 0; +#X connect 10 0 3 0; +#X connect 11 0 15 0; +#X connect 12 0 11 1; +#X connect 14 0 4 0; +#X connect 14 0 10 0; +#X connect 14 1 13 0; -- cgit v1.2.1