forked from wilsontr/tt-patches
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathdld.pd
355 lines (355 loc) · 8.58 KB
/
dld.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
#N canvas 307 99 1151 860 10;
#X obj 458 41 adc~;
#X obj 465 823 dac~;
#X obj 823 71 loadbang;
#X obj 934 133 s initbang;
#X obj 823 101 delay 1000;
#X msg 823 131 \; pd dsp 1 \;;
#N canvas 316 61 1291 957 routing 1;
#X text 73 28 adc in 1-6;
#X obj 280 85 clip 0 4095;
#X obj 280 54 r adc1;
#X obj 363 85 clip 0 4095;
#X obj 363 54 r adc2;
#X obj 443 85 clip 0 4095;
#X obj 443 54 r adc3;
#X obj 282 298 clip 0 4095;
#X obj 282 267 r adc4;
#X obj 365 298 clip 0 4095;
#X obj 365 267 r adc5;
#X obj 444 298 clip 0 4095;
#X obj 444 267 r adc6;
#X obj 641 564 tedium_input 25;
#X obj 643 465 tedium_input 23;
#X obj 444 326 / 4095;
#X obj 365 325 / 4095;
#X obj 282 325 / 4095;
#X obj 444 111 / 4095;
#X obj 363 110 / 4095;
#X obj 280 110 / 4095;
#X obj 50 163 terminal_tedium_adc;
#X obj 50 188 s adc1;
#X obj 63 211 s adc2;
#X obj 91 255 s adc4;
#X obj 105 279 s adc5;
#X obj 77 232 s adc3;
#X obj 120 303 s adc6;
#X msg 49 83 open;
#X obj 49 59 r initbang;
#X msg 105 82 open adc;
#X obj 25 116 metro 10;
#X msg 105 106 deadband 2;
#X obj 752 564 tedium_input 14;
#X obj 279 140 s delay1time;
#X obj 364 143 s delay1fbk;
#X obj 447 148 s delay1mix;
#X obj 643 493 s delay1InfToggle;
#X obj 641 596 s delay2InfToggle;
#X obj 282 358 s delay2time;
#X obj 365 359 s delay2fbk;
#X obj 443 358 s delay2mix;
#X obj 763 465 tedium_input 17;
#X msg 116 136 smooth 20;
#X connect 1 0 20 0;
#X connect 2 0 1 0;
#X connect 3 0 19 0;
#X connect 4 0 3 0;
#X connect 5 0 18 0;
#X connect 6 0 5 0;
#X connect 7 0 17 0;
#X connect 8 0 7 0;
#X connect 9 0 16 0;
#X connect 10 0 9 0;
#X connect 11 0 15 0;
#X connect 12 0 11 0;
#X connect 13 0 38 0;
#X connect 14 0 37 0;
#X connect 15 0 41 0;
#X connect 16 0 40 0;
#X connect 17 0 39 0;
#X connect 18 0 36 0;
#X connect 19 0 35 0;
#X connect 20 0 34 0;
#X connect 21 0 22 0;
#X connect 21 1 23 0;
#X connect 21 2 26 0;
#X connect 21 3 24 0;
#X connect 21 4 25 0;
#X connect 21 5 27 0;
#X connect 28 0 21 0;
#X connect 29 0 28 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 29 0 43 0;
#X connect 29 0 32 0;
#X connect 31 0 21 0;
#X connect 32 0 21 0;
#X connect 33 0 38 0;
#X connect 42 0 37 0;
#X connect 43 0 21 0;
#X restore 944 340 pd routing;
#X obj 352 255 r delay1time;
#X obj 367 280 r delay1fbk;
#X obj 395 329 r delay1InfToggle;
#N canvas 0 164 1341 753 delay1~ 0;
#X obj 250 499 send~ \$0-fb;
#X obj 346 93 receive~ \$0-fb;
#X obj 344 224 *~;
#X obj 231 220 *~ 1;
#X obj 692 47 tgl 15 0 empty empty infinite 17 7 0 10 -262144 -1 -1
0 1;
#X obj 692 67 sel 1;
#X msg 718 93 bang;
#X obj 447 208 spigot;
#X msg 479 181 1;
#X msg 510 181 0;
#X obj 449 125 f;
#X obj 457 72 hsl 128 15 0 1.1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 439 48 inlet;
#X msg 276 181 0;
#X msg 246 180 1;
#X obj 692 130 s \$0-infOn;
#X obj 481 41 t b b;
#X obj 504 145 t b b;
#X msg 359 191 1, f 4;
#X obj 194 607 outlet~;
#N canvas 0 22 450 300 crossfade~ 0;
#X obj 97 63 inlet~;
#X obj 176 63 inlet~;
#X obj 255 63 inlet;
#X obj 173 257 outlet~;
#X obj 112 134 *~;
#X obj 133 102 expr~ 1 - $v1;
#X obj 175 134 *~;
#X connect 0 0 4 0;
#X connect 1 0 6 0;
#X connect 2 0 5 0;
#X connect 2 0 6 1;
#X connect 4 0 3 0;
#X connect 5 0 4 1;
#X connect 6 0 3 0;
#X restore 194 542 pd crossfade~;
#X obj 169 72 s~ \$0-dryaudio;
#X obj 136 498 r~ \$0-dryaudio;
#X obj 232 469 delread4~ \$0-delay1 300;
#X obj 230 275 delwrite~ \$0-delay1 30000;
#X obj 359 514 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 231 39 inlet~;
#X obj 567 148 r initbang;
#X obj 480 7 r \$0-infOff;
#X obj 247 112 r \$0-infOff;
#X obj 278 136 r \$0-infOn;
#X obj 504 121 r \$0-infOn;
#X obj 762 117 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 671 106 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 719 169 s \$0-infOff;
#X obj 353 21 inlet;
#X obj 354 52 s \$0-deltime;
#X obj 623 16 inlet;
#X obj 622 42 s \$0-mix;
#X obj 390 479 r \$0-mix;
#X obj 367 309 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 238 354 expr pow($f1 \, 2);
#X obj 238 327 r \$0-deltime;
#X obj 692 16 inlet;
#X obj 238 384 * 10000;
#X connect 1 0 2 0;
#X connect 2 0 24 0;
#X connect 3 0 24 0;
#X connect 4 0 5 0;
#X connect 5 0 15 0;
#X connect 5 0 33 0;
#X connect 5 1 6 0;
#X connect 6 0 32 0;
#X connect 6 0 34 0;
#X connect 7 0 2 1;
#X connect 8 0 7 1;
#X connect 9 0 7 1;
#X connect 10 0 7 0;
#X connect 11 0 10 0;
#X connect 12 0 10 0;
#X connect 13 0 3 1;
#X connect 14 0 3 1;
#X connect 16 0 10 0;
#X connect 16 1 8 0;
#X connect 17 0 18 0;
#X connect 17 1 9 0;
#X connect 18 0 2 1;
#X connect 20 0 19 0;
#X connect 22 0 20 0;
#X connect 23 0 0 0;
#X connect 23 0 20 1;
#X connect 25 0 20 2;
#X connect 26 0 3 0;
#X connect 26 0 21 0;
#X connect 27 0 8 0;
#X connect 28 0 16 0;
#X connect 29 0 14 0;
#X connect 30 0 13 0;
#X connect 31 0 17 0;
#X connect 35 0 36 0;
#X connect 37 0 38 0;
#X connect 39 0 20 2;
#X connect 40 0 41 0;
#X connect 41 0 44 0;
#X connect 42 0 41 0;
#X connect 43 0 4 0;
#X connect 44 0 23 0;
#X restore 338 374 pd delay1~;
#X obj 458 72 s~ del1;
#X obj 480 100 s~ del2;
#X obj 339 229 r~ del1;
#X obj 338 419 s~ out1;
#X obj 464 620 r~ out1;
#X obj 486 657 r~ out2;
#N canvas 0 164 1341 753 delay2~ 0;
#X obj 344 224 *~;
#X obj 231 220 *~ 1;
#X obj 692 47 tgl 15 0 empty empty infinite 17 7 0 10 -262144 -1 -1
0 1;
#X obj 692 67 sel 1;
#X msg 718 93 bang;
#X obj 447 208 spigot;
#X msg 479 181 1;
#X msg 510 181 0;
#X obj 449 125 f;
#X obj 457 72 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 436 20 inlet;
#X msg 276 181 0;
#X msg 246 180 1;
#X obj 481 41 t b b;
#X obj 504 145 t b b;
#X msg 359 191 1, f 4;
#X obj 194 607 outlet~;
#N canvas 0 22 450 300 crossfade~ 0;
#X obj 97 63 inlet~;
#X obj 176 63 inlet~;
#X obj 255 63 inlet;
#X obj 173 257 outlet~;
#X obj 112 134 *~;
#X obj 133 102 expr~ 1 - $v1;
#X obj 175 134 *~;
#X connect 0 0 4 0;
#X connect 1 0 6 0;
#X connect 2 0 5 0;
#X connect 2 0 6 1;
#X connect 4 0 3 0;
#X connect 5 0 4 1;
#X connect 6 0 3 0;
#X restore 194 542 pd crossfade~;
#X obj 359 514 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 231 39 inlet~;
#X obj 567 148 r initbang;
#X obj 504 121 r \$0-infOn;
#X obj 762 117 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 671 106 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 339 21 inlet;
#X obj 623 16 inlet;
#X obj 380 342 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 236 377 expr pow($f1 \, 2);
#X obj 692 16 inlet;
#X obj 136 498 r~ \$0-dryaudio2;
#X obj 340 52 s \$0-deltime2;
#X obj 169 72 s~ \$0-dryaudio2;
#X obj 247 112 r \$0-infOff2;
#X obj 278 136 r \$0-infOn2;
#X obj 346 93 receive~ \$0-fb2;
#X obj 250 499 send~ \$0-fb2;
#X obj 232 469 delread4~ \$0-delay2 300;
#X obj 229 270 delwrite~ \$0-delay2 30000;
#X obj 236 350 r \$0-deltime2;
#X obj 480 7 r \$0-infOff2;
#X obj 622 42 s \$0-mix2;
#X obj 692 130 s \$0-infOn2;
#X obj 719 169 s \$0-infOff2;
#X obj 390 479 r \$0-mix2;
#X obj 448 158 * 1.1;
#X obj 236 407 * 10000;
#X connect 0 0 37 0;
#X connect 1 0 37 0;
#X connect 2 0 3 0;
#X connect 3 0 23 0;
#X connect 3 0 41 0;
#X connect 3 1 4 0;
#X connect 4 0 22 0;
#X connect 4 0 42 0;
#X connect 5 0 0 1;
#X connect 6 0 5 1;
#X connect 7 0 5 1;
#X connect 8 0 44 0;
#X connect 9 0 8 0;
#X connect 10 0 8 0;
#X connect 11 0 1 1;
#X connect 12 0 1 1;
#X connect 13 0 8 0;
#X connect 13 1 6 0;
#X connect 14 0 15 0;
#X connect 14 1 7 0;
#X connect 15 0 0 1;
#X connect 17 0 16 0;
#X connect 18 0 17 2;
#X connect 19 0 1 0;
#X connect 19 0 31 0;
#X connect 20 0 6 0;
#X connect 21 0 14 0;
#X connect 24 0 30 0;
#X connect 25 0 40 0;
#X connect 26 0 27 0;
#X connect 27 0 45 0;
#X connect 28 0 2 0;
#X connect 29 0 17 0;
#X connect 32 0 12 0;
#X connect 33 0 11 0;
#X connect 34 0 0 0;
#X connect 36 0 17 1;
#X connect 36 0 35 0;
#X connect 38 0 27 0;
#X connect 39 0 13 0;
#X connect 43 0 17 2;
#X connect 44 0 5 0;
#X connect 45 0 36 0;
#X restore 524 370 pd delay2~;
#X obj 524 415 s~ out2;
#X obj 524 225 r~ del2;
#X obj 538 251 r delay2time;
#X obj 552 276 r delay2fbk;
#X obj 581 325 r delay2InfToggle;
#X obj 380 305 r delay1mix;
#X obj 566 301 r delay2mix;
#X obj 463 688 hip~ 20;
#X obj 485 713 hip~ 20;
#X obj 464 733 *~ 0.75;
#X obj 484 753 *~ 0.75;
#X connect 0 0 11 0;
#X connect 0 1 12 0;
#X connect 2 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 3 0;
#X connect 7 0 10 1;
#X connect 8 0 10 2;
#X connect 9 0 10 4;
#X connect 10 0 14 0;
#X connect 13 0 10 0;
#X connect 15 0 25 0;
#X connect 16 0 26 0;
#X connect 17 0 18 0;
#X connect 19 0 17 0;
#X connect 20 0 17 1;
#X connect 21 0 17 2;
#X connect 22 0 17 4;
#X connect 23 0 10 3;
#X connect 24 0 17 3;
#X connect 25 0 27 0;
#X connect 26 0 28 0;
#X connect 27 0 1 0;
#X connect 28 0 1 1;