forked from LGoodacre/context-sequencer
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathfinder.pd
216 lines (216 loc) · 5.36 KB
/
finder.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
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
#N canvas 694 294 450 300 10;
#X declare -lib zexy -path zexy -path ./;
#N canvas 385 203 920 511 load 1;
#X obj 96 4 loadbang;
#X text 284 156 coords xfrom yfrom xto yto xsize ysize type xmargin
ymargin;
#X obj 129 404 iemguts/sendcanvas 1;
#X obj 379 288 until;
#X obj 379 310 f;
#X obj 409 310 + 1;
#X obj 490 303 - 15;
#X msg 379 353 obj \$3 0 ctxfiles/gbang \$2 \$1;
#X obj 96 25 ctxfiles/myinit 3;
#X obj 278 17 f 1;
#X obj 278 39 v findon)()(;
#X obj 288 63 s findon)()(;
#X msg 472 204 resize \$1;
#X obj 472 226 array define \$0-init 1;
#X obj 129 69 iemguts/canvasargs 1;
#X obj 129 157 s tyhjr(jK@;
#X obj 129 91 t a b;
#X obj 161 113 f \$0;
#X obj 161 135 v (dollarzero);
#X obj 129 246 pack 0 300 200;
#X msg 129 272 coords 0 0 1 1 \$2 \$3 1 0 0;
#X obj 176 222 receive \$0-:x;
#X obj 224 200 receive \$0-:y;
#X obj 372 186 receive \$0-:n;
#X obj 8 161 s \$0-:x;
#X obj 490 282 receive \$0-:x;
#X obj 379 332 pack f \$0 285;
#X obj 347 396 pack \$0 285;
#X obj 35 186 s \$0-:y;
#X obj 478 62 t f f;
#X obj 510 109 -;
#X obj 510 131 s \$0-s2;
#X obj 450 87 s \$0-s1;
#X obj 4 25 receive \$0-:k;
#X obj 4 47 * 0.01;
#X obj 4 69 s \$0-k1;
#X obj 478 41 * 0.01;
#X obj 510 87 swap 1;
#X obj 62 160 s \$0-:k;
#X obj 347 265 t b f f;
#X obj -19 112 pack 0 300 200 5 33;
#X obj 478 19 receive \$0-:m;
#X obj 90 186 s \$0-:m;
#X obj -19 134 unpack f f f f f;
#X obj 347 243 f 10;
#X obj 96 47 t b b b b b b;
#X obj 27 314 s \$0-star;
#X msg 347 419 obj \$2 0 tgl 15 0 \$1-onoff \$1-star empty 17 7 0 10
-262144 -1 -1 0 1, f 68;
#X obj 27 292 f;
#X obj -22 258 route bang;
#X obj -22 280 f 1;
#X obj -22 236 receive \$0-:start;
#X obj 665 49 ctxfiles/license;
#X obj 665 112 declare -lib zexy -path zexy -path ./;
#X obj 664 137 ctxfiles/share ctxfiles/finder-share;
#X connect 0 0 8 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 26 0;
#X connect 5 0 4 1;
#X connect 6 0 26 2;
#X connect 6 0 27 1;
#X connect 7 0 2 0;
#X connect 8 0 45 0;
#X connect 9 0 10 0;
#X connect 9 0 11 0;
#X connect 12 0 13 0;
#X connect 14 0 16 0;
#X connect 16 0 15 0;
#X connect 16 1 17 0;
#X connect 17 0 18 0;
#X connect 19 0 20 0;
#X connect 20 0 2 0;
#X connect 21 0 19 1;
#X connect 21 0 40 1;
#X connect 22 0 19 2;
#X connect 22 0 40 2;
#X connect 23 0 44 1;
#X connect 25 0 6 0;
#X connect 26 0 7 0;
#X connect 27 0 47 0;
#X connect 29 0 32 0;
#X connect 29 1 37 0;
#X connect 30 0 31 0;
#X connect 33 0 34 0;
#X connect 33 0 40 3;
#X connect 34 0 35 0;
#X connect 36 0 29 0;
#X connect 37 0 30 0;
#X connect 37 1 30 1;
#X connect 39 0 27 0;
#X connect 39 1 3 0;
#X connect 39 2 12 0;
#X connect 40 0 43 0;
#X connect 41 0 36 0;
#X connect 41 0 40 4;
#X connect 43 1 24 0;
#X connect 43 2 28 0;
#X connect 43 3 38 0;
#X connect 43 4 42 0;
#X connect 44 0 39 0;
#X connect 45 0 40 0;
#X connect 45 1 48 0;
#X connect 45 2 44 0;
#X connect 45 3 19 0;
#X connect 45 4 14 0;
#X connect 45 5 9 0;
#X connect 47 0 2 0;
#X connect 48 0 46 0;
#X connect 49 0 50 0;
#X connect 49 1 48 1;
#X connect 50 0 48 1;
#X connect 51 0 49 0;
#X restore 106 -72 pd load;
#N canvas 482 262 855 475 move 0;
#X obj 179 37 list;
#X obj 199 138 f;
#X obj 199 160 + 1;
#X obj 199 204 makefilename \$0-%i-go;
#X obj 179 232 send;
#X obj 52 198 metro 50;
#X obj 59 176 moses 1;
#X obj 52 220 s \$0-count-1;
#X obj 52 106 receive \$0-onoff;
#X obj 179 82 spigot;
#X obj 372 107 iemguts/oreceive \$0-noo;
#X obj 372 81 makefilename %sfind;
#X obj 397 136 makefilename \$0-%i-gon;
#X obj 372 158 send;
#X text 143 331 0: float and benign symbols \; 1: bang or problematic
symbols \; 2: = symbol;
#X obj 360 247 t f;
#X obj 389 225 cyclone/iter;
#X obj 389 247 route float;
#X obj 439 269 f 1;
#X obj 389 269 spigot;
#X obj 448 291 t f;
#X obj 389 339 send;
#X obj 414 317 makefilename \$0-%i-god;
#X obj 179 112 t a b a b b;
#X obj 389 291 t f f b;
#X obj 413 390 array set \$0-init;
#X obj 596 110 keyname;
#X obj 642 134 sel Shift_L Shift_R Space;
#X obj 670 169 f 1;
#X obj 756 169 f 2;
#X obj 814 161 t b;
#X obj 814 183 t f;
#X obj 596 210 demux 0 1 2;
#X obj 633 296 s ffshift5t6y2;
#X obj 670 266 s ffspace5t6y2;
#X obj 670 235 sel 1;
#X obj 179 15 receive \$0-:l;
#X obj 238 160 receive \$0-:n;
#X obj 59 154 receive \$0-:s;
#X obj 179 60 iemguts/oreceive context-;
#X obj 199 182 mod 10;
#X connect 0 0 11 0;
#X connect 0 0 39 0;
#X connect 1 0 2 0;
#X connect 2 0 1 1;
#X connect 2 0 40 0;
#X connect 3 0 4 1;
#X connect 5 0 7 0;
#X connect 6 1 5 1;
#X connect 8 0 5 0;
#X connect 8 0 9 1;
#X connect 9 0 23 0;
#X connect 10 0 13 0;
#X connect 11 0 10 0;
#X connect 12 0 13 1;
#X connect 15 0 19 0;
#X connect 16 0 17 0;
#X connect 17 0 19 0;
#X connect 18 0 19 1;
#X connect 19 0 24 0;
#X connect 20 0 19 1;
#X connect 22 0 21 1;
#X connect 23 0 4 0;
#X connect 23 1 15 0;
#X connect 23 2 16 0;
#X connect 23 3 18 0;
#X connect 23 4 1 0;
#X connect 24 0 21 0;
#X connect 24 1 25 0;
#X connect 24 2 20 0;
#X connect 26 0 32 0;
#X connect 26 1 27 0;
#X connect 27 0 28 0;
#X connect 27 1 28 0;
#X connect 27 2 29 0;
#X connect 27 3 30 0;
#X connect 28 0 32 1;
#X connect 29 0 32 1;
#X connect 30 0 31 0;
#X connect 31 0 32 1;
#X connect 32 1 33 0;
#X connect 32 2 35 0;
#X connect 35 0 34 0;
#X connect 36 0 0 0;
#X connect 37 0 40 1;
#X connect 38 0 6 0;
#X connect 39 0 9 0;
#X connect 40 0 3 0;
#X connect 40 0 12 0;
#X connect 40 0 22 0;
#X connect 40 0 25 1;
#X restore 164 -72 pd move;
#X obj -15 0 tgl 15 0 23763-onoff 23763-nop empty 17 7 0 10 -262144
-1 -1 0 1;
#X coords 0 300 1 299 200 140 0;