#N canvas 96 16 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 127 417 pdp_xv; #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 0 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 58 0; #X connect 11 0 58 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 33 0; #X connect 23 0 58 0; #X connect 24 0 23 0; #X connect 25 0 24 0; #X connect 27 0 32 0; #X connect 28 0 30 0; #X connect 30 0 24 0; #X connect 30 1 24 2; #X connect 32 0 24 0; #X connect 32 1 24 1; #X connect 33 0 34 0; #X connect 33 2 36 0; #X connect 34 0 58 0; #X connect 36 0 58 0; #X connect 38 0 58 0; #X connect 39 0 38 0; #X connect 43 0 58 0; #X connect 44 0 43 0; #X connect 55 0 56 0; #X connect 56 0 58 0; #X connect 58 0 22 0; #X connect 58 1 46 0; #X connect 58 2 47 0; #X connect 58 3 48 0; #X connect 58 4 49 0;