diff options
Diffstat (limited to 'reverbCm~.pd')
| -rw-r--r-- | reverbCm~.pd | 118 |
1 files changed, 118 insertions, 0 deletions
diff --git a/reverbCm~.pd b/reverbCm~.pd new file mode 100644 index 0000000..78add1c --- /dev/null +++ b/reverbCm~.pd @@ -0,0 +1,118 @@ +#N canvas 605 82 811 495 10; +#N canvas 2 89 731 555 cmreverb 0; +#X obj 25 22 inlet~; +#X obj 85 22 inlet~; +#X obj 397 5 inlet; +#X obj 227 148 delread~ \$0-A 100; +#X obj 257 168 delread~ \$0-B 161.8; +#X obj 287 188 delread~ \$0-C 261.8; +#X obj 317 208 delread~ \$0-D 61.8; +#X obj 173 202 +~; +#X obj 215 202 +~; +#X obj 10 273 outlet~; +#X obj 80 273 outlet~; +#X obj 158 252 +~; +#X obj 262 253 +~; +#X obj 200 252 -~; +#X obj 302 252 -~; +#X obj 157 308 +~; +#X obj 201 309 +~; +#X obj 245 310 -~; +#X obj 284 310 -~; +#X obj 244 392 *~ 0; +#X obj 202 391 *~ 0; +#X obj 157 390 *~ 0; +#X obj 285 393 *~ 0; +#X obj 284 413 delwrite~ \$0-D 1000; +#X obj 245 436 delwrite~ \$0-C 1000; +#X obj 203 459 delwrite~ \$0-B 1000; +#X obj 158 481 delwrite~ \$0-A 1000; +#X obj 227 127 * 1; +#X obj 257 127 * 1.618; +#X obj 317 127 * 2.618; +#X obj 377 127 / 1.618; +#X obj 397 31 route /feedback /delay; +#X text 187 38 Claude M; +#X obj 384 298 f; +#X obj 442 70 * 381; +#X obj 409 250 / 2; +#X connect 0 0 7 0; +#X connect 1 0 8 0; +#X connect 2 0 31 0; +#X connect 3 0 7 1; +#X connect 4 0 8 1; +#X connect 5 0 14 0; +#X connect 5 0 12 0; +#X connect 6 0 14 1; +#X connect 6 0 12 1; +#X connect 7 0 9 0; +#X connect 7 0 11 0; +#X connect 7 0 13 0; +#X connect 8 0 10 0; +#X connect 8 0 11 1; +#X connect 8 0 13 1; +#X connect 11 0 15 0; +#X connect 11 0 17 0; +#X connect 12 0 17 1; +#X connect 12 0 15 1; +#X connect 13 0 16 0; +#X connect 13 0 18 0; +#X connect 14 0 16 1; +#X connect 14 0 18 1; +#X connect 15 0 21 0; +#X connect 16 0 20 0; +#X connect 17 0 19 0; +#X connect 18 0 22 0; +#X connect 19 0 24 0; +#X connect 20 0 25 0; +#X connect 21 0 26 0; +#X connect 22 0 23 0; +#X connect 27 0 3 0; +#X connect 28 0 4 0; +#X connect 29 0 5 0; +#X connect 30 0 6 0; +#X connect 31 0 35 0; +#X connect 31 1 34 0; +#X connect 33 0 22 1; +#X connect 33 0 19 1; +#X connect 33 0 20 1; +#X connect 33 0 21 1; +#X connect 34 0 27 0; +#X connect 34 0 28 0; +#X connect 34 0 29 0; +#X connect 34 0 30 0; +#X connect 35 0 33 0; +#X restore 38 113 pd cmreverb; +#X obj 4 16 inlet~; +#X obj 97 25 inlet~; +#X obj 44 361 outlet~; +#X obj 130 367 outlet~; +#X msg 164 98 /feedback \$1; +#X msg 278 133 /delay \$1; +#X text 160 166 Simple verb by Claude H; +#X obj 593 215 inlet params; +#X obj 593 261 print PARAM_NOTFOUND; +#X obj -4 293 tof/crossfade~ 2; +#X obj 114 196 tof/param /wet 0 /g slider 0 1; +#X obj 114 239 line~; +#X msg 114 218 \$1 5; +#X obj 278 111 tof/param /delay 0 /g slider 0 1; +#X obj 169 64 tof/param /feedback 0 /g slider 0 1; +#X obj 593 237 tof/param route; +#X connect 0 0 10 2; +#X connect 0 1 10 3; +#X connect 1 0 10 0; +#X connect 1 0 0 0; +#X connect 2 0 10 1; +#X connect 2 0 0 1; +#X connect 5 0 0 2; +#X connect 6 0 0 2; +#X connect 8 0 16 0; +#X connect 10 0 3 0; +#X connect 10 1 4 0; +#X connect 11 0 13 0; +#X connect 12 0 10 4; +#X connect 13 0 12 0; +#X connect 14 0 6 0; +#X connect 15 0 5 0; +#X connect 16 0 9 0; |