aboutsummaryrefslogtreecommitdiff
path: root/examples/34_cigarette_smoke.pd
blob: 0300daa2bd5c7b77bf07bfaf48fe0d46793500fb (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
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
#N canvas 1086 204 646 480 10;
#X declare -lib Gem;
#N canvas 860 482 349 443 creation 0;
#X obj 46 380 s pd-new;
#X msg 86 95 \; pd filename new ./ \; #N canvas \; #X pop 1 \;;
#X msg 46 350 menuclose;
#X obj 43 47 sel 0 1;
#X obj 43 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 61 72 t b b;
#X obj 107 272 * 20;
#X obj 82 272 * 20;
#X obj 76 188 t f f;
#X obj 79 299 pack f f f;
#X obj 138 270 + 0;
#X obj 136 223 + 0;
#X msg 79 325 obj \$1 \$2 smoke1 \$3;
#X obj 64 158 ch_uzi 250;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 3 1 5 0;
#X connect 4 0 3 0;
#X connect 5 0 13 0;
#X connect 5 1 1 0;
#X connect 6 0 9 1;
#X connect 7 0 9 0;
#X connect 8 0 7 0;
#X connect 8 1 6 0;
#X connect 8 1 11 0;
#X connect 9 0 12 0;
#X connect 10 0 9 2;
#X connect 11 0 10 0;
#X connect 12 0 0 0;
#X connect 13 1 8 0;
#X restore 428 222 pd creation pool;
#N canvas 626 84 618 542 pool 0;
#X obj 0 0 smoke1 0;
#X obj 20 20 smoke1 1;
#X obj 40 40 smoke1 2;
#X obj 60 60 smoke1 3;
#X obj 80 80 smoke1 4;
#X obj 100 100 smoke1 5;
#X obj 120 120 smoke1 6;
#X obj 140 140 smoke1 7;
#X obj 160 160 smoke1 8;
#X obj 180 180 smoke1 9;
#X obj 200 200 smoke1 10;
#X obj 220 220 smoke1 11;
#X obj 240 240 smoke1 12;
#X obj 260 260 smoke1 13;
#X obj 280 280 smoke1 14;
#X obj 300 300 smoke1 15;
#X obj 320 320 smoke1 16;
#X obj 340 340 smoke1 17;
#X obj 360 360 smoke1 18;
#X obj 380 380 smoke1 19;
#X obj 400 400 smoke1 20;
#X obj 420 420 smoke1 21;
#X obj 440 440 smoke1 22;
#X obj 460 460 smoke1 23;
#X obj 480 480 smoke1 24;
#X obj 500 500 smoke1 25;
#X obj 520 520 smoke1 26;
#X obj 540 540 smoke1 27;
#X obj 560 560 smoke1 28;
#X obj 580 580 smoke1 29;
#X obj 600 600 smoke1 30;
#X obj 620 620 smoke1 31;
#X obj 640 640 smoke1 32;
#X obj 660 660 smoke1 33;
#X obj 680 680 smoke1 34;
#X obj 700 700 smoke1 35;
#X obj 720 720 smoke1 36;
#X obj 740 740 smoke1 37;
#X obj 760 760 smoke1 38;
#X obj 780 780 smoke1 39;
#X obj 800 800 smoke1 40;
#X obj 820 820 smoke1 41;
#X obj 840 840 smoke1 42;
#X obj 860 860 smoke1 43;
#X obj 880 880 smoke1 44;
#X obj 900 900 smoke1 45;
#X obj 920 920 smoke1 46;
#X obj 940 940 smoke1 47;
#X obj 960 960 smoke1 48;
#X obj 980 980 smoke1 49;
#X obj 1000 1000 smoke1 50;
#X obj 1020 1020 smoke1 51;
#X obj 1040 1040 smoke1 52;
#X obj 1060 1060 smoke1 53;
#X obj 1080 1080 smoke1 54;
#X obj 1100 1100 smoke1 55;
#X obj 1120 1120 smoke1 56;
#X obj 1140 1140 smoke1 57;
#X obj 1160 1160 smoke1 58;
#X obj 1180 1180 smoke1 59;
#X obj 1200 1200 smoke1 60;
#X obj 1220 1220 smoke1 61;
#X obj 1240 1240 smoke1 62;
#X obj 1260 1260 smoke1 63;
#X obj 1280 1280 smoke1 64;
#X obj 1300 1300 smoke1 65;
#X obj 1320 1320 smoke1 66;
#X obj 1340 1340 smoke1 67;
#X obj 1360 1360 smoke1 68;
#X obj 1380 1380 smoke1 69;
#X obj 1400 1400 smoke1 70;
#X obj 1420 1420 smoke1 71;
#X obj 1440 1440 smoke1 72;
#X obj 1460 1460 smoke1 73;
#X obj 1480 1480 smoke1 74;
#X obj 1500 1500 smoke1 75;
#X obj 1520 1520 smoke1 76;
#X obj 1540 1540 smoke1 77;
#X obj 1560 1560 smoke1 78;
#X obj 1580 1580 smoke1 79;
#X obj 1600 1600 smoke1 80;
#X obj 1620 1620 smoke1 81;
#X obj 1640 1640 smoke1 82;
#X obj 1660 1660 smoke1 83;
#X obj 1680 1680 smoke1 84;
#X obj 1700 1700 smoke1 85;
#X obj 1720 1720 smoke1 86;
#X obj 1740 1740 smoke1 87;
#X obj 1760 1760 smoke1 88;
#X obj 1780 1780 smoke1 89;
#X obj 1800 1800 smoke1 90;
#X obj 1820 1820 smoke1 91;
#X obj 1840 1840 smoke1 92;
#X obj 1860 1860 smoke1 93;
#X obj 1880 1880 smoke1 94;
#X obj 1900 1900 smoke1 95;
#X obj 1920 1920 smoke1 96;
#X obj 1940 1940 smoke1 97;
#X obj 1960 1960 smoke1 98;
#X obj 1980 1980 smoke1 99;
#X obj 2000 2000 smoke1 100;
#X obj 2020 2020 smoke1 101;
#X obj 2040 2040 smoke1 102;
#X obj 2060 2060 smoke1 103;
#X obj 2080 2080 smoke1 104;
#X obj 2100 2100 smoke1 105;
#X obj 2120 2120 smoke1 106;
#X obj 2140 2140 smoke1 107;
#X obj 2160 2160 smoke1 108;
#X obj 2180 2180 smoke1 109;
#X obj 2200 2200 smoke1 110;
#X obj 2220 2220 smoke1 111;
#X obj 2240 2240 smoke1 112;
#X obj 2260 2260 smoke1 113;
#X obj 2280 2280 smoke1 114;
#X obj 2300 2300 smoke1 115;
#X obj 2320 2320 smoke1 116;
#X obj 2340 2340 smoke1 117;
#X obj 2360 2360 smoke1 118;
#X obj 2380 2380 smoke1 119;
#X obj 2400 2400 smoke1 120;
#X obj 2420 2420 smoke1 121;
#X obj 2440 2440 smoke1 122;
#X obj 2460 2460 smoke1 123;
#X obj 2480 2480 smoke1 124;
#X obj 2500 2500 smoke1 125;
#X obj 2520 2520 smoke1 126;
#X obj 2540 2540 smoke1 127;
#X obj 2560 2560 smoke1 128;
#X obj 2580 2580 smoke1 129;
#X obj 2600 2600 smoke1 130;
#X obj 2620 2620 smoke1 131;
#X obj 2640 2640 smoke1 132;
#X obj 2660 2660 smoke1 133;
#X obj 2680 2680 smoke1 134;
#X obj 2700 2700 smoke1 135;
#X obj 2720 2720 smoke1 136;
#X obj 2740 2740 smoke1 137;
#X obj 2760 2760 smoke1 138;
#X obj 2780 2780 smoke1 139;
#X obj 2800 2800 smoke1 140;
#X obj 2820 2820 smoke1 141;
#X obj 2840 2840 smoke1 142;
#X obj 2860 2860 smoke1 143;
#X obj 2880 2880 smoke1 144;
#X obj 2900 2900 smoke1 145;
#X obj 2920 2920 smoke1 146;
#X obj 2940 2940 smoke1 147;
#X obj 2960 2960 smoke1 148;
#X obj 2980 2980 smoke1 149;
#X obj 3000 3000 smoke1 150;
#X obj 3020 3020 smoke1 151;
#X obj 3040 3040 smoke1 152;
#X obj 3060 3060 smoke1 153;
#X obj 3080 3080 smoke1 154;
#X obj 3100 3100 smoke1 155;
#X obj 3120 3120 smoke1 156;
#X obj 3140 3140 smoke1 157;
#X obj 3160 3160 smoke1 158;
#X obj 3180 3180 smoke1 159;
#X obj 3200 3200 smoke1 160;
#X obj 3220 3220 smoke1 161;
#X obj 3240 3240 smoke1 162;
#X obj 3260 3260 smoke1 163;
#X obj 3280 3280 smoke1 164;
#X obj 3300 3300 smoke1 165;
#X obj 3320 3320 smoke1 166;
#X obj 3340 3340 smoke1 167;
#X obj 3360 3360 smoke1 168;
#X obj 3380 3380 smoke1 169;
#X obj 3400 3400 smoke1 170;
#X obj 3420 3420 smoke1 171;
#X obj 3440 3440 smoke1 172;
#X obj 3460 3460 smoke1 173;
#X obj 3480 3480 smoke1 174;
#X obj 3500 3500 smoke1 175;
#X obj 3520 3520 smoke1 176;
#X obj 3540 3540 smoke1 177;
#X obj 3560 3560 smoke1 178;
#X obj 3580 3580 smoke1 179;
#X obj 3600 3600 smoke1 180;
#X obj 3620 3620 smoke1 181;
#X obj 3640 3640 smoke1 182;
#X obj 3660 3660 smoke1 183;
#X obj 3680 3680 smoke1 184;
#X obj 3700 3700 smoke1 185;
#X obj 3720 3720 smoke1 186;
#X obj 3740 3740 smoke1 187;
#X obj 3760 3760 smoke1 188;
#X obj 3780 3780 smoke1 189;
#X obj 3800 3800 smoke1 190;
#X obj 3820 3820 smoke1 191;
#X obj 3840 3840 smoke1 192;
#X obj 3860 3860 smoke1 193;
#X obj 3880 3880 smoke1 194;
#X obj 3900 3900 smoke1 195;
#X obj 3920 3920 smoke1 196;
#X obj 3940 3940 smoke1 197;
#X obj 3960 3960 smoke1 198;
#X obj 3980 3980 smoke1 199;
#X obj 4000 4000 smoke1 200;
#X obj 4020 4020 smoke1 201;
#X obj 4040 4040 smoke1 202;
#X obj 4060 4060 smoke1 203;
#X obj 4080 4080 smoke1 204;
#X obj 4100 4100 smoke1 205;
#X obj 4120 4120 smoke1 206;
#X obj 4140 4140 smoke1 207;
#X obj 4160 4160 smoke1 208;
#X obj 4180 4180 smoke1 209;
#X obj 4200 4200 smoke1 210;
#X obj 4220 4220 smoke1 211;
#X obj 4240 4240 smoke1 212;
#X obj 4260 4260 smoke1 213;
#X obj 4280 4280 smoke1 214;
#X obj 4300 4300 smoke1 215;
#X obj 4320 4320 smoke1 216;
#X obj 4340 4340 smoke1 217;
#X obj 4360 4360 smoke1 218;
#X obj 4380 4380 smoke1 219;
#X obj 4400 4400 smoke1 220;
#X obj 4420 4420 smoke1 221;
#X obj 4440 4440 smoke1 222;
#X obj 4460 4460 smoke1 223;
#X obj 4480 4480 smoke1 224;
#X obj 4500 4500 smoke1 225;
#X obj 4520 4520 smoke1 226;
#X obj 4540 4540 smoke1 227;
#X obj 4560 4560 smoke1 228;
#X obj 4580 4580 smoke1 229;
#X obj 4600 4600 smoke1 230;
#X obj 4620 4620 smoke1 231;
#X obj 4640 4640 smoke1 232;
#X obj 4660 4660 smoke1 233;
#X obj 4680 4680 smoke1 234;
#X obj 4700 4700 smoke1 235;
#X obj 4720 4720 smoke1 236;
#X obj 4740 4740 smoke1 237;
#X obj 4760 4760 smoke1 238;
#X obj 4780 4780 smoke1 239;
#X obj 4800 4800 smoke1 240;
#X obj 4820 4820 smoke1 241;
#X obj 4840 4840 smoke1 242;
#X obj 4860 4860 smoke1 243;
#X obj 4880 4880 smoke1 244;
#X obj 4900 4900 smoke1 245;
#X obj 4920 4920 smoke1 246;
#X obj 4940 4940 smoke1 247;
#X obj 4960 4960 smoke1 248;
#X obj 4980 4980 smoke1 249;
#X restore 428 196 pd pool;
#X obj 41 192 t b b;
#X obj 40 115 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 41 236 s mass;
#X obj 66 217 s link;
#X text 73 112 <- begin (change the metro speed for slow computer)
;
#X floatatom 83 135 5 0 0 0 - - -;
#X msg 265 175 0 \, destroy;
#X obj 232 201 gemwin;
#X obj 140 270 s reset_smoke;
#X obj 324 235 s reset_all;
#X obj 324 210 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 40 167 metro 20;
#X msg 232 155 reset \, create \, 1;
#X obj 123 175 metro 50;
#X obj 113 355 iAmbient2D mass 0 0.0007 0.0002 0.0002;
#X obj 116 383 smoke_vortex 0.003;
#X text 173 53 Cigarettes smoke simulation;
#X text 115 75 Each particules are in some kind of turbulent wind (vertical
force + some random mouving vortex);
#X text 345 154 <- create;
#X obj 123 198 f;
#X obj 123 220 + 1;
#X obj 140 245 % 250;
#X obj 115 403 smoke_vortex 0.003;
#X obj 114 423 smoke_vortex 0.003;
#X obj 248 383 smoke_vortex -0.003;
#X obj 247 403 smoke_vortex -0.003;
#X obj 247 423 smoke_vortex -0.003;
#X obj 10 2 declare -lib Gem;
#X connect 2 0 4 0;
#X connect 2 1 5 0;
#X connect 2 1 16 0;
#X connect 3 0 13 0;
#X connect 3 0 15 0;
#X connect 7 0 13 1;
#X connect 8 0 9 0;
#X connect 12 0 11 0;
#X connect 13 0 2 0;
#X connect 14 0 9 0;
#X connect 15 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 23 0 21 1;
#X connect 23 0 10 0;