#N canvas 782 98 715 938 12;
#X obj 200 -157 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 200 -129 metro 200;
#X obj 200 -104 random 2000;
#X obj 200 -80 + 400;
#X obj 62 328 delwrite~ buff1 10000;
#X obj 93 414 sig~;
#X floatatom 93 390 5 0 0 0 - - -;
#X obj 94 444 vd~ buff1;
#X obj 93 496 *~;
#X floatatom 114 474 5 0 0 0 - - -;
#X obj 235 413 sig~;
#X floatatom 235 389 5 0 0 0 - - -;
#X obj 236 443 vd~ buff1;
#X obj 235 495 *~;
#X floatatom 256 473 5 0 0 0 - - -;
#X obj 376 414 sig~;
#X floatatom 376 390 5 0 0 0 - - -;
#X obj 377 444 vd~ buff1;
#X obj 376 496 *~;
#X floatatom 397 474 5 0 0 0 - - -;
#X obj 518 413 sig~;
#X floatatom 518 389 5 0 0 0 - - -;
#X obj 519 443 vd~ buff1;
#X obj 518 495 *~;
#X floatatom 539 473 5 0 0 0 - - -;
#X obj 93 607 *~;
#X floatatom 345 574 5 0 0 0 - - -;
#X obj 92 635 hip~ 5;
#X obj 93 668 dac~;
#X obj 133 44 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X floatatom 202 34 5 0 0 0 - - -;
#X obj 166 114 del;
#X msg 133 140 1;
#X msg 166 140 0;
#X obj 45 144 noise~;
#X obj 46 213 *~;
#X obj 224 64 vd~ buffer 100;
#X obj 183 217 *~ 0.99;
#X floatatom 253 190 5 0 0 0 - - -;
#X obj 45 289 delwrite~ buffer 1000;
#X obj 224 107 *~ 0.5;
#X obj 311 96 z~ 1;
#X obj 312 123 *~ 0.5;
#X obj 225 160 +~;
#X obj 202 3 expr 44100/($f1*1.09545)*0.025;
#X floatatom 202 -21 5 0 0 0 - - -;
#X obj 167 -49 t b f;
#X text 230 -159 start;
#X text 13 -151 3.4.2.11. Karplus Text;
#X text 261 -32 Frequency (Hz.);
#X text 367 93 Delay by 1 Sample;
#X text 369 138 average calculation;
#X text 302 189 damping factor (between 0 and 1);
#X text 91 369 loop duration;
#X text 235 364 loop duration;
#X text 374 362 loop duration;
#X text 514 362 loop duration;
#X text 394 575 total volume;
#X text 474 701 www.pd-tutorial.com;
#X text 486 673 Johannes Kreidler;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 46 0;
#X connect 5 0 7 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 8 0 25 0;
#X connect 8 0 4 0;
#X connect 9 0 8 1;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 12 0 13 0;
#X connect 13 0 25 0;
#X connect 13 0 4 0;
#X connect 14 0 13 1;
#X connect 15 0 17 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 25 0;
#X connect 18 0 4 0;
#X connect 19 0 18 1;
#X connect 20 0 22 0;
#X connect 21 0 20 0;
#X connect 22 0 23 0;
#X connect 23 0 25 0;
#X connect 23 0 4 0;
#X connect 24 0 23 1;
#X connect 25 0 27 0;
#X connect 26 0 25 1;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 29 0 31 0;
#X connect 29 0 32 0;
#X connect 30 0 31 1;
#X connect 30 0 36 0;
#X connect 31 0 33 0;
#X connect 32 0 35 1;
#X connect 33 0 35 1;
#X connect 34 0 35 0;
#X connect 35 0 39 0;
#X connect 36 0 40 0;
#X connect 36 0 41 0;
#X connect 37 0 39 0;
#X connect 37 0 4 0;
#X connect 38 0 37 1;
#X connect 40 0 43 0;
#X connect 41 0 42 0;
#X connect 42 0 43 1;
#X connect 43 0 37 0;
#X connect 44 0 30 0;
#X connect 45 0 44 0;
#X connect 46 0 29 0;
#X connect 46 1 45 0;