#N canvas 456 157 568 471 10; #X text 119 399 IEM KUG; #X text 93 387 musil; #X text 131 387 @; #X text 139 387 iem.at; #X text 102 409 Graz \, Austria; #X obj 21 43 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X floatatom 21 111 5 0 0 0 - - -; #X floatatom 51 91 5 0 0 0 - - -; #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 404 223 graph; #X obj 187 258 tabwrite~ array101; #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 404 153 graph; #X obj 226 192 tabwrite~ array100; #X text 250 220 no initial arguments; #X obj 162 220 block_delay~; #X obj 160 97 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 405 274 hsl 100 15 0 99 0 0 empty empty empty -2 -6 0 8 -262144 -1 -1 6400 1; #X floatatom 402 295 5 0 0 0 - - -; #X text 21 11 block_delay~; #X text 52 376 (c) Thomas Musil 2000 - 2011; #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 161 139 pd dirac; #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 21 65 pd dsp; #X obj 21 261 block~ 64 1 1; #X msg 21 239 set \$1 1 1; #X floatatom 20 220 5 0 0 0 - - -; #X msg 20 163 32; #X msg 20 188 64; #X text 130 10 Constant signal delay of one blocksize.; #X connect 5 0 20 0; #X connect 13 0 9 0; #X connect 14 0 11 0; #X connect 14 0 9 0; #X connect 14 0 19 0; #X connect 15 0 16 0; #X connect 19 0 11 0; #X connect 19 0 13 0; #X connect 20 0 6 0; #X connect 20 1 7 0; #X connect 22 0 21 0; #X connect 23 0 22 0; #X connect 24 0 23 0; #X connect 25 0 23 0;