From ccddec68116fc6403858ebfa13d4a7b1aa3d5278 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Sun, 18 Oct 2009 20:01:19 +0000 Subject: hi gridflow 0.9.5 svn path=/trunk/; revision=12611 --- externals/gridflow/examples/nervous_video.pd | 163 +++++++++++++++++++++++++++ 1 file changed, 163 insertions(+) create mode 100644 externals/gridflow/examples/nervous_video.pd (limited to 'externals/gridflow/examples/nervous_video.pd') diff --git a/externals/gridflow/examples/nervous_video.pd b/externals/gridflow/examples/nervous_video.pd new file mode 100644 index 00000000..acccbe7c --- /dev/null +++ b/externals/gridflow/examples/nervous_video.pd @@ -0,0 +1,163 @@ +#N canvas 624 0 596 659 10; +#N canvas 123 298 450 300 counter 0; +#X obj 131 70 + 1; +#X obj 131 23 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X floatatom 170 70 5 0 0 0 - - -; +#X msg 131 47 1; +#X floatatom 170 114 5 0 0 0 - - -; +#X obj 132 157 select 1; +#X msg 170 44 0; +#X obj 132 178 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 70 25 inlet; +#X obj 132 195 outlet; +#X obj 220 65 inlet; +#X obj 298 106 outlet; +#X obj 170 95 >= 32; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 0 1; +#X connect 2 0 11 0; +#X connect 2 0 12 0; +#X connect 3 0 0 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 7 0; +#X connect 6 0 2 0; +#X connect 7 0 9 0; +#X connect 8 0 1 0; +#X connect 10 0 12 1; +#X connect 12 0 4 0; +#X restore 341 140 pd counter; +#X obj 14 262 / 10; +#X floatatom 14 300 5 0 0 0 - - -; +#X obj 14 50 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1; +#X floatatom 39 607 5 0 0 0 - - -; +#X obj 14 607 fps; +#X obj 14 67 metro 33.3667; +#X msg 14 324 list \$1; +#X msg 406 104 32; +#X obj 14 243 random 320; +#X obj 14 588 #out window; +#X floatatom 406 124 5 0 0 0 - - -; +#X obj 437 104 loadbang; +#X text 448 123 maximum value is 32; +#X text 449 136 (see below); +#X obj 14 157 float; +#X obj 14 199 shunt 4; +#X obj 14 223 bang; +#X obj 14 281 int; +#X obj 125 163 vradio 15 1 0 4 empty empty empty 0 -6 0 8 -241291 -1 +-1 2; +#X text 146 163 caffeine twitch; +#X text 146 178 ethanol lag; +#X obj 121 243 * 2; +#X obj 150 243 * -1; +#X text 146 209 back flash acid; +#X text 145 193 acid flash back; +#X obj 245 439 vradio 15 1 0 4 empty empty empty 0 -6 0 8 -241291 -1 +-1 2; +#X text 263 436 plain; +#X text 264 469 hilitemotion; +#X text 263 485 embossmotion; +#X text 193 37 This patch was created by Alexandre Castonguay \,; +#X text 193 50 as a clone of Edo Tannenbaum's "nervous video" effect +\, http://effectv.sourceforge.net; +#X text 193 78 Later modified by Mathieu to add more effects; +#X obj 71 491 # << 2; +#X obj 92 243 + 1; +#X obj 125 452 # -; +#X obj 126 471 # + 128; +#X obj 126 491 # max 0; +#X obj 71 515 # min 255; +#X obj 14 428 shunt 4; +#X obj 109 423 shunt 4; +#X text 263 454 mix 50%; +#X obj 24 491 # >> 1; +#X obj 24 458 # +; +#X obj 14 86 t b b b; +#X obj 4 626 cnv 15 700 30 empty empty empty 20 12 0 14 -200249 -66577 +0; +#X text 13 633 GridFlow 0.8.0; +#X text 13 633 GridFlow 0.8.0; +#X obj 3 5 cnv 15 700 30 empty empty empty 20 12 0 14 -233017 -66577 +0; +#X text 6 5 nervous_video.pd; +#X text 146 114 <-- open this; +#X msg 406 159 put_at ( \$1 0 0 0 ); +#X msg 215 386 reassign \, 32 240 320 3 b #; +#X text 212 313 the buffer size decides the maximum loop length and +dimension of each frame; +#X msg 215 405 reassign \, 32 480 640 3 b #; +#X obj 215 367 loadbang; +#X obj 14 390 #store; +#X obj 79 114 #camera 0; +#X text 5 17 Copyright 2002 Alexandre Castonguay \, 2004 Mathieu Bouchard +; +#X obj 51 343 #cast b; +#X obj 71 458 # abs-; +#X obj 14 409 #cast i; +#X obj 14 515 t a; +#X obj 14 534 shunt; +#X obj 44 553 #fade (1 4 16); +#X obj 53 535 tgl 15 0 empty empty color_fade 18 8 0 12 -241291 -1 +-1 1 1; +#X connect 0 1 51 0; +#X connect 0 1 15 1; +#X connect 1 0 18 0; +#X connect 2 0 7 0; +#X connect 3 0 6 0; +#X connect 5 0 4 0; +#X connect 6 0 44 0; +#X connect 7 0 56 0; +#X connect 8 0 11 0; +#X connect 9 0 1 0; +#X connect 10 0 5 0; +#X connect 11 0 0 1; +#X connect 12 0 8 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 16 1 34 0; +#X connect 16 2 22 0; +#X connect 16 3 23 0; +#X connect 17 0 9 0; +#X connect 18 0 2 0; +#X connect 19 0 16 1; +#X connect 22 0 7 0; +#X connect 23 0 7 0; +#X connect 26 0 40 1; +#X connect 26 0 39 1; +#X connect 33 0 38 0; +#X connect 34 0 7 0; +#X connect 35 0 36 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 38 0 62 0; +#X connect 39 0 62 0; +#X connect 39 1 43 0; +#X connect 39 2 60 0; +#X connect 39 3 35 0; +#X connect 40 1 43 1; +#X connect 40 2 60 1; +#X connect 40 3 35 1; +#X connect 42 0 62 0; +#X connect 43 0 42 0; +#X connect 44 0 15 0; +#X connect 44 1 57 0; +#X connect 44 2 0 0; +#X connect 51 0 56 1; +#X connect 52 0 56 1; +#X connect 54 0 56 1; +#X connect 55 0 52 0; +#X connect 56 0 61 0; +#X connect 57 0 40 0; +#X connect 57 0 59 0; +#X connect 59 0 56 1; +#X connect 60 0 33 0; +#X connect 61 0 39 0; +#X connect 62 0 63 0; +#X connect 63 0 10 0; +#X connect 63 1 64 0; +#X connect 64 0 10 0; +#X connect 65 0 63 1; -- cgit v1.2.1