#N canvas 404 56 608 521 10;
#X obj 462 15 import flatspace;
#X text 414 487 released under the GNU GPL;
#X text 9 487 (C) Copyright 2006 Hans-Christoph Steiner <hans@at.or.at>
;
#N canvas 562 456 470 320 alternate 0;
#X obj 87 8 inlet;
#X obj 151 244 outlet;
#X obj 319 247 outlet;
#X obj 159 197 spigot;
#X obj 319 191 spigot;
#X obj 158 57 trigger anything bang;
#X obj 196 152 abs;
#X obj 356 147 abs;
#X msg 295 77 1;
#X obj 196 173 float;
#X obj 355 168 float;
#X obj 86 34 route reset;
#X obj 356 128 -;
#X obj 196 133 -;
#X obj 15 35 loadbang;
#X obj 86 54 bang;
#X msg 73 82 1;
#X msg 103 82 0;
#X connect 0 0 11 0;
#X connect 3 0 1 0;
#X connect 4 0 2 0;
#X connect 5 0 3 0;
#X connect 5 0 4 0;
#X connect 5 1 8 0;
#X connect 6 0 9 0;
#X connect 7 0 10 0;
#X connect 8 0 12 0;
#X connect 8 0 13 0;
#X connect 9 0 3 1;
#X connect 9 0 13 1;
#X connect 10 0 4 1;
#X connect 10 0 12 1;
#X connect 11 0 15 0;
#X connect 11 1 5 0;
#X connect 12 0 7 0;
#X connect 13 0 6 0;
#X connect 14 0 17 0;
#X connect 14 0 16 0;
#X connect 15 0 17 0;
#X connect 15 0 16 0;
#X connect 16 0 13 1;
#X connect 17 0 12 1;
#X restore 76 191 pd alternate;
#X msg 11 160 reset;
#X obj 120 233 +;
#X obj 120 254 trigger bang float;
#X obj 126 405 pack symbol float;
#X msg 124 288 0;
#X obj 11 138 select 255;
#X obj 76 210 * 128;
#X obj 11 21 inlet;
#X obj 126 455 outlet;
#X obj 494 241 outlet;
#N canvas 275 202 542 337 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 0 22 470 320 digital-out 0;
#X obj 67 20 inlet;
#X obj 85 280 outlet;
#X obj 65 108 route float;
#X obj 221 191 & 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 140 186 >> 7;
#X msg 303 186 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 7 0;
#X connect 5 1 3 0;
#X connect 5 2 8 0;
#X connect 7 0 4 0;
#X connect 8 0 1 0;
#X restore 403 93 pd digital-out;
#N canvas 90 168 520 327 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 0 450 300 list-rev 0;
#X obj 92 29 inlet;
#N canvas 0 0 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 obj 46 52 route pwm analogIns digitalIns outputMode info;
#X msg 355 94 info;
#X connect 0 0 10 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 9 0;
#X connect 10 1 2 0;
#X connect 10 2 3 0;
#X connect 10 3 6 0;
#X connect 10 4 11 0;
#X connect 10 5 5 0;
#X connect 11 0 1 0;
#X restore 11 52 pd command processing;
#X obj 76 162 moses 128;
#X msg 27 376 symbol digital;
#X obj 142 375 makefilename analog%c;
#X obj 99 309 float;
#X obj 138 309 + 1;
#X obj 126 430 list trim;
#X obj 99 331 select 0;
#X text 287 285 DEBUG/RAW data (this will change);
#X obj 142 353 + 47;
#X obj 379 19 inlet;
#X text 354 0 raw input;
#X text 10 -1 processed input;
#X obj 11 96 comport \$1 19200;
#X connect 3 0 10 0;
#X connect 3 1 5 1;
#X connect 4 0 3 0;
#X connect 4 0 8 0;
#X connect 5 0 6 0;
#X connect 6 0 18 0;
#X connect 6 1 7 1;
#X connect 7 0 20 0;
#X connect 8 0 18 1;
#X connect 9 0 4 0;
#X connect 9 1 15 0;
#X connect 10 0 5 0;
#X connect 11 0 14 0;
#X connect 14 0 27 0;
#X connect 15 0 3 0;
#X connect 16 0 7 0;
#X connect 17 0 7 0;
#X connect 18 0 19 0;
#X connect 18 0 21 0;
#X connect 19 0 18 1;
#X connect 20 0 12 0;
#X connect 21 0 16 0;
#X connect 21 1 23 0;
#X connect 23 0 17 0;
#X connect 24 0 27 0;
#X connect 27 0 9 0;
#X connect 27 0 13 0;