context-sequencer/mover.pd at master · LGoodacre/context-sequencer · 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
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
#N canvas 218 288 511 321 10;
#X declare -lib zexy -path zexy -path ./;
#N canvas 200 89 671 679 move 1;
#X obj 88 67 spigot;
#X obj 272 709 iemguts/canvasindex 1;
#X obj 95 735 iemguts/canvasobjectposition 2;
#X obj 178 688 t a b;
#N canvas 537 187 497 406 condition 0;
#X obj 176 127 unpack f f;
#X obj 85 22 inlet;
#X obj 195 204 >=;
#X obj 252 204 >=;
#X text 217 62 from mousegrid >>;
#X obj 191 105 unpack f f;
#X obj 176 153 -;
#X obj 233 153 -;
#X obj 233 179 t f f f;
#X obj 176 179 t f f f;
#X obj 252 229 +;
#X obj 195 229 +;
#X obj 195 251 +;
#X obj 195 273 == 4;
#X obj 259 127 unpack f f;
#X obj 176 297 spigot;
#X obj 233 297 spigot;
#X obj 176 350 outlet;
#X obj 85 44 t b a;
#X obj 85 86 list;
#X obj 85 65 ctxfiles/deb 200;
#X obj 176 325 demux;
#X obj 233 325 spigot;
#X obj 233 350 outlet;
#X obj 139 43 sel 0;
#X obj 85 110 t b a a;
#X obj 85 135 s \$0-anyp;
#X obj 326 127 receive \$0-startsz;
#X obj 139 21 ctxfiles/dvr \$0 key;
#X obj 194 43 ctxfiles/dvr \$0 mup;
#X obj 191 81 ctxfiles/dvr \$0 mycpos;
#X obj 20 179 ctxfiles/dvs \$0 preview;
#X obj 278 298 ctxfiles/dvr \$0 ymode;
#X obj 259 105 ctxfiles/dvr \$0 cursorsz;
#X obj 85 297 s moveon&&u*p;
#X obj 116 227 t f;
#X obj 291 153 ctxfiles/dvr \$0 xzoomdiv;
#X obj 331 179 ctxfiles/dvr \$0 yzoomdiv;
#X obj 259 153 + 12;
#X obj 299 179 + 12;
#X obj 215 204 <= 48;
#X obj 272 204 <= 60;
#X connect 0 0 6 0;
#X connect 0 1 7 0;
#X connect 1 0 18 0;
#X connect 2 0 11 0;
#X connect 3 0 10 0;
#X connect 5 0 6 1;
#X connect 5 1 7 1;
#X connect 6 0 9 0;
#X connect 7 0 8 0;
#X connect 8 0 16 0;
#X connect 8 1 3 0;
#X connect 8 2 41 0;
#X connect 9 0 15 0;
#X connect 9 1 2 0;
#X connect 9 2 40 0;
#X connect 10 0 12 1;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 15 1;
#X connect 13 0 16 1;
#X connect 13 0 34 0;
#X connect 14 0 38 0;
#X connect 14 1 39 0;
#X connect 15 0 21 0;
#X connect 16 0 22 0;
#X connect 18 0 20 0;
#X connect 18 1 19 1;
#X connect 19 0 25 0;
#X connect 20 0 19 0;
#X connect 21 0 17 0;
#X connect 22 0 23 0;
#X connect 24 0 20 1;
#X connect 24 0 35 0;
#X connect 25 0 26 0;
#X connect 25 1 0 0;
#X connect 25 2 31 0;
#X connect 27 0 14 0;
#X connect 28 0 24 0;
#X connect 29 0 20 2;
#X connect 30 0 5 0;
#X connect 32 0 21 1;
#X connect 32 0 22 1;
#X connect 33 0 14 0;
#X connect 35 0 34 0;
#X connect 36 0 38 1;
#X connect 37 0 39 1;
#X connect 38 0 40 1;
#X connect 39 0 41 1;
#X connect 40 0 11 1;
#X connect 41 0 10 1;
#X restore 178 285 pd condition;
#X obj 178 330 pack f 1;
#X msg 247 330 1 \$1;
#X text 4 709 replace: mclick \, ymode \, mup \, click2;
#X obj 88 36 mux;
#X obj 159 189 * 12;
#X obj 216 189 * 12;
#X obj 307 207 unpack f f;
#X obj 159 214 +;
#X obj 216 214 +;
#X obj 128 112 demux 0 1 2;
#X obj 302 8 == 1;
#X obj 352 -41 - 1;
#X obj 302 -41 moses 1;
#X obj 302 -64 mod 4;
#X obj 336 8 == 2;
#X obj 205 360 demux;
#X obj 274 360 demux;
#X obj 178 307 t f f;
#X obj 247 307 t f f;
#X obj 232 660 demux;
#X obj 461 330 sel 0;
#X obj 88 89 demux;
#X obj 52 620 receive \$0-posereset;
#X obj 392 286 cyclone/iter;
#X obj 392 308 route symbol;
#X obj 392 330 s \$0-sarg;
#X obj 392 240 inlet;
#X obj 159 163 unpack;
#X obj 159 241 pack;
#X obj 392 262 list append \$1 \$2;
#X msg 232 638 s + \$1;
#X obj 352 409 f 1;
#X obj 283 411 t f;
#X obj 249 503 >;
#X obj 249 454 ctxfiles/sp01;
#X obj 301 385 t b f f b;
#X obj 232 385 t b f f b;
#X obj 302 -15 t f f f f;
#X obj 372 46 change;
#X obj 372 68 t b;
#X obj 249 525 t b f;
#X obj 276 547 * 2;
#X obj 276 569 - 1;
#X obj 249 594 f 0.01;
#X obj 249 616 * 1;
#X obj 249 476 change;
#X obj 225 688 ctxfiles/dvs \$0 mmovex;
#X obj 320 668 ctxfiles/dvs \$0 mmovey;
#X obj 307 183 ctxfiles/dvr \$0 mycpos;
#X obj 141 57 ctxfiles/dvr \$0 move-disable;
#X obj 121 35 ctxfiles/dvr \$0 shift;
#X obj 95 12 ctxfiles/dvr \$0 mousegrid;
#X obj 88 -12 ctxfiles/dvr \$0 motion;
#X obj 302 -86 ctxfiles/dvr \$0 click2;
#X obj 180 138 ctxfiles/dvrv \$0 xzoomdiv;
#X obj 308 159 ctxfiles/dvrv \$0 yzoomdiv;
#X connect 0 0 26 0;
#X connect 1 0 2 1;
#X connect 3 0 2 0;
#X connect 3 1 1 0;
#X connect 4 0 22 0;
#X connect 4 1 23 0;
#X connect 5 0 3 0;
#X connect 6 0 3 0;
#X connect 8 0 0 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 11 0 12 1;
#X connect 11 1 13 1;
#X connect 12 0 33 0;
#X connect 13 0 33 1;
#X connect 14 0 4 0;
#X connect 14 1 32 0;
#X connect 14 2 4 0;
#X connect 15 0 8 2;
#X connect 16 0 42 0;
#X connect 17 0 42 0;
#X connect 17 1 16 0;
#X connect 18 0 17 0;
#X connect 19 0 20 1;
#X connect 19 0 21 1;
#X connect 20 0 51 0;
#X connect 20 1 41 0;
#X connect 21 0 52 0;
#X connect 21 1 40 0;
#X connect 22 0 5 0;
#X connect 22 1 20 0;
#X connect 23 0 6 0;
#X connect 23 1 21 0;
#X connect 24 0 51 0;
#X connect 24 1 52 0;
#X connect 25 1 48 1;
#X connect 26 0 14 0;
#X connect 27 0 3 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 1 25 0;
#X connect 31 0 34 0;
#X connect 32 0 9 0;
#X connect 32 1 10 0;
#X connect 33 0 4 0;
#X connect 34 0 28 0;
#X connect 35 0 24 0;
#X connect 36 0 24 1;
#X connect 37 0 24 1;
#X connect 38 0 45 0;
#X connect 39 0 50 0;
#X connect 40 0 39 2;
#X connect 40 1 38 1;
#X connect 40 2 39 0;
#X connect 40 3 36 0;
#X connect 41 0 39 2;
#X connect 41 1 38 1;
#X connect 41 2 39 0;
#X connect 41 3 37 0;
#X connect 42 0 15 0;
#X connect 42 1 14 1;
#X connect 42 2 19 0;
#X connect 42 3 43 0;
#X connect 43 0 44 0;
#X connect 44 0 39 1;
#X connect 45 0 48 0;
#X connect 45 1 46 0;
#X connect 46 0 47 0;
#X connect 47 0 49 1;
#X connect 48 0 49 0;
#X connect 49 0 35 0;
#X connect 50 0 38 0;
#X connect 53 0 11 0;
#X connect 54 0 26 1;
#X connect 55 0 0 1;
#X connect 56 0 8 1;
#X connect 57 0 8 0;
#X connect 58 0 18 0;
#X connect 59 0 9 1;
#X connect 60 0 10 1;
#X restore 317 95 pd move;
#N canvas 362 296 672 460 size 0;
#X obj 264 162 demux;
#X obj 179 355 iemguts/sendcanvas 1;
#X obj 149 232 * 2;
#X msg 179 280 menu-open;
#X msg 119 303 vis 0;
#X obj 134 280 sel 0;
#X obj 91 355 s \$0-posereset;
#X obj 215 308 list prepend;
#X obj 205 100 unpack f f;
#X obj 205 122 - 1;
#X obj 262 122 - 1;
#X obj 205 144 pack f f;
#X obj 310 78 t b f;
#X obj 205 78 list 46 34;
#X obj 205 55 t b a;
#X obj -15 145 sel 1;
#X obj -15 167 t f;
#X msg 215 335 coords 1 -1 1 1 \$1 \$2 \$3 0 3;
#X msg 334 209 \$1 1;
#X msg 291 209 1 \$2;
#X obj 307 184 demux;
#X obj 264 184 demux;
#X msg 264 231 2 \$2;
#X msg 306 231 \$1 2;
#X obj 396 111 change;
#X obj 396 134 t b b f f;
#X obj 478 158 t b b;
#X obj 478 136 inlet;
#X obj 478 224 pack;
#X obj 478 247 s \$0-startsz;
#X obj 164 255 f 1;
#X obj 396 156 f 1;
#X obj 310 56 ctxfiles/dvr \$0 ymode;
#X obj 396 89 ctxfiles/dvr \$0 mocol;
#X obj 205 13 ctxfiles/dvr \$0 cursorsz;
#X obj -15 123 ctxfiles/dvr \$0 move-disable;
#X obj 83 175 ctxfiles/dvr \$0 shift;
#X obj 505 180 ctxfiles/dv \$0 yszz;
#X obj 478 202 ctxfiles/dv \$0 xszz;
#X obj 91 332 pack 0 -20;
#X obj 119 206 t b f f b b f;
#X obj 194 231 sel 0;
#X obj 194 255 pack f f;
#X connect 0 0 21 0;
#X connect 0 1 20 0;
#X connect 2 0 7 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 39 0;
#X connect 7 0 17 0;
#X connect 8 0 9 0;
#X connect 8 1 10 0;
#X connect 9 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 0 0;
#X connect 12 0 13 0;
#X connect 12 1 0 1;
#X connect 13 0 8 0;
#X connect 14 0 13 0;
#X connect 14 1 13 1;
#X connect 15 0 16 0;
#X connect 16 0 40 0;
#X connect 17 0 1 0;
#X connect 18 0 7 1;
#X connect 19 0 7 1;
#X connect 20 0 23 0;
#X connect 20 1 18 0;
#X connect 21 0 22 0;
#X connect 21 1 19 0;
#X connect 22 0 7 1;
#X connect 23 0 7 1;
#X connect 24 0 25 0;
#X connect 25 0 31 0;
#X connect 25 1 11 0;
#X connect 25 2 21 1;
#X connect 25 3 20 1;
#X connect 26 0 38 0;
#X connect 26 1 37 0;
#X connect 27 0 26 0;
#X connect 28 0 14 0;
#X connect 28 0 29 0;
#X connect 30 0 7 0;
#X connect 31 0 40 0;
#X connect 32 0 12 0;
#X connect 33 0 24 0;
#X connect 34 0 14 0;
#X connect 35 0 15 0;
#X connect 36 0 40 0;
#X connect 37 0 28 1;
#X connect 38 0 28 0;
#X connect 39 0 6 0;
#X connect 40 0 4 0;
#X connect 40 1 5 0;
#X connect 40 2 2 0;
#X connect 40 3 30 0;
#X connect 40 4 3 0;
#X connect 40 5 41 0;
#X connect 41 0 42 0;
#X connect 42 0 6 0;
#X restore 294 141 pd size;
#N canvas 657 364 450 351 save 0;
#X obj 112 56 receive \$0-anyp;
#X obj 112 171 del 1000;
#X obj 112 101 t b b;
#X obj 139 146 sel 0;
#X obj 112 199 f;
#X obj 112 221 t f b;
#X obj 153 221 t f;
#X msg 218 71 1;
#X obj 112 78 spigot;
#X obj 218 48 sel save;
#X text 274 49 switch on given condition;
#X text 41 39 receive any movement;
#X text 180 153 receive any modification;
#X text 184 234 finish and reset;
#X obj 112 243 sel 1;
#X msg 112 265 menusave;
#X obj 112 287 iemguts/sendcanvas 2;
#X obj 218 25 receive \$0-sarg;
#X obj 139 124 ctxfiles/dv \$0 xyprot;
#X connect 0 0 8 0;
#X connect 1 0 4 0;
#X connect 2 0 1 0;
#X connect 2 1 18 0;
#X connect 3 1 4 1;
#X connect 4 0 5 0;
#X connect 5 0 14 0;
#X connect 5 1 6 0;
#X connect 6 0 4 1;
#X connect 7 0 8 1;
#X connect 8 0 2 0;
#X connect 9 0 7 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 9 0;
#X connect 18 0 3 0;
#X restore 313 118 pd save;
#X obj 294 51 t b b b;
#X obj 340 73 ctxfiles/dvs \$0 backsplash;
#X obj 100 198 ctxfiles/license;
#X obj 110 171 declare -lib zexy -path zexy -path ./;
#X obj 294 29 ctxfiles/dvi \$0 3 loadbang;
#X connect 3 0 1 0;
#X connect 3 1 0 0;
#X connect 3 2 4 0;
#X connect 7 0 3 0;
#X coords 0 321 1 320 311 2 0;