blob: 1c24f315f1585f9a6af6d05a85cbfc5c9c0bd509 (
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
|
#N canvas 6 61 654 446 10;
#X declare -lib Gem;
#X text 452 8 GEM object;
#X obj 8 245 cnv 15 430 140 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 39 248 Inlets:;
#X text 38 345 Outlets:;
#X obj 8 206 cnv 15 430 30 empty empty empty 20 12 0 14 -195568 -66577
0;
#X text 17 205 Arguments:;
#X obj 7 76 cnv 15 430 125 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 449 77 cnv 15 200 250 empty empty empty 20 12 0 14 -228992 -66577
0;
#X text 453 60 Example:;
#X obj 514 254 cnv 15 100 60 empty empty empty 20 12 0 14 -195568 -66577
0;
#N canvas 0 0 450 300 gemwin 0;
#X obj 132 136 gemwin;
#X obj 67 89 outlet;
#X obj 67 10 inlet;
#X obj 67 41 route create;
#X msg 67 70 set destroy;
#X msg 142 68 set create;
#X msg 132 112 create \, 1;
#X msg 198 112 destroy;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 6 0;
#X connect 3 1 5 0;
#X connect 3 1 7 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X restore 519 293 pd gemwin;
#X msg 519 274 create;
#X text 515 253 Create window:;
#X obj 450 138 cnv 15 190 100 empty empty empty 20 12 0 14 -24198 -66577
0;
#X obj 451 84 gemhead;
#X text 71 31 Class: pix object;
#X obj 510 85 bng 15 250 50 0 empty empty pix_load 20 8 0 8 -262144
-1 -1;
#N canvas 0 0 587 366 image 0;
#X obj 77 48 inlet;
#X obj 77 344 outlet;
#X obj 77 205 pix_image examples/data/fractal.JPG;
#X obj 223 55 inlet;
#X msg 223 123 open \$1;
#X obj 223 100 openpanel;
#X obj 77 281 pix_buf;
#X msg 103 257 auto 1;
#X obj 103 236 loadbang;
#X text 156 263 [pix_buf] with auto 1 is important if we want to recalculate
our pix-effect each frame but don't want to reload the image all the
time.;
#X connect 0 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X restore 451 113 pd image;
#X text 63 216 <none>;
#X text 56 358 Outlet 1: gemlist;
#X text 63 262 Inlet 1: gemlist;
#X text 50 12 Synopsis: [pix_color];
#X obj 451 254 pix_draw;
#X text 516 105 open an image;
#X text 509 118 (JPEG \, TIFF \, ..);
#X obj 451 216 pix_aging;
#X text 11 77 Description: apply a super8-like aging effect;
#X text 16 92 [pix_aging] is an effect that will make your images (better:
films) have a super8-like look.;
#X text 16 123 There are 4 components (color-aging \, light dusts \,
dark pits and vertical scratches) that can be turned on/off individually.
;
#X text 15 168 The number of scratches can be set via the "scratch"
message.;
#X obj 39 399 cnv 15 450 40 empty empty empty 20 12 0 14 -260818 -66577
0;
#X text 51 407 acknowledgment: this effect is based on effecTV by Kentarou
Fukuchi (http://effectv.sourceforge.net);
#X msg 460 160 dust \$1;
#X obj 460 142 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 580 182 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X msg 580 199 pits \$1;
#X msg 480 197 coloraging \$1;
#X obj 481 179 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X floatatom 525 143 5 0 0 0 - - -;
#X msg 525 161 scratch \$1;
#X text 63 275 Inlet 1: dust 0|1: add "dust";
#X text 63 290 Inlet 1: pits 0|1: add "pits";
#X text 63 324 Inlet 1: scratch <int> : add a maximum of # scratches
;
#X text 63 306 Inlet 1: coloraging 0|1: color-bleaching;
#X obj 538 8 declare -lib Gem;
#X connect 10 0 11 0;
#X connect 11 0 10 0;
#X connect 14 0 17 0;
#X connect 16 0 17 1;
#X connect 17 0 25 0;
#X connect 25 0 22 0;
#X connect 32 0 25 0;
#X connect 33 0 32 0;
#X connect 34 0 35 0;
#X connect 35 0 25 0;
#X connect 36 0 25 0;
#X connect 37 0 36 0;
#X connect 38 0 39 0;
#X connect 39 0 25 0;
|
