#N canvas 22 22 973 526 10;
#X msg 454 136 100;
#X msg 489 139 1000;
#X msg 532 139 3000;
#X obj 305 182 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#N canvas 0 22 450 300 (subpatch) 0;
#X array array101 100 float 0;
#X coords 0 1.1 99 -0.1 100 50 1;
#X restore 845 186 graph;
#N canvas 0 22 450 300 (subpatch) 0;
#X array array102 100 float 0;
#X coords 0 1.1 99 -0.1 100 50 1;
#X restore 845 256 graph;
#N canvas 0 22 450 300 (subpatch) 0;
#X array array103 100 float 0;
#X coords 0 1.1 99 -0.1 100 50 1;
#X restore 845 326 graph;
#X obj 203 309 tabwrite~ array101;
#X obj 250 355 tabwrite~ array103;
#X obj 225 332 tabwrite~ array102;
#N canvas 0 22 450 300 (subpatch) 0;
#X array array100 100 float 0;
#X coords 0 1.1 99 -0.1 100 50 1;
#X restore 845 116 graph;
#X obj 304 254 tabwrite~ array100;
#X obj 202 283 n_delay1p_line~ 3 5 100;
#X text 21 13 n_delay1p_line~;
#N canvas 0 22 450 300 dirac 0;
#X obj 103 44 inlet;
#X obj 103 65 t b b;
#X obj 71 100 del 2;
#X msg 126 112 1;
#X msg 70 122 0;
#X obj 92 151 biquad~ 0 0 1 -1 0;
#X obj 92 176 max~ 0;
#X obj 92 197 outlet~;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 4 0;
#X connect 3 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X restore 212 222 pd dirac;
#X text 113 442 IEM KUG;
#X text 87 430 musil;
#X text 125 430 @;
#X text 133 430 iem.at;
#X text 96 452 Graz \, Austria;
#X text 46 419 (c) Thomas Musil 2000 - 2011;
#X obj 24 46 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X floatatom 24 110 5 0 0 0 - - -;
#X floatatom 42 93 5 0 0 0 - - -;
#N canvas 0 22 528 567 dsp 0;
#X obj 20 65 inlet;
#X obj 20 406 outlet;
#X msg 31 88 \; pd dsp \$1;
#X obj 20 199 cputime;
#X obj 20 178 t b b;
#X text 15 11 dsp;
#X text 59 65 1/0 = ON/OFF;
#X text 97 313 CPU-load;
#X obj 62 126 loadbang;
#X obj 20 126 sel 1;
#X text 64 12 turn dsp-kernel on & off \,;
#X obj 20 240 t f f;
#X obj 211 405 outlet;
#X text 65 408 average;
#X text 177 405 peak;
#X obj 211 154 f;
#X obj 146 179 > -1;
#X obj 169 155 f -1;
#X obj 179 91 t f b f;
#X obj 146 204 sel 1;
#X obj 192 132 f -1;
#X obj 20 154 metro 500;
#X obj 20 220 * 0.2;
#X text 74 37 -dsp-load in %;
#X text 65 24 measure average- and peak-;
#X obj 20 292 1p1z 0.1 0 0.9;
#X obj 20 315 * 100;
#X obj 20 360 int;
#X obj 20 338 + 0.499;
#X obj 20 383 * 0.01;
#X obj 246 207 r pd;
#X obj 246 231 route dsp;
#X text 245 318 to toggle input;
#X msg 246 283 \; dsp_tgl set \$1;
#X obj 247 341 r dsp_tgl;
#X obj 246 257 route float;
#X obj 146 227 del 3990;
#X text 179 455 IEM KUG;
#X text 153 443 musil;
#X text 190 443 @;
#X text 199 443 iem.at;
#X text 162 465 Graz \, Austria;
#X msg 275 108 \; pd audio-dialog 0 0 0 0 64 0 0 0 0 0 0 0 64 0 0 0
44100 \$1;
#X obj 275 81 inlet;
#X text 271 56 system delay time in ms;
#N canvas 0 22 486 468 once 0;
#X obj 89 162 spigot;
#X obj 34 59 inlet;
#X obj 89 111 t a b;
#X obj 126 140 f 1;
#X obj 89 194 t a b;
#X obj 119 216 f 0;
#X obj 89 247 outlet;
#X obj 207 56 inlet;
#X obj 207 79 bang;
#X obj 207 102 f 1;
#X text 8 6 once;
#X text 64 7 only the first message passes through;
#X text 29 37 message in;
#X text 29 289 message out (only once);
#X text 203 36 anything to init once;
#X obj 34 80 route bang;
#X obj 34 110 t b b;
#X obj 34 162 spigot;
#X obj 34 194 t b b;
#X text 98 377 IEM KUG;
#X text 73 363 musil;
#X text 110 365 @;
#X text 118 365 iem.at;
#X text 81 387 Graz \, Austria;
#X text 120 339 @;
#X text 128 339 iem.at;
#X text 33 338 (c) zmoelnig;
#X text 33 352 (c) Thomas Musil 2000 - 2011;
#X connect 0 0 4 0;
#X connect 1 0 15 0;
#X connect 2 0 0 0;
#X connect 2 1 3 0;
#X connect 3 0 0 1;
#X connect 3 0 17 1;
#X connect 4 0 6 0;
#X connect 4 1 5 0;
#X connect 5 0 3 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 3 1;
#X connect 15 0 16 0;
#X connect 15 1 2 0;
#X connect 16 0 17 0;
#X connect 16 1 3 0;
#X connect 17 0 18 0;
#X connect 18 0 6 0;
#X connect 18 1 5 0;
#X restore 69 270 pd once;
#X text 112 430 (c) Thomas Musil 2000 - 2011;
#X connect 0 0 2 0;
#X connect 0 0 9 0;
#X connect 3 0 22 0;
#X connect 4 0 3 0;
#X connect 4 1 3 1;
#X connect 8 0 21 0;
#X connect 9 0 21 0;
#X connect 11 0 25 0;
#X connect 11 1 45 0;
#X connect 15 0 17 1;
#X connect 15 0 12 0;
#X connect 16 0 19 0;
#X connect 17 0 16 1;
#X connect 18 0 16 0;
#X connect 18 1 17 0;
#X connect 18 2 15 1;
#X connect 19 0 15 0;
#X connect 19 0 36 0;
#X connect 20 0 17 1;
#X connect 21 0 4 0;
#X connect 22 0 11 0;
#X connect 22 0 18 0;
#X connect 25 0 26 0;
#X connect 26 0 28 0;
#X connect 27 0 29 0;
#X connect 28 0 27 0;
#X connect 29 0 1 0;
#X connect 30 0 31 0;
#X connect 31 0 35 0;
#X connect 35 0 33 0;
#X connect 36 0 20 0;
#X connect 43 0 42 0;
#X connect 45 0 25 5;
#X connect 45 0 25 4;
#X restore 24 69 pd dsp;
#X text 161 12 One signal inlet and n delay tap outlets. Delay times
change every sample without interpolation and are given in ms.;
#X text 420 465 3.) initial argument: <float> interpolation time in
ms;
#X text 421 449 2.) inital argument: <float> maximum delay time in
ms;
#X text 421 433 1.) inital argument: <float> number of delay taps =
outlets;
#X msg 428 194 time \$1;
#X floatatom 428 168 5 0 0 0 - - -;
#X msg 420 137 0;
#X text 20 146 <list> of n <float> delay times in ms;
#X text 472 174 interpolation time in ms;
#X msg 96 165 0.1 0.2 0.3;
#X msg 76 190 1.8 1.7 1.6;
#X obj 299 70 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 300 117 sel 0 1;
#X obj 300 92 t f b;
#X msg 578 136 6000;
#N canvas 0 22 472 410 del_chain 0;
#X obj 158 58 inlet;
#X obj 128 341 outlet;
#X obj 207 86 del 10;
#X obj 207 106 del 990;
#X obj 207 127 del 990;
#X obj 207 148 del 990;
#X obj 207 169 del 990;
#X obj 207 190 del 990;
#X obj 207 211 del 990;
#X obj 207 233 del 990;
#X obj 207 254 del 990;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 6 0 1 0;
#X connect 7 0 8 0;
#X connect 7 0 1 0;
#X connect 8 0 1 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 0 1 0;
#X connect 10 0 1 0;
#X restore 326 154 pd del_chain;
#X connect 0 0 30 0;
#X connect 1 0 30 0;
#X connect 2 0 30 0;
#X connect 3 0 7 0;
#X connect 3 0 9 0;
#X connect 3 0 8 0;
#X connect 3 0 11 0;
#X connect 3 0 14 0;
#X connect 12 0 7 0;
#X connect 12 1 9 0;
#X connect 12 2 8 0;
#X connect 14 0 12 0;
#X connect 14 0 11 0;
#X connect 21 0 24 0;
#X connect 24 0 22 0;
#X connect 24 1 23 0;
#X connect 29 0 12 0;
#X connect 30 0 29 0;
#X connect 31 0 30 0;
#X connect 34 0 12 0;
#X connect 35 0 12 0;
#X connect 36 0 38 0;
#X connect 37 0 34 0;
#X connect 37 1 35 0;
#X connect 38 0 37 0;
#X connect 38 1 39 0;
#X connect 38 1 40 0;
#X connect 39 0 30 0;
#X connect 40 0 3 0;
