fx.karplusres~.pd

#N canvas 253 48 651 572 12;
#X obj 44 58 inlet~;
#X obj 152 400 outlet~;
#X obj 213 60 inlet;
#X obj 363 82 inlet;
#N canvas 0 0 519 402 comb_filter 1;
#X obj 271 0 inlet~ delay_length;
#X obj 135 0 inlet feedback;
#X obj 35 187 *~;
#X obj 18 0 inlet~ signal;
#X obj 19 214 +~;
#X obj 119 119 line;
#X obj 19 245 delwrite~ \$0-pluck 124;
#X obj 235 245 outlet~;
#X obj 236 96 vd~ \$0-pluck;
#X obj 119 96 pack 0 50;
#X text 19 280 Put only ESSENTIAL stuff in this small-blocksize subpatch!
;
#X obj 324 190 block~ 1;
#X connect 0 0 8 0;
#X connect 1 0 9 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 5 0 2 1;
#X connect 8 0 7 0;
#X connect 8 0 2 0;
#X connect 9 0 5 0;
#X restore 159 319 pd comb_filter;
#X obj 362 134 samplerate~;
#X obj 362 155 /;
#X obj 362 114 t b f;
#X obj 362 264 sig~;
#X obj 378 174 / 1000;
#X obj 362 194 /;
#X obj 362 241 line;
#X obj 362 216 pack 0 50;
#X text 35 3 Karplus-Strong resonant filter thanks to Derek Holzer
;
#X connect 0 0 4 0;
#X connect 2 0 4 1;
#X connect 3 0 7 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 5 0 9 0;
#X connect 6 0 10 0;
#X connect 7 0 5 0;
#X connect 7 1 6 1;
#X connect 8 0 4 2;
#X connect 9 0 10 1;
#X connect 10 0 12 0;
#X connect 11 0 8 0;
#X connect 12 0 11 0;