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/nervous_video.pd | 154 ++++++++++++++++++++++++ 1 file changed, 154 insertions(+) create mode 100644 externals/gridflow/pd_examples/nervous_video.pd (limited to 'externals/gridflow/pd_examples/nervous_video.pd') diff --git a/externals/gridflow/pd_examples/nervous_video.pd b/externals/gridflow/pd_examples/nervous_video.pd new file mode 100644 index 00000000..1f20094e --- /dev/null +++ b/externals/gridflow/pd_examples/nervous_video.pd @@ -0,0 +1,154 @@ +#N canvas 446 102 590 659 10; +#X obj 33 30 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#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 241 137 pd counter; +#X obj 24 252 / 10; +#X floatatom 24 290 5 0 0 0 - - -; +#X obj 24 -26 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1 +; +#X floatatom 25 504 5 0 0 0 - - -; +#X obj 24 484 fps; +#X obj 24 2 metro 33.3667; +#X msg 24 314 list \$1; +#X msg 225 315 reassign \, 32 240 320 3 #; +#X msg 225 295 reassign \, 32 120 160 3 #; +#X msg 225 335 reassign \, 32 480 640 3 #; +#X msg 316 94 32; +#X obj 24 233 random 320; +#X obj 24 461 #out window; +#X floatatom 316 114 5 0 0 0 - - -; +#X obj 347 94 loadbang; +#X text 358 113 maximum value is 32; +#X text 359 126 (see below); +#X obj 24 120 float; +#X text 203 277 the buffer size decides the maximum loop length; +#X obj 24 189 shunt 4; +#X obj 24 213 bang; +#X obj 24 271 int; +#X obj 145 163 vradio 15 1 0 4 empty empty empty 0 -6 0 8 -241291 -1 +-1 0; +#X text 166 163 caffeine twitch; +#X text 166 178 ethanol lag; +#X obj 131 233 * 2; +#X obj 160 234 * -1; +#X text 166 209 back flash acid; +#X text 165 193 acid flash back; +#X obj 255 369 vradio 15 1 0 4 empty empty empty 0 -6 0 8 -241291 -1 +-1 0; +#X text 273 366 plain; +#X text 274 399 hilitemotion; +#X text 273 415 embossmotion; +#X obj 80 402 @! abs; +#X text 133 -3 This patch was created by Alexandre Castonguay \,; +#X text 133 10 as a clone of Edo Tannenbaum's "nervous video" effect +\, http://effectv.sourceforge.net; +#X text 133 38 Later modified by Mathieu to add more effects; +#X obj 80 381 # -; +#X obj 81 421 # << 2; +#X obj 102 233 + 1; +#X obj 135 382 # -; +#X obj 136 401 # + 128; +#X obj 136 421 # max 0; +#X obj 80 441 # min 255; +#X obj 24 358 shunt 4; +#X obj 119 353 shunt 4; +#X text 273 384 mix 50%; +#X obj 34 421 # >> 1; +#X obj 38 388 # +; +#X obj 89 101 #camera; +#X obj 24 53 t b b b; +#X obj -16 536 cnv 15 700 30 empty empty empty 20 12 0 14 -200249 -66577 +0; +#X text -7 543 GridFlow 0.8.0; +#X text -7 543 GridFlow 0.8.0; +#X obj -17 -85 cnv 15 700 30 empty empty empty 20 12 0 14 -233017 -66577 +0; +#X text -6 -86 nervous_video.pd; +#X text -7 -74 Copyright 2002 Alexandre Castonguay \, Mathieu Bouchard +; +#X text 146 101 <-- open this; +#X obj 24 333 #store (32 240 320 3 #); +#X msg 316 165 put_at ( \$1 0 0 0 ); +#X connect 0 0 52 0; +#X connect 1 1 61 0; +#X connect 1 1 19 1; +#X connect 2 0 23 0; +#X connect 3 0 8 0; +#X connect 4 0 7 0; +#X connect 6 0 5 0; +#X connect 7 0 52 0; +#X connect 8 0 60 0; +#X connect 9 0 60 1; +#X connect 10 0 60 1; +#X connect 11 0 60 1; +#X connect 12 0 15 0; +#X connect 13 0 2 0; +#X connect 14 0 6 0; +#X connect 15 0 1 1; +#X connect 16 0 12 0; +#X connect 19 0 21 0; +#X connect 21 0 22 0; +#X connect 21 1 41 0; +#X connect 21 2 27 0; +#X connect 21 3 28 0; +#X connect 22 0 13 0; +#X connect 23 0 3 0; +#X connect 24 0 21 1; +#X connect 27 0 8 0; +#X connect 28 0 8 0; +#X connect 31 0 47 1; +#X connect 31 0 46 1; +#X connect 35 0 40 0; +#X connect 39 0 35 0; +#X connect 40 0 45 0; +#X connect 41 0 8 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 45 0; +#X connect 45 0 14 0; +#X connect 46 0 14 0; +#X connect 46 1 50 0; +#X connect 46 2 39 0; +#X connect 46 3 42 0; +#X connect 47 1 50 1; +#X connect 47 2 39 1; +#X connect 47 3 42 1; +#X connect 49 0 14 0; +#X connect 50 0 49 0; +#X connect 51 0 47 0; +#X connect 51 0 60 1; +#X connect 52 0 19 0; +#X connect 52 1 51 0; +#X connect 52 2 1 0; +#X connect 60 0 46 0; +#X connect 61 0 60 1; -- cgit v1.2.1