path: root/arduino.pd

#N canvas 497 22 680 308 10;
#X text 415 277 released under the GNU GPL;
#X text 10 277 (C) Copyright 2006 Hans-Christoph Steiner <hans@at.or.at>
;
#X obj 11 21 inlet;
#X obj 10 241 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 756 135 471 397 make 0;
#X obj 37 8 inlet;
#X obj 37 37 moses 128;
#X obj 65 135 float;
#N canvas 382 81 514 364 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 37 81 pd alternate;
#X obj 37 114 trigger bang float;
#X obj 116 61 bang;
#X obj 131 322 outlet;
#X obj 223 322 print UNKNOWN_INPUT_COMMAND;
#X obj 65 155 pack float float float;
#X obj 65 198 route 240 151;
#X msg 20 247 version \$2 \$1;
#N canvas 141 182 545 394 digital 0;
#X obj 77 16 inlet;
#X obj 73 346 outlet;
#X obj 77 173 print DIGITAL_UNINMPLEMENTED;
#X connect 0 0 2 0;
#X restore 123 247 pd digital messages;
#N canvas 81 317 535 449 analog 0;
#X obj 85 6 inlet;
#X obj 63 383 outlet;
#X obj 85 47 moses 161;
#X obj 143 65 moses 170;
#X obj 141 160 list;
#X obj 385 383 outlet;
#X msg 347 141 2;
#X msg 219 141 1;
#X obj 233 114 trigger bang bang;
#X msg 63 360 analog \$1 \$2;
#X obj 63 339 pack float float;
#X text 241 384 unprocessed messages;
#X obj 140 241 unpack float float float;
#X obj 63 114 trigger float bang bang;
#X obj 303 260 << 7;
#X obj 221 285 +;
#X obj 221 306 / 1023;
#X obj 63 143 - 161;
#X obj 85 26 trigger anything anything;
#X obj 386 217 spigot;
#X obj 423 198 == 2;
#X obj 140 222 spigot;
#X obj 177 203 == 1;
#X obj 254 59 print ANYTHING;
#X connect 0 0 18 0;
#X connect 2 0 8 0;
#X connect 2 1 3 0;
#X connect 3 0 13 0;
#X connect 3 1 8 0;
#X connect 4 0 19 0;
#X connect 4 0 21 0;
#X connect 6 0 20 0;
#X connect 6 0 22 0;
#X connect 7 0 22 0;
#X connect 7 0 20 0;
#X connect 8 0 4 0;
#X connect 8 1 6 0;
#X connect 9 0 1 0;
#X connect 10 0 9 0;
#X connect 12 1 15 0;
#X connect 12 2 14 0;
#X connect 13 0 17 0;
#X connect 13 1 4 0;
#X connect 13 2 7 0;
#X connect 14 0 15 1;
#X connect 15 0 16 0;
#X connect 16 0 10 1;
#X connect 17 0 10 0;
#X connect 18 0 2 0;
#X connect 18 1 4 1;
#X connect 19 0 5 0;
#X connect 20 0 19 1;
#X connect 21 0 12 0;
#X connect 22 0 21 1;
#X restore 266 246 pd analog messages;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 1 1 5 0;
#X connect 1 1 2 1;
#X connect 2 0 8 0;
#X connect 3 0 4 0;
#X connect 3 1 8 2;
#X connect 4 0 2 0;
#X connect 4 1 8 1;
#X connect 5 0 3 1;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 1 11 0;
#X connect 9 2 12 0;
#X connect 10 0 6 0;
#X connect 11 0 6 0;
#X connect 12 0 6 0;
#X connect 12 1 7 0;
#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 125 120 print comport;
#X obj 11 96 comport \$1 115200;
#X obj 288 126 print command;
#X obj 438 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;