#N canvas -1177 182 798 564 10;
#X declare -path . -path .. -path data -path ../data -path ev-in -path
../ev-in -path ev-main -path ../ev-main -path ev-pano -path ../ev-pano
-path ev-pro -path ../ev-pro -path libs/gil -path ../libs/gil -path
libs/kollabs -path ../libs/kollabs -path media -path ../media;
#X obj 41 17 cnv 15 748 16 empty empty EXTENDED_VIEW_Camera/VideoInput_MODULE
2 8 0 14 -99865 -262144 0;
#X obj 41 135 cnv 15 360 60 empty empty creation_arguments: 5 12 0
12 -162280 -1 0;
#X obj 41 201 cnv 15 360 60 empty empty inlets/outlets 5 12 0 12 -233017
-66577 0;
#X text 46 221 Inlet 1: GEMlist;
#X obj 41 45 cnv 15 360 85 empty empty description 5 12 0 12 -233017
-66577 0;
#X text 46 233 Inlet 2: settings for [pix_video];
#X obj 43 334 cnv 15 360 130 empty empty PARAMETER_LIST_for_ev_cam
20 8 0 14 -233017 -66577 0;
#X text 43 80 Contains specific storage_&_osc-subpatch which houses
abstractions to register parameters for storage and osc communication
;
#X msg 419 64 create \, 1;
#X msg 431 86 0 \, destroy;
#X obj 550 49 loadbang;
#X msg 511 74 dimen 800 600;
#X text 406 41 CLICK HERE:;
#X obj 415 288 gemhead;
#X msg 599 74 color 0.5 0.5 0.5;
#X text 45 427 (c)2011 Peter Venus & Marian Weger /part of EXTENDED
VIEW toolkit/ gpl v3;
#N canvas 0 22 450 300 init 0;
#X obj 122 67 ../ev-main/ev_declare;
#X restore 349 50 pd init;
#X obj 419 124 gemwin;
#X obj 415 502 pix_texture;
#X obj 415 524 rectangle 4 3;
#X obj 415 433 ev_cam \$0;
#X msg 598 139 dimen 64 64;
#X msg 588 114 dimen 256 128;
#X msg 637 276 enumerate;
#X msg 643 298 dialog;
#X msg 606 168 colorspace RGBA;
#X msg 611 226 device 0;
#X msg 644 327 driver dv;
#N canvas 546 96 572 549 properties 0;
#X msg 41 203 enumProps;
#X obj 31 21 cnv 15 400 80 empty empty readProperties 20 12 0 14 -233017
-66577 0;
#X obj 39 47 hradio 15 1 0 1 \$0-propreadId \$0-propreadId empty 0
-8 0 10 -262144 -1 -1 0;
#X obj 40 70 cnv 15 260 20 empty \$0-propreadName <none> 10 9 0 14
-203904 -66577 0;
#N canvas 185 50 450 537 PropertyLogic 0;
#N canvas 1408 84 774 460 id2property 0;
#X obj 353 106 r \$0-info;
#X obj 353 130 route proplist;
#X obj 353 152 route read numread;
#X obj 405 176 t b f;
#X obj 353 174 list;
#X obj 353 219 list prepend;
#X msg 353 196 \$1;
#X obj 353 239 t l l;
#X obj 95 197 list prepend;
#X obj 525 176 t b f;
#X obj 473 174 list;
#X obj 473 219 list prepend;
#X msg 473 196 \$1;
#X obj 473 239 t l l;
#X obj 473 152 route write numwrite;
#X obj 95 69 inlet readID;
#X obj 225 70 inlet writeID;
#X obj 123 378 outlet readName;
#X obj 253 356 outlet writeName;
#X obj 95 176 t b f;
#X obj 95 219 list split;
#X obj 123 266 symbol;
#X msg 123 241 symbol \$1;
#X obj 225 197 list prepend;
#X obj 225 176 t b f;
#X obj 225 219 list split;
#X obj 253 266 symbol;
#X msg 253 241 symbol \$1;
#X obj 95 91 route float;
#X obj 225 92 route float;
#X msg 432 333 number \$1;
#X msg 552 333 number \$1;
#X obj 432 353 s \$0-propreadId;
#X obj 552 353 s \$0-propwriteId;
#X obj 602 254 t f f;
#X msg 602 232 0;
#X obj 602 211 loadbang;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 2 1 3 0;
#X connect 2 2 14 0;
#X connect 3 0 5 1;
#X connect 3 1 30 0;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 5 0;
#X connect 7 0 8 1;
#X connect 7 1 5 1;
#X connect 8 0 20 0;
#X connect 9 0 11 1;
#X connect 9 1 31 0;
#X connect 10 0 12 0;
#X connect 11 0 13 0;
#X connect 12 0 11 0;
#X connect 13 0 23 1;
#X connect 13 1 11 1;
#X connect 14 0 10 0;
#X connect 14 1 9 0;
#X connect 15 0 28 0;
#X connect 16 0 29 0;
#X connect 19 0 8 0;
#X connect 19 1 20 1;
#X connect 20 1 22 0;
#X connect 21 0 17 0;
#X connect 22 0 21 0;
#X connect 23 0 25 0;
#X connect 24 0 23 0;
#X connect 24 1 25 1;
#X connect 25 1 27 0;
#X connect 26 0 18 0;
#X connect 27 0 26 0;
#X connect 28 0 19 0;
#X connect 29 0 24 0;
#X connect 30 0 32 0;
#X connect 31 0 33 0;
#X connect 34 0 30 0;
#X connect 34 1 31 0;
#X connect 35 0 34 0;
#X connect 36 0 35 0;
#X restore 188 192 pd id2property;
#X obj 320 407 list prepend set;
#X obj 320 429 list trim;
#X obj 320 451 t b a;
#N canvas 437 141 450 300 getProp 0;
#X obj 44 177 s \$0-propreadName;
#X msg 44 156 label \$1;
#X msg 165 156 get \$1;
#X obj 44 81 inlet;
#X obj 165 178 outlet;
#X obj 290 57 r \$0-info;
#X obj 290 79 route prop;
#N canvas 3 45 450 300 sroute 0;
#X obj 73 12 inlet;
#X obj 312 9 inlet;
#X obj 73 113 outlet;
#X obj 73 34 list split 1;
#X obj 73 56 select s;
#X obj 73 78 list prepend;
#X connect 0 0 3 0;
#X connect 1 0 4 1;
#X connect 3 0 4 0;
#X connect 3 1 5 1;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X restore 290 113 pd sroute;
#X obj 44 123 t s s s;
#X msg 290 226 label \$1;
#X obj 290 247 s \$0-propreadValue;
#X obj 290 135 route float;
#X obj 290 157 makefilename %g;
#X obj 106 29 loadbang;
#X obj 106 51 t b b;
#X msg 106 73 symbol <none>;
#X msg 196 74 symbol --;
#X connect 1 0 0 0;
#X connect 2 0 4 0;
#X connect 3 0 8 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 11 0;
#X connect 8 0 1 0;
#X connect 8 1 2 0;
#X connect 8 2 7 1;
#X connect 9 0 10 0;
#X connect 11 0 12 0;
#X connect 12 0 9 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 14 1 16 0;
#X connect 15 0 1 0;
#X connect 16 0 9 0;
#X restore 320 318 pd getProp;
#X obj 172 158 r \$0-propreadId;
#X obj 282 158 r \$0-propwriteId;
#N canvas 432 95 450 467 setProp 0;
#X msg 44 156 label \$1;
#X msg 165 156 get \$1;
#X obj 44 31 inlet;
#X obj 218 324 outlet;
#X obj 290 57 r \$0-info;
#X obj 290 79 route prop;
#N canvas 4 50 450 300 sroute 0;
#X obj 73 12 inlet;
#X obj 312 9 inlet;
#X obj 73 113 outlet;
#X obj 73 34 list split 1;
#X obj 73 56 select s;
#X obj 73 78 list prepend;
#X connect 0 0 3 0;
#X connect 1 0 4 1;
#X connect 3 0 4 0;
#X connect 3 1 5 1;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X restore 290 113 pd sroute;
#X obj 290 135 route float;
#X obj 44 177 s \$0-propwriteName;
#X obj 290 247 s \$0-propwriteValue;
#X msg 290 226 set \$1;
#X obj 50 276 r \$0-propwriteValue;
#X obj 50 298 route float;
#X obj 50 320 pack 0 s;
#X msg 50 342 set \$2 \$1;
#X obj 44 73 t s s s s;
#X obj 127 27 loadbang;
#X obj 127 49 t b b;
#X msg 127 71 symbol <none>;
#X connect 0 0 8 0;
#X connect 1 0 3 0;
#X connect 2 0 15 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 3 0;
#X connect 15 0 0 0;
#X connect 15 1 1 0;
#X connect 15 2 6 1;
#X connect 15 3 13 1;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 18 0 0 0;
#X restore 199 315 pd setProp;
#X obj 199 404 list prepend set;
#X obj 199 426 list trim;
#X obj 199 448 t b a;
#X obj 199 361 list prepend get;
#X obj 199 339 route get set;
#X obj 309 361 list prepend set;
#X obj 199 477 s \$0-propset;
#X obj 320 480 s \$0-propget;
#X obj 54 38 inlet;
#X obj 54 66 s \$0-ctl;
#X connect 0 0 4 0;
#X connect 0 1 7 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 15 0;
#X connect 3 1 15 0;
#X connect 4 0 12 0;
#X connect 5 0 0 0;
#X connect 6 0 0 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 14 0;
#X connect 10 1 14 0;
#X connect 11 0 1 0;
#X connect 12 0 11 0;
#X connect 12 1 13 0;
#X connect 13 0 8 0;
#X connect 16 0 17 0;
#X restore 41 526 pd PropertyLogic;
#X obj 310 70 cnv 15 100 20 empty \$0-propreadValue -- 10 9 0 14 -261234
-66577 0;
#X obj 31 111 cnv 15 400 80 empty empty writeProperties 20 12 0 14
-233017 -66577 0;
#X obj 39 137 hradio 15 1 0 1 \$0-propwriteId \$0-propwriteId empty
0 -8 0 10 -262144 -1 -1 0;
#X obj 40 160 cnv 15 260 20 empty \$0-propwriteName <none> 10 9 0 14
-203904 -66577 0;
#X obj 311 160 nbx 5 20 -1e+37 1e+37 0 0 \$0-propwriteValue \$0-propwriteValue
empty 0 -8 0 14 -204786 -1 -1 0 256;
#X msg 66 315 get 50_fields;
#X msg 83 392 set quality 5;
#X obj 66 294 r \$0-propget;
#X obj 83 372 r \$0-propset;
#X msg 87 340 get Hue Saturation;
#X text 208 340 you can query several properties at once;
#X text 146 295 query a (readable) property via a message "get <propname>"
;
#X text 161 372 set a (writable) property via a message "set <prop>
<value>";
#X text 70 224 this will return 2 lists of readable and writeable properties
through the "info" outlet of [pix_video].;
#X text 72 257 NOTE that propertynames are always single symbols that
might contain spaces (and other weird characters);
#X text 103 203 INIT: query names of all available properties;
#X text 83 423 ATOMIC setting of multiple properties;
#X msg 99 441 clearProps;
#X msg 99 503 applyProps;
#X msg 99 481 setProps Hue 10;
#X msg 99 461 setProps Contrast 40;
#X text 247 443 clear the current property list;
#X text 247 461 add values to the property list (don't apply yet);
#X text 247 479 add values to the property list (don't apply yet);
#X text 247 499 apply current property list;
#X connect 0 0 4 0;
#X connect 10 0 4 0;
#X connect 11 0 4 0;
#X connect 12 0 10 0;
#X connect 13 0 11 0;
#X connect 14 0 4 0;
#X connect 22 0 4 0;
#X connect 23 0 4 0;
#X connect 24 0 4 0;
#X connect 25 0 4 0;
#X restore 417 176 pd properties;
#X obj 588 391 t a a;
#N canvas 166 121 570 420 device 0;
#X obj 204 60 cnv 20 20 20 empty \$0-open-canvas 0 4 10 0 16 -233017
-1 0;
#X obj 60 61 hradio 18 1 0 8 empty empty empty 0 -6 0 8 -225271 -1
-1 0;
#X obj 60 13 inlet;
#X msg 160 254 label \$1;
#X obj 160 232 makefilename %d;
#X obj 60 108 int;
#X obj 60 337 outlet;
#X obj 160 277 send \$0-open-canvas;
#X msg 130 170 device \$1;
#X obj 60 130 t b f;
#X obj 130 192 t a a;
#X obj 130 298 list prepend set;
#X obj 130 320 list trim;
#X obj 160 211 route device;
#X obj 130 116 loadbang;
#X msg 130 138 0;
#X connect 1 0 5 0;
#X connect 2 0 1 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 5 0 9 0;
#X connect 8 0 10 0;
#X connect 9 0 6 0;
#X connect 9 1 8 0;
#X connect 10 0 11 0;
#X connect 10 1 13 0;
#X connect 11 0 12 0;
#X connect 12 0 6 0;
#X connect 13 0 4 0;
#X connect 14 0 15 0;
#X connect 15 0 8 0;
#X coords 0 -1 1 1 165 20 1 60 60;
#X restore 611 202 pd device;
#X obj 659 408 print videoctl;
#X obj 649 361 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 667 360 driver \$1;
#X text 688 301 (if available);
#X obj 659 389 r \$0-ctl;
#X msg 627 250 device /dev/fw1;
#X obj 418 229 t a a;
#X obj 418 250 print info;
#X obj 455 229 s \$0-info;
#X obj 418 202 r /ev/cam/\$1/info;
#X text 44 151 1st: module ID (if float \, then it sets the device
nr).;
#X text 44 165 2nd: storage domain;
#X text 46 354 /ev/cam/<id>/state --- toggle on/off \; /ev/cam/<id>/flip/horizontal
--- flip horizontally \; /ev/cam/<id>/flip/vertical --- flip vertically
\;;
#X text 258 220 Outlet 1: GEMlist;
#X obj 42 267 cnv 15 360 60 empty empty GUI_controls 5 8 0 12 -204800
-66577 0;
#X text 53 293 on/off: toggles state;
#X text 213 267 flip: flip image;
#X text 250 282 <-> horizontal;
#X text 250 295 ^v vertical;
#X text 419 149 PROPERTIES:;
#X text 44 62 Camera module for live-video input.;
#X connect 8 0 17 0;
#X connect 9 0 17 0;
#X connect 10 0 11 0;
#X connect 10 0 14 0;
#X connect 11 0 17 0;
#X connect 13 0 20 0;
#X connect 14 0 17 0;
#X connect 18 0 19 0;
#X connect 20 0 18 0;
#X connect 21 0 29 0;
#X connect 22 0 29 0;
#X connect 23 0 29 0;
#X connect 24 0 29 0;
#X connect 25 0 29 0;
#X connect 26 0 29 0;
#X connect 27 0 29 0;
#X connect 29 0 20 1;
#X connect 29 1 31 0;
#X connect 30 0 26 0;
#X connect 32 0 33 0;
#X connect 33 0 29 0;
#X connect 35 0 29 0;
#X connect 36 0 29 0;
#X connect 37 0 38 0;
#X connect 37 1 39 0;
#X connect 40 0 37 0;
