PureData

#N canvas 370 22 837 686 10;
#X declare -lib moocow;
#X obj 60 136 select 10 13;
#X obj 60 184 zl group 100;
#X msg 25 348 bang;
#N canvas 15 207 606 448 RGB_____________ 0;
#X obj 97 56 inlet;
#X obj 262 53 inlet;
#X obj 339 55 inlet;
#X obj 405 56 inlet;
#X obj 97 270 bang;
#X msg 77 295 0;
#X msg 104 295 1;
#X obj 146 268 bang;
#X msg 132 295 0;
#X msg 160 295 1;
#X obj 265 313 spigot;
#X obj 312 313 spigot;
#X obj 249 385 outlet;
#X text 93 33 select;
#X text 267 28 red;
#X text 337 30 green;
#X text 409 30 blue;
#X obj 405 102 t b f;
#X obj 339 160 +;
#X obj 339 185 t b f;
#X obj 339 216 +;
#X obj 296 385 outlet;
#X obj 28 180 loadbang;
#X obj 296 361 f;
#X obj 249 361 f;
#X obj 262 79 * -65536;
#X obj 339 80 * -256;
#X obj 405 80 * -1;
#X obj 339 247 - 1;
#X obj 97 135 route back label bang;
#X obj 235 168 t b b b;
#X connect 0 0 29 0;
#X connect 1 0 25 0;
#X connect 2 0 26 0;
#X connect 3 0 27 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 11 1;
#X connect 6 0 10 1;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 10 1;
#X connect 9 0 11 1;
#X connect 10 0 24 1;
#X connect 11 0 23 1;
#X connect 17 0 18 0;
#X connect 17 1 18 1;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 19 1 20 1;
#X connect 20 0 28 0;
#X connect 22 0 6 0;
#X connect 23 0 21 0;
#X connect 24 0 12 0;
#X connect 25 0 20 0;
#X connect 26 0 18 0;
#X connect 27 0 17 0;
#X connect 28 0 11 0;
#X connect 28 0 10 0;
#X connect 29 0 4 0;
#X connect 29 1 7 0;
#X connect 29 2 30 0;
#X connect 30 0 24 0;
#X connect 30 1 23 0;
#X connect 30 2 28 0;
#X restore 50 385 pd RGB_____________;
#X obj 49 436 pack 0 0;
#X msg 49 469 color \$1 \$2;
#X msg 248 132 cnv 15 300 300 VCM_Canvas VCM_CanvasR VCM 20 12 2 14
18 20 0;
#X msg 44 514 \; VCM_CanvasR color \$1 \$2;
#X obj 246 163 cnv 15 100 60 VCM_Canvas VCM_CanvasR VCM 20 12 0 14
-1 -262144 0;
#X obj 404 273 import moocow;
#X obj 60 106 comport 4 9600;
#X msg 61 70 pollintervall 10;
#X msg 180 71 open 4;
#X msg 251 73 info;
#X msg 30 24 stopbit 0;
#X obj 59 163 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 60 305 / 4;
#X obj 119 309 / 4;
#X obj 170 306 / 4;
#X obj 559 55 tosymbol;
#X msg 190 47 close;
#X obj 60 240 cycle 3;
#X obj 58 216 bytes2any 0 44;
#X obj 181 346 limit 0 255 0;
#X obj 34 338 limit 0 255 0;
#X obj 87 344 limit 0 255 0;
#X connect 0 0 15 0;
#X connect 0 2 1 0;
#X connect 1 0 22 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 4 1;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 10 0 0 0;
#X connect 11 0 10 0;
#X connect 12 0 10 0;
#X connect 13 0 10 0;
#X connect 14 0 10 0;
#X connect 15 0 1 0;
#X connect 16 0 24 0;
#X connect 17 0 25 0;
#X connect 18 0 23 0;
#X connect 20 0 10 0;
#X connect 21 0 2 0;
#X connect 21 0 16 0;
#X connect 21 1 17 0;
#X connect 21 2 18 0;
#X connect 22 0 21 0;
#X connect 23 0 3 3;
#X connect 24 0 3 1;
#X connect 25 0 3 2;