From 04c235c6ac5f36b507c629de5634d5e6d326222b Mon Sep 17 00:00:00 2001 From: "N.N." Date: Tue, 4 Oct 2005 02:04:42 +0000 Subject: adding abstractions and helpfiles svn path=/trunk/; revision=3647 --- externals/gridflow/pd_examples/videodev_effects.pd | 303 +++++++++++++++++++++ 1 file changed, 303 insertions(+) create mode 100644 externals/gridflow/pd_examples/videodev_effects.pd (limited to 'externals/gridflow/pd_examples/videodev_effects.pd') 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; -- cgit v1.2.1