1 files changed, 303 insertions, 0 deletions

diff --git a/externals/gridflow/pd_examples/videodev_effects.pd b/externals/gridflow/pd_examples/videodev_effects.pd
new file mode 100644
index 00000000..b11f026f
--- /dev/null
+++ b/externals/gridflow/pd_examples/videodev_effects.pd
@@ -0,0 +1,303 @@
+#N canvas 106 79 569 546 10;
+#X obj 86 397 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X obj 72 149 # max 0;
+#N canvas 52 305 399 248 motion 0;
+#X obj 60 49 inlet;
+#X obj 60 72 # +;
+#X obj 60 158 outlet;
+#X msg 108 51 0;
+#X obj 60 142 fork;
+#X text 164 114 divide by 32 \, 16 \, 4;
+#X text 4 1 we do like #fade but faster (because of >>);
+#X text 4 15 feedback factors are 1/32 for red \, 1/16 for green \,
+1/8 for blue.;
+#X obj 60 114 # >> ( 5 4 2 );
+#X obj 175 85 # * ( 31 15 3 );
+#X connect 0 0 1 0;
+#X connect 1 0 8 0;
+#X connect 3 0 1 1;
+#X connect 4 0 2 0;
+#X connect 4 1 9 0;
+#X connect 8 0 4 0;
+#X connect 9 0 1 1;
+#X restore 130 218 pd motion fade;
+#X obj 28 263 shunt 2;
+#X obj 72 69 #downscale_by 2 smoothly;
+#X obj 28 398 shunt 2;
+#X obj 82 265 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X obj 87 88 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X obj 8 7 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1;
+#X obj 316 261 fork;
+#X obj 28 48 shunt 2;
+#X msg 286 243 256;
+#X obj 28 474 #out window;
+#X obj 84 49 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X obj 28 515 print;
+#X obj 285 284 #for 0 256 1;
+#X floatatom 316 242 5 0 0 0 - - -;
+#N canvas 67 462 236 230 detect 0;
+#X obj 66 59 # * ( -1 -1 2 );
+#X obj 66 171 # max 0;
+#X obj 66 31 inlet;
+#X obj 66 222 #outer ignore ( 0 0 0 );
+#X obj 66 197 # min 255;
+#X obj 66 249 outlet;
+#X obj 65 82 #fold + \, seed -20;
+#X connect 0 0 6 0;
+#X connect 1 0 4 0;
+#X connect 2 0 0 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 0;
+#X connect 6 0 1 0;
+#X restore 437 236 pd detect blue;
+#X obj 72 285 #outer ignore ( 0 );
+#X obj 103 131 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 5700 1;
+#X obj 28 189 shunt 2;
+#X obj 170 335 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 28 335 shunt 2;
+#X obj 28 495 fps detailed;
+#X obj 286 223 loadbang;
+#X obj 87 335 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X obj 72 307 #store;
+#N canvas 81 205 480 500 sort 0;
+#X obj 10 305 # * ( 1 0 );
+#X obj 180 260 # * 255;
+#X obj 194 331 #outer ignore ( 0 0 0 );
+#X obj 10 345 # >> 0;
+#X obj 43 432 outlet;
+#X obj 181 53 inlet;
+#X obj 225 191 # / 2;
+#X obj 10 285 #for ( 0 0 ) ( 288 352 ) ( 1 1 );
+#X obj 10 325 # +;
+#X obj 44 9 inlet;
+#X obj 242 150 # - 1;
+#X obj 121 382 # +;
+#X obj 180 238 # < 176;
+#X obj 10 369 #store;
+#X obj 97 31 #grade;
+#X obj 121 404 # >> 1;
+#X obj 283 269 # / 351;
+#X obj 97 53 shunt 2;
+#X obj 145 77 #grade;
+#X obj 112 210 #outer & ( 0 -1 );
+#X obj 121 127 inlet;
+#X text 271 128 extract width;
+#X obj 10 266 #finished;
+#X obj 283 247 # * 255;
+#X obj 96 9 #fold +;
+#X obj 97 153 shunt 4;
+#X obj 107 359 shunt 4;
+#X msg 235 126 \$2;
+#X obj 204 77 #dim;
+#X obj 44 37 t a a;
+#X msg 186 127 \$1 \$2;
+#X obj 204 97 #export_list;
+#X connect 0 0 8 0;
+#X connect 1 0 2 0;
+#X connect 2 0 4 0;
+#X connect 3 0 13 0;
+#X connect 5 0 17 1;
+#X connect 6 0 12 1;
+#X connect 7 0 0 0;
+#X connect 8 0 3 0;
+#X connect 9 0 29 0;
+#X connect 10 0 16 1;
+#X connect 11 0 15 0;
+#X connect 12 0 1 0;
+#X connect 13 0 26 0;
+#X connect 14 0 17 0;
+#X connect 15 0 4 0;
+#X connect 16 0 2 0;
+#X connect 17 0 25 0;
+#X connect 17 1 18 0;
+#X connect 18 0 25 0;
+#X connect 19 0 8 1;
+#X connect 20 0 25 1;
+#X connect 20 0 26 1;
+#X connect 22 0 7 0;
+#X connect 23 0 16 0;
+#X connect 24 0 14 0;
+#X connect 25 0 22 0;
+#X connect 25 0 19 0;
+#X connect 25 1 22 0;
+#X connect 25 1 19 0;
+#X connect 25 2 12 0;
+#X connect 25 3 23 0;
+#X connect 26 0 4 0;
+#X connect 26 1 11 0;
+#X connect 27 0 6 0;
+#X connect 27 0 10 0;
+#X connect 28 0 31 0;
+#X connect 29 0 24 0;
+#X connect 29 1 13 1;
+#X connect 29 1 28 0;
+#X connect 29 1 11 1;
+#X connect 30 0 7 1;
+#X connect 31 0 27 0;
+#X connect 31 0 30 0;
+#X restore 87 355 pd sort me out;
+#X obj 285 304 # gamma;
+#X obj 72 129 # -;
+#X obj 82 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X text 74 238 enable gamma correction;
+#X obj 285 266 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 372 198 399 273 motion 0;
+#X obj 15 113 # << 2;
+#X obj 15 162 @! abs;
+#X obj 15 9 inlet;
+#X obj 18 80 # -;
+#X obj 70 174 # + 128;
+#X obj 15 245 outlet;
+#X obj 15 204 # min 255;
+#X obj 15 224 # max 0;
+#X obj 70 155 # << 2;
+#X obj 15 35 t a a;
+#X obj 15 134 shunt 2;
+#X obj 70 133 inlet render;
+#X obj 155 54 inlet type;
+#X obj 15 54 shunt 2;
+#X connect 0 0 10 0;
+#X connect 1 0 6 0;
+#X connect 2 0 9 0;
+#X connect 3 0 0 0;
+#X connect 4 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 4 0;
+#X connect 9 0 13 0;
+#X connect 9 1 3 0;
+#X connect 10 0 1 0;
+#X connect 10 1 8 0;
+#X connect 11 0 10 1;
+#X connect 12 0 13 1;
+#X connect 13 0 3 1;
+#X restore 72 109 pd motion detection;
+#X obj 105 335 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X text 126 149 noise reduction (on find-edges only);
+#N canvas 67 462 236 230 detect 0;
+#X obj 66 171 # max 0;
+#X obj 66 31 inlet;
+#X obj 66 222 #outer ignore ( 0 0 0 );
+#X obj 66 197 # min 255;
+#X obj 66 249 outlet;
+#X obj 65 82 #fold + \, seed -20;
+#X obj 66 59 # * ( 2 -1 -1 );
+#X connect 0 0 3 0;
+#X connect 1 0 6 0;
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X connect 5 0 0 0;
+#X connect 6 0 5 0;
+#X restore 437 217 pd detect red;
+#X obj 27 8 metro 33.3667;
+#X obj 28 69 t a a;
+#X text 101 49 Smaller Picture;
+#X obj 28 89 shunt 2;
+#X obj 211 96 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X obj 163 427 #centroid;
+#X obj 163 448 #export_list;
+#X floatatom 165 487 5 0 0 0 - - -;
+#X obj 164 467 unpack 0 0;
+#X floatatom 229 487 5 0 0 0 - - -;
+#N canvas 639 147 477 267 crosshair 0;
+#X obj 12 224 outlet;
+#X obj 12 9 inlet;
+#X obj 95 169 # + ( 120 160 );
+#X msg 21 125 12 2 # \$1 \$2 \$1 \$3 \$2 \$3 \$2 \$4 \$3 \$4 \$3 \$3
+\$4 \$3 \$4 \$2 \$3 \$2 \$3 \$1 \$2 \$1 \$2 \$2;
+#X msg 54 95 -32 -1 1 32;
+#X obj 12 205 #draw_polygon + ( 0 170 0 );
+#X obj 175 37 #fade 8;
+#X obj 175 18 inlet;
+#X obj 170 60 #finished;
+#X connect 1 0 5 0;
+#X connect 2 0 5 2;
+#X connect 3 0 2 0;
+#X connect 4 0 3 0;
+#X connect 5 0 0 0;
+#X connect 6 0 2 1;
+#X connect 6 0 8 0;
+#X connect 7 0 6 0;
+#X connect 8 0 4 0;
+#X restore 72 428 pd crosshair;
+#X msg 128 8 open dc1394;
+#X msg 217 9 open mpeg file images/movies/washington_zoom_in.mpeg;
+#X msg 217 29 open xine images/movies/washington_zoom_in.mpeg;
+#X obj 28 27 #camera;
+#X obj 186 30 #in;
+#X obj 104 192 #fade;
+#X msg 145 194 32 16 4;
+#X obj 28 450 t a;
+#X text 231 110 emboss;
+#X text 230 96 hilite;
+#X text 110 397 designed to work with "hilite" above;
+#X obj 281 96 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X text 300 96 motion;
+#X text 301 110 presence;
+#X connect 0 0 5 1;
+#X connect 1 0 20 0;
+#X connect 2 0 3 0;
+#X connect 3 0 22 0;
+#X connect 3 1 18 0;
+#X connect 4 0 38 0;
+#X connect 5 0 55 0;
+#X connect 5 1 42 0;
+#X connect 5 1 47 0;
+#X connect 6 0 3 1;
+#X connect 7 0 40 1;
+#X connect 8 0 37 0;
+#X connect 9 0 32 0;
+#X connect 9 1 28 1;
+#X connect 10 0 38 0;
+#X connect 10 1 4 0;
+#X connect 11 0 16 0;
+#X connect 12 0 23 0;
+#X connect 13 0 10 1;
+#X connect 15 0 28 0;
+#X connect 16 0 9 0;
+#X connect 18 0 26 0;
+#X connect 19 0 29 1;
+#X connect 20 0 3 0;
+#X connect 20 1 2 0;
+#X connect 21 0 27 2;
+#X connect 22 0 5 0;
+#X connect 22 1 27 0;
+#X connect 23 0 14 0;
+#X connect 24 0 11 0;
+#X connect 25 0 22 1;
+#X connect 26 0 22 0;
+#X connect 27 0 5 0;
+#X connect 28 0 26 1;
+#X connect 29 0 1 0;
+#X connect 30 0 20 1;
+#X connect 32 0 15 0;
+#X connect 33 0 29 0;
+#X connect 34 0 27 1;
+#X connect 37 0 51 0;
+#X connect 38 0 40 0;
+#X connect 40 0 20 0;
+#X connect 40 1 33 0;
+#X connect 41 0 33 1;
+#X connect 42 0 43 0;
+#X connect 42 0 47 1;
+#X connect 43 0 45 0;
+#X connect 45 0 44 0;
+#X connect 45 1 46 0;
+#X connect 47 0 55 0;
+#X connect 51 0 10 0;
+#X connect 53 0 3 0;
+#X connect 54 0 53 1;
+#X connect 55 0 12 0;
+#X connect 59 0 33 2;