aboutsummaryrefslogtreecommitdiff
path: root/sfIndexer.pd
blob: c1a5cdb6d3f705c3f8a0e977cc7b03617cb460f7 (plain)
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
#N canvas 458 164 981 616 10;
#X obj 171 25 inlet;
#N canvas 477 373 450 300 \$0tables 0;
#X restore 437 56 pd \$0tables;
#N canvas 199 153 767 523 check_if_loaded 0;
#X obj 93 44 inlet check;
#X obj 384 36 inlet remove;
#X obj 86 434 outlet found;
#X obj 226 426 outlet new;
#X obj 99 298 ./indexer;
#X obj 214 42 inlet test;
#X obj 150 323 route bang;
#X obj 369 107 t b b;
#X msg 423 126 clear;
#X obj 551 200 route clear;
#X obj 492 438 outlet reset;
#X obj 614 249 list split 1;
#X obj 598 368 pack f s;
#X obj 647 289 cyclone/tosymbol;
#X obj 324 211 unpack f s;
#X obj 381 237 tof/path relative;
#X obj 327 255 pack f s;
#X obj 643 334 tof/path absolute;
#X obj 423 158 tof/param custom /samples /nps;
#X connect 0 0 4 0;
#X connect 1 0 4 1;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 4 2 6 0;
#X connect 4 3 14 0;
#X connect 5 0 4 2;
#X connect 6 1 2 0;
#X connect 7 0 4 3;
#X connect 7 1 8 0;
#X connect 8 0 18 0;
#X connect 9 0 10 0;
#X connect 9 1 11 0;
#X connect 11 0 12 0;
#X connect 11 1 13 0;
#X connect 12 0 4 0;
#X connect 13 0 17 0;
#X connect 14 0 16 0;
#X connect 14 1 15 0;
#X connect 15 0 16 1;
#X connect 16 0 18 0;
#X connect 17 0 12 1;
#X connect 18 0 7 0;
#X connect 18 1 9 0;
#X restore 221 220 pd check_if_loaded;
#N canvas 91 71 926 583 load_soundfile 0;
#X obj 47 11 inlet;
#X obj 46 366 soundfiler;
#X obj 479 395 s pd-\$0tables;
#X obj 284 145 tof/iterate;
#X obj 286 193 t f f;
#X obj 516 308 iemlib/iem_send;
#X msg 596 279 set \$3/\$1/i;
#X obj 676 252 t l l;
#X msg 517 115 0 \$2 \$3 \$4;
#X msg 673 307 obj 0 \$2 table \$3/\$1/i 3;
#X obj 317 231 * 130;
#X obj 317 256 + 130;
#X text 339 195 Create data tables;
#X text 575 196 Create and fill info table;
#X msg 288 122 \$4;
#X msg 687 61 \$1;
#X obj 140 257 list prepend;
#X obj 142 288 t l l;
#X obj 48 113 zexy/packel 5;
#X obj 46 298 list append;
#X obj 48 160 list prepend read -resize;
#X obj 46 340 list trim;
#X obj 701 118 * 22;
#X obj 48 137 t s s;
#X obj 113 140 print READING;
#X obj 46 387 t b f;
#X obj 180 530 outlet index;
#X obj 155 348 print READ;
#X msg 155 323 \$1 samples;
#X obj 684 88 t f f f;
#X obj 836 20 inlet id;
#X obj 294 287 pack f f f f s;
#X obj 680 225 pack f f s;
#X msg 296 326 obj \$2 \$4 table \$5/\$3/\$1;
#X msg 161 202 symbol \$5/\$3/\$1;
#X obj 179 500 pack f s;
#X obj 179 461 f;
#X obj 48 44 t l l l l b l;
#X text 90 10 index rate length channels filename;
#X connect 0 0 37 0;
#X connect 1 0 25 0;
#X connect 3 0 4 0;
#X connect 4 0 31 0;
#X connect 4 1 10 0;
#X connect 6 0 5 1;
#X connect 7 0 6 0;
#X connect 7 1 9 0;
#X connect 8 0 5 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 31 1;
#X connect 14 0 3 0;
#X connect 15 0 29 0;
#X connect 16 0 17 0;
#X connect 17 0 19 1;
#X connect 17 1 16 1;
#X connect 18 0 23 0;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 1 0;
#X connect 22 0 31 3;
#X connect 22 0 32 1;
#X connect 23 0 20 0;
#X connect 23 1 24 0;
#X connect 23 1 35 1;
#X connect 25 0 36 0;
#X connect 25 1 28 0;
#X connect 28 0 27 0;
#X connect 29 0 31 2;
#X connect 29 0 32 0;
#X connect 29 1 22 0;
#X connect 29 2 36 1;
#X connect 30 0 32 2;
#X connect 30 0 31 4;
#X connect 31 0 33 0;
#X connect 31 0 34 0;
#X connect 32 0 7 0;
#X connect 33 0 2 0;
#X connect 34 0 16 0;
#X connect 35 0 26 0;
#X connect 36 0 35 0;
#X connect 37 0 18 0;
#X connect 37 1 14 0;
#X connect 37 2 8 0;
#X connect 37 3 15 0;
#X connect 37 4 16 1;
#X restore 326 327 pd load_soundfile;
#N canvas 302 198 532 423 check_soundfile 0;
#X obj 164 141 iemlib/soundfile_info;
#X msg 163 115 read \$1;
#X obj 52 -37 inlet;
#X obj 72 69 unpack f s;
#X obj 165 168 t l b;
#X obj 367 326 outlet bad_load;
#X obj 171 209 unpack f s f f f;
#X obj 100 341 outlet create;
#X obj 104 281 pack f f f f s;
#X text 110 309 index rate length channels filename;
#X obj 33 202 zexy/demultiplex 0 1;
#X msg 114 170 0;
#X obj 90 8 t l b;
#X msg 157 38 1;
#X connect 0 0 4 0;
#X connect 1 0 0 0;
#X connect 2 0 12 0;
#X connect 3 0 10 0;
#X connect 3 1 1 0;
#X connect 4 0 6 0;
#X connect 4 1 11 0;
#X connect 6 0 8 1;
#X connect 6 1 8 4;
#X connect 6 2 8 2;
#X connect 6 4 8 3;
#X connect 8 0 7 0;
#X connect 10 0 8 0;
#X connect 10 1 5 0;
#X connect 11 0 10 1;
#X connect 12 0 3 0;
#X connect 12 1 13 0;
#X connect 13 0 10 1;
#X restore 326 264 pd check_soundfile;
#X msg 521 205 clear;
#X obj 522 228 s pd-\$0tables;
#X obj 624 90 loadbang;
#X obj 586 122 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 432 558 outlet index;
#X obj 154 555 outlet tables;
#X obj 308 557 outlet info;
#N canvas 0 0 1018 686 output_data 0;
#X obj 160 335 zexy/tabdump;
#X msg 280 226 symbol \$2/\$1;
#X obj 838 590 outlet index;
#X obj 111 624 outlet tables;
#X obj 672 597 outlet info;
#X obj 218 16 inlet;
#X msg 186 427 \$3;
#X obj 186 456 tof/iterate;
#X obj 187 478 pack f s;
#X obj 280 251 t s s b;
#X obj 187 529 list prepend;
#X obj 184 556 t l l;
#X obj 160 365 t b l l;
#X obj 115 582 list;
#X msg 160 309 set \$1/i \, bang;
#X obj 254 85 t l l;
#X obj 280 155 unpack f s;
#X obj 280 201 pack f s;
#X obj 789 91 inlet id;
#X msg 187 504 \$2/\$1;
#X msg 394 427 \$2 \$1 \$3;
#X connect 0 0 12 0;
#X connect 1 0 9 0;
#X connect 5 0 15 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 19 0;
#X connect 9 0 14 0;
#X connect 9 1 8 1;
#X connect 9 2 10 1;
#X connect 10 0 11 0;
#X connect 11 0 13 1;
#X connect 11 1 10 1;
#X connect 12 0 13 0;
#X connect 12 1 6 0;
#X connect 12 2 20 0;
#X connect 13 0 3 0;
#X connect 14 0 0 0;
#X connect 15 0 16 0;
#X connect 15 1 2 0;
#X connect 16 0 17 0;
#X connect 17 0 1 0;
#X connect 18 0 17 1;
#X connect 19 0 10 0;
#X connect 20 0 4 0;
#X restore 221 417 pd output_data;
#X obj 221 159 cyclone/tosymbol;
#X obj 625 149 t b b b b;
#X obj 395 165 f 0;
#X obj 326 292 t l l;
#X msg 445 222 \$1;
#X obj 646 116 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 162 120 t b a b;
#X obj 221 367 spigot 1;
#X msg 265 319 0;
#X msg 165 308 1;
#X obj 648 241 tof/param id;
#X obj 171 76 route add float bang symbol panel;
#X obj 330 24 openpanel;
#X connect 0 0 24 0;
#X connect 2 0 20 0;
#X connect 2 1 4 0;
#X connect 2 2 8 0;
#X connect 3 0 20 0;
#X connect 4 0 16 0;
#X connect 4 1 2 2;
#X connect 5 0 6 0;
#X connect 7 0 14 0;
#X connect 8 0 14 0;
#X connect 12 0 10 0;
#X connect 12 1 11 0;
#X connect 12 2 9 0;
#X connect 13 0 2 0;
#X connect 14 0 2 2;
#X connect 14 1 5 0;
#X connect 14 2 23 0;
#X connect 15 0 2 1;
#X connect 16 0 3 0;
#X connect 16 1 17 0;
#X connect 17 0 15 1;
#X connect 18 0 14 0;
#X connect 19 0 22 0;
#X connect 19 1 13 0;
#X connect 19 2 21 0;
#X connect 20 0 12 0;
#X connect 21 0 20 1;
#X connect 22 0 20 1;
#X connect 23 0 3 1;
#X connect 23 0 12 1;
#X connect 24 0 19 0;
#X connect 24 1 2 1;
#X connect 24 2 15 0;
#X connect 24 3 2 0;
#X connect 24 4 25 0;
#X connect 24 5 13 0;
#X connect 25 0 2 0;