diff options
Diffstat (limited to 'externals/gridflow/pd_examples/fire.pd')
-rw-r--r-- | externals/gridflow/pd_examples/fire.pd | 180 |
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; |