#N canvas 198 103 816 479 12; #N canvas 1165 116 365 792 fft-analysis 1; #X text 215 230 fft-Analyse; #X text 191 252 wird in Buffers; #X text 201 275 geschrieben; #X text 158 516 Lesen der Buffers; #X text 203 324 Delay-Array be-; #X text 193 348 stimmt die Lese-; #X text 184 367 position aus den; #X text 201 388 Buffers; #X text 90 584 Re-Synthese; #X text 95 613 Normalisierung; #X text 216 639 abschließende; #X text 220 656 Fensterung; #X text 203 143 Fensterung; #X obj 14 32 block~ 512 4; #X obj 15 164 *~; #X obj 14 198 rfft~; #X obj 36 140 tabreceive~ hanning; #X obj 14 99 inlet~; #X obj 49 228 delwrite~ ar2 10000; #X obj 14 256 delwrite~ ar1 10000; #X obj 17 670 *~; #X obj 18 588 rifft~; #X obj 17 698 outlet~; #X obj 35 645 tabreceive~ hanning; #X obj 18 617 /~ 786; #X obj 19 314 tabreceive~ delay; #X obj 18 390 -~; #X obj 56 365 wrap~; #X obj 17 438 *~ 512; #X obj 18 467 /~ 44.1; #X obj 18 510 vd~ ar1; #X obj 87 510 vd~ ar2; #X connect 14 0 15 0; #X connect 15 0 19 0; #X connect 15 1 18 0; #X connect 16 0 14 1; #X connect 17 0 14 0; #X connect 20 0 22 0; #X connect 21 0 24 0; #X connect 23 0 20 1; #X connect 24 0 20 0; #X connect 25 0 26 0; #X connect 25 0 27 0; #X connect 26 0 28 0; #X connect 27 0 26 1; #X connect 28 0 29 0; #X connect 29 0 30 0; #X connect 29 0 31 0; #X connect 30 0 21 0; #X connect 31 0 21 1; #X restore 22 338 pd fft-analysis; #N canvas 35 66 604 445 Hann-window 0; #N canvas 0 0 450 300 graph1 0; #X array hanning 512 float 0; #X coords 0 1 511 0 200 120 1; #X restore 293 249 graph; #X msg 171 263 0; #X obj 65 312 osc~; #X obj 65 264 samplerate~; #X obj 65 335 *~ -0.5; #X obj 65 358 +~ 0.5; #X text 279 241 1; #X text 272 359 0; #X text 288 372 0; #X obj 65 288 / 512; #X obj 57 241 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 336 221 Hann window; #X text 113 310 period 512; #X text 90 215 recalculate Hann; #X text 125 230 window table; #X obj 57 146 loadbang; #X msg 79 179 \; pd dsp 1; #X text 40 27 The Hann window is now recomputed on 'loadbang' to make the file smaller (it doesn't have to be saved with the array.); #X text 474 375 511; #X obj 57 383 tabwrite~ hanning; #X connect 1 0 2 1; #X connect 2 0 4 0; #X connect 3 0 9 0; #X connect 4 0 5 0; #X connect 5 0 19 0; #X connect 9 0 2 0; #X connect 10 0 3 0; #X connect 10 0 1 0; #X connect 10 0 19 0; #X connect 15 0 10 0; #X connect 15 0 16 0; #X restore 217 378 pd Hann-window; #N canvas 0 0 454 304 graph1 0; #X array delay 256 float 3; #A 0 68 68 71.5666 110.8 128.633 132.199 135.766 139.333 139.333 139.333 139.333 139.333 139.333 139.333 139.333 139.333 136.955 134.577 132.199 129.524 126.85 124.175 121.5 119.716 117.933 103.666 94.7498 75.1333 25.2003 10.9338 10.9338 10.9338 7.36713 7.36713 3.80049 3.80049 7.36713 92.9665 107.233 112.583 125.066 142.899 150.033 157.166 157.166 160.733 160.733 160.733 162.516 164.299 164.299 164.299 164.299 164.299 160.733 158.949 157.166 107.233 78.6999 78.6999 78.6999 78.6999 82.2665 82.2665 85.8332 89.3998 92.9665 92.9665 92.9665 92.9665 96.5331 96.5331 96.5331 96.5331 96.5331 92.9665 89.3998 89.3998 89.3998 89.3998 89.3998 89.3998 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68 68; #X coords 0 215 256 1 512 60 1; #X restore 66 110 graph; #X obj 67 289 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X text 629 81 ms:; #X text 623 101 2496; #X text 633 159 0; #X msg 235 269 const \$1; #X floatatom 235 248 5 0 0 0 - - -; #X text 585 159 1; #X text 580 101 215; #X obj 21 311 *~; #X text 62 170 0; #X text 565 173 256; #X text 29 188 Hz:; #X text 62 189 0; #X text 554 192 22050; #X text 121 65 erst Delay-Verlauf zeichnen...; #X text 62 254 ...dann einschalten!; #X obj 235 293 s delay; #X obj 22 398 dac~; #X obj 21 258 pink~; #X text 39 18 3.8.2.4. Spectral Delay; #X text 604 398 Johannes Kreidler; #X text 595 424 www.pd-tutorial.com; #X connect 3 0 11 1; #X connect 7 0 19 0; #X connect 8 0 7 0; #X connect 21 0 11 0;