-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy patharray-search-help.pd
More file actions
213 lines (213 loc) · 5.39 KB
/
array-search-help.pd
File metadata and controls
213 lines (213 loc) · 5.39 KB
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
#N canvas 1084 32 736 527 10;
#N canvas 910 404 501 627 fill 0;
#X obj 261 21 loadbang;
#X obj 65 134 until;
#X obj 84 196 f;
#X obj 121 197 + 1;
#X obj 131 42 inlet;
#X msg 119 136 0;
#X obj 311 164 + 1;
#X obj 271 129 until;
#X obj 269 201 t f f;
#X obj 230 45 t b b;
#X obj 355 247 - 1;
#X obj 192 469 f;
#X obj 368 46 inlet;
#X obj 45 344 until;
#X obj 84 376 f;
#X obj 121 377 + 1;
#X msg 99 316 0;
#X obj 77 241 t f f;
#X obj 132 67 t b b b;
#X obj 373 78 s \$0-reverse;
#X obj 272 369 r \$0-reverse;
#X obj 84 444 t b f;
#X obj 246 422 f;
#X obj 246 447 sel 1;
#X obj 43 582 tabwrite array-search-help;
#X obj 246 505 array-reverse array-search-help;
#X obj 271 164 f 1;
#X obj 178 248 array-shuffle squares;
#X obj 319 295 tabwrite squares;
#X obj 3 274 tabread squares;
#X msg 271 95 368;
#X msg 65 107 368;
#X msg 196 164 0 368;
#X obj 307 401 loadbang;
#X msg 307 426 2;
#X obj 307 449 pow 24;
#X obj 307 474 - 97432;
#X obj 274 332 array define squares 368;
#X msg 317 127 1;
#X obj 26 317 pow 2;
#X connect 0 0 9 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 17 0;
#X connect 3 0 2 1;
#X connect 4 0 18 0;
#X connect 5 0 2 1;
#X connect 6 0 26 1;
#X connect 7 0 26 0;
#X connect 8 0 28 0;
#X connect 8 1 10 0;
#X connect 9 0 18 0;
#X connect 9 1 30 0;
#X connect 10 0 28 1;
#X connect 11 0 24 0;
#X connect 12 0 19 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 14 0 21 0;
#X connect 15 0 14 1;
#X connect 16 0 14 1;
#X connect 17 0 29 0;
#X connect 17 1 11 1;
#X connect 18 0 22 0;
#X connect 18 1 31 0;
#X connect 18 2 16 0;
#X connect 18 2 5 0;
#X connect 18 2 32 0;
#X connect 20 0 22 1;
#X connect 21 0 11 0;
#X connect 21 1 24 1;
#X connect 22 0 23 0;
#X connect 23 0 25 0;
#X connect 26 0 6 0;
#X connect 26 0 8 0;
#X connect 29 0 39 0;
#X connect 30 0 7 0;
#X connect 31 0 1 0;
#X connect 32 0 27 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 25 1;
#X connect 38 0 26 1;
#X connect 39 0 13 0;
#X restore 469 316 pd fill;
#X obj 469 222 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X text 248 27 Outlets \; 1 - index in array where value was found
\; 2 - index in array where value would appear if it's not actually
in the range \;, f 42;
#X text 21 9 RANGE MUST BE SORTED;
#X obj 508 240 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 530 240 <- reverse toggle;
#X floatatom 59 304 0 0 0 0 - - -;
#X floatatom 160 320 0 0 0 0 - - -;
#X floatatom 37 358 0 0 1.7e+07 0 - - -;
#X floatatom 37 470 0 0 0 0 - - -;
#X floatatom 37 146 5 -3 370 0 - - -, f 5;
#X floatatom 107 239 5 0 0 0 - - -, f 5;
#X text 496 217 <- reset array-search-help;
#X obj 529 28 loadbang;
#X msg 529 53 2;
#X obj 529 76 pow 24;
#X obj 529 101 - 97432;
#X obj 529 147 array size array-search-help;
#X obj 37 277 array-search array-search-help;
#X text 28 27 Inlets \; 1 - value to search for \; 2 \, 3 \, 4 - range
to search \; 5 - array name \;;
#X floatatom 107 146 5 -3 370 0 - - -, f 5;
#X obj 107 206 - 0.1;
#X obj 481 284 t b f;
#X floatatom 256 470 0 0 0 0 - - -;
#N canvas 0 22 622 382 arrays 1;
#N canvas 0 22 450 278 (subpatch) 0;
#X array array-search-help 1.66798e+07 float 2;
#X coords 0 1 1.66798e+07 -1 200 140 1 0 0;
#X restore 60 100 graph;
#N canvas 0 22 450 278 (subpatch) 0;
#X array array-search-other 736 float 2;
#X coords 0 1 736 -1 200 140 1;
#X restore 330 100 graph;
#X restore 441 129 pd arrays;
#X obj 469 362 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 508 380 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 530 380 <- reverse toggle;
#X obj 481 424 t b f;
#N canvas 541 454 704 451 fill 1;
#X obj 65 34 loadbang;
#X obj 65 144 until;
#X obj 65 176 f;
#X obj 171 32 inlet;
#X msg 199 120 0;
#X obj 65 292 tabwrite array-search-other;
#X obj 292 296 array-reverse array-search-other;
#X obj 418 76 inlet;
#X obj 320 223 f;
#X obj 320 245 sel 1;
#X obj 172 67 t b b b;
#X obj 65 202 t f f f f;
#X obj 135 256 + 1;
#X msg 65 117 368;
#X obj 102 177 + 2;
#X obj 65 246 / 2;
#X connect 0 0 13 0;
#X connect 1 0 2 0;
#X connect 2 0 11 0;
#X connect 2 0 14 0;
#X connect 3 0 10 0;
#X connect 4 0 2 1;
#X connect 7 0 8 1;
#X connect 8 0 9 0;
#X connect 9 0 6 0;
#X connect 10 0 8 0;
#X connect 10 1 13 0;
#X connect 10 2 4 0;
#X connect 11 0 15 0;
#X connect 11 1 12 0;
#X connect 11 2 15 0;
#X connect 11 3 5 1;
#X connect 12 0 5 1;
#X connect 13 0 1 0;
#X connect 14 0 2 1;
#X connect 15 0 5 0;
#X restore 469 464 pd fill;
#X obj 37 431 array get array-search-help;
#X obj 256 431 array get array-search-help;
#X msg 37 398 \$1 1;
#X msg 256 398 \$1 1;
#X msg 268 209 symbol array-search-other;
#X msg 299 235 symbol array-search-help;
#X floatatom 550 124 0 0 0 0 - - -;
#X obj 256 375 - 1;
#X text 496 356 <- reset array-search-other;
#X connect 1 0 0 0;
#X connect 4 0 22 0;
#X connect 8 0 32 0;
#X connect 8 0 37 0;
#X connect 10 0 18 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 16 0 36 0;
#X connect 18 0 6 0;
#X connect 18 0 8 0;
#X connect 18 1 7 0;
#X connect 18 1 8 0;
#X connect 20 0 21 0;
#X connect 21 0 11 0;
#X connect 21 0 18 0;
#X connect 22 0 0 0;
#X connect 22 1 0 1;
#X connect 25 0 29 0;
#X connect 26 0 28 0;
#X connect 28 0 29 0;
#X connect 28 1 29 1;
#X connect 30 0 9 0;
#X connect 31 0 23 0;
#X connect 32 0 30 0;
#X connect 33 0 31 0;
#X connect 34 0 18 4;
#X connect 34 0 31 2;
#X connect 34 0 30 2;
#X connect 35 0 18 4;
#X connect 35 0 30 2;
#X connect 35 0 31 2;
#X connect 37 0 33 0;