srtfile.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
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

#N canvas 145 144 766 516 10;
#X obj 126 18 inlet;
#X text 173 8 open filename;
#X text 177 23 bang;
#X obj 45 430 outlet subtitle;
#X obj 518 428 outlet done;
#N canvas 231 15 793 487 linereader 0;
#X obj 136 17 inlet;
#X obj 159 452 outlet next line;
#X msg 136 111 read \$1 \, rewind;
#X obj 136 92 symbol;
#X obj 159 357 list prepend;
#X obj 246 334 t l l;
#X obj 187 145 until;
#X obj 136 266 t b b b;
#X obj 136 221 route bang;
#X obj 246 311 list prepend;
#N canvas 642 75 450 300 EOL 0;
#X obj 84 48 inlet;
#X obj 165 129 select 10 13;
#X text 157 51 CRLF = 13 10 (w32);
#X msg 205 151 1;
#X msg 245 172 0;
#X obj 165 189 f;
#X obj 165 217 select 1;
#X obj 245 152 t f b;
#X obj 60 244 outlet byte;
#X obj 165 245 outlet EOL;
#X obj 43 113 select 10 13;
#X connect 0 0 10 0;
#X connect 1 0 5 0;
#X connect 1 1 3 0;
#X connect 1 2 7 0;
#X connect 3 0 5 1;
#X connect 4 0 5 1;
#X connect 5 0 6 0;
#X connect 6 0 9 0;
#X connect 7 0 8 0;
#X connect 7 1 4 0;
#X connect 10 0 9 0;
#X connect 10 2 8 0;
#X restore 246 244 pd EOL;
#X obj 136 244 t b b;
#X obj 137 47 route open bang bong;
#X msg 219 81 bang;
#X obj 316 283 t b b;
#X obj 226 290 t b b;
#X obj 430 445 outlet;
#X obj 136 171 ./binfile;
#X connect 0 0 12 0;
#X connect 2 0 17 0;
#X connect 3 0 2 0;
#X connect 4 0 1 0;
#X connect 5 0 4 1;
#X connect 5 1 9 1;
#X connect 6 0 17 0;
#X connect 7 0 15 0;
#X connect 7 1 4 0;
#X connect 7 2 6 1;
#X connect 8 0 11 0;
#X connect 8 1 10 0;
#X connect 9 0 5 0;
#X connect 10 0 9 0;
#X connect 10 1 14 0;
#X connect 11 0 7 0;
#X connect 11 1 16 0;
#X connect 12 0 3 0;
#X connect 12 1 6 0;
#X connect 12 2 13 0;
#X connect 13 0 17 0;
#X connect 14 0 7 0;
#X connect 15 0 4 1;
#X connect 15 1 9 1;
#X connect 17 0 8 0;
#X connect 17 2 11 0;
#X restore 148 153 pd linereader;
#N canvas 626 26 639 408 lineid 0;
#X obj 146 47 inlet;
#X obj 124 318 outlet;
#X obj 360 56 inlet reset;
#X obj 146 168 route bang;
#X obj 226 244 i;
#X obj 261 246 + 1;
#X msg 178 210 0;
#X obj 146 190 t b b;
#X obj 124 271 list prepend;
#X obj 213 190 t b b;
#X obj 124 293 list prepend 0;
#X obj 360 94 t b;
#X obj 265 318 outlet done;
#X obj 146 97 t a a;
#X connect 0 0 13 0;
#X connect 2 0 11 0;
#X connect 3 0 7 0;
#X connect 3 1 9 0;
#X connect 4 0 5 0;
#X connect 4 0 10 1;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 7 0 12 0;
#X connect 7 1 6 0;
#X connect 8 0 10 0;
#X connect 9 0 8 0;
#X connect 9 1 4 0;
#X connect 10 0 1 0;
#X connect 11 0 6 0;
#X connect 13 0 3 0;
#X connect 13 1 8 1;
#X restore 148 189 pd lineid;
#X obj 208 125 until;
#X obj 148 248 route 0 1;
#X obj 208 210 t b b;
#X obj 378 428 outlet ID;
#N canvas 207 25 634 523 timestamp 0;
#X obj 59 44 inlet bytes;
#X obj 59 184 outlet from;
#X obj 146 183 outlet to;
#X obj 311 47 inlet reset;
#X text 141 13 HH:MM:SS \, sss --> HH:MM:SS \, sss;
#N canvas 523 25 450 526 getdelays 0;
#X obj 53 138 unpack 0 0 0 0 0 0 0 0;
#X obj 53 162 * 60;
#X obj 53 184 +;
#X obj 53 204 * 60;
#X obj 53 225 +;
#X obj 53 247 +;
#X obj 140 162 * 60;
#X obj 140 184 +;
#X obj 140 204 * 60;
#X obj 140 225 +;
#X obj 140 247 +;
#X obj 53 276 * 1000;
#X obj 140 276 * 1000;
#X obj 55 325 -;
#X obj 53 299 t f f;
#X obj 140 325 -;
#X obj 55 356 outlet;
#X obj 140 356 outlet;
#X obj 53 104 inlet timestamps;
#X obj 291 74 inlet set number;
#X obj 291 148 t f;
#X connect 0 0 1 0;
#X connect 0 1 2 1;
#X connect 0 2 4 1;
#X connect 0 3 5 1;
#X connect 0 4 6 0;
#X connect 0 5 7 1;
#X connect 0 6 9 1;
#X connect 0 7 10 1;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 11 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 12 0;
#X connect 11 0 14 0;
#X connect 12 0 15 0;
#X connect 13 0 16 0;
#X connect 14 0 13 1;
#X connect 14 0 15 1;
#X connect 14 1 13 0;
#X connect 15 0 17 0;
#X connect 18 0 0 0;
#X connect 19 0 20 0;
#X connect 20 0 13 1;
#X connect 20 0 15 1;
#X restore 59 150 pd getdelays;
#N canvas 496 75 450 413 bytes2numbers 0;
#X obj 95 23 inlet bytes;
#X obj 95 278 outlet;
#X obj 95 60 string2any;
#X obj 95 82 list;
#X msg 95 107 list \$1 \$3 \$5 \$7;
#X obj 94 130 unpack s 0 s 0;
#N canvas 0 0 450 475 fractional 0;
#X obj 99 42 inlet;
#X obj 99 411 outlet;
#X text 151 43 123;
#X text 155 416 0.123;
#X obj 145 339 *;
#X obj 168 171 log;
#X obj 202 172 log 10;
#X obj 168 193 /;
#X msg 206 152 10;
#X obj 168 214 i;
#X obj 168 152 abs;
#X obj 168 240 + 1;
#X obj 168 313 pow;
#X msg 168 285 10 \$1;
#X obj 168 263 * -1;
#X obj 145 126 t f f b;
#X obj 99 84 route 0;
#X msg 99 118 0;
#X connect 0 0 16 0;
#X connect 4 0 1 0;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 9 0;
#X connect 8 0 6 0;
#X connect 9 0 11 0;
#X connect 10 0 5 0;
#X connect 11 0 14 0;
#X connect 12 0 4 1;
#X connect 13 0 12 0;
#X connect 14 0 13 0;
#X connect 15 0 4 0;
#X connect 15 1 10 0;
#X connect 15 2 8 0;
#X connect 16 0 17 0;
#X connect 16 1 15 0;
#X connect 17 0 1 0;
#X restore 106 166 pd fractional;
#X obj 95 211 pack 0 0 0 0;
#N canvas 0 0 450 475 fractional 0;
#X obj 99 42 inlet;
#X obj 99 411 outlet;
#X text 151 43 123;
#X text 155 416 0.123;
#X obj 99 299 *;
#X obj 122 131 log;
#X obj 99 85 t f f b;
#X obj 156 132 log 10;
#X obj 122 153 /;
#X msg 160 112 10;
#X obj 122 174 i;
#X obj 122 112 abs;
#X obj 122 200 + 1;
#X obj 122 273 pow;
#X msg 122 245 10 \$1;
#X obj 122 223 * -1;
#X connect 0 0 6 0;
#X connect 4 0 1 0;
#X connect 5 0 8 0;
#X connect 6 0 4 0;
#X connect 6 1 11 0;
#X connect 6 2 9 0;
#X connect 7 0 8 1;
#X connect 8 0 10 0;
#X connect 9 0 7 0;
#X connect 10 0 12 0;
#X connect 11 0 5 0;
#X connect 12 0 15 0;
#X connect 13 0 4 1;
#X connect 14 0 13 0;
#X connect 15 0 14 0;
#X restore 216 166 pd fractional;
#X obj 205 211 pack 0 0 0 0;
#X obj 95 249 list append;
#X obj 95 190 symbol2list :;
#X obj 205 190 symbol2list :;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 11 0;
#X connect 5 1 6 0;
#X connect 5 2 12 0;
#X connect 5 3 8 0;
#X connect 6 0 7 3;
#X connect 7 0 10 0;
#X connect 8 0 9 3;
#X connect 9 0 10 1;
#X connect 10 0 1 0;
#X connect 11 0 7 0;
#X connect 12 0 9 0;
#X restore 59 110 pd bytes2numbers;
#X connect 0 0 6 0;
#X connect 3 0 5 1;
#X connect 5 0 1 0;
#X connect 5 1 2 0;
#X connect 6 0 5 0;
#X restore 178 381 pd timestamp;
#X obj 208 308 list split 1;
#N canvas 0 0 450 506 lines2multiline 0;
#X obj 75 47 inlet singleline;
#X obj 75 427 outlet multiline;
#X obj 142 199 list append 10;
#X text 254 197 <-- Gem's linebreak;
#X obj 75 127 route bang;
#X obj 142 259 list prepend;
#X obj 142 280 t l l;
#X obj 75 313 list prepend;
#X obj 75 269 t b;
#X obj 278 51 inlet delimiter;
#X obj 75 98 t a a;
#X obj 75 399 route bang;
#X obj 75 345 t a b b a;
#X connect 0 0 10 0;
#X connect 2 0 5 0;
#X connect 4 0 8 0;
#X connect 4 1 2 0;
#X connect 5 0 6 0;
#X connect 6 0 7 1;
#X connect 6 1 5 1;
#X connect 7 0 12 0;
#X connect 8 0 7 0;
#X connect 9 0 2 1;
#X connect 10 0 4 0;
#X connect 11 1 1 0;
#X connect 12 0 11 0;
#X connect 12 1 7 1;
#X connect 12 2 5 1;
#X restore 248 334 pd lines2multiline;
#X obj 178 429 outlet from to;
#X obj 178 404 pack 0 0;
#X msg 259 360 0;
#X obj 126 45 route read bang;
#X obj 126 67 symbol;
#X msg 126 108 open \$1;
#N canvas 565 53 450 300 checkopen 0;
#X obj 58 29 inlet bang;
#X obj 171 207 outlet bang;
#X obj 58 83 symbol;
#X obj 107 83 symbol;
#X obj 58 102 select select;
#X obj 58 142 print STR-error;
#X obj 58 61 t b b;
#X obj 171 143 t b;
#X obj 285 32 inlet filename;
#X msg 58 122 line requested without prior read!;
#X connect 0 0 6 0;
#X connect 2 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 9 0;
#X connect 4 1 7 0;
#X connect 6 0 2 0;
#X connect 6 1 3 0;
#X connect 7 0 1 0;
#X connect 8 0 2 1;
#X connect 9 0 5 0;
#X restore 208 99 pd checkopen;
#X obj 126 88 t s b s;
#X connect 0 0 17 0;
#X connect 5 0 6 0;
#X connect 5 1 4 0;
#X connect 6 0 8 0;
#X connect 6 1 9 0;
#X connect 7 0 5 0;
#X connect 8 0 10 0;
#X connect 8 1 11 0;
#X connect 8 2 12 0;
#X connect 9 0 13 0;
#X connect 9 1 7 1;
#X connect 11 0 15 0;
#X connect 11 1 15 1;
#X connect 12 1 13 0;
#X connect 13 0 3 0;
#X connect 15 0 14 0;
#X connect 16 0 11 1;
#X connect 17 0 18 0;
#X connect 17 1 20 0;
#X connect 18 0 21 0;
#X connect 19 0 5 0;
#X connect 20 0 7 0;
#X connect 21 0 19 0;
#X connect 21 1 6 1;
#X connect 21 1 16 0;
#X connect 21 2 20 1;