1 files changed, 180 insertions, 0 deletions
diff --git a/externals/gridflow/pd_examples/fire.pd b/externals/gridflow/pd_examples/fire.pd
new file mode 100644
index 00000000..2a88a3a0
--- /dev/null
+++ b/externals/gridflow/pd_examples/fire.pd
@@ -0,0 +1,180 @@
+#N canvas 399 42 621 522 10;
+#X obj 347 171 loadbang;
+#X text 229 287 palette generator;
+#X obj 103 329 fps detailed;
+#X obj 250 325 #for 0 256 1;
+#X obj 23 180 #store;
+#X obj 250 347 #outer gamma;
+#X obj 103 351 print;
+#X msg 60 130 \$1 \$2 # 0;
+#X obj 71 217 #outer ignore ( 0 );
+#X obj 250 304 #finished;
+#X obj 23 -25 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X obj 204 -21 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 40 71 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 318 304 fork;
+#X text 262 2 height width;
+#X obj 103 307 #out window;
+#X text 101 269 applying palette;
+#X obj 103 287 #store;
+#N canvas 268 454 450 300 circle 0;
+#X obj 47 177 #fold +;
+#X obj 47 244 # << 7;
+#X obj 47 199 # >> 6;
+#X obj 47 157 @! sq;
+#X obj 47 222 # == 10;
+#X obj 47 15 inlet size;
+#X obj 47 267 outlet matrix;
+#X obj 47 126 #for ( 0 0 ) ( 0 0 ) ( 1 1 );
+#X obj 47 34 # / 2;
+#X obj 47 77 t a a;
+#X obj 47 54 #export_list;
+#X obj 47 101 # inv+;
+#X connect 0 0 2 0;
+#X connect 1 0 6 0;
+#X connect 2 0 4 0;
+#X connect 3 0 0 0;
+#X connect 4 0 1 0;
+#X connect 5 0 8 0;
+#X connect 7 0 3 0;
+#X connect 8 0 10 0;
+#X connect 9 0 11 0;
+#X connect 9 1 7 1;
+#X connect 10 0 9 0;
+#X connect 11 0 7 0;
+#X restore 247 84 pd circle generator;
+#N canvas 498 387 361 260 baseline 0;
+#X obj 18 123 #fold +;
+#X obj 127 149 - 4;
+#X obj 18 56 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 18 101 # & ( -1 0 );
+#X obj 18 146 # ==;
+#X obj 127 130 listelement 0;
+#X text 93 10 line generator;
+#X obj 18 166 # << 7;
+#X obj 18 79 #for ( 0 0 ) ( 0 0 ) ( 1 1 );
+#X obj 127 110 #export_list;
+#X obj 18 9 inlet size;
+#X obj 18 187 outlet matrix;
+#X obj 18 33 fork;
+#X text 154 151 four pixels from bottom;
+#X connect 0 0 4 0;
+#X connect 1 0 4 1;
+#X connect 2 0 8 0;
+#X connect 3 0 0 0;
+#X connect 4 0 7 0;
+#X connect 5 0 1 0;
+#X connect 7 0 11 0;
+#X connect 8 0 3 0;
+#X connect 9 0 5 0;
+#X connect 10 0 12 0;
+#X connect 12 0 2 0;
+#X connect 12 1 9 0;
+#X connect 12 1 8 1;
+#X restore 204 117 pd baseline generator;
+#X text 78 236 (height \, width \, 1) grid = grey image;
+#X text 49 113 make blank image;
+#X text 30 163 feedback loop;
+#X text 78 200 (height \, width) grid = matrix;
+#X obj 204 63 shunt 2;
+#X obj 258 64 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+;
+#X obj 347 213 #color 0 800 1;
+#X msg 347 191 600 200 75;
+#X obj 224 -22 loadbang;
+#N canvas 645 360 400 289 fire 1;
+#X obj 174 180 #store;
+#X obj 61 196 #export_list;
+#X obj 6 65 # >> 2;
+#X obj 6 26 fork;
+#X obj 6 45 #convolve ( 3 3 # 1 0 0 0 1 0 1 1 1 );
+#X obj 6 235 # & 255;
+#X obj 174 115 listmake;
+#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 connect 0 0 17 1;
+#X connect 1 0 6 1;
+#X connect 2 0 17 0;
+#X connect 3 0 4 0;
+#X connect 3 1 10 0;
+#X connect 4 0 2 0;
+#X connect 5 0 15 0;
+#X connect 6 0 8 0;
+#X connect 7 0 14 0;
+#X connect 8 0 24 0;
+#X connect 9 0 6 0;
+#X connect 10 0 9 0;
+#X connect 11 0 14 1;
+#X connect 11 0 13 0;
+#X connect 12 0 0 1;
+#X connect 13 0 1 0;
+#X connect 14 0 5 0;
+#X connect 16 0 25 0;
+#X connect 17 0 7 0;
+#X connect 18 0 3 0;
+#X connect 19 0 16 0;
+#X connect 24 0 0 0;
+#X connect 25 0 12 0;
+#X restore 71 180 pd fire generator;
+#X text 183 46 note: reset the size if you change the generator;
+#X msg 204 2 80 256;
+#X obj 23 -2 metro 33.3667;
+#X obj -15 -84 cnv 15 620 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text -5 -84 fire.pd;
+#X text -5 -71 Copyright 2001 Mathieu Bouchard;
+#X obj -15 403 cnv 15 620 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text -7 411 GridFlow 0.8.0;
+#X text -7 411 GridFlow 0.8.0;
+#X connect 0 0 27 0;
+#X connect 2 0 6 0;
+#X connect 3 0 5 0;
+#X connect 4 0 29 0;
+#X connect 5 0 17 1;
+#X connect 7 0 4 1;
+#X connect 8 0 17 0;
+#X connect 9 0 3 0;
+#X connect 10 0 32 0;
+#X connect 11 0 31 0;
+#X connect 12 0 4 0;
+#X connect 13 0 9 0;
+#X connect 13 1 5 1;
+#X connect 15 0 2 0;
+#X connect 17 0 15 0;
+#X connect 18 0 29 1;
+#X connect 19 0 29 1;
+#X connect 24 0 19 0;
+#X connect 24 1 18 0;
+#X connect 25 0 24 1;
+#X connect 26 0 13 0;
+#X connect 27 0 26 0;
+#X connect 28 0 31 0;
+#X connect 29 0 8 0;
+#X connect 29 0 4 1;
+#X connect 31 0 7 0;
+#X connect 31 0 29 2;
+#X connect 31 0 24 0;
+#X connect 32 0 4 0;