1 files changed, 300 insertions, 0 deletions
diff --git a/externals/gridflow/examples/fire.pd b/externals/gridflow/examples/fire.pd
new file mode 100644
index 00000000..f9aa2ea8
--- /dev/null
+++ b/externals/gridflow/examples/fire.pd
@@ -0,0 +1,300 @@
+#N canvas 588 0 632 527 10;
+#X obj 377 355 loadbang;
+#X text 243 362 palette generator;
+#X obj 100 383 fps detailed;
+#X obj 264 400 #for 0 256 1;
+#X obj 19 240 #store;
+#X obj 100 402 print;
+#X msg 56 200 \$1 \$2 # 0;
+#X obj 264 379 #finished;
+#X obj 19 35 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 200 39 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 332 379 t a a;
+#X text 258 62 height width;
+#X obj 100 364 #out window;
+#X text 97 308 applying palette;
+#N canvas 127 200 450 300 circle 0;
+#X obj 47 146 #fold +;
+#X obj 47 203 # << 7;
+#X obj 47 165 # >> 6;
+#X obj 47 184 # == 10;
+#X obj 47 15 inlet size;
+#X obj 47 222 outlet matrix;
+#X obj 77 108 inlet pos;
+#X obj 47 53 t b a;
+#X obj 47 127 # sq-;
+#X obj 47 79 #for (0 0) (0 0) (1 1);
+#X obj 90 53 #export_list;
+#X connect 0 0 2 0;
+#X connect 1 0 5 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 7 0;
+#X connect 6 0 8 1;
+#X connect 7 0 9 0;
+#X connect 7 1 10 0;
+#X connect 8 0 0 0;
+#X connect 9 0 8 0;
+#X connect 10 0 9 1;
+#X restore 222 200 pd circle generator;
+#N canvas 498 387 361 260 baseline 0;
+#X obj 18 116 #fold +;
+#X obj 127 148 - 4;
+#X obj 18 56 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 18 135 # ==;
+#X obj 127 129 listelement 0;
+#X text 93 10 line generator;
+#X obj 18 154 # << 7;
+#X obj 127 110 #export_list;
+#X obj 18 9 inlet size;
+#X obj 18 173 outlet matrix;
+#X obj 18 33 t a a;
+#X text 154 150 four pixels from bottom;
+#X obj 18 78 #for (0 0) (0 0) (1 1);
+#X obj 18 97 # & (-1 0);
+#X connect 0 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 12 0;
+#X connect 3 0 6 0;
+#X connect 4 0 1 0;
+#X connect 6 0 9 0;
+#X connect 7 0 4 0;
+#X connect 8 0 10 0;
+#X connect 10 0 2 0;
+#X connect 10 1 7 0;
+#X connect 10 1 12 1;
+#X connect 12 0 13 0;
+#X connect 13 0 0 0;
+#X restore 200 220 pd baseline generator;
+#X text 45 183 make blank image;
+#X text 26 223 feedback loop;
+#X obj 377 393 #color 0 800 1;
+#X msg 377 374 600 200 75;
+#X obj 220 38 loadbang;
+#N canvas 624 360 400 289 fire 0;
+#X obj 174 180 #store;
+#X obj 61 196 #export_list;
+#X obj 6 65 # >> 2;
+#X obj 6 235 # & 255;
+#X obj 6 103 # / 80;
+#X msg 174 138 \$1 1 # 256;
+#X obj 174 97 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 174 78 route grid;
+#X obj 60 155 inlet;
+#X obj 274 146 # + 32;
+#X obj 60 177 #dim;
+#X obj 6 214 # +;
+#X obj 6 258 outlet 0;
+#X msg 274 101 256 \$2 # 64;
+#X obj 6 84 # *;
+#X obj 6 7 inlet image;
+#X obj 274 79 inlet size;
+#X text 102 8 this fire algorithm;
+#X text 101 22 was designed by matju in 1994;
+#X text 264 167 makes a cache of;
+#X text 264 180 random numbers;
+#X obj 174 159 # rand;
+#X obj 274 123 # rand;
+#X obj 6 46 #convolve (3 3 # 1 0 0 0 1 0 1 1 1);
+#X obj 174 115 list;
+#X obj 6 26 t a a;
+#X obj 160 215 display;
+#X connect 0 0 14 1;
+#X connect 1 0 24 1;
+#X connect 2 0 14 0;
+#X connect 3 0 12 0;
+#X connect 4 0 11 0;
+#X connect 5 0 21 0;
+#X connect 6 0 24 0;
+#X connect 7 0 6 0;
+#X connect 8 0 11 1;
+#X connect 8 0 10 0;
+#X connect 8 0 26 0;
+#X connect 9 0 0 1;
+#X connect 10 0 1 0;
+#X connect 11 0 3 0;
+#X connect 13 0 22 0;
+#X connect 14 0 4 0;
+#X connect 15 0 25 0;
+#X connect 16 0 13 0;
+#X connect 21 0 0 0;
+#X connect 22 0 9 0;
+#X connect 23 0 2 0;
+#X connect 24 0 5 0;
+#X connect 25 0 23 0;
+#X connect 25 1 7 0;
+#X restore 65 240 pd fire generator;
+#X text 166 108 note: reset the size if you change the generator;
+#X obj 19 67 metro 33.3667;
+#X obj 5 -4 cnv 15 620 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 15 -4 fire.pd;
+#X obj 5 483 cnv 15 620 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 13 491 GridFlow 0.8.0;
+#X obj 139 402 route position;
+#N canvas 268 301 442 406 cursor 0;
+#X obj 107 48 listsublist 0 2;
+#X obj 107 10 inlet;
+#X obj 132 151 listsublist 0 48;
+#X obj 30 49 t a a;
+#X obj 30 284 outlet;
+#X obj 30 151 listappend 0 0;
+#X obj 107 29 #export_list;
+#X obj 30 79 # -;
+#X obj 115 86 #finished;
+#X obj 115 105 #store (0 0);
+#X obj 30 170 #redim (25 2);
+#X obj 30 189 # sq-;
+#X obj 30 208 #fold +;
+#X obj 30 227 # sqrt;
+#X obj 30 246 #fold +;
+#X obj 30 265 # / 5;
+#X obj 30 9 r metro;
+#X obj 30 131 #export_list;
+#X obj 30 29 list;
+#X connect 0 0 18 1;
+#X connect 1 0 6 0;
+#X connect 2 0 5 1;
+#X connect 3 0 7 0;
+#X connect 3 1 9 1;
+#X connect 5 0 2 0;
+#X connect 5 0 10 0;
+#X connect 6 0 0 0;
+#X connect 7 0 8 0;
+#X connect 7 0 17 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 1;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 15 0 4 0;
+#X connect 16 0 18 0;
+#X connect 17 0 5 0;
+#X connect 18 0 3 0;
+#X restore 371 162 pd cursor motion detector;
+#X obj 139 460 s cursor;
+#X msg 20 341 hidecursor;
+#N canvas 238 140 484 503 fuzzy 0;
+#X obj 47 281 outlet;
+#X obj 47 68 #for (0 0) (0 0) (1 1);
+#X obj 47 13 inlet size;
+#X obj 47 32 t b a;
+#X obj 86 32 #export_list;
+#X obj 47 91 # sq-;
+#X obj 47 262 # - 10;
+#X obj 47 243 # max 10;
+#X obj 47 224 # min 255;
+#X obj 47 205 # + 64;
+#X obj 47 186 # tanh* 64;
+#X obj 47 167 # << 8;
+#X obj 47 148 # inv+ 2;
+#X obj 47 129 # >> 2;
+#X obj 104 125 inlet radius;
+#X obj 229 89 inlet pos;
+#X obj 47 110 #fold +;
+#X connect 1 0 5 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 3 1 4 0;
+#X connect 4 0 1 1;
+#X connect 5 0 16 0;
+#X connect 6 0 0 0;
+#X connect 7 0 6 0;
+#X connect 8 0 7 0;
+#X connect 9 0 8 0;
+#X connect 10 0 9 0;
+#X connect 11 0 10 0;
+#X connect 12 0 11 0;
+#X connect 13 0 12 0;
+#X connect 14 0 12 1;
+#X connect 15 0 5 1;
+#X connect 16 0 13 0;
+#X restore 276 181 pd fuzzy disk seed generator;
+#X text 177 440 #scale_by compensation;
+#X msg 139 421 \$1 \$2;
+#X obj 99 345 #scale_by 2;
+#X obj 139 440 # / 2;
+#X text 15 294 (height \, width \, 1) grid = grey image;
+#X text 16 260 (height \, width) grid = matrix;
+#X obj 200 123 shunt 3;
+#X obj 253 125 hradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -1
+-1 0;
+#X obj 501 203 r cursor;
+#X obj 501 223 t a;
+#X obj 58 86 spigot;
+#X obj 19 86 t b b;
+#X obj 115 86 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 1 1
+;
+#X obj 49 105 s metro;
+#X obj 67 277 #outer ignore (0);
+#X text 15 9 Copyright 2001 \, 2005 Mathieu Bouchard;
+#X msg 200 62 120 160;
+#X obj 500 247 display;
+#X obj 99 326 #store;
+#X obj 264 422 #outer gamma;
+#X obj 204 90 list;
+#X obj 115 67 loadbang;
+#X obj 71 27 f;
+#X obj 96 27 + 1;
+#X obj 71 46 sel 100;
+#X floatatom 128 48 5 0 0 0 - - -;
+#X connect 0 0 19 0;
+#X connect 2 0 5 0;
+#X connect 3 0 52 0;
+#X connect 4 0 21 0;
+#X connect 6 0 4 1;
+#X connect 7 0 3 0;
+#X connect 8 0 23 0;
+#X connect 9 0 49 0;
+#X connect 10 0 7 0;
+#X connect 10 1 52 1;
+#X connect 12 0 2 0;
+#X connect 12 0 28 0;
+#X connect 14 0 21 1;
+#X connect 15 0 21 1;
+#X connect 18 0 10 0;
+#X connect 19 0 18 0;
+#X connect 20 0 49 0;
+#X connect 21 0 4 1;
+#X connect 21 0 47 0;
+#X connect 23 0 44 0;
+#X connect 28 0 34 0;
+#X connect 29 0 32 1;
+#X connect 31 0 12 0;
+#X connect 32 0 21 1;
+#X connect 34 0 36 0;
+#X connect 35 0 12 0;
+#X connect 36 0 30 0;
+#X connect 39 0 15 0;
+#X connect 39 1 14 0;
+#X connect 39 2 32 0;
+#X connect 40 0 39 1;
+#X connect 41 0 42 0;
+#X connect 42 0 29 0;
+#X connect 42 0 14 1;
+#X connect 42 0 32 2;
+#X connect 42 0 50 0;
+#X connect 43 0 53 0;
+#X connect 44 0 4 0;
+#X connect 44 1 43 0;
+#X connect 44 1 46 0;
+#X connect 45 0 43 1;
+#X connect 47 0 51 0;
+#X connect 49 0 6 0;
+#X connect 49 0 21 2;
+#X connect 49 0 53 1;
+#X connect 51 0 35 0;
+#X connect 52 0 51 1;
+#X connect 53 0 39 0;
+#X connect 54 0 45 0;
+#X connect 55 0 56 0;
+#X connect 55 0 57 0;
+#X connect 56 0 55 1;
+#X connect 57 0 8 0;
+#X connect 57 1 58 0;