-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathdklisttoclone.pd
171 lines (171 loc) · 4.03 KB
/
dklisttoclone.pd
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
#N canvas 321 356 1388 712 12;
#X obj 197 144 route bang;
#X obj 181 274 list store;
#X obj 173 377 list prepend, f 16;
#X msg 399 381 1;
#X obj 160 421 route 1 0, f 64;
#X obj 257 177 t b a;
#X obj 190 234 t b b, f 18;
#X msg 308 261 0;
#N canvas 1180 516 966 647 dklisttoclone_ctr 0;
#X obj 242 276 f;
#X obj 309 277 + 1;
#X msg 333 237 0;
#X obj 242 226 until;
#X obj 460 218 list length;
#X obj 490 360 >=;
#X obj 237 150 t b b a b, f 48;
#X obj 494 385 sel 1;
#X obj 238 406 pack f 1;
#X msg 238 430 get \$1 \$2;
#X obj 565 203 outlet;
#X text 618 200 start;
#X obj 238 454 outlet;
#X text 291 452 get msg;
#X obj 235 60 inlet;
#X obj 241 315 t f f f, f 36;
#X obj 357 507 outlet;
#X text 422 514 clone instance;
#X text 287 58 list;
#X obj 235 360 * 1;
#X obj 699 74 inlet;
#X text 758 64 num of args;
#X obj 519 323 / 1, f 16;
#X obj 460 242 t f f;
#X obj 237 190 spigot 0;
#X obj 457 273 > 0;
#X obj 574 68 inlet;
#X text 632 68 offset;
#X obj 360 416 + 0, f 32;
#X obj 424 66 inlet;
#X text 478 63 argname;
#X obj 360 450 list append;
#X connect 0 0 1 0;
#X connect 0 0 15 0;
#X connect 1 0 0 1;
#X connect 2 0 0 1;
#X connect 3 0 0 0;
#X connect 4 0 23 0;
#X connect 5 0 7 0;
#X connect 6 0 24 0;
#X connect 6 1 2 0;
#X connect 6 2 4 0;
#X connect 6 3 10 0;
#X connect 7 0 3 1;
#X connect 8 0 9 0;
#X connect 9 0 12 0;
#X connect 14 0 6 0;
#X connect 15 0 19 0;
#X connect 15 1 28 0;
#X connect 15 2 5 0;
#X connect 19 0 8 0;
#X connect 20 0 19 1;
#X connect 20 0 8 1;
#X connect 20 0 22 1;
#X connect 22 0 5 1;
#X connect 23 0 25 0;
#X connect 23 1 22 0;
#X connect 24 0 3 0;
#X connect 25 0 24 1;
#X connect 26 0 28 1;
#X connect 28 0 31 0;
#X connect 29 0 31 1;
#X connect 31 0 16 0;
#X restore 399 504 pd dklisttoclone_ctr;
#X obj 137 608 list prepend, f 49;
#X obj 156 502 spigot 1, f 15;
#X obj 303 503 spigot 0;
#X obj 841 98 inlet;
#X text 891 92 map;
#X obj 824 276 == 0;
#X obj 832 223 t f f, f 16;
#X obj 572 616 outlet;
#X obj 1005 283 inlet;
#X obj 137 632 outlet;
#X obj 529 100 inlet;
#X text 583 94 offset;
#X obj 671 100 inlet;
#X text 722 99 arg size;
#X obj 665 251 max 1;
#X text 632 623 map output;
#X text 191 630 clone msg;
#X obj 196 110 inlet;
#X text 251 115 args list;
#X text 27 8 dklisttoclone - distributing lists to clone instances
;
#X text 23 81 outlets: clone msg \, map output;
#X obj 406 126 loadbang;
#X text 1021 61 derek kwan;
#X text 1026 84 pdkvabs 2018;
#X text 1028 115 gpl v 3;
#X text 19 57 args: argname \, offset \, arg size \, map (no/yes);
#X text 17 34 inlets: args list \, argname \, offset \, arg size \,
map? \, map input;
#X text 1055 285 map input;
#X obj 534 223 f \$2;
#X obj 665 227 f \$3;
#X obj 832 199 f \$4;
#X obj 428 224 symbol \$1;
#X obj 407 169 t b b b b, f 59;
#X obj 433 96 inlet;
#X text 479 74 argname;
#N canvas 561 212 380 314 dklisttoclone_symbolcheck 0;
#X obj 75 49 t s s, f 9;
#X obj 134 78 list fromsymbol;
#X obj 134 102 list length;
#X obj 134 126 > 0;
#X obj 134 150 t f f;
#X obj 98 248 outlet;
#X obj 164 201 sel 0;
#X obj 67 122 spigot 0;
#X obj 77 10 inlet;
#X connect 0 0 7 0;
#X connect 0 1 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 7 1;
#X connect 4 1 6 0;
#X connect 6 0 5 0;
#X connect 7 0 5 0;
#X connect 8 0 0 0;
#X restore 400 279 pd dklisttoclone_symbolcheck;
#X connect 0 0 6 0;
#X connect 0 1 5 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 2 1;
#X connect 4 0 10 0;
#X connect 4 0 11 0;
#X connect 4 1 8 0;
#X connect 5 0 6 0;
#X connect 5 1 1 1;
#X connect 6 0 1 0;
#X connect 6 1 7 0;
#X connect 7 0 2 1;
#X connect 8 0 1 0;
#X connect 8 1 9 1;
#X connect 8 2 3 0;
#X connect 9 0 18 0;
#X connect 10 0 9 0;
#X connect 11 0 16 0;
#X connect 12 0 39 0;
#X connect 14 0 10 1;
#X connect 15 0 14 0;
#X connect 15 1 11 1;
#X connect 17 0 9 0;
#X connect 19 0 37 0;
#X connect 21 0 38 0;
#X connect 23 0 8 3;
#X connect 26 0 0 0;
#X connect 30 0 41 0;
#X connect 37 0 8 2;
#X connect 38 0 23 0;
#X connect 39 0 15 0;
#X connect 40 0 44 0;
#X connect 41 0 40 0;
#X connect 41 1 37 0;
#X connect 41 2 38 0;
#X connect 41 3 39 0;
#X connect 42 0 40 0;
#X connect 44 0 8 1;