Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

effet platereverb

  • Loading branch information...
commit 0d246c9d055ef0faae340292add9364d55544454 1 parent f151542
@j-k-p j-k-p authored
Showing with 834 additions and 0 deletions.
  1. +38 −0 platereverb~-help.pd
  2. +796 −0 platereverb~.pd
View
38 platereverb~-help.pd
@@ -0,0 +1,38 @@
+#N canvas 0 0 1272 714 10;
+#X obj -226 190 mtl/out~;
+#X text -230 59 tags: fx~;
+#X text -77 156 <-Click on the propeties menu to display params;
+#X obj 201 41 cnv 15 200 40 empty empty empty 20 12 0 14 -232576 -66577
+0;
+#X text 261 42 PARAM ENABLED;
+#X obj 203 175 cnv 15 200 20 empty empty /platereverb/ 2 12 0 8 -258401
+-262144 0;
+#X obj 209 204 hsl 100 15 0 1 0 0 /platereverb/wet /platereverb/wet_
+wet 105 7 0 8 -262144 -1 -1 7600 1;
+#X obj 200 64 tof/open_help tof/param;
+#X text -232 24 Description:;
+#X text -153 24 PlateReverb;
+#X obj 209 223 hsl 100 15 0 1 0 0 /platereverb/decay_diffusion2 /platereverb/decay_diffusion2_
+decay_diffusion2 105 7 0 8 -262144 -1 -1 9900 1;
+#X obj 209 243 hsl 100 15 0 1 0 0 /platereverb/decay_diffusion /platereverb/decay_diffusion_
+decay_diffusion 105 7 0 8 -262144 -1 -1 0 1;
+#X obj 208 307 hsl 100 15 0 5 0 0 /platereverb/excursion /platereverb/excursion_
+excursion 105 7 0 8 -262144 -1 -1 9900 1;
+#X obj 208 328 hsl 100 15 0 1 0 0 /platereverb/decay /platereverb/decay_
+decay 105 7 0 8 -262144 -1 -1 5300 1;
+#X obj 208 348 hsl 100 15 0 250 0 0 /platereverb/predelay /platereverb/predelay_
+predelay 105 7 0 8 -262144 -1 -1 3960 1;
+#X obj 208 368 hsl 100 15 0 22050 0 0 /platereverb/damping /platereverb/damping_
+damping 105 7 0 8 -262144 -1 -1 9900 1;
+#X obj 208 388 hsl 100 15 0 22050 0 0 /platereverb/bandwidth /platereverb/badwidth_
+banswidth 105 7 0 8 -262144 -1 -1 5400 1;
+#X obj -228 114 mtl/rain~ /id rain;
+#X obj 209 263 hsl 100 15 0 1 0 0 /platereverb/inputdiffusion1 /platereverb/inputdiffusion1_
+input_diffusion 105 7 0 8 -262144 -1 -1 7800 1;
+#X obj 208 285 hsl 100 15 0 1 0 0 /platereverb/inputdiffusion2 /platereverb/inputdiffusion2_
+input_diffusion2 105 7 0 8 -262144 -1 -1 9900 1;
+#X obj -230 158 mtl/platereverb~ /id platereverb;
+#X connect 17 0 20 0;
+#X connect 17 0 20 1;
+#X connect 20 0 0 0;
+#X connect 20 1 0 1;
View
796 platereverb~.pd
@@ -0,0 +1,796 @@
+#N canvas 0 0 1272 685 10;
+#X obj 55 403 outlet~;
+#X obj 48 57 inlet~;
+#X obj 108 66 inlet~;
+#X obj 115 403 outlet~;
+#X obj 1073 79 inlet params;
+#X obj 182 377 tof/param /wet 0 /g slider 0 1;
+#X obj 1073 125 print PARAM_NOTFOUND;
+#X obj 55 378 tof/crossfade~ 2;
+#X msg 219 407 \$1 5;
+#X obj 219 431 line~;
+#X obj 1073 101 tof/param route;
+#X obj 1069 224 b;
+#X obj 1070 253 tof/param gui;
+#N canvas 0 0 1272 714 platereverb 1;
+#X obj 509 93 inlet~;
+#X obj 504 380 outlet~;
+#X obj 595 383 outlet~;
+#N canvas 0 0 1272 714 input_diffusion 1;
+#X obj 30 60 inlet~;
+#X obj 29 295 outlet~;
+#N canvas 393 22 574 578 allpass 0;
+#X obj 56 127 inlet~;
+#X obj 56 400 +~;
+#X obj 427 232 loadbang;
+#X obj 417 286 t f f;
+#X obj 417 310 *;
+#X obj 253 364 *~;
+#X obj 232 394 +~;
+#X obj 114 177 * -1;
+#X obj 88 207 *~;
+#X obj 232 426 outlet~;
+#X obj 417 129 inlet;
+#X obj 114 117 loadbang;
+#X obj 75 365 *~ -1;
+#X obj 201 364 *~ -1;
+#X obj 114 149 f 0.75;
+#X obj 417 262 f 0.75;
+#X obj 56 491 delwrite~ \$0-tap_13_14 200;
+#X obj 252 262 *~ 0.75;
+#X obj 252 53 delread~ \$0-tap_13_14 4.77134;
+#X obj 417 336 swap 1;
+#X obj 417 360 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 16 0;
+#X connect 2 0 15 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 19 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 13 0;
+#X connect 10 0 14 0;
+#X connect 10 0 15 0;
+#X connect 10 0 17 1;
+#X connect 11 0 14 0;
+#X connect 12 0 1 1;
+#X connect 13 0 6 0;
+#X connect 14 0 7 0;
+#X connect 15 0 3 0;
+#X connect 17 0 5 0;
+#X connect 17 0 12 0;
+#X connect 18 0 17 0;
+#X connect 19 0 20 0;
+#X connect 19 1 20 1;
+#X connect 20 0 5 1;
+#X restore 30 99 pd allpass tap_13_14;
+#N canvas 314 22 579 582 allpass 0;
+#X obj 56 127 inlet~;
+#X obj 56 400 +~;
+#X obj 427 232 loadbang;
+#X obj 417 286 t f f;
+#X obj 417 310 *;
+#X obj 253 364 *~;
+#X obj 232 394 +~;
+#X obj 114 177 * -1;
+#X obj 88 207 *~;
+#X obj 232 426 outlet~;
+#X obj 417 129 inlet;
+#X obj 114 117 loadbang;
+#X obj 75 365 *~ -1;
+#X obj 201 364 *~ -1;
+#X obj 114 149 f 0.75;
+#X obj 417 262 f 0.75;
+#X obj 252 262 *~ 0.75;
+#X obj 56 491 delwrite~ \$0-tap_19_20 200;
+#X obj 252 53 delread~ \$0-tap_19_20 3.5953;
+#X obj 417 336 swap 1;
+#X obj 417 360 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 17 0;
+#X connect 2 0 15 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 19 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 13 0;
+#X connect 10 0 14 0;
+#X connect 10 0 15 0;
+#X connect 10 0 16 1;
+#X connect 11 0 14 0;
+#X connect 12 0 1 1;
+#X connect 13 0 6 0;
+#X connect 14 0 7 0;
+#X connect 15 0 3 0;
+#X connect 16 0 5 0;
+#X connect 16 0 12 0;
+#X connect 18 0 16 0;
+#X connect 19 0 20 0;
+#X connect 19 1 20 1;
+#X connect 20 0 5 1;
+#X restore 30 135 pd allpass tap_19_20;
+#N canvas 238 22 570 590 allpass 0;
+#X obj 56 127 inlet~;
+#X obj 56 400 +~;
+#X obj 427 232 loadbang;
+#X obj 417 286 t f f;
+#X obj 417 310 *;
+#X obj 253 364 *~;
+#X obj 232 394 +~;
+#X obj 114 177 * -1;
+#X obj 88 207 *~;
+#X obj 232 426 outlet~;
+#X obj 417 129 inlet;
+#X obj 114 117 loadbang;
+#X obj 75 365 *~ -1;
+#X obj 201 364 *~ -1;
+#X obj 114 149 f 0.625;
+#X obj 252 262 *~ 0.625;
+#X obj 417 262 f 0.625;
+#X obj 56 491 delwrite~ \$0-tap_15_16 200;
+#X obj 252 53 delread~ \$0-tap_15_16 12.7348;
+#X obj 417 336 swap 1;
+#X obj 417 360 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 17 0;
+#X connect 2 0 16 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 19 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 13 0;
+#X connect 10 0 14 0;
+#X connect 10 0 15 1;
+#X connect 10 0 16 0;
+#X connect 11 0 14 0;
+#X connect 12 0 1 1;
+#X connect 13 0 6 0;
+#X connect 14 0 7 0;
+#X connect 15 0 5 0;
+#X connect 15 0 12 0;
+#X connect 16 0 3 0;
+#X connect 18 0 15 0;
+#X connect 19 0 20 0;
+#X connect 19 1 20 1;
+#X connect 20 0 5 1;
+#X restore 30 190 pd allpass tap_15_16;
+#N canvas 238 22 566 586 allpass 0;
+#X obj 56 127 inlet~;
+#X obj 56 400 +~;
+#X obj 427 232 loadbang;
+#X obj 417 286 t f f;
+#X obj 417 310 *;
+#X obj 253 364 *~;
+#X obj 232 394 +~;
+#X obj 114 177 * -1;
+#X obj 88 207 *~;
+#X obj 232 426 outlet~;
+#X obj 417 129 inlet;
+#X obj 114 117 loadbang;
+#X obj 75 365 *~ -1;
+#X obj 201 364 *~ -1;
+#X obj 114 149 f 0.625;
+#X obj 252 262 *~ 0.625;
+#X obj 417 262 f 0.625;
+#X obj 56 491 delwrite~ \$0-tap_21_22 200;
+#X obj 252 53 delread~ \$0-tap_21_22 9.30748;
+#X obj 417 336 swap 1;
+#X obj 417 360 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 17 0;
+#X connect 2 0 16 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 19 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 13 0;
+#X connect 10 0 14 0;
+#X connect 10 0 15 1;
+#X connect 10 0 16 0;
+#X connect 11 0 14 0;
+#X connect 12 0 1 1;
+#X connect 13 0 6 0;
+#X connect 14 0 7 0;
+#X connect 15 0 5 0;
+#X connect 15 0 12 0;
+#X connect 16 0 3 0;
+#X connect 18 0 15 0;
+#X connect 19 0 20 0;
+#X connect 19 1 20 1;
+#X connect 20 0 5 1;
+#X restore 30 230 pd allpass tap_21_22;
+#X obj 338 79 tof/param /inputdiffusion1 1 /g slider 0 1;
+#X obj 336 170 tof/param /inputdiffusion2 1 /g slider 0 1;
+#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 1 0;
+#X connect 6 0 2 1;
+#X connect 6 0 3 1;
+#X connect 7 0 4 1;
+#X connect 7 0 5 1;
+#X restore 510 269 pd input_diffusion;
+#N canvas 0 0 1272 714 reverberation_tank 0;
+#X obj 532 153 inlet~;
+#X obj 413 240 +~;
+#X obj 840 257 +~;
+#N canvas 0 22 458 308 z^-4217 0;
+#X obj 106 55 inlet~;
+#X obj 105 120 delwrite~ \$0-tap_48_54 141.695;
+#X text 358 135 4217;
+#X obj 105 147 delread~ \$0-tap_48_54 141.695;
+#X obj 106 223 outlet~;
+#X connect 0 0 1 0;
+#X connect 3 0 4 0;
+#X restore 840 326 pd z^-4217;
+#N canvas 0 22 458 308 z^-4453 0;
+#X obj 41 104 delwrite~ \$0-tap_24_30 149.625;
+#X obj 42 128 delread~ \$0-tap_24_30 149.625;
+#X text 287 119 4453;
+#X obj 43 60 inlet~;
+#X obj 43 168 outlet~;
+#X connect 1 0 4 0;
+#X connect 3 0 0 0;
+#X restore 413 312 pd z^-4453;
+#N canvas 0 22 466 316 damping 0;
+#X obj 74 53 inlet~;
+#X obj 70 222 outlet~;
+#X obj 73 137 lop~ 22050;
+#X obj 162 137 r \$0-damping;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 414 341 pd damping;
+#N canvas 0 22 470 320 damping 0;
+#X obj 74 53 inlet~;
+#X obj 70 222 outlet~;
+#X obj 73 137 lop~ 22050;
+#X obj 162 137 r \$0-damping;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 841 357 pd damping;
+#N canvas 0 22 470 320 decay 0;
+#X obj 71 66 inlet~;
+#X obj 71 220 outlet~;
+#X obj 70 140 *~ 0.5;
+#X obj 140 139 inlet;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 413 369 pd decay;
+#N canvas 0 22 470 320 decay 0;
+#X obj 71 66 inlet~;
+#X obj 71 220 outlet~;
+#X obj 70 140 *~ 0.5;
+#X obj 162 92 inlet;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 842 386 pd decay;
+#N canvas 0 22 466 316 decay 0;
+#X obj 71 66 inlet~;
+#X obj 71 220 outlet~;
+#X obj 70 140 *~ 0.5;
+#X obj 176 81 inlet;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 413 207 pd decay;
+#N canvas 0 22 466 316 decay 0;
+#X obj 71 66 inlet~;
+#X obj 71 220 outlet~;
+#X obj 70 140 *~ 0.5;
+#X obj 140 139 inlet;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 858 221 pd decay;
+#N canvas 486 245 498 348 decay_diffusion1 0;
+#N canvas 232 298 494 344 excursion 0;
+#X obj 64 192 outlet~;
+#X obj 62 90 osc~ 1;
+#X obj 63 143 *~ 0.53761;
+#X obj 130 109 r \$0-excursion;
+#X connect 1 0 2 0;
+#X connect 2 0 0 0;
+#X connect 3 0 2 1;
+#X restore 133 120 pd excursion;
+#X obj 43 32 inlet~;
+#X obj 44 250 outlet~;
+#X obj 87 85 r \$0-decay_diffusion1;
+#N canvas 409 74 612 523 allpassvd 0;
+#X obj 48 83 inlet~;
+#X obj 48 296 +~;
+#X obj 285 142 loadbang;
+#X obj 285 196 t f f;
+#X obj 285 220 *;
+#X obj 229 277 *~;
+#X obj 216 300 +~;
+#X obj 94 138 * -1;
+#X obj 80 163 *~;
+#X obj 217 401 outlet~;
+#X obj 392 30 inlet~;
+#X obj 447 56 sig~;
+#X obj 447 10 loadbang;
+#X obj 390 78 +~;
+#X obj 255 45 inlet;
+#X obj 94 60 loadbang;
+#X text 9 6 arguments: delay(ms) feedback(mult);
+#X text 10 20 inlets: signal feedback(mult) excursion;
+#X obj 94 114 f 0.7;
+#X obj 230 152 *~ 0.7;
+#X obj 285 172 f 0.7;
+#X obj 391 404 +~;
+#X text 372 428 excursion;
+#X obj 48 327 delwrite~ \$0-tap_23_24 100;
+#X obj 283 101 vd~ \$0-tap_23_24;
+#X obj 447 33 f 22.5599;
+#X obj 285 244 swap 1;
+#X obj 285 268 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 23 0;
+#X connect 2 0 20 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 26 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 6 0;
+#X connect 10 0 13 0;
+#X connect 11 0 13 1;
+#X connect 12 0 25 0;
+#X connect 13 0 21 0;
+#X connect 13 0 24 0;
+#X connect 14 0 18 0;
+#X connect 14 0 19 1;
+#X connect 14 0 20 0;
+#X connect 15 0 18 0;
+#X connect 18 0 7 0;
+#X connect 19 0 1 1;
+#X connect 19 0 5 0;
+#X connect 20 0 3 0;
+#X connect 24 0 19 0;
+#X connect 25 0 11 0;
+#X connect 26 0 27 0;
+#X connect 26 1 27 1;
+#X connect 27 0 5 1;
+#X restore 43 150 pd allpassvd;
+#X connect 0 0 4 2;
+#X connect 1 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 2 0;
+#X restore 414 276 pd decay_diffusion1;
+#N canvas 0 22 529 394 decay_diffusion1 0;
+#N canvas 232 298 482 332 excursion 0;
+#X obj 65 192 outlet~;
+#X obj 63 81 osc~ 1;
+#X obj 64 134 *~ 0.53761;
+#X obj 139 104 r \$0-excursion;
+#X connect 1 0 2 0;
+#X connect 2 0 0 0;
+#X connect 3 0 2 1;
+#X restore 138 92 pd excursion;
+#X obj 49 25 inlet~;
+#X obj 49 200 outlet~;
+#X obj 93 60 r \$0-decay_diffusion1;
+#N canvas 348 52 608 519 allpassvd 0;
+#X obj 48 83 inlet~;
+#X obj 48 296 +~;
+#X obj 285 142 loadbang;
+#X obj 285 196 t f f;
+#X obj 285 220 *;
+#X obj 229 277 *~;
+#X obj 216 300 +~;
+#X obj 94 138 * -1;
+#X obj 80 163 *~;
+#X obj 217 401 outlet~;
+#X obj 392 30 inlet~;
+#X obj 447 56 sig~;
+#X obj 447 10 loadbang;
+#X obj 390 78 +~;
+#X obj 255 45 inlet;
+#X obj 94 60 loadbang;
+#X text 9 6 arguments: delay(ms) feedback(mult);
+#X text 10 20 inlets: signal feedback(mult) excursion;
+#X obj 48 327 delwrite~ \$0-tap_46_48 100;
+#X obj 283 101 vd~ \$0-tap_46_48;
+#X obj 447 33 f 30.5097;
+#X obj 94 114 f 0.7;
+#X obj 230 152 *~ 0.7;
+#X obj 285 172 f 0.7;
+#X obj 391 404 +~;
+#X text 372 428 excursion;
+#X obj 285 244 swap 1;
+#X obj 285 268 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 18 0;
+#X connect 2 0 23 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 26 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 6 0;
+#X connect 10 0 13 0;
+#X connect 11 0 13 1;
+#X connect 12 0 20 0;
+#X connect 13 0 19 0;
+#X connect 13 0 24 0;
+#X connect 14 0 21 0;
+#X connect 14 0 22 1;
+#X connect 14 0 23 0;
+#X connect 15 0 21 0;
+#X connect 19 0 22 0;
+#X connect 20 0 11 0;
+#X connect 21 0 7 0;
+#X connect 22 0 1 1;
+#X connect 22 0 5 0;
+#X connect 23 0 3 0;
+#X connect 26 0 27 0;
+#X connect 26 1 27 1;
+#X connect 27 0 5 1;
+#X restore 48 135 pd allpassvd;
+#X connect 0 0 4 2;
+#X connect 1 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 2 0;
+#X restore 841 291 pd decay_diffusion1;
+#N canvas 327 329 552 336 decay_diffusion2 0;
+#X obj 37 63 inlet~;
+#X obj 37 220 outlet~;
+#N canvas 393 22 582 586 allpass 0;
+#X obj 56 127 inlet~;
+#X obj 56 400 +~;
+#X obj 427 232 loadbang;
+#X obj 417 286 t f f;
+#X obj 417 310 *;
+#X obj 253 364 *~;
+#X obj 232 394 +~;
+#X obj 114 177 * -1;
+#X obj 88 207 *~;
+#X obj 232 426 outlet~;
+#X obj 417 129 inlet;
+#X obj 114 117 loadbang;
+#X obj 75 365 *~ -1;
+#X obj 201 364 *~ -1;
+#X obj 252 52 delread~ \$0-tap_31_33 60.4818;
+#X obj 56 491 delwrite~ \$0-tap_31_33 200;
+#X obj 114 149 f 0.5;
+#X obj 252 262 *~ 0.5;
+#X obj 417 262 f 0.5;
+#X obj 417 334 swap 1;
+#X obj 417 358 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 15 0;
+#X connect 2 0 18 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 19 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 13 0;
+#X connect 10 0 16 0;
+#X connect 10 0 17 1;
+#X connect 10 0 18 0;
+#X connect 11 0 16 0;
+#X connect 12 0 1 1;
+#X connect 13 0 6 0;
+#X connect 14 0 17 0;
+#X connect 16 0 7 0;
+#X connect 17 0 5 0;
+#X connect 17 0 12 0;
+#X connect 18 0 3 0;
+#X connect 19 0 20 0;
+#X connect 19 1 20 1;
+#X connect 20 0 5 1;
+#X restore 36 143 pd allpass tap_31_33;
+#X obj 191 114 r \$0-decay_diffusion2;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 413 397 pd decay_diffusion2;
+#N canvas 0 22 553 336 decay_diffusion2 0;
+#X obj 52 38 inlet~;
+#X obj 54 171 outlet~;
+#X obj 210 85 r \$0-decay_diffusion2;
+#N canvas 393 22 586 590 allpass 0;
+#X obj 56 127 inlet~;
+#X obj 56 400 +~;
+#X obj 427 232 loadbang;
+#X obj 417 286 t f f;
+#X obj 417 310 *;
+#X obj 253 364 *~;
+#X obj 232 394 +~;
+#X obj 114 177 * -1;
+#X obj 88 207 *~;
+#X obj 232 426 outlet~;
+#X obj 417 129 inlet;
+#X obj 114 117 loadbang;
+#X obj 75 365 *~ -1;
+#X obj 201 364 *~ -1;
+#X obj 114 149 f 0.5;
+#X obj 252 262 *~ 0.5;
+#X obj 417 262 f 0.5;
+#X obj 56 491 delwrite~ \$0-tap_55_59 200;
+#X obj 252 52 delread~ \$0-tap_55_59 89.2443;
+#X obj 417 334 swap 1;
+#X obj 417 358 -;
+#X connect 0 0 1 0;
+#X connect 0 0 8 0;
+#X connect 1 0 17 0;
+#X connect 2 0 16 0;
+#X connect 3 0 4 0;
+#X connect 3 1 4 1;
+#X connect 4 0 19 0;
+#X connect 5 0 6 1;
+#X connect 6 0 9 0;
+#X connect 7 0 8 1;
+#X connect 8 0 13 0;
+#X connect 10 0 14 0;
+#X connect 10 0 15 1;
+#X connect 10 0 16 0;
+#X connect 11 0 14 0;
+#X connect 12 0 1 1;
+#X connect 13 0 6 0;
+#X connect 14 0 7 0;
+#X connect 15 0 5 0;
+#X connect 15 0 12 0;
+#X connect 16 0 3 0;
+#X connect 18 0 15 0;
+#X connect 19 0 20 0;
+#X connect 19 1 20 1;
+#X connect 20 0 5 1;
+#X restore 55 114 pd allpass tap_55_59;
+#X connect 0 0 3 0;
+#X connect 2 0 3 1;
+#X connect 3 0 1 0;
+#X restore 841 414 pd decay_diffusion2;
+#N canvas 0 22 454 304 feedback 0;
+#X obj 43 118 outlet~;
+#X obj 44 55 delread~ \$0-tap_59_63 106.28;
+#X connect 1 0 0 0;
+#X restore 413 169 pd feedback;
+#N canvas 0 22 454 304 feedback 0;
+#X obj 81 188 outlet~;
+#X obj 81 134 delread~ \$0-tap_33_39 124.996;
+#X connect 1 0 0 0;
+#X restore 859 187 pd feedback;
+#N canvas 0 22 458 308 to_left 0;
+#X obj 48 52 inlet~;
+#X obj 48 95 delwrite~ \$0-tap_59_63 106.28;
+#X connect 0 0 1 0;
+#X restore 840 442 pd to_left;
+#N canvas 0 22 454 304 to_right 0;
+#X obj 53 173 delwrite~ \$0-tap_33_39 124.996;
+#X obj 56 100 inlet~;
+#X connect 1 0 0 0;
+#X restore 414 425 pd to_right;
+#X text 929 326 48_54;
+#X text 506 313 24_30;
+#X obj 540 477 outlet~;
+#X text 612 478 dummy;
+#X obj 635 153 tof/param /decay 0 /g slider 0 1;
+#X obj 56 97 s \$0-decay_diffusion1;
+#X obj 62 195 s \$0-decay_diffusion2;
+#X obj 65 297 s \$0-damping;
+#X obj 58 437 s \$0-excursion;
+#X obj 59 268 tof/param /damping 22050 /g slider 0 22050;
+#X obj 71 42 tof/param /decay_diffusion1 1 /g slider 0 1;
+#X obj 65 169 tof/param /decay_diffusion2 1 /g slider 0 1;
+#X obj 60 403 tof/param /excursion 5 /g slider 0 5;
+#X obj 149 80 print decay_diffusion1;
+#X obj 113 231 print decay_diffusion1;
+#X obj 112 327 print damping;
+#X obj 116 477 print excursion;
+#X obj 648 261 print decay;
+#X connect 0 0 1 1;
+#X connect 0 0 2 0;
+#X connect 1 0 11 0;
+#X connect 2 0 12 0;
+#X connect 3 0 6 0;
+#X connect 4 0 5 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 13 0;
+#X connect 8 0 14 0;
+#X connect 9 0 1 0;
+#X connect 10 0 2 1;
+#X connect 11 0 4 0;
+#X connect 12 0 3 0;
+#X connect 13 0 18 0;
+#X connect 14 0 17 0;
+#X connect 15 0 9 0;
+#X connect 16 0 10 0;
+#X connect 23 0 9 1;
+#X connect 23 0 10 1;
+#X connect 23 0 7 1;
+#X connect 23 0 8 1;
+#X connect 23 0 36 0;
+#X connect 28 0 26 0;
+#X connect 28 0 34 0;
+#X connect 29 0 24 0;
+#X connect 29 0 32 0;
+#X connect 30 0 25 0;
+#X connect 30 0 33 0;
+#X connect 31 0 27 0;
+#X connect 31 0 35 0;
+#X restore 510 299 pd reverberation_tank;
+#N canvas 0 0 1272 714 predelay 0;
+#X obj 97 19 inlet~;
+#X obj 97 317 outlet~;
+#X obj 393 56 sel 0;
+#X obj 96 209 *~ 1;
+#X obj 110 178 f 1;
+#X obj 140 179 f 0;
+#X obj 428 106 t a b;
+#X obj 377 222 *~ 1;
+#X obj 402 191 f 0;
+#X obj 433 191 f 1;
+#X text 17 210 no delay;
+#X text 237 212 delay;
+#N canvas 294 159 273 227 predelay 0;
+#X obj 35 52 inlet~;
+#X obj 94 54 inlet;
+#N canvas 345 153 450 300 dw 0;
+#X obj 35 52 inlet~;
+#X obj 35 101 delwrite~ \$0-predelay 1000;
+#X obj 34 140 outlet~;
+#X connect 0 0 1 0;
+#X restore 34 84 pd dw;
+#N canvas 326 259 416 179 dr 0;
+#X obj 126 29 inlet;
+#X obj 49 28 inlet~;
+#X obj 126 65 delread~ \$0-predelay 1;
+#X obj 126 88 outlet~;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X restore 33 116 pd dr;
+#X obj 33 138 outlet~;
+#X connect 0 0 2 0;
+#X connect 1 0 3 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X restore 297 190 pd predelay;
+#X obj 381 18 tof/param /predelay 100 /g slider 0 250;
+#X connect 0 0 3 0;
+#X connect 0 0 12 0;
+#X connect 2 0 4 0;
+#X connect 2 0 8 0;
+#X connect 2 1 6 0;
+#X connect 3 0 1 0;
+#X connect 4 0 3 1;
+#X connect 5 0 3 1;
+#X connect 6 0 12 1;
+#X connect 6 1 5 0;
+#X connect 6 1 9 0;
+#X connect 7 0 1 0;
+#X connect 8 0 7 1;
+#X connect 9 0 7 1;
+#X connect 12 0 7 0;
+#X connect 13 0 2 0;
+#X restore 510 206 pd predelay;
+#X obj 570 93 inlet~;
+#N canvas 0 0 1272 714 bandwidth 0;
+#X obj 276 247 inlet~;
+#X obj 275 408 outlet~;
+#X obj 275 332 lop~;
+#X obj 348 283 tof/param /bandwidth 22050 /g slider 0 22050;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 1;
+#X restore 510 238 pd bandwidth;
+#N canvas 0 22 458 308 1/2 0;
+#X obj 102 56 inlet~;
+#X obj 182 56 inlet~;
+#X obj 103 138 *~ 0.5;
+#X obj 103 102 +~;
+#X obj 103 175 outlet~;
+#X connect 0 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X restore 510 173 pd 1/2;
+#N canvas 120 111 856 498 output_taps 0;
+#X obj 28 409 outlet~;
+#X obj 30 267 -~;
+#X obj 31 109 +~;
+#X obj 30 215 +~;
+#X obj 29 369 -~;
+#X text 30 26 left;
+#X obj 32 55 delread~ \$0-tap_48_54 8.93787;
+#X obj 51 82 delread~ \$0-tap_48_54 99.9294;
+#X obj 50 134 delread~ \$0-tap_55_59 64.2787;
+#X obj 31 163 -~;
+#X obj 49 188 delread~ \$0-tap_59_63 67.0676;
+#X obj 50 240 delread~ \$0-tap_24_30 66.866;
+#X obj 50 293 delread~ \$0-tap_31_33 6.28339;
+#X obj 30 317 -~;
+#X obj 49 342 delread~ \$0-tap_33_39 35.8187;
+#X obj 371 407 outlet~;
+#X obj 370 105 +~;
+#X obj 371 261 -~;
+#X obj 370 208 +~;
+#X obj 371 365 -~;
+#X text 370 20 right;
+#X obj 371 51 delread~ \$0-tap_24_30 11.8612;
+#X obj 390 78 delread~ \$0-tap_24_30 121.871;
+#X obj 390 130 delread~ \$0-tap_31_33 41.2621;
+#X obj 390 181 delread~ \$0-tap_33_39 89.8155;
+#X obj 391 234 delread~ \$0-tap_48_54 70.9317;
+#X obj 372 313 -~;
+#X obj 392 286 delread~ \$0-tap_55_59 11.2563;
+#X obj 390 338 delread~ \$0-tap_59_63 4.06572;
+#X obj 370 154 -~;
+#X obj 161 15 inlet~;
+#X text 222 15 dummy;
+#X connect 1 0 13 0;
+#X connect 2 0 9 0;
+#X connect 3 0 1 0;
+#X connect 4 0 0 0;
+#X connect 6 0 2 0;
+#X connect 7 0 2 1;
+#X connect 8 0 9 1;
+#X connect 9 0 3 0;
+#X connect 10 0 3 1;
+#X connect 11 0 1 1;
+#X connect 12 0 13 1;
+#X connect 13 0 4 0;
+#X connect 14 0 4 1;
+#X connect 16 0 29 0;
+#X connect 17 0 26 0;
+#X connect 18 0 17 0;
+#X connect 19 0 15 0;
+#X connect 21 0 16 0;
+#X connect 22 0 16 1;
+#X connect 23 0 29 1;
+#X connect 24 0 18 1;
+#X connect 25 0 17 1;
+#X connect 26 0 19 0;
+#X connect 27 0 26 1;
+#X connect 28 0 19 1;
+#X connect 29 0 18 0;
+#X restore 509 329 pd output_taps;
+#X connect 0 0 8 0;
+#X connect 3 0 4 0;
+#X connect 4 0 9 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 1;
+#X connect 7 0 3 0;
+#X connect 8 0 5 0;
+#X connect 9 0 1 0;
+#X connect 9 1 2 0;
+#X restore 126 280 pd platereverb;
+#X connect 1 0 13 0;
+#X connect 1 0 7 0;
+#X connect 2 0 13 1;
+#X connect 2 0 7 1;
+#X connect 4 0 10 0;
+#X connect 5 0 8 0;
+#X connect 7 0 0 0;
+#X connect 7 1 3 0;
+#X connect 8 0 9 0;
+#X connect 9 0 7 4;
+#X connect 10 0 6 0;
+#X connect 11 0 12 0;
+#X connect 13 0 7 2;
+#X connect 13 1 7 3;
Please sign in to comment.
Something went wrong with that request. Please try again.