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
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
|
#N canvas 371 0 848 642 10;
#X obj 107 47 loadbang;
#X obj 107 85 t a a;
#X obj 266 412 print;
#X obj 10 49 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
#X obj 260 453 # / 2;
#X msg 107 104 \$1 \$2 1 # 0;
#N canvas 137 251 392 303 finger 0;
#X obj 149 39 #redim ( 4 2 );
#X obj 71 16 inlet;
#X obj 149 20 inlet;
#X obj 71 217 outlet;
#X obj 149 158 # +;
#X obj 177 157 # *;
#X msg 177 137 0 0 0 1 1 1 1 0;
#X obj 193 79 inlet size;
#X text 291 137 square or rect;
#X obj 177 112 #finished;
#X obj 70 195 #draw_polygon put (4000);
#X connect 0 0 4 0;
#X connect 1 0 10 0;
#X connect 2 0 0 0;
#X connect 4 0 10 2;
#X connect 5 0 4 1;
#X connect 6 0 5 0;
#X connect 7 0 9 0;
#X connect 7 0 5 1;
#X connect 9 0 6 0;
#X connect 10 0 3 0;
#X restore 234 570 pd finger;
#X obj 141 85 s size;
#X obj 260 353 #scale_by 2;
#X obj 10 243 #store;
#N canvas 243 147 463 307 wave 0;
#X obj 26 20 inlet;
#X obj 23 293 outlet;
#X text 65 205 time differential;
#X text 81 50 space differential: (d/dx)^2 + (d/dy)^2;
#X text 71 8 Recurrence equation for propagation of oscillations;
#X obj 26 39 t a a;
#X obj 207 147 outlet blah;
#X obj 207 125 inlet blah;
#X obj 23 205 # -;
#X obj 23 225 # *>>8 252;
#X obj 20 250 # min 30000;
#X obj 20 270 # max -30000;
#X obj 56 82 #convolve (3 3 # 1 4 1 4 12 4) \, seed 8;
#X obj 56 101 # >> 4;
#X connect 0 0 5 0;
#X connect 5 0 8 1;
#X connect 5 1 12 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 1 0;
#X connect 12 0 13 0;
#X connect 13 0 6 0;
#X restore 10 281 pd wave equation;
#X obj 189 570 t a;
#X obj 107 123 t a;
#X obj 36 85 s metro;
#X text 491 65 (Best complemented with a touchscreen);
#X obj 355 209 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -258699
-1 0;
#X text 373 224 height greys;
#X obj 313 98 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -258699
-1 0;
#X text 331 97 plain;
#X text 331 113 line-art;
#X text 330 46 smooth;
#X obj 313 46 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -258699
-1 0;
#X text 331 60 raw;
#X obj 442 418 hradio 18 1 1 4 empty empty _1__2__3__4_ 0 -4 0 10 -241291
-258699 -1 0;
#X text 440 397 scale by...;
#X obj 442 438 + 1;
#X obj 573 105 loadbang;
#X obj 573 276 spigot;
#X obj 620 277 tgl 15 0 empty empty empty 18 8 0 8 -241291 -1 -62784
0 1;
#X obj 573 256 r metro;
#N canvas 433 107 365 432 line-art 0;
#X obj 32 123 # << 8;
#X obj 32 37 inlet;
#X obj 34 256 outlet;
#X text 146 31 double-thresholding;
#X text 146 114 else becomes 0;
#X obj 32 82 # min 1;
#X obj 32 103 # max -1;
#X obj 32 172 # >> 2;
#X obj 31 154 #convolve (3 1 # 1 2 1);
#X obj 33 193 #convolve (1 3 # 1 2 1);
#X obj 35 215 # >> 2;
#X obj 32 60 # / 5;
#X text 146 85 < -5 becomes -256;
#X text 146 100 > +5 becomes +256;
#X connect 0 0 8 0;
#X connect 1 0 11 0;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X connect 7 0 9 0;
#X connect 8 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 2 0;
#X connect 11 0 5 0;
#X restore 282 187 pd line-art;
#X text 628 129 Background colour;
#X text 637 277 enable video;
#X text 371 209 four-colour emboss;
#X obj 345 492 tgl 15 1 empty empty empty 0 -6 0 8 -241291 -1 -1 0
1;
#X obj 298 472 r metro;
#X text 362 491 rain;
#X obj 260 99 # >> 2;
#X text 388 36 Originally made for Alexandre Castonguay's "DIGITALE"
;
#X text 505 50 But suitable for a lot more uses :-);
#X msg 573 124 3 # 128;
#X obj 573 143 #color;
#X obj 260 59 shunt 2;
#X obj 303 559 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-262131 -1 -1 1 256;
#X obj 303 573 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-262131 -1 -1 1 256;
#X obj 477 291 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -258699
-1 0;
#X text 495 290 plain;
#X text 495 307 refraction;
#X obj 260 296 t a;
#N canvas 203 363 443 300 heightmap2indexmap 0;
#X obj 48 239 outlet;
#X obj 9 8 inlet;
#X obj 48 143 # +;
#X obj 100 9 #dim;
#X obj 132 9 #export_list;
#X obj 48 8 t a a;
#X obj 48 48 t a a;
#X msg 132 28 \$1 \$2;
#X obj 48 220 # +;
#X obj 90 200 loadbang;
#X obj 73 200 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 78 67 #convolve (1 2 #) \, op ignore \, fold inv+;
#X obj 78 86 #outer & (-1 0);
#X obj 48 105 #convolve (2 1 #) \, op ignore \, fold inv+;
#X obj 48 124 #outer & (0 -1);
#X obj 73 220 #for (0 0) (240 320) (1 1);
#X obj 48 28 #redim ();
#X obj 48 181 # >> 3;
#X obj 48 162 # + 4;
#X connect 1 0 5 0;
#X connect 2 0 18 0;
#X connect 3 0 4 0;
#X connect 4 0 7 0;
#X connect 5 0 16 0;
#X connect 5 1 3 0;
#X connect 6 0 13 0;
#X connect 6 1 11 0;
#X connect 7 0 16 1;
#X connect 8 0 0 0;
#X connect 9 0 15 0;
#X connect 10 0 15 0;
#X connect 11 0 12 0;
#X connect 12 0 2 1;
#X connect 13 0 14 0;
#X connect 14 0 2 0;
#X connect 15 0 8 1;
#X connect 16 0 6 0;
#X connect 17 0 8 0;
#X connect 18 0 17 0;
#X restore 397 345 pd heightmap2indexmap;
#X obj -8 82 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
;
#X obj 397 326 spigot;
#X text 373 239 no reflection;
#X obj 260 187 t a;
#X obj 189 551 shunt 2;
#X obj 226 521 shunt 2;
#X obj 10 262 shunt 2;
#X text 80 263 freeze time;
#X obj 63 263 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
;
#X obj 132 123 r feedback;
#X obj 189 589 s feedback;
#X obj 10 303 t a;
#X obj -13 5 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj -15 611 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
0;
#X text -7 619 GridFlow 0.8.0;
#X text -7 619 GridFlow 0.8.0;
#X text 0 4 waves.pd;
#X obj 555 276 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
-1;
#X obj 573 315 spigot;
#X obj 620 316 tgl 15 0 empty empty empty 18 8 0 8 -241291 -1 -62784
0 1;
#X text 637 315 test camera output;
#X obj 10 85 t b;
#X obj 298 491 spigot;
#X obj 620 334 sel 0 1;
#X msg 642 353 open window;
#X obj 573 334 #out;
#X msg 620 372 close;
#X obj 266 393 fps detailed \, period 2;
#X obj 574 226 #in;
#X obj 344 510 r size;
#X obj 298 510 #store;
#X obj 298 529 # rand;
#X obj 260 372 #out window;
#X obj 260 334 #clip;
#X obj 260 78 #convolve (2 2 #) \, op ignore;
#X obj 303 592 #pack 2;
#X obj 260 431 #mouse \, ...;
#N canvas 123 224 450 366 doodle 0;
#X obj 26 17 inlet wave;
#X obj 23 258 outlet wave;
#X obj 171 29 inlet tog;
#X obj 306 36 inlet pos;
#X obj 139 9 r metro;
#X obj 138 57 spigot;
#X obj 231 202 # +;
#X obj 137 83 t b b;
#X msg 219 123 4 2 # 0 0 0 1 1 1 1 0;
#X obj 224 158 # * 8;
#X obj 127 334 outlet rgb;
#X obj 347 78 inlet mode;
#X obj 347 221 #redim (1);
#X obj 130 238 #draw_polygon put (0);
#X obj 24 69 # *>>8;
#X obj 129 290 #inner (1 3 # 0 1 1);
#X obj 141 267 # inv+ 256;
#X obj 364 191 # inv+ 256;
#X obj 46 107 loadbang;
#X obj 347 159 # * 256;
#X obj 48 146 #store (240 320 1 # 256);
#X connect 0 0 14 0;
#X connect 2 0 5 1;
#X connect 3 0 6 1;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 6 0 13 2;
#X connect 7 0 20 0;
#X connect 7 1 8 0;
#X connect 8 0 9 0;
#X connect 9 0 6 0;
#X connect 11 0 19 0;
#X connect 12 0 13 1;
#X connect 13 0 16 0;
#X connect 13 0 20 1;
#X connect 14 0 1 0;
#X connect 15 0 10 0;
#X connect 16 0 15 0;
#X connect 17 0 12 0;
#X connect 18 0 20 0;
#X connect 19 0 12 0;
#X connect 20 0 13 0;
#X connect 20 0 14 1;
#X restore 130 282 pd doodle;
#X obj 199 282 # +;
#X msg 574 207 load g001.jpg;
#X obj 90 178 route position;
#X msg 90 197 \$3;
#X obj 90 216 & 1;
#X msg 107 66 240 320;
#X obj 573 296 #camera;
#X obj 260 118 shunt 3;
#X obj 304 147 # ** 3;
#X text 331 127 cubit;
#X obj 304 166 # >> 10;
#X obj 578 438 #checkers;
#X obj 578 418 #for (0 0) (240 320) (1 1);
#X obj 421 296 t a;
#X obj 576 398 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X text 0 18 Copyright 2003 \, 2004 \, 2005 \, 2008 Mathieu Bouchard
;
#X text 466 79 Also contains several effects not made for Digitale
;
#N canvas 0 0 450 379 light_mode 0;
#X obj 16 20 inlet;
#X obj 244 25 inlet;
#X obj 38 104 #greyscale_to_rgb;
#X obj 38 80 # >> 1;
#X obj 16 50 shunt 3;
#X obj 86 80 # put 0;
#X text 51 205 produce red/cyan from horiz differences;
#X obj 16 317 # +;
#X obj 68 150 #dim;
#X obj 100 150 #export_list;
#X obj 16 149 t a a;
#X obj 16 189 t a a;
#X msg 101 170 \$1 \$2;
#X obj 16 169 #redim ();
#X obj 46 222 #convolve (1 2 #) \, op ignore \, fold inv+;
#X obj 16 279 #convolve (2 1 #) \, op ignore \, fold inv+;
#X obj 46 241 #outer & (-1 0 0);
#X obj 16 298 #outer & (-1 -1 0);
#X text 24 263 produce yellow/blue from vertical differences;
#X obj 16 354 outlet;
#X connect 0 0 4 0;
#X connect 1 0 4 1;
#X connect 2 0 19 0;
#X connect 3 0 2 0;
#X connect 4 0 10 0;
#X connect 4 1 3 0;
#X connect 4 2 5 0;
#X connect 5 0 2 0;
#X connect 7 0 19 0;
#X connect 8 0 9 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 1 8 0;
#X connect 11 0 15 0;
#X connect 11 1 14 0;
#X connect 12 0 13 1;
#X connect 13 0 11 0;
#X connect 14 0 16 0;
#X connect 15 0 17 0;
#X connect 16 0 7 1;
#X connect 17 0 7 0;
#X restore 260 226 pd light_mode;
#X obj 397 364 #store 0;
#X obj 260 315 # +;
#X obj 10 66 metro 33.3667;
#X connect 0 0 93 0;
#X connect 1 0 5 0;
#X connect 1 1 7 0;
#X connect 3 0 108 0;
#X connect 4 0 87 2;
#X connect 4 0 6 1;
#X connect 5 0 12 0;
#X connect 6 0 11 0;
#X connect 8 0 82 0;
#X connect 9 0 56 0;
#X connect 10 0 61 0;
#X connect 10 1 87 0;
#X connect 11 0 60 0;
#X connect 12 0 9 1;
#X connect 12 0 42 0;
#X connect 15 0 105 1;
#X connect 17 0 95 1;
#X connect 21 0 42 1;
#X connect 23 0 25 0;
#X connect 25 0 8 1;
#X connect 25 0 4 1;
#X connect 26 0 40 0;
#X connect 27 0 94 0;
#X connect 28 0 27 1;
#X connect 29 0 27 0;
#X connect 30 0 53 0;
#X connect 34 0 54 1;
#X connect 34 0 55 1;
#X connect 34 0 72 1;
#X connect 35 0 72 0;
#X connect 37 0 95 0;
#X connect 40 0 41 0;
#X connect 41 0 101 0;
#X connect 42 0 84 0;
#X connect 42 1 95 0;
#X connect 43 0 85 0;
#X connect 44 0 85 1;
#X connect 45 0 51 1;
#X connect 48 0 107 0;
#X connect 49 0 106 0;
#X connect 50 0 71 0;
#X connect 51 0 49 0;
#X connect 53 0 51 0;
#X connect 53 0 105 0;
#X connect 54 0 11 0;
#X connect 54 1 6 0;
#X connect 55 0 54 1;
#X connect 56 0 10 0;
#X connect 56 1 61 0;
#X connect 58 0 56 1;
#X connect 59 0 12 0;
#X connect 61 0 54 0;
#X connect 67 0 94 0;
#X connect 68 0 75 0;
#X connect 69 0 68 1;
#X connect 69 0 73 0;
#X connect 71 0 13 0;
#X connect 71 0 9 0;
#X connect 72 0 80 0;
#X connect 73 0 76 0;
#X connect 73 1 74 0;
#X connect 74 0 75 0;
#X connect 76 0 75 0;
#X connect 77 0 2 0;
#X connect 78 0 101 0;
#X connect 79 0 80 1;
#X connect 80 0 81 0;
#X connect 81 0 6 1;
#X connect 82 0 77 0;
#X connect 82 0 86 0;
#X connect 82 0 90 0;
#X connect 83 0 8 0;
#X connect 84 0 37 0;
#X connect 85 0 6 2;
#X connect 86 0 4 0;
#X connect 86 1 4 0;
#X connect 86 4 55 0;
#X connect 86 6 87 1;
#X connect 87 0 10 1;
#X connect 87 1 88 1;
#X connect 88 0 83 0;
#X connect 89 0 78 0;
#X connect 90 0 91 0;
#X connect 91 0 92 0;
#X connect 92 0 87 3;
#X connect 93 0 1 0;
#X connect 94 0 68 0;
#X connect 94 0 101 0;
#X connect 95 0 53 0;
#X connect 95 1 30 0;
#X connect 95 2 96 0;
#X connect 96 0 98 0;
#X connect 98 0 53 0;
#X connect 99 0 101 0;
#X connect 100 0 99 0;
#X connect 101 0 106 1;
#X connect 101 0 107 1;
#X connect 102 0 100 0;
#X connect 105 0 48 0;
#X connect 106 0 107 1;
#X connect 107 0 88 0;
#X connect 108 0 71 0;
|