aboutsummaryrefslogtreecommitdiff
path: root/externals/gridflow/pd_examples/fire.pd
blob: 2a88a3a0eccf53178640affa780091b48994508f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
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;