Mercurial > hg > beaglert
comparison examples/10-Instruments/vangelisiser/e_platereverb.pd @ 531:ddb86944e138 prerelease
cleaned up all pd examples (and removed some). added polysynth and vangelisiser to instruments examples
author | chnrx <chris.heinrichs@gmail.com> |
---|---|
date | Thu, 23 Jun 2016 20:40:05 +0100 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
525:1ca196e35105 | 531:ddb86944e138 |
---|---|
1 #N canvas 115 309 823 465 10; | |
2 #X obj 24 32 inlet~; | |
3 #X obj 23 380 outlet~; | |
4 #X obj 118 380 outlet~; | |
5 #N canvas 0 166 634 506 input_diffusion 0; | |
6 #X obj 30 60 inlet~; | |
7 #X obj 29 295 outlet~; | |
8 #X obj 337 79 r \$0-input_diffusion1; | |
9 #X obj 336 170 r \$0-input_diffusion2; | |
10 #N canvas 393 22 574 578 allpass 0; | |
11 #X obj 56 127 inlet~; | |
12 #X obj 56 400 +~; | |
13 #X obj 427 232 loadbang; | |
14 #X obj 417 286 t f f; | |
15 #X obj 417 310 *; | |
16 #X obj 253 364 *~; | |
17 #X obj 232 394 +~; | |
18 #X obj 114 177 * -1; | |
19 #X obj 88 207 *~; | |
20 #X obj 232 426 outlet~; | |
21 #X obj 417 129 inlet; | |
22 #X obj 114 117 loadbang; | |
23 #X obj 75 365 *~ -1; | |
24 #X obj 201 364 *~ -1; | |
25 #X obj 114 149 f 0.75; | |
26 #X obj 417 262 f 0.75; | |
27 #X obj 56 491 delwrite~ \$0-tap_13_14 200; | |
28 #X obj 252 262 *~ 0.75; | |
29 #X obj 252 53 delread~ \$0-tap_13_14 4.77134; | |
30 #X obj 417 336 swap 1; | |
31 #X obj 417 360 -; | |
32 #X connect 0 0 1 0; | |
33 #X connect 0 0 8 0; | |
34 #X connect 1 0 16 0; | |
35 #X connect 2 0 15 0; | |
36 #X connect 3 0 4 0; | |
37 #X connect 3 1 4 1; | |
38 #X connect 4 0 19 0; | |
39 #X connect 5 0 6 1; | |
40 #X connect 6 0 9 0; | |
41 #X connect 7 0 8 1; | |
42 #X connect 8 0 13 0; | |
43 #X connect 10 0 14 0; | |
44 #X connect 10 0 15 0; | |
45 #X connect 10 0 17 1; | |
46 #X connect 11 0 14 0; | |
47 #X connect 12 0 1 1; | |
48 #X connect 13 0 6 0; | |
49 #X connect 14 0 7 0; | |
50 #X connect 15 0 3 0; | |
51 #X connect 17 0 5 0; | |
52 #X connect 17 0 12 0; | |
53 #X connect 18 0 17 0; | |
54 #X connect 19 0 20 0; | |
55 #X connect 19 1 20 1; | |
56 #X connect 20 0 5 1; | |
57 #X restore 30 99 pd allpass tap_13_14; | |
58 #N canvas 314 22 579 582 allpass 0; | |
59 #X obj 56 127 inlet~; | |
60 #X obj 56 400 +~; | |
61 #X obj 427 232 loadbang; | |
62 #X obj 417 286 t f f; | |
63 #X obj 417 310 *; | |
64 #X obj 253 364 *~; | |
65 #X obj 232 394 +~; | |
66 #X obj 114 177 * -1; | |
67 #X obj 88 207 *~; | |
68 #X obj 232 426 outlet~; | |
69 #X obj 417 129 inlet; | |
70 #X obj 114 117 loadbang; | |
71 #X obj 75 365 *~ -1; | |
72 #X obj 201 364 *~ -1; | |
73 #X obj 114 149 f 0.75; | |
74 #X obj 417 262 f 0.75; | |
75 #X obj 252 262 *~ 0.75; | |
76 #X obj 56 491 delwrite~ \$0-tap_19_20 200; | |
77 #X obj 252 53 delread~ \$0-tap_19_20 3.5953; | |
78 #X obj 417 336 swap 1; | |
79 #X obj 417 360 -; | |
80 #X connect 0 0 1 0; | |
81 #X connect 0 0 8 0; | |
82 #X connect 1 0 17 0; | |
83 #X connect 2 0 15 0; | |
84 #X connect 3 0 4 0; | |
85 #X connect 3 1 4 1; | |
86 #X connect 4 0 19 0; | |
87 #X connect 5 0 6 1; | |
88 #X connect 6 0 9 0; | |
89 #X connect 7 0 8 1; | |
90 #X connect 8 0 13 0; | |
91 #X connect 10 0 14 0; | |
92 #X connect 10 0 15 0; | |
93 #X connect 10 0 16 1; | |
94 #X connect 11 0 14 0; | |
95 #X connect 12 0 1 1; | |
96 #X connect 13 0 6 0; | |
97 #X connect 14 0 7 0; | |
98 #X connect 15 0 3 0; | |
99 #X connect 16 0 5 0; | |
100 #X connect 16 0 12 0; | |
101 #X connect 18 0 16 0; | |
102 #X connect 19 0 20 0; | |
103 #X connect 19 1 20 1; | |
104 #X connect 20 0 5 1; | |
105 #X restore 30 135 pd allpass tap_19_20; | |
106 #N canvas 238 22 570 590 allpass 0; | |
107 #X obj 56 127 inlet~; | |
108 #X obj 56 400 +~; | |
109 #X obj 427 232 loadbang; | |
110 #X obj 417 286 t f f; | |
111 #X obj 417 310 *; | |
112 #X obj 253 364 *~; | |
113 #X obj 232 394 +~; | |
114 #X obj 114 177 * -1; | |
115 #X obj 88 207 *~; | |
116 #X obj 232 426 outlet~; | |
117 #X obj 417 129 inlet; | |
118 #X obj 114 117 loadbang; | |
119 #X obj 75 365 *~ -1; | |
120 #X obj 201 364 *~ -1; | |
121 #X obj 114 149 f 0.625; | |
122 #X obj 252 262 *~ 0.625; | |
123 #X obj 417 262 f 0.625; | |
124 #X obj 56 491 delwrite~ \$0-tap_15_16 200; | |
125 #X obj 252 53 delread~ \$0-tap_15_16 12.7348; | |
126 #X obj 417 336 swap 1; | |
127 #X obj 417 360 -; | |
128 #X connect 0 0 1 0; | |
129 #X connect 0 0 8 0; | |
130 #X connect 1 0 17 0; | |
131 #X connect 2 0 16 0; | |
132 #X connect 3 0 4 0; | |
133 #X connect 3 1 4 1; | |
134 #X connect 4 0 19 0; | |
135 #X connect 5 0 6 1; | |
136 #X connect 6 0 9 0; | |
137 #X connect 7 0 8 1; | |
138 #X connect 8 0 13 0; | |
139 #X connect 10 0 14 0; | |
140 #X connect 10 0 15 1; | |
141 #X connect 10 0 16 0; | |
142 #X connect 11 0 14 0; | |
143 #X connect 12 0 1 1; | |
144 #X connect 13 0 6 0; | |
145 #X connect 14 0 7 0; | |
146 #X connect 15 0 5 0; | |
147 #X connect 15 0 12 0; | |
148 #X connect 16 0 3 0; | |
149 #X connect 18 0 15 0; | |
150 #X connect 19 0 20 0; | |
151 #X connect 19 1 20 1; | |
152 #X connect 20 0 5 1; | |
153 #X restore 30 190 pd allpass tap_15_16; | |
154 #N canvas 238 22 566 586 allpass 0; | |
155 #X obj 56 127 inlet~; | |
156 #X obj 56 400 +~; | |
157 #X obj 427 232 loadbang; | |
158 #X obj 417 286 t f f; | |
159 #X obj 417 310 *; | |
160 #X obj 253 364 *~; | |
161 #X obj 232 394 +~; | |
162 #X obj 114 177 * -1; | |
163 #X obj 88 207 *~; | |
164 #X obj 232 426 outlet~; | |
165 #X obj 417 129 inlet; | |
166 #X obj 114 117 loadbang; | |
167 #X obj 75 365 *~ -1; | |
168 #X obj 201 364 *~ -1; | |
169 #X obj 114 149 f 0.625; | |
170 #X obj 252 262 *~ 0.625; | |
171 #X obj 417 262 f 0.625; | |
172 #X obj 56 491 delwrite~ \$0-tap_21_22 200; | |
173 #X obj 252 53 delread~ \$0-tap_21_22 9.30748; | |
174 #X obj 417 336 swap 1; | |
175 #X obj 417 360 -; | |
176 #X connect 0 0 1 0; | |
177 #X connect 0 0 8 0; | |
178 #X connect 1 0 17 0; | |
179 #X connect 2 0 16 0; | |
180 #X connect 3 0 4 0; | |
181 #X connect 3 1 4 1; | |
182 #X connect 4 0 19 0; | |
183 #X connect 5 0 6 1; | |
184 #X connect 6 0 9 0; | |
185 #X connect 7 0 8 1; | |
186 #X connect 8 0 13 0; | |
187 #X connect 10 0 14 0; | |
188 #X connect 10 0 15 1; | |
189 #X connect 10 0 16 0; | |
190 #X connect 11 0 14 0; | |
191 #X connect 12 0 1 1; | |
192 #X connect 13 0 6 0; | |
193 #X connect 14 0 7 0; | |
194 #X connect 15 0 5 0; | |
195 #X connect 15 0 12 0; | |
196 #X connect 16 0 3 0; | |
197 #X connect 18 0 15 0; | |
198 #X connect 19 0 20 0; | |
199 #X connect 19 1 20 1; | |
200 #X connect 20 0 5 1; | |
201 #X restore 30 230 pd allpass tap_21_22; | |
202 #X connect 0 0 4 0; | |
203 #X connect 2 0 4 1; | |
204 #X connect 2 0 5 1; | |
205 #X connect 3 0 6 1; | |
206 #X connect 3 0 7 1; | |
207 #X connect 4 0 5 0; | |
208 #X connect 5 0 6 0; | |
209 #X connect 6 0 7 0; | |
210 #X connect 7 0 1 0; | |
211 #X restore 25 208 pd input_diffusion; | |
212 #N canvas 38 72 501 476 reverberation_tank 0; | |
213 #X obj 168 85 inlet~; | |
214 #X obj 43 120 +~; | |
215 #X obj 255 121 +~; | |
216 #N canvas 0 22 458 308 z^-4217 0; | |
217 #X obj 106 55 inlet~; | |
218 #X obj 105 120 delwrite~ \$0-tap_48_54 141.695; | |
219 #X text 358 135 4217; | |
220 #X obj 105 147 delread~ \$0-tap_48_54 141.695; | |
221 #X obj 106 223 outlet~; | |
222 #X connect 0 0 1 0; | |
223 #X connect 3 0 4 0; | |
224 #X restore 255 190 pd z^-4217; | |
225 #N canvas 0 22 458 308 z^-4453 0; | |
226 #X obj 41 104 delwrite~ \$0-tap_24_30 149.625; | |
227 #X obj 42 128 delread~ \$0-tap_24_30 149.625; | |
228 #X text 287 119 4453; | |
229 #X obj 43 60 inlet~; | |
230 #X obj 43 168 outlet~; | |
231 #X connect 1 0 4 0; | |
232 #X connect 3 0 0 0; | |
233 #X restore 43 192 pd z^-4453; | |
234 #N canvas 0 22 466 316 damping 0; | |
235 #X obj 74 53 inlet~; | |
236 #X obj 70 222 outlet~; | |
237 #X obj 73 137 lop~ 22050; | |
238 #X obj 162 137 r \$0-damping; | |
239 #X obj 162 159 * 48000; | |
240 #X connect 0 0 2 0; | |
241 #X connect 2 0 1 0; | |
242 #X connect 3 0 4 0; | |
243 #X connect 4 0 2 1; | |
244 #X restore 44 221 pd damping; | |
245 #N canvas 0 22 470 320 damping 0; | |
246 #X obj 74 53 inlet~; | |
247 #X obj 70 222 outlet~; | |
248 #X obj 73 137 lop~ 22050; | |
249 #X obj 162 137 r \$0-damping; | |
250 #X obj 162 159 * 48000; | |
251 #X connect 0 0 2 0; | |
252 #X connect 2 0 1 0; | |
253 #X connect 3 0 4 0; | |
254 #X connect 4 0 2 1; | |
255 #X restore 256 221 pd damping; | |
256 #N canvas 0 22 470 320 decay 0; | |
257 #X obj 71 66 inlet~; | |
258 #X obj 71 220 outlet~; | |
259 #X obj 140 139 r \$0-decay; | |
260 #X obj 70 140 *~ 0.5; | |
261 #X connect 0 0 3 0; | |
262 #X connect 2 0 3 1; | |
263 #X connect 3 0 1 0; | |
264 #X restore 43 249 pd decay; | |
265 #N canvas 0 22 470 320 decay 0; | |
266 #X obj 71 66 inlet~; | |
267 #X obj 71 220 outlet~; | |
268 #X obj 140 139 r \$0-decay; | |
269 #X obj 70 140 *~ 0.5; | |
270 #X connect 0 0 3 0; | |
271 #X connect 2 0 3 1; | |
272 #X connect 3 0 1 0; | |
273 #X restore 257 250 pd decay; | |
274 #N canvas 0 22 466 316 decay 0; | |
275 #X obj 71 66 inlet~; | |
276 #X obj 71 220 outlet~; | |
277 #X obj 140 139 r \$0-decay; | |
278 #X obj 70 140 *~ 0.5; | |
279 #X connect 0 0 3 0; | |
280 #X connect 2 0 3 1; | |
281 #X connect 3 0 1 0; | |
282 #X restore 43 87 pd decay; | |
283 #N canvas 0 22 466 316 decay 0; | |
284 #X obj 71 66 inlet~; | |
285 #X obj 71 220 outlet~; | |
286 #X obj 140 139 r \$0-decay; | |
287 #X obj 70 140 *~ 0.5; | |
288 #X connect 0 0 3 0; | |
289 #X connect 2 0 3 1; | |
290 #X connect 3 0 1 0; | |
291 #X restore 273 85 pd decay; | |
292 #N canvas 0 22 498 348 decay_diffusion1 0; | |
293 #N canvas 232 298 494 344 excursion 0; | |
294 #X obj 64 192 outlet~; | |
295 #X obj 62 90 osc~ 1; | |
296 #X obj 63 143 *~ 0.53761; | |
297 #X obj 130 109 r \$0-excursion; | |
298 #X connect 1 0 2 0; | |
299 #X connect 2 0 0 0; | |
300 #X connect 3 0 2 1; | |
301 #X restore 133 120 pd excursion; | |
302 #X obj 43 32 inlet~; | |
303 #X obj 44 250 outlet~; | |
304 #X obj 88 84 r \$0-decay_diffusion1; | |
305 #N canvas 409 74 612 523 allpassvd 0; | |
306 #X obj 48 83 inlet~; | |
307 #X obj 48 296 +~; | |
308 #X obj 285 142 loadbang; | |
309 #X obj 285 196 t f f; | |
310 #X obj 285 220 *; | |
311 #X obj 229 277 *~; | |
312 #X obj 216 300 +~; | |
313 #X obj 94 138 * -1; | |
314 #X obj 80 163 *~; | |
315 #X obj 217 401 outlet~; | |
316 #X obj 392 30 inlet~; | |
317 #X obj 447 56 sig~; | |
318 #X obj 447 10 loadbang; | |
319 #X obj 390 78 +~; | |
320 #X obj 255 45 inlet; | |
321 #X obj 94 60 loadbang; | |
322 #X text 9 6 arguments: delay(ms) feedback(mult); | |
323 #X text 10 20 inlets: signal feedback(mult) excursion; | |
324 #X obj 94 114 f 0.7; | |
325 #X obj 230 152 *~ 0.7; | |
326 #X obj 285 172 f 0.7; | |
327 #X obj 391 404 +~; | |
328 #X text 372 428 excursion; | |
329 #X obj 48 327 delwrite~ \$0-tap_23_24 100; | |
330 #X obj 283 101 vd~ \$0-tap_23_24; | |
331 #X obj 447 33 f 22.5599; | |
332 #X obj 285 244 swap 1; | |
333 #X obj 285 268 -; | |
334 #X connect 0 0 1 0; | |
335 #X connect 0 0 8 0; | |
336 #X connect 1 0 23 0; | |
337 #X connect 2 0 20 0; | |
338 #X connect 3 0 4 0; | |
339 #X connect 3 1 4 1; | |
340 #X connect 4 0 26 0; | |
341 #X connect 5 0 6 1; | |
342 #X connect 6 0 9 0; | |
343 #X connect 7 0 8 1; | |
344 #X connect 8 0 6 0; | |
345 #X connect 10 0 13 0; | |
346 #X connect 11 0 13 1; | |
347 #X connect 12 0 25 0; | |
348 #X connect 13 0 21 0; | |
349 #X connect 13 0 24 0; | |
350 #X connect 14 0 18 0; | |
351 #X connect 14 0 19 1; | |
352 #X connect 14 0 20 0; | |
353 #X connect 15 0 18 0; | |
354 #X connect 18 0 7 0; | |
355 #X connect 19 0 1 1; | |
356 #X connect 19 0 5 0; | |
357 #X connect 20 0 3 0; | |
358 #X connect 24 0 19 0; | |
359 #X connect 25 0 11 0; | |
360 #X connect 26 0 27 0; | |
361 #X connect 26 1 27 1; | |
362 #X connect 27 0 5 1; | |
363 #X restore 43 150 pd allpassvd; | |
364 #X connect 0 0 4 2; | |
365 #X connect 1 0 4 0; | |
366 #X connect 3 0 4 1; | |
367 #X connect 4 0 2 0; | |
368 #X restore 44 156 pd decay_diffusion1; | |
369 #N canvas 0 22 529 394 decay_diffusion1 0; | |
370 #N canvas 232 298 482 332 excursion 0; | |
371 #X obj 65 192 outlet~; | |
372 #X obj 63 81 osc~ 1; | |
373 #X obj 64 134 *~ 0.53761; | |
374 #X obj 139 104 r \$0-excursion; | |
375 #X connect 1 0 2 0; | |
376 #X connect 2 0 0 0; | |
377 #X connect 3 0 2 1; | |
378 #X restore 138 92 pd excursion; | |
379 #X obj 49 25 inlet~; | |
380 #X obj 49 200 outlet~; | |
381 #X obj 93 60 r \$0-decay_diffusion1; | |
382 #N canvas 348 52 608 519 allpassvd 0; | |
383 #X obj 48 83 inlet~; | |
384 #X obj 48 296 +~; | |
385 #X obj 285 142 loadbang; | |
386 #X obj 285 196 t f f; | |
387 #X obj 285 220 *; | |
388 #X obj 229 277 *~; | |
389 #X obj 216 300 +~; | |
390 #X obj 94 138 * -1; | |
391 #X obj 80 163 *~; | |
392 #X obj 217 401 outlet~; | |
393 #X obj 392 30 inlet~; | |
394 #X obj 447 56 sig~; | |
395 #X obj 447 10 loadbang; | |
396 #X obj 390 78 +~; | |
397 #X obj 255 45 inlet; | |
398 #X obj 94 60 loadbang; | |
399 #X text 9 6 arguments: delay(ms) feedback(mult); | |
400 #X text 10 20 inlets: signal feedback(mult) excursion; | |
401 #X obj 48 327 delwrite~ \$0-tap_46_48 100; | |
402 #X obj 283 101 vd~ \$0-tap_46_48; | |
403 #X obj 447 33 f 30.5097; | |
404 #X obj 94 114 f 0.7; | |
405 #X obj 230 152 *~ 0.7; | |
406 #X obj 285 172 f 0.7; | |
407 #X obj 391 404 +~; | |
408 #X text 372 428 excursion; | |
409 #X obj 285 244 swap 1; | |
410 #X obj 285 268 -; | |
411 #X connect 0 0 1 0; | |
412 #X connect 0 0 8 0; | |
413 #X connect 1 0 18 0; | |
414 #X connect 2 0 23 0; | |
415 #X connect 3 0 4 0; | |
416 #X connect 3 1 4 1; | |
417 #X connect 4 0 26 0; | |
418 #X connect 5 0 6 1; | |
419 #X connect 6 0 9 0; | |
420 #X connect 7 0 8 1; | |
421 #X connect 8 0 6 0; | |
422 #X connect 10 0 13 0; | |
423 #X connect 11 0 13 1; | |
424 #X connect 12 0 20 0; | |
425 #X connect 13 0 19 0; | |
426 #X connect 13 0 24 0; | |
427 #X connect 14 0 21 0; | |
428 #X connect 14 0 22 1; | |
429 #X connect 14 0 23 0; | |
430 #X connect 15 0 21 0; | |
431 #X connect 19 0 22 0; | |
432 #X connect 20 0 11 0; | |
433 #X connect 21 0 7 0; | |
434 #X connect 22 0 1 1; | |
435 #X connect 22 0 5 0; | |
436 #X connect 23 0 3 0; | |
437 #X connect 26 0 27 0; | |
438 #X connect 26 1 27 1; | |
439 #X connect 27 0 5 1; | |
440 #X restore 48 135 pd allpassvd; | |
441 #X connect 0 0 4 2; | |
442 #X connect 1 0 4 0; | |
443 #X connect 3 0 4 1; | |
444 #X connect 4 0 2 0; | |
445 #X restore 256 155 pd decay_diffusion1; | |
446 #N canvas 327 329 552 336 decay_diffusion2 0; | |
447 #X obj 37 63 inlet~; | |
448 #X obj 37 220 outlet~; | |
449 #N canvas 393 22 582 586 allpass 0; | |
450 #X obj 56 127 inlet~; | |
451 #X obj 56 400 +~; | |
452 #X obj 427 232 loadbang; | |
453 #X obj 417 286 t f f; | |
454 #X obj 417 310 *; | |
455 #X obj 253 364 *~; | |
456 #X obj 232 394 +~; | |
457 #X obj 114 177 * -1; | |
458 #X obj 88 207 *~; | |
459 #X obj 232 426 outlet~; | |
460 #X obj 417 129 inlet; | |
461 #X obj 114 117 loadbang; | |
462 #X obj 75 365 *~ -1; | |
463 #X obj 201 364 *~ -1; | |
464 #X obj 252 52 delread~ \$0-tap_31_33 60.4818; | |
465 #X obj 56 491 delwrite~ \$0-tap_31_33 200; | |
466 #X obj 114 149 f 0.5; | |
467 #X obj 252 262 *~ 0.5; | |
468 #X obj 417 262 f 0.5; | |
469 #X obj 417 334 swap 1; | |
470 #X obj 417 358 -; | |
471 #X connect 0 0 1 0; | |
472 #X connect 0 0 8 0; | |
473 #X connect 1 0 15 0; | |
474 #X connect 2 0 18 0; | |
475 #X connect 3 0 4 0; | |
476 #X connect 3 1 4 1; | |
477 #X connect 4 0 19 0; | |
478 #X connect 5 0 6 1; | |
479 #X connect 6 0 9 0; | |
480 #X connect 7 0 8 1; | |
481 #X connect 8 0 13 0; | |
482 #X connect 10 0 16 0; | |
483 #X connect 10 0 17 1; | |
484 #X connect 10 0 18 0; | |
485 #X connect 11 0 16 0; | |
486 #X connect 12 0 1 1; | |
487 #X connect 13 0 6 0; | |
488 #X connect 14 0 17 0; | |
489 #X connect 16 0 7 0; | |
490 #X connect 17 0 5 0; | |
491 #X connect 17 0 12 0; | |
492 #X connect 18 0 3 0; | |
493 #X connect 19 0 20 0; | |
494 #X connect 19 1 20 1; | |
495 #X connect 20 0 5 1; | |
496 #X restore 36 143 pd allpass tap_31_33; | |
497 #X obj 191 114 r \$0-decay_diffusion2; | |
498 #X connect 0 0 2 0; | |
499 #X connect 2 0 1 0; | |
500 #X connect 3 0 2 1; | |
501 #X restore 43 277 pd decay_diffusion2; | |
502 #N canvas 0 22 553 336 decay_diffusion2 0; | |
503 #X obj 52 38 inlet~; | |
504 #X obj 54 171 outlet~; | |
505 #X obj 210 85 r \$0-decay_diffusion2; | |
506 #N canvas 393 22 586 590 allpass 0; | |
507 #X obj 56 127 inlet~; | |
508 #X obj 56 400 +~; | |
509 #X obj 427 232 loadbang; | |
510 #X obj 417 286 t f f; | |
511 #X obj 417 310 *; | |
512 #X obj 253 364 *~; | |
513 #X obj 232 394 +~; | |
514 #X obj 114 177 * -1; | |
515 #X obj 88 207 *~; | |
516 #X obj 232 426 outlet~; | |
517 #X obj 417 129 inlet; | |
518 #X obj 114 117 loadbang; | |
519 #X obj 75 365 *~ -1; | |
520 #X obj 201 364 *~ -1; | |
521 #X obj 114 149 f 0.5; | |
522 #X obj 252 262 *~ 0.5; | |
523 #X obj 417 262 f 0.5; | |
524 #X obj 56 491 delwrite~ \$0-tap_55_59 200; | |
525 #X obj 252 52 delread~ \$0-tap_55_59 89.2443; | |
526 #X obj 417 334 swap 1; | |
527 #X obj 417 358 -; | |
528 #X connect 0 0 1 0; | |
529 #X connect 0 0 8 0; | |
530 #X connect 1 0 17 0; | |
531 #X connect 2 0 16 0; | |
532 #X connect 3 0 4 0; | |
533 #X connect 3 1 4 1; | |
534 #X connect 4 0 19 0; | |
535 #X connect 5 0 6 1; | |
536 #X connect 6 0 9 0; | |
537 #X connect 7 0 8 1; | |
538 #X connect 8 0 13 0; | |
539 #X connect 10 0 14 0; | |
540 #X connect 10 0 15 1; | |
541 #X connect 10 0 16 0; | |
542 #X connect 11 0 14 0; | |
543 #X connect 12 0 1 1; | |
544 #X connect 13 0 6 0; | |
545 #X connect 14 0 7 0; | |
546 #X connect 15 0 5 0; | |
547 #X connect 15 0 12 0; | |
548 #X connect 16 0 3 0; | |
549 #X connect 18 0 15 0; | |
550 #X connect 19 0 20 0; | |
551 #X connect 19 1 20 1; | |
552 #X connect 20 0 5 1; | |
553 #X restore 55 114 pd allpass tap_55_59; | |
554 #X connect 0 0 3 0; | |
555 #X connect 2 0 3 1; | |
556 #X connect 3 0 1 0; | |
557 #X restore 256 278 pd decay_diffusion2; | |
558 #N canvas 0 22 454 304 feedback 0; | |
559 #X obj 43 118 outlet~; | |
560 #X obj 44 55 delread~ \$0-tap_59_63 106.28; | |
561 #X connect 1 0 0 0; | |
562 #X restore 43 49 pd feedback; | |
563 #N canvas 0 22 454 304 feedback 0; | |
564 #X obj 81 188 outlet~; | |
565 #X obj 81 134 delread~ \$0-tap_33_39 124.996; | |
566 #X connect 1 0 0 0; | |
567 #X restore 274 51 pd feedback; | |
568 #N canvas 0 22 458 308 to_left 0; | |
569 #X obj 48 52 inlet~; | |
570 #X obj 48 95 delwrite~ \$0-tap_59_63 106.28; | |
571 #X connect 0 0 1 0; | |
572 #X restore 255 306 pd to_left; | |
573 #N canvas 0 22 454 304 to_right 0; | |
574 #X obj 53 173 delwrite~ \$0-tap_33_39 124.996; | |
575 #X obj 56 100 inlet~; | |
576 #X connect 1 0 0 0; | |
577 #X restore 44 305 pd to_right; | |
578 #X text 344 190 48_54; | |
579 #X text 136 193 24_30; | |
580 #X obj 170 357 outlet~; | |
581 #X text 242 358 dummy; | |
582 #X connect 0 0 1 1; | |
583 #X connect 0 0 2 0; | |
584 #X connect 1 0 11 0; | |
585 #X connect 2 0 12 0; | |
586 #X connect 3 0 6 0; | |
587 #X connect 4 0 5 0; | |
588 #X connect 5 0 7 0; | |
589 #X connect 6 0 8 0; | |
590 #X connect 7 0 13 0; | |
591 #X connect 8 0 14 0; | |
592 #X connect 9 0 1 0; | |
593 #X connect 10 0 2 1; | |
594 #X connect 11 0 4 0; | |
595 #X connect 12 0 3 0; | |
596 #X connect 13 0 18 0; | |
597 #X connect 14 0 17 0; | |
598 #X connect 15 0 9 0; | |
599 #X connect 16 0 10 0; | |
600 #X restore 25 238 pd reverberation_tank; | |
601 #N canvas 58 172 593 487 predelay 0; | |
602 #X obj 97 19 inlet~; | |
603 #X obj 97 317 outlet~; | |
604 #X obj 393 56 sel 0; | |
605 #X obj 96 209 *~ 1; | |
606 #X obj 110 178 f 1; | |
607 #X obj 140 179 f 0; | |
608 #X obj 428 106 t a b; | |
609 #X obj 377 222 *~ 1; | |
610 #X obj 402 191 f 0; | |
611 #X obj 433 191 f 1; | |
612 #X text 17 210 no delay; | |
613 #X text 237 212 delay; | |
614 #N canvas 294 159 273 227 predelay 0; | |
615 #X obj 35 52 inlet~; | |
616 #X obj 94 54 inlet; | |
617 #N canvas 345 153 450 300 dw 0; | |
618 #X obj 35 52 inlet~; | |
619 #X obj 35 101 delwrite~ \$0-predelay 1000; | |
620 #X obj 34 140 outlet~; | |
621 #X connect 0 0 1 0; | |
622 #X restore 34 84 pd dw; | |
623 #N canvas 326 259 416 179 dr 0; | |
624 #X obj 126 29 inlet; | |
625 #X obj 49 28 inlet~; | |
626 #X obj 126 65 delread~ \$0-predelay 1; | |
627 #X obj 126 88 outlet~; | |
628 #X connect 0 0 2 0; | |
629 #X connect 2 0 3 0; | |
630 #X restore 33 116 pd dr; | |
631 #X obj 33 138 outlet~; | |
632 #X connect 0 0 2 0; | |
633 #X connect 1 0 3 1; | |
634 #X connect 2 0 3 0; | |
635 #X connect 3 0 4 0; | |
636 #X restore 297 190 pd predelay; | |
637 #X obj 393 25 r \$0-predelay; | |
638 #X connect 0 0 3 0; | |
639 #X connect 0 0 12 0; | |
640 #X connect 2 0 4 0; | |
641 #X connect 2 0 8 0; | |
642 #X connect 2 1 6 0; | |
643 #X connect 3 0 1 0; | |
644 #X connect 4 0 3 1; | |
645 #X connect 5 0 3 1; | |
646 #X connect 6 0 12 1; | |
647 #X connect 6 1 5 0; | |
648 #X connect 6 1 9 0; | |
649 #X connect 7 0 1 0; | |
650 #X connect 8 0 7 1; | |
651 #X connect 9 0 7 1; | |
652 #X connect 12 0 7 0; | |
653 #X connect 13 0 2 0; | |
654 #X restore 25 145 pd predelay; | |
655 #X obj 85 32 inlet~; | |
656 #N canvas 0 22 458 308 bandwidth 0; | |
657 #X obj 66 22 inlet~; | |
658 #X obj 65 183 outlet~; | |
659 #X obj 65 107 lop~; | |
660 #X obj 92 44 r \$0-bandwidth; | |
661 #X obj 92 66 * 48000; | |
662 #X connect 0 0 2 0; | |
663 #X connect 2 0 1 0; | |
664 #X connect 3 0 4 0; | |
665 #X connect 4 0 2 1; | |
666 #X restore 25 177 pd bandwidth; | |
667 #N canvas 0 22 458 308 1/2 0; | |
668 #X obj 102 56 inlet~; | |
669 #X obj 182 56 inlet~; | |
670 #X obj 103 138 *~ 0.5; | |
671 #X obj 103 102 +~; | |
672 #X obj 103 175 outlet~; | |
673 #X connect 0 0 3 0; | |
674 #X connect 1 0 3 1; | |
675 #X connect 2 0 4 0; | |
676 #X connect 3 0 2 0; | |
677 #X restore 25 112 pd 1/2; | |
678 #N canvas 120 111 856 498 output_taps 0; | |
679 #X obj 28 409 outlet~; | |
680 #X obj 30 267 -~; | |
681 #X obj 31 109 +~; | |
682 #X obj 30 215 +~; | |
683 #X obj 29 369 -~; | |
684 #X text 30 26 left; | |
685 #X obj 32 55 delread~ \$0-tap_48_54 8.93787; | |
686 #X obj 51 82 delread~ \$0-tap_48_54 99.9294; | |
687 #X obj 50 134 delread~ \$0-tap_55_59 64.2787; | |
688 #X obj 31 163 -~; | |
689 #X obj 49 188 delread~ \$0-tap_59_63 67.0676; | |
690 #X obj 50 240 delread~ \$0-tap_24_30 66.866; | |
691 #X obj 50 293 delread~ \$0-tap_31_33 6.28339; | |
692 #X obj 30 317 -~; | |
693 #X obj 49 342 delread~ \$0-tap_33_39 35.8187; | |
694 #X obj 371 407 outlet~; | |
695 #X obj 370 105 +~; | |
696 #X obj 371 261 -~; | |
697 #X obj 370 208 +~; | |
698 #X obj 371 365 -~; | |
699 #X text 370 20 right; | |
700 #X obj 371 51 delread~ \$0-tap_24_30 11.8612; | |
701 #X obj 390 78 delread~ \$0-tap_24_30 121.871; | |
702 #X obj 390 130 delread~ \$0-tap_31_33 41.2621; | |
703 #X obj 390 181 delread~ \$0-tap_33_39 89.8155; | |
704 #X obj 391 234 delread~ \$0-tap_48_54 70.9317; | |
705 #X obj 372 313 -~; | |
706 #X obj 392 286 delread~ \$0-tap_55_59 11.2563; | |
707 #X obj 390 338 delread~ \$0-tap_59_63 4.06572; | |
708 #X obj 370 154 -~; | |
709 #X obj 161 15 inlet~; | |
710 #X text 222 15 dummy; | |
711 #X connect 1 0 13 0; | |
712 #X connect 2 0 9 0; | |
713 #X connect 3 0 1 0; | |
714 #X connect 4 0 0 0; | |
715 #X connect 6 0 2 0; | |
716 #X connect 7 0 2 1; | |
717 #X connect 8 0 9 1; | |
718 #X connect 9 0 3 0; | |
719 #X connect 10 0 3 1; | |
720 #X connect 11 0 1 1; | |
721 #X connect 12 0 13 1; | |
722 #X connect 13 0 4 0; | |
723 #X connect 14 0 4 1; | |
724 #X connect 16 0 29 0; | |
725 #X connect 17 0 26 0; | |
726 #X connect 18 0 17 0; | |
727 #X connect 19 0 15 0; | |
728 #X connect 21 0 16 0; | |
729 #X connect 22 0 16 1; | |
730 #X connect 23 0 29 1; | |
731 #X connect 24 0 18 1; | |
732 #X connect 25 0 17 1; | |
733 #X connect 26 0 19 0; | |
734 #X connect 27 0 26 1; | |
735 #X connect 28 0 19 1; | |
736 #X connect 29 0 18 0; | |
737 #X restore 24 268 pd output_taps; | |
738 #N canvas 228 198 627 317 LICENSE-BSD 0; | |
739 #X text 121 56 This software is copyrighted by Miller Puckette \, Reality | |
740 Jockey Ltd. and others. The terms (the "Standard Improved BSD License") | |
741 apply to all files associated with the software unless explicitly disclaimed | |
742 in individual files.; | |
743 #X text 123 148 See the file LICENSE.txt for the full license text. | |
744 ; | |
745 #X restore 373 40 pd LICENSE-BSD; | |
746 #X msg 164 290 \$1 10; | |
747 #X obj 187 137 inlet dry; | |
748 #X obj 286 192 s \$0-predelay; | |
749 #X msg 286 170 0; | |
750 #X obj 431 192 s \$0-bandwidth; | |
751 #X obj 431 242 s \$0-damping; | |
752 #X obj 286 242 s \$0-decay; | |
753 #X obj 286 292 s \$0-input_diffusion1; | |
754 #X msg 286 270 0.75; | |
755 #X msg 431 271 0.7; | |
756 #X obj 431 292 s \$0-decay_diffusion1; | |
757 #X obj 431 342 s \$0-decay_diffusion2; | |
758 #X obj 286 342 s \$0-input_diffusion2; | |
759 #X msg 286 320 0.625; | |
760 #X obj 286 392 s \$0-excursion; | |
761 #X obj 286 142 t b; | |
762 #X obj 281 87 loadbang; | |
763 #X obj 281 109 del 2000; | |
764 #X obj 367 83 r tick; | |
765 #X obj 367 105 mod 100; | |
766 #X obj 367 127 sel 0; | |
767 #X msg 431 171 10000; | |
768 #X msg 286 370 0; | |
769 #X msg 431 321 0.84; | |
770 #X obj 23 347 c_xfade; | |
771 #X obj 118 349 c_xfade; | |
772 #X floatatom 542 219 5 0 0 0 - - -, f 5; | |
773 #X floatatom 543 272 5 0 0 0 - - -, f 5; | |
774 #X msg 286 220 0.8; | |
775 #X msg 431 221 3000; | |
776 #X connect 0 0 8 0; | |
777 #X connect 0 0 35 1; | |
778 #X connect 3 0 4 0; | |
779 #X connect 4 0 9 0; | |
780 #X connect 5 0 7 0; | |
781 #X connect 6 0 8 1; | |
782 #X connect 6 0 36 1; | |
783 #X connect 7 0 3 0; | |
784 #X connect 8 0 5 0; | |
785 #X connect 9 0 35 0; | |
786 #X connect 9 1 36 0; | |
787 #X connect 11 0 35 2; | |
788 #X connect 11 0 36 2; | |
789 #X connect 12 0 11 0; | |
790 #X connect 12 0 26 0; | |
791 #X connect 14 0 13 0; | |
792 #X connect 19 0 18 0; | |
793 #X connect 20 0 21 0; | |
794 #X connect 24 0 23 0; | |
795 #X connect 26 0 14 0; | |
796 #X connect 26 0 32 0; | |
797 #X connect 26 0 39 0; | |
798 #X connect 26 0 40 0; | |
799 #X connect 26 0 19 0; | |
800 #X connect 26 0 20 0; | |
801 #X connect 26 0 34 0; | |
802 #X connect 26 0 24 0; | |
803 #X connect 26 0 33 0; | |
804 #X connect 27 0 28 0; | |
805 #X connect 28 0 26 0; | |
806 #X connect 29 0 30 0; | |
807 #X connect 30 0 31 0; | |
808 #X connect 31 0 26 0; | |
809 #X connect 32 0 15 0; | |
810 #X connect 33 0 25 0; | |
811 #X connect 34 0 22 0; | |
812 #X connect 35 0 1 0; | |
813 #X connect 36 0 2 0; | |
814 #X connect 37 0 16 0; | |
815 #X connect 38 0 17 0; | |
816 #X connect 39 0 17 0; | |
817 #X connect 40 0 16 0; |