aboutsummaryrefslogtreecommitdiff
path: root/examples/gopcanvas.pd
blob: c97814c08d334922757d6e94eaa3833b17902cb8 (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
#N canvas 452 272 631 456 10;
#X obj 138 250 propertybang;
#N canvas 203 89 362 187 \$0-properties 0;
#X obj 58 137 cnv 15 200 35 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 67 145 bng 15 250 50 0 \$0-done empty OK 17 7 0 10 -24198 -1
-1;
#X obj 188 145 bng 15 250 50 0 \$0-cancel empty cancel 17 7 0 10 -258699
-1 -1;
#X obj 61 76 hsl 128 15 0 255 0 0 \$0-R \$0-R empty -2 -8 0 10 -258699
-1 -1 0 1;
#X obj 61 93 hsl 128 15 0 255 0 0 \$0-G \$0-G empty -2 -8 0 10 -24198
-1 -1 0 1;
#X obj 61 110 hsl 128 15 0 255 0 0 \$0-B \$0-B empty -2 -8 0 10 -62784
-1 -1 0 1;
#X obj 206 76 cnv 15 50 50 empty \$0-color empty 20 12 0 14 -154945
-262144 0;
#X obj 120 145 bng 15 250 50 0 \$0-apply empty apply 17 7 0 10 -241291
-1 -1;
#X text 90 37 select your color!;
#X restore 138 419 pd \$0-properties;
#X obj 138 282 t b b;
#X obj 101 101 cnv 15 83 58 empty \$0-label empty 20 12 0 14 -154945
-262144 0;
#X obj 138 398 s pd-\$0-properties;
#X msg 138 381 vis \$1;
#X msg 163 361 1;
#X msg 138 361 0;
#N canvas 42 382 857 456 propertyguts 0;
#X obj 118 105 r \$0-R;
#X obj 160 105 r \$0-G;
#X obj 201 105 r \$0-B;
#N canvas 15 207 606 448 RGB_____________ 0;
#X obj 97 56 inlet;
#X obj 262 43 inlet;
#X obj 339 45 inlet;
#X obj 405 44 inlet;
#X obj 97 230 bang;
#X msg 97 255 0;
#X msg 123 254 1;
#X obj 146 228 bang;
#X msg 152 255 0;
#X msg 180 255 1;
#X obj 312 313 spigot;
#X obj 249 385 outlet;
#X text 93 33 select;
#X text 267 28 red;
#X text 337 30 green;
#X text 409 30 blue;
#X obj 405 132 t b f;
#X obj 339 160 +;
#X obj 339 185 t b f;
#X obj 339 216 +;
#X obj 296 385 outlet;
#X obj 296 361 f;
#X obj 249 361 f;
#X obj 262 109 * -65536;
#X obj 339 110 * -256;
#X obj 405 110 * -1;
#X obj 339 247 - 1;
#X obj 97 135 route back label bang;
#X obj 235 168 t b b b;
#X obj 265 313 spigot 1;
#X obj 262 77 max 0;
#X obj 262 93 min 255;
#X obj 339 77 max 0;
#X obj 339 93 min 255;
#X obj 405 77 max 0;
#X obj 405 93 min 255;
#X obj 262 61 i;
#X obj 339 61 i;
#X obj 405 61 i;
#X connect 0 0 27 0;
#X connect 1 0 36 0;
#X connect 2 0 37 0;
#X connect 3 0 38 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 10 1;
#X connect 6 0 29 1;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 29 1;
#X connect 9 0 10 1;
#X connect 10 0 21 1;
#X connect 16 0 17 0;
#X connect 16 1 17 1;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 18 1 19 1;
#X connect 19 0 26 0;
#X connect 21 0 20 0;
#X connect 22 0 11 0;
#X connect 23 0 19 0;
#X connect 24 0 17 0;
#X connect 25 0 16 0;
#X connect 26 0 10 0;
#X connect 26 0 29 0;
#X connect 27 0 4 0;
#X connect 27 1 7 0;
#X connect 27 2 28 0;
#X connect 28 0 22 0;
#X connect 28 1 21 0;
#X connect 28 2 26 0;
#X connect 29 0 22 1;
#X connect 30 0 31 0;
#X connect 31 0 23 0;
#X connect 32 0 33 0;
#X connect 33 0 24 0;
#X connect 34 0 35 0;
#X connect 35 0 25 0;
#X connect 36 0 30 0;
#X connect 37 0 32 0;
#X connect 38 0 34 0;
#X restore 118 244 pd RGB_____________;
#X obj 118 165 b;
#X obj 118 130 t b f;
#X obj 160 130 t b f;
#X obj 201 130 t b f;
#X obj 118 304 s \$0-color;
#X obj 202 63 r \$0-done;
#X obj 202 81 t b b;
#X obj 29 100 b;
#X obj 29 47 r \$0-cancel;
#X obj 432 28 inlet properties opened;
#X obj 29 415 outlet close properties;
#X msg 118 285 color \$1 0;
#X obj 257 355 route 0;
#X obj 257 303 t b b;
#X obj 310 357 f;
#X obj 118 262 t f f;
#X obj 310 392 s \$0-label;
#X msg 310 374 color \$1 0;
#X obj 257 83 r \$0-apply;
#X obj 257 101 t b b;
#X obj 335 106 pack \$1 \$2 \$3;
#X obj 335 126 unpack 0 0 0;
#X obj 310 44 loadbang;
#X obj 310 63 t b b;
#X obj 257 414 outlet arguments;
#X obj 257 324 pack 0 \$1 \$2 \$3;
#X obj 154 213 i;
#X obj 190 213 i;
#X obj 228 213 i;
#X obj 432 100 b;
#X obj 432 308 route 0;
#X obj 432 287 pack 0 \$1 \$2 \$3;
#X obj 432 345 s \$0-R;
#X obj 474 345 s \$0-G;
#X obj 515 345 s \$0-B;
#X obj 432 327 unpack 0 0 0;
#X connect 0 0 5 0;
#X connect 1 0 6 0;
#X connect 2 0 7 0;
#X connect 3 0 19 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 5 1 30 0;
#X connect 6 0 4 0;
#X connect 6 1 31 0;
#X connect 7 0 4 0;
#X connect 7 1 32 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 1 23 0;
#X connect 11 0 14 0;
#X connect 12 0 11 0;
#X connect 13 0 33 0;
#X connect 15 0 8 0;
#X connect 16 0 28 0;
#X connect 17 0 29 0;
#X connect 17 1 18 0;
#X connect 18 0 21 0;
#X connect 19 0 15 0;
#X connect 19 1 18 1;
#X connect 21 0 20 0;
#X connect 22 0 23 0;
#X connect 23 0 17 0;
#X connect 24 0 25 0;
#X connect 25 0 5 0;
#X connect 25 1 3 2;
#X connect 25 2 3 3;
#X connect 26 0 27 0;
#X connect 27 0 18 0;
#X connect 27 1 24 0;
#X connect 29 0 16 0;
#X connect 30 0 3 1;
#X connect 30 0 29 1;
#X connect 30 0 35 1;
#X connect 31 0 3 2;
#X connect 31 0 29 2;
#X connect 31 0 35 2;
#X connect 32 0 3 3;
#X connect 32 0 29 3;
#X connect 32 0 35 3;
#X connect 33 0 35 0;
#X connect 34 0 39 0;
#X connect 35 0 34 0;
#X connect 39 0 36 0;
#X connect 39 1 37 0;
#X connect 39 2 38 0;
#X restore 138 304 pd propertyguts;
#X obj 223 331 saveargs;
#X text 43 37 this is a simple abstraction that displays a canvas via
gop.;
#X text 38 168 the canvas-color can be changed via a properties-panel
(which is really the subpatch [\$0-properties]);
#X text 38 196 saving the parent-patch (wherein this abstraction is
embedded will also save the properties);
#X text 228 248 <- enables the "property" menu and emits a bang when
it is selected;
#X text 237 306 <- all the property handling logic;
#X text 277 333 <- handles the overriding of arguments in the parent
patch;
#X text 255 420 <-- the property-panel subpatch;
#X text 42 53 it is used in the "persistent_properties" example.;
#X connect 0 0 2 0;
#X connect 2 0 8 0;
#X connect 2 1 6 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 7 0 5 0;
#X connect 8 0 7 0;
#X connect 8 1 9 0;
#X coords 0 -1 1 1 85 60 2 100 100;