1 files changed, 155 insertions, 0 deletions
diff --git a/externals/gridflow/examples/nervous_video.pd b/externals/gridflow/examples/nervous_video.pd
new file mode 100644
index 00000000..6009fb59
--- /dev/null
+++ b/externals/gridflow/examples/nervous_video.pd
@@ -0,0 +1,155 @@
+#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 1 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 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 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 msg 225 314 reassign \, 64 240 320 3 #;
+#X text 226 261 the buffer size decides the maximum loop length and
+dimension;
+#X msg 225 294 reassign \, 32 240 320 3 #;
+#X connect 0 0 49 0;
+#X connect 1 1 58 0;
+#X connect 1 1 17 1;
+#X connect 2 0 20 0;
+#X connect 3 0 8 0;
+#X connect 4 0 7 0;
+#X connect 6 0 5 0;
+#X connect 7 0 49 0;
+#X connect 8 0 57 0;
+#X connect 9 0 57 1;
+#X connect 10 0 13 0;
+#X connect 11 0 2 0;
+#X connect 12 0 6 0;
+#X connect 13 0 1 1;
+#X connect 14 0 10 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 18 1 38 0;
+#X connect 18 2 24 0;
+#X connect 18 3 25 0;
+#X connect 19 0 11 0;
+#X connect 20 0 3 0;
+#X connect 21 0 18 1;
+#X connect 24 0 8 0;
+#X connect 25 0 8 0;
+#X connect 28 0 44 1;
+#X connect 28 0 43 1;
+#X connect 32 0 37 0;
+#X connect 36 0 32 0;
+#X connect 37 0 42 0;
+#X connect 38 0 8 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X connect 41 0 42 0;
+#X connect 42 0 12 0;
+#X connect 43 0 12 0;
+#X connect 43 1 47 0;
+#X connect 43 2 36 0;
+#X connect 43 3 39 0;
+#X connect 44 1 47 1;
+#X connect 44 2 36 1;
+#X connect 44 3 39 1;
+#X connect 46 0 12 0;
+#X connect 47 0 46 0;
+#X connect 48 0 44 0;
+#X connect 48 0 57 1;
+#X connect 49 0 17 0;
+#X connect 49 1 48 0;
+#X connect 49 2 1 0;
+#X connect 57 0 43 0;
+#X connect 58 0 57 1;
+#X connect 59 0 57 1;
+#X connect 61 0 57 1;