#N canvas 237 21 752 609 10; #X obj 142 61 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 -1; #X msg 34 125 loop \$1; #X obj 35 103 tgl 15 0 empty empty empty 20 8 0 8 -262144 -1 -1 1 1 ; #X msg 244 41 open \$1; #X obj 243 17 openpanel; #X obj 228 0 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 -1; #X floatatom 190 96 5 0 0 0 - - -; #X msg 99 62 stop; #X obj 197 65 hsl 300 15 0 1000 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 0 1; #X obj 131 132 metro 70; #X obj 126 164 pdp_yqt; #X obj 242 152 pdp_v4l; #X obj 251 122 metro 70; #X obj 296 88 bng 15 250 50 0 empty empty empty 20 8 0 8 -262144 -1 -1; #X msg 253 89 stop; #X msg 338 120 open /dev/video; #X obj 567 476 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X obj 567 528 pdp_control; #X msg 567 501 thread \$1; #X floatatom 567 589 5 0 0 0 - - -; #X obj 567 560 route pdp_drop; #X text 85 514 written by Yves Degoyon ( ydegoyon@free.fr ); #X obj 128 440 pdp_xv; #X msg 55 361 cursor 1; #X msg 292 303 rgb \$1 \$2 \$3; #X obj 391 303 pack f f f; #X floatatom 573 302 5 0 0 0 - - -; #X text 584 321 R; #X floatatom 622 303 5 0 0 0 - - -; #X floatatom 670 304 5 0 0 0 - - -; #X text 681 321 B; #X obj 522 303 t b f; #X text 631 321 G; #X obj 474 303 t b f; #X obj 128 467 route press drag release; #X msg 292 187 pick \$1 \$2; #X text 383 186 Pick the color of the shape; #X msg 291 215 detect \$1 \$2; #X text 389 215 Detect a shape of that color; #X msg 292 240 tolerance \$1; #X floatatom 389 242 5 0 0 0 - - -; #X text 86 498 pdp_shape : shape recognition object; #X text 433 242 Set tolerance ( default = 20 ); #X text 294 323 Set the color of the shape; #X msg 293 270 paint \$1; #X obj 363 271 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1; #X text 388 270 Paint option ( default = off ); #X floatatom 325 399 5 0 0 0 - - -; #X floatatom 286 417 5 0 0 0 - - -; #X floatatom 375 399 5 0 0 0 - - -; #X floatatom 287 438 5 0 0 0 - - -; #X text 331 378 X1; #X text 379 378 X2; #X text 259 416 Y1; #X text 259 439 Y2; #X text 332 426 Coordinates of detected shape; #X obj 397 346 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1; #X msg 295 346 luminosity \$1; #X text 425 345 Use luminosity ( default = on ); #X obj 127 361 pdp_shape; #X connect 0 0 9 0; #X connect 1 0 10 0; #X connect 2 0 1 0; #X connect 3 0 10 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X connect 6 0 9 1; #X connect 7 0 9 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 23 0; #X connect 10 0 59 0; #X connect 11 0 59 0; #X connect 12 0 11 0; #X connect 13 0 12 0; #X connect 14 0 12 0; #X connect 15 0 11 0; #X connect 16 0 18 0; #X connect 17 0 20 0; #X connect 18 0 17 0; #X connect 20 0 19 0; #X connect 22 0 34 0; #X connect 23 0 22 0; #X connect 24 0 59 0; #X connect 25 0 24 0; #X connect 26 0 25 0; #X connect 28 0 33 0; #X connect 29 0 31 0; #X connect 31 0 25 0; #X connect 31 1 25 2; #X connect 33 0 25 0; #X connect 33 1 25 1; #X connect 34 0 35 0; #X connect 34 2 37 0; #X connect 35 0 59 0; #X connect 37 0 59 0; #X connect 39 0 59 0; #X connect 40 0 39 0; #X connect 44 0 59 0; #X connect 45 0 44 0; #X connect 56 0 57 0; #X connect 57 0 59 0; #X connect 59 0 22 0; #X connect 59 1 47 0; #X connect 59 2 48 0; #X connect 59 3 49 0; #X connect 59 4 50 0;