File: agop.device.selector.pd

package info (click to toggle)
pd-pduino 0.8-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 344 kB
  • sloc: makefile: 14
file content (507 lines) | stat: -rw-r--r-- 12,004 bytes parent folder | download | duplicates (3)
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
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
#N canvas 444 43 741 618 10;
#N canvas 278 280 419 327 slider.wrapper 0;
#X obj 20 255 pack f f f;
#X obj 20 233 - 1;
#X obj 20 167 change;
#X obj 20 208 t a a a;
#X obj 77 231 +;
#X msg 20 277 range \$2 \$1 \, set \$3;
#X obj 20 302 s \$0.selector.r;
#X obj 20 145 div 5;
#X obj 20 187 * 5;
#X obj 92 208 mod 5;
#X obj 48 232 + 5;
#X obj 20 48 max 0;
#X obj 20 74 min 1e+37;
#X obj 139 20 inlet;
#X obj 139 42 route range set;
#X obj 139 67 unpack;
#X obj 203 67 r \$0.sens;
#X obj 139 91 *;
#X obj 172 91 *;
#X obj 172 184 div;
#X obj 172 206 change -1e+37;
#X obj 172 228 outlet;
#X obj 182 121 *;
#X obj 20 120 t a a;
#X obj 20 96 t a a;
#X obj 20 17 r \$0.selector.s;
#X msg 159 278 range 5 -1 \, set 2;
#X obj 159 257 loadbang;
#X connect 0 0 5 0;
#X connect 1 0 0 0;
#X connect 2 0 8 0;
#X connect 3 0 1 0;
#X connect 3 1 10 0;
#X connect 3 2 4 0;
#X connect 4 0 0 2;
#X connect 5 0 6 0;
#X connect 7 0 2 0;
#X connect 8 0 3 0;
#X connect 9 0 4 1;
#X connect 10 0 0 1;
#X connect 11 0 12 0;
#X connect 12 0 24 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 14 1 22 0;
#X connect 15 0 17 0;
#X connect 15 1 18 0;
#X connect 16 0 18 1;
#X connect 16 0 17 1;
#X connect 16 0 19 1;
#X connect 16 0 22 1;
#X connect 17 0 11 1;
#X connect 18 0 12 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 22 0 23 0;
#X connect 23 0 7 0;
#X connect 23 1 9 0;
#X connect 24 0 23 0;
#X connect 24 1 19 0;
#X connect 25 0 11 0;
#X connect 26 0 6 0;
#X connect 27 0 26 0;
#X restore 21 237 pd slider.wrapper;
#X obj 20 22 vsl 120 7 5 -1 0 0 \$0.selector.s \$0.selector.r <select_device>
2 4 0 10 -228856 -228856 -1 300 1;
#X msg 48 350 label \$1;
#X obj 48 373 s \$0.selector.r;
#X obj 21 166 t a a;
#X obj 21 192 list length;
#N canvas 683 62 385 462 list.selector.fields 0;
#N canvas 1158 378 142 254 counter 0;
#X obj 10 12 inlet;
#X msg 38 61 -2;
#X obj 10 83 until;
#X obj 10 105 f;
#X obj 37 106 + 1;
#X obj 10 38 t b b a;
#X obj 10 202 list prepend;
#X obj 10 224 outlet;
#X obj 10 126 t a a;
#X obj 10 181 list append;
#X obj 51 156 + 21;
#X obj 51 133 * 11;
#X msg 10 61 6;
#X connect 0 0 5 0;
#X connect 1 0 3 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 8 0;
#X connect 4 0 3 1;
#X connect 5 0 12 0;
#X connect 5 1 1 0;
#X connect 5 2 6 1;
#X connect 6 0 7 0;
#X connect 8 0 9 0;
#X connect 8 1 11 0;
#X connect 9 0 6 0;
#X connect 10 0 9 1;
#X connect 11 0 10 0;
#X connect 12 0 2 0;
#X restore 5 200 pd counter;
#X obj 5 224 t a a;
#X obj 5 442 s;
#X obj 5 246 list trim;
#X obj 159 49 inlet;
#X obj 32 50 del 600;
#X obj 252 72 inlet;
#X msg 5 75 1;
#X msg 32 75 0;
#X obj 5 288 route 1 0;
#N canvas 752 281 288 441 update.labels 0;
#N canvas 646 299 158 272 counter 0;
#X obj 10 12 inlet;
#X msg 10 57 5;
#X msg 38 57 -2;
#X obj 10 79 until;
#X obj 10 101 f;
#X obj 37 102 + 1;
#X obj 10 124 outlet;
#X obj 10 34 t b b;
#X connect 0 0 7 0;
#X connect 1 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 4 1;
#X connect 7 0 1 0;
#X connect 7 1 2 0;
#X restore -47 75 pd counter;
#X obj -47 31 t b a;
#X obj -47 97 list append;
#X obj -47 7 inlet;
#X obj 97 9 inlet;
#X obj -47 119 t a a;
#X msg 16 124 \$1 \$2;
#X obj 16 146 +;
#X obj -47 171 list append;
#X obj -47 193 t a a;
#N canvas 781 423 450 300 get.label.from.id 0;
#X obj 68 94 t b a;
#X obj 68 140 list split;
#X obj 68 118 list append;
#X obj 153 227 list split 1;
#X obj 68 66 - 1;
#X obj 29 42 moses 1;
#X msg 125 168 symbol empty;
#X obj 96 201 route bang;
#X obj 153 250 outlet;
#X obj 29 18 inlet;
#X obj 232 28 inlet;
#X connect 0 0 2 0;
#X connect 0 1 1 1;
#X connect 1 1 7 0;
#X connect 1 2 6 0;
#X connect 2 0 1 0;
#X connect 3 0 8 0;
#X connect 4 0 0 0;
#X connect 5 0 6 0;
#X connect 5 1 4 0;
#X connect 6 0 8 0;
#X connect 7 0 6 0;
#X connect 7 1 3 0;
#X connect 9 0 5 0;
#X connect 10 0 2 1;
#X restore -20 241 pd get.label.from.id;
#X obj -47 266 list append;
#X msg -20 218 \$3;
#X obj -20 310 list prepend \$0;
#X msg -20 332 \; \$1.field.\$2.r label \$5;
#X obj -47 288 t a a;
#X obj -47 365 route 0;
#X msg -47 385 symbol \$3;
#X obj -47 407 outlet;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 1 1 2 1;
#X connect 2 0 5 0;
#X connect 3 0 1 0;
#X connect 4 0 10 1;
#X connect 5 0 8 0;
#X connect 5 1 6 0;
#X connect 6 0 7 0;
#X connect 7 0 8 1;
#X connect 8 0 9 0;
#X connect 9 0 11 0;
#X connect 9 1 12 0;
#X connect 10 0 11 1;
#X connect 11 0 15 0;
#X connect 12 0 10 0;
#X connect 13 0 14 0;
#X connect 15 0 16 0;
#X connect 15 1 13 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X restore 159 95 pd update.labels;
#X obj 32 398 list prepend \$0;
#X msg 32 420 symbol \$1.field.\$3.r;
#X obj 5 333 route 3;
#X obj 126 271 outlet;
#X obj 5 28 t b b;
#X obj 5 97 change;
#X obj 5 5 r \$0.selector.s;
#X obj 159 69 f;
#X msg 159 139 symbol empty;
#N canvas 842 395 450 300 init.cnvs 0;
#X obj 15 184 list prepend \$0;
#X msg 120 137 -187246;
#X msg 42 138 -233017;
#X obj 15 97 t a a;
#X obj 15 163 list append;
#X obj 42 117 sel 0 3;
#X msg 92 137 -1;
#X msg 15 75 3 \, -2 \, -1 \, 1 \, 2 \, 0;
#X obj 15 28 spigot 1;
#X msg 93 45 0;
#X obj 15 50 t b b;
#X obj 15 6 r \$0.selector.s;
#X obj 15 240 s \$0.goparea;
#X msg 15 206 obj 138 21 cnv 1 1 1 empty \$1.field.\$2.r empty 1 5
0 10 \$3 -1 0;
#X connect 0 0 13 0;
#X connect 1 0 4 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 3 1 5 0;
#X connect 4 0 0 0;
#X connect 5 0 2 0;
#X connect 5 1 6 0;
#X connect 5 2 1 0;
#X connect 6 0 4 1;
#X connect 7 0 3 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 10 0 7 0;
#X connect 10 1 9 0;
#X connect 11 0 8 0;
#X connect 13 0 12 0;
#X restore 277 12 pd init.cnvs;
#X obj 159 117 select -------;
#X obj 126 162 symbol;
#X obj 107 94 sel 1 0;
#X obj 126 183 t a a;
#X obj 269 217 symbol;
#X msg 269 239 show \$1;
#X msg 126 249 select \$1;
#X obj 242 194 del 0;
#X obj 126 205 sel -------;
#X obj 126 227 t a a;
#X obj 301 72 inlet;
#X obj 242 173 t b b;
#X obj 242 151 r \$0.show.s;
#X obj 5 118 t a a a;
#X obj 44 139 sel 1;
#X obj 23 171 s \$0.refresh;
#X msg 39 313 pos 138 21 \, vis_size 1 1 \, label empty \, size 1;
#X msg 44 358 pos 21 \$2 \, vis_size 118 10;
#X msg 5 377 pos 19 -3 \, vis_size 122 58;
#X msg 278 102 symbol _;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 1 1 11 0;
#X connect 3 0 9 0;
#X connect 4 0 18 0;
#X connect 5 0 8 0;
#X connect 6 0 10 1;
#X connect 7 0 16 0;
#X connect 8 0 16 0;
#X connect 9 0 13 0;
#X connect 9 1 37 0;
#X connect 10 0 21 0;
#X connect 11 0 12 0;
#X connect 12 0 2 1;
#X connect 13 0 39 0;
#X connect 13 1 38 0;
#X connect 15 0 7 0;
#X connect 15 1 5 0;
#X connect 16 0 34 0;
#X connect 17 0 15 0;
#X connect 18 0 10 0;
#X connect 19 0 22 1;
#X connect 21 0 19 0;
#X connect 21 1 22 1;
#X connect 22 0 24 0;
#X connect 23 0 18 0;
#X connect 23 1 22 0;
#X connect 24 0 29 0;
#X connect 24 1 25 1;
#X connect 25 0 26 0;
#X connect 26 0 14 0;
#X connect 27 0 14 0;
#X connect 28 0 8 0;
#X connect 29 1 30 0;
#X connect 30 0 27 0;
#X connect 30 1 29 1;
#X connect 31 0 40 0;
#X connect 32 0 28 0;
#X connect 32 1 25 0;
#X connect 33 0 32 0;
#X connect 34 0 23 0;
#X connect 34 1 0 0;
#X connect 34 2 35 0;
#X connect 35 0 36 0;
#X connect 37 0 2 0;
#X connect 38 0 2 0;
#X connect 39 0 2 0;
#X connect 40 0 29 1;
#X restore 21 261 pd list.selector.fields;
#X msg 21 214 range 1 \$1;
#X obj 21 285 route select;
#X obj 21 306 list;
#X obj 21 95 list prepend -------;
#X obj 231 46 namecanvas \$0.goparea;
#N canvas 978 347 154 108 INIT 0;
#X obj 10 10 loadbang;
#X obj 10 32 \$0;
#X msg 10 54 \; \$1.sens 5 \;;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X restore 231 24 pd INIT;
#X obj 21 328 t a a;
#N canvas 813 433 239 282 get.device.list 0;
#X obj -102 108 r \$1.ARDUINO.INFO;
#X msg -103 61 ports;
#X obj -122 15 inlet;
#X obj -102 130 route ports;
#X obj -122 37 t b b b;
#X msg -102 152 symbol \$2;
#X obj -102 177 list prepend;
#X obj -10 176 t a;
#X obj -122 206 list append;
#X obj 18 127 t b;
#X obj -122 235 outlet;
#X obj -103 85 s \$1.ARDUINO.TO;
#X connect 0 0 3 0;
#X connect 1 0 11 0;
#X connect 2 0 4 0;
#X connect 3 0 5 0;
#X connect 4 0 8 0;
#X connect 4 1 1 0;
#X connect 4 2 9 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 6 0 8 1;
#X connect 7 0 6 1;
#X connect 8 0 10 0;
#X connect 9 0 6 1;
#X connect 9 0 8 1;
#X restore 21 71 pd get.device.list;
#X obj 21 47 r \$0.refresh;
#X msg 276 418 devicename \$1;
#X msg 21 425 close;
#X msg 456 511 1;
#X msg 420 514 0;
#X msg 496 540 serial.com \$1;
#X obj 496 577 s \$1.ARDUINO.INTERN;
#X obj 21 553 s \$1.ARDUINO.TO;
#X obj 233 137 s \$0.selector.r;
#X obj 233 88 loadbang;
#X msg 233 114 label <select_device>;
#N canvas 919 232 262 586 handle.incoming 0;
#N canvas 813 461 184 226 get.device.list 0;
#X obj -121 90 r \$1.ARDUINO.INFO;
#X msg -122 43 ports;
#X obj -122 15 inlet;
#X obj -121 112 route ports;
#X obj -121 138 outlet;
#X obj -122 67 s \$1.ARDUINO.TO;
#X connect 0 0 3 0;
#X connect 1 0 5 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X restore 31 186 pd get.device.list;
#X obj 31 230 list prepend 0;
#X obj 14 62 t a b;
#X obj 67 64 t a b;
#X msg 94 86 1;
#X msg 41 86 0;
#X obj 31 250 route 0 1;
#X obj 14 112 list;
#X obj 31 303 sel 0;
#X msg 31 273 \$1;
#X msg 73 279 symbol \$2;
#X obj 73 303 sel _;
#X obj 48 159 route float symbol;
#X obj 31 208 t a a;
#X msg 164 278 symbol \$2;
#X obj 31 334 symbol;
#X msg 58 377 label \$1;
#X obj 58 400 s \$0.selector.r;
#X obj 31 356 t b a;
#X obj 14 18 r \$1.ARDUINO.IN;
#X obj 14 40 route open devicename close;
#X msg 120 428 0;
#X msg 31 397 1;
#X obj 14 458 outlet;
#X obj 14 425 f;
#X obj 14 134 t b b a b;
#X msg 232 279 0;
#X connect 0 0 13 0;
#X connect 1 0 6 0;
#X connect 2 0 7 0;
#X connect 2 1 5 0;
#X connect 3 0 7 0;
#X connect 3 1 4 0;
#X connect 4 0 1 1;
#X connect 5 0 1 1;
#X connect 6 0 9 0;
#X connect 6 1 10 0;
#X connect 7 0 25 0;
#X connect 8 0 15 0;
#X connect 9 0 8 0;
#X connect 10 0 11 0;
#X connect 11 0 15 0;
#X connect 12 0 8 1;
#X connect 12 1 11 1;
#X connect 13 0 1 0;
#X connect 13 1 14 0;
#X connect 14 0 15 1;
#X connect 15 0 18 0;
#X connect 16 0 17 0;
#X connect 18 0 22 0;
#X connect 18 1 16 0;
#X connect 19 0 20 0;
#X connect 20 0 2 0;
#X connect 20 1 3 0;
#X connect 20 2 21 0;
#X connect 21 0 23 0;
#X connect 22 0 24 1;
#X connect 24 0 23 0;
#X connect 25 0 24 0;
#X connect 25 1 0 0;
#X connect 25 2 12 0;
#X connect 25 3 26 0;
#X connect 26 0 24 1;
#X restore 496 199 pd handle.incoming;
#X msg 186 529 emulate \$1;
#X msg 214 503 1;
#X msg 186 503 0;
#X obj 21 448 t a b b;
#X obj 496 376 t a a;
#X obj 523 431 sel 1;
#X obj 276 440 t a b b;
#X obj 496 221 t a b;
#X obj 27 117 list append emulation_(v2.2);
#X obj 27 139 list append emulation_(v2.3);
#X obj 21 395 sel empty emulation_(v2.2) emulation_(v2.3);
#X obj 106 428 t b b b;
#X obj 191 422 t b b b;
#X msg 309 279 2 3;
#X msg 309 308 version \$1 \$2;
#X obj 309 330 s \$1.ARDUINO.INFO;
#X msg 277 279 2 2;
#X connect 0 0 6 0;
#X connect 2 0 3 0;
#X connect 4 0 5 0;
#X connect 4 1 6 1;
#X connect 5 0 7 0;
#X connect 6 0 8 0;
#X connect 7 0 0 0;
#X connect 8 0 9 0;
#X connect 9 0 13 0;
#X connect 10 0 4 0;
#X connect 13 0 37 0;
#X connect 13 1 2 0;
#X connect 14 0 10 0;
#X connect 15 0 14 0;
#X connect 16 0 33 0;
#X connect 17 0 30 0;
#X connect 18 0 20 0;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 24 0 25 0;
#X connect 25 0 23 0;
#X connect 26 0 34 0;
#X connect 27 0 21 0;
#X connect 28 0 27 0;
#X connect 29 0 27 0;
#X connect 30 0 22 0;
#X connect 30 1 19 0;
#X connect 30 2 29 0;
#X connect 31 0 20 0;
#X connect 31 1 32 0;
#X connect 32 0 29 0;
#X connect 33 0 22 0;
#X connect 33 1 18 0;
#X connect 33 2 29 0;
#X connect 34 0 31 0;
#X connect 34 1 6 2;
#X connect 35 0 36 0;
#X connect 37 0 17 0;
#X connect 37 1 38 0;
#X connect 37 2 39 0;
#X connect 37 3 16 0;
#X connect 38 0 43 0;
#X connect 38 1 18 0;
#X connect 38 2 28 0;
#X connect 39 0 40 0;
#X connect 39 1 18 0;
#X connect 39 2 28 0;
#X connect 40 0 41 0;
#X connect 41 0 42 0;
#X connect 43 0 41 0;
#X coords 0 -1 1 1 120 12 2 20 20;