mapping/00-rectangle_mapping.pd at main · kubriel/mapping · GitHub

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
#N canvas 1116 13 825 644 10;
#X msg 59 61 0 \, destroy;
#X msg 10 -3 reset;
#X text 116 17 RUN;
#X msg 54 -2 800 600;
#X obj 11 147 gemwin;
#X text 181 72 MOUSE:;
#X obj 120 167 s save_positions;
#X obj 120 132 bng 30 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 157 127 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 157 146 s load_positions;
#X obj 11 126 r togemwin;
#X msg 54 38 dimen \$1 \$2 \, create \, 1;
#X text 371 256 IO:;
#X text 181 87 right button - select/move object;
#X text 371 270 left input - gemlist;
#X text 372 286 left output - gemlist;
#X text 373 300 right output - vertex coordinates;
#X text 180 103 left button - adjust position of selected vertex;
#X obj 183 125 loadbang;
#N canvas 935 122 892 654 cursorcontrol 0;
#X obj 511 496 translateXYZ;
#X obj 156 183 s cur_pos_x;
#X obj 358 129 s cur_pos_y;
#X obj 510 519 circle 0.04;
#X obj 393 480 circle 0.08;
#X obj 390 452 translateXYZ;
#X obj 526 468 color 0 0 0;
#X obj 62 347 t b;
#X obj 56 537 change;
#X msg 52 427 1;
#X msg 86 427 0;
#X obj 259 27 gemmouse 1 1;
#X obj 234 211 pack f f;
#X obj 214 295 list append;
#X obj 233 242 t b l;
#X msg 213 272 position;
#X obj 321 295 list append;
#X msg 320 272 b1;
#X obj 335 210 t b f;
#X obj 288 107 expr ($f1*-2+1)*4;
#X obj 257 335 route list;
#X obj 257 578 s gmouse;
#X obj 468 351 r cur_pos_x;
#X obj 554 356 r cur_pos_y;
#X text 265 546 video_ext is dependent of this in case you want to control cursor by mouse;
#X obj 408 294 list append;
#X obj 422 209 t b f;
#X msg 407 271 b2;
#X obj 520 291 list append;
#X obj 534 206 t b f;
#X msg 519 268 b3;
#X msg 249 386 clear;
#X obj 199 422 s leadspace;
#X msg 212 387 all;
#X msg 164 387 finish;
#X obj 199 357 t b b a b;
#X obj 266 485 spigot;
#X obj 280 441 r vertex_switch;
#X obj 34 243 ||;
#X obj 89 216 t b f;
#X obj 59 463 t b f;
#X obj 25 516 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 61 500 1;
#X obj 26 495 ||;
#X obj 89 486 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 44 301 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 57 596 s vertex_switch;
#X obj 57 575 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X text 75 575 display help points;
#X obj 258 607 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 258 627 s reset;
#X text 309 627 reset all point coordinates;
#X obj 187 522 loadbang;
#X msg 187 542 1;
#X obj 495 61 loadbang;
#X obj 495 101 s togemwin;
#X msg 495 81 cursor 0;
#X obj 381 392 ortho;
#X obj 407 331 loadbang;
#X msg 420 346 compat 0;
#X obj 530 434 ortho;
#X obj 44 321 sel 1;
#X obj 71 404 delay 800;
#X obj 35 264 t f f;
#X obj 394 417 color 1 1 0;
#X obj 523 403 gemhead -11;
#X obj 385 359 gemhead -12;
#X obj 671 132 r togemwin;
#X obj 671 155 route dimen;
#X obj 671 178 unpack f f;
#X obj 671 201 expr $f1/$f2*4;
#X obj 235 151 expr ($f1*2-1)*$f2;
#X floatatom 671 224 5 0 0 0 - - - 0;
#X text 637 295 in case projector moves \, you need this;
#X obj 720 487 s moveall;
#X msg 720 449 \$1 0;
#X obj 720 431 * 0.1;
#X msg 754 358 1;
#X msg 687 358 -1;
#X obj 770 431 * 0.1;
#X msg 721 331 1;
#X msg 770 449 0 \$1;
#X obj 720 468 t a b;
#X text 729 317 ^;
#X text 784 358 >;
#X text 669 359 <;
#X text 727 403 v;
#X floatatom 822 419 5 0 0 0 - - - 0;
#X obj 822 341 vsl 15 51 0 0.1 0 0 empty empty range 0 -9 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 781 487 s skeleton;
#X obj 725 358 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 721 384 -1;
#X connect 0 0 3 0;
#X connect 5 0 4 0;
#X connect 6 0 0 0;
#X connect 7 0 9 0;
#X connect 7 0 62 0;
#X connect 8 0 47 0;
#X connect 8 0 65 0;
#X connect 8 0 66 0;
#X connect 9 0 40 0;
#X connect 10 0 40 0;
#X connect 11 0 71 0;
#X connect 11 1 19 0;
#X connect 11 2 18 0;
#X connect 11 2 38 0;
#X connect 11 3 26 0;
#X connect 11 4 29 0;
#X connect 11 4 39 0;
#X connect 12 0 14 0;
#X connect 13 0 35 0;
#X connect 14 0 15 0;
#X connect 14 0 7 0;
#X connect 14 1 13 1;
#X connect 15 0 13 0;
#X connect 16 0 20 0;
#X connect 17 0 16 0;
#X connect 18 0 17 0;
#X connect 18 1 16 1;
#X connect 19 0 12 1;
#X connect 19 0 2 0;
#X connect 20 0 36 0;
#X connect 22 0 0 1;
#X connect 22 0 5 1;
#X connect 23 0 0 2;
#X connect 23 0 5 2;
#X connect 25 0 20 0;
#X connect 26 0 27 0;
#X connect 26 1 25 1;
#X connect 27 0 25 0;
#X connect 28 0 20 0;
#X connect 29 0 30 0;
#X connect 29 1 28 1;
#X connect 30 0 28 0;
#X connect 31 0 32 0;
#X connect 33 0 32 0;
#X connect 34 0 32 0;
#X connect 35 0 34 0;
#X connect 35 1 33 0;
#X connect 35 2 20 0;
#X connect 35 3 31 0;
#X connect 36 0 21 0;
#X connect 37 0 36 1;
#X connect 38 0 63 0;
#X connect 39 0 38 0;
#X connect 39 1 38 1;
#X connect 40 0 43 0;
#X connect 40 1 43 1;
#X connect 40 1 44 0;
#X connect 42 0 8 0;
#X connect 43 0 8 0;
#X connect 43 0 41 0;
#X connect 45 0 61 0;
#X connect 47 0 46 0;
#X connect 49 0 50 0;
#X connect 52 0 53 0;
#X connect 53 0 47 0;
#X connect 54 0 56 0;
#X connect 56 0 55 0;
#X connect 57 0 64 0;
#X connect 58 0 59 0;
#X connect 59 0 57 0;
#X connect 59 0 60 0;
#X connect 60 0 6 0;
#X connect 61 0 7 0;
#X connect 62 0 10 0;
#X connect 63 0 43 0;
#X connect 63 1 45 0;
#X connect 64 0 5 0;
#X connect 65 0 60 0;
#X connect 66 0 57 0;
#X connect 67 0 68 0;
#X connect 68 0 69 0;
#X connect 69 0 70 0;
#X connect 69 1 70 1;
#X connect 70 0 72 0;
#X connect 71 0 12 0;
#X connect 71 0 1 0;
#X connect 72 0 71 1;
#X connect 75 0 82 0;
#X connect 76 0 75 0;
#X connect 77 0 76 0;
#X connect 78 0 76 0;
#X connect 79 0 81 0;
#X connect 80 0 79 0;
#X connect 81 0 82 0;
#X connect 82 0 74 0;
#X connect 82 1 74 0;
#X connect 88 0 87 0;
#X connect 88 0 79 1;
#X connect 88 0 76 1;
#X connect 90 0 89 0;
#X connect 91 0 79 0;
#X restore 68 101 pd cursorcontrol;
#X msg 70 294 reset;
#X obj 59 231 color 1 0 0;
#X obj 59 211 gemhead 5;
#X obj 59 191 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 97 394 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 97 432 color 1 1 0;
#X obj 97 413 gemhead 4;
#X text 367 512 makes copy of map_rectangle object;
#X text 367 529 useful for alpha blending \, or effects;
#X text 373 332 MUST BE UNIQUE TO WORK PROPERLY;
#X text 372 316 argument is id for filename used to save positions;
#X obj 60 320 map_rectangle qwe;
#X obj 10 81 s togemwin;
#X obj 268 171 delay 0;
#X obj 97 513 set_rectangle qwe;
#X msg 220 294 reset;
#X obj 209 191 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 247 394 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 247 432 color 1 1 0;
#X obj 247 413 gemhead 4;
#X obj 210 320 map_rectangle asd;
#X obj 209 231 color 0 0 1;
#X obj 247 513 set_rectangle asd;
#X obj 209 211 gemhead 7;
#X obj 346 234 t a;
#X msg 54 17 400 300;
#X msg 346 211 1 -5.33 4 \, 2 5.33 4 \, 3 5.33 -4 \, 4 -5 -3;
#X connect 0 0 32 0;
#X connect 1 0 32 0;
#X connect 3 0 11 0;
#X connect 7 0 6 0;
#X connect 8 0 9 0;
#X connect 10 0 4 0;
#X connect 11 0 32 0;
#X connect 18 0 33 0;
#X connect 20 0 31 0;
#X connect 21 0 31 0;
#X connect 22 0 21 0;
#X connect 23 0 22 0;
#X connect 24 0 26 0;
#X connect 25 0 34 0;
#X connect 26 0 25 0;
#X connect 31 1 34 1;
#X connect 33 0 8 0;
#X connect 35 0 40 0;
#X connect 36 0 43 0;
#X connect 37 0 39 0;
#X connect 38 0 42 0;
#X connect 39 0 38 0;
#X connect 40 1 42 1;
#X connect 41 0 40 0;
#X connect 43 0 41 0;
#X connect 44 0 40 1;
#X connect 45 0 11 0;
#X connect 46 0 44 0;