#N canvas 0 37 876 567 10;
#N canvas 217 33 719 609 fft-analysis 0;
#X obj 213 68 *~;
#X obj 261 23 inlet~;
#X obj 213 91 rfft~;
#X obj 46 403 *~;
#X obj 76 66 *~;
#X obj 113 1 inlet~;
#X obj 61 34 tabreceive~ hanning;
#X obj 78 91 rfft~;
#X obj 77 541 outlet~;
#X obj 81 170 rec2pol~;
#X obj 128 127 *~;
#X obj 88 127 *~;
#X obj 248 118 *~;
#X obj 213 118 *~;
#X obj 97 379 rifft~;
#X obj 170 333 pol2rec~;
#X obj 159 222 *~;
#X obj 191 160 rec2pol~;
#X obj 221 259 *~ 0.02;
#X obj 221 286 *~ 1.4;
#X obj 502 311 block~ 1024 4;
#X obj 141 474 *~ 0.05;
#X text 251 439 noisegate arguments: threshold \, fadein time \, fadeout time;
#X obj 112 441 noisegate~ 80 100 200;
#X obj 302 74 sig~ 0.0097;
#X obj 130 88 sig~ 0.001;
#X connect 0 0 2 0;
#X connect 1 0 0 1;
#X connect 2 0 13 0;
#X connect 2 1 12 0;
#X connect 3 0 23 0;
#X connect 4 0 7 0;
#X connect 5 0 4 1;
#X connect 6 0 4 0;
#X connect 6 0 0 0;
#X connect 6 0 3 0;
#X connect 7 0 11 0;
#X connect 7 1 10 0;
#X connect 9 0 15 0;
#X connect 9 1 16 0;
#X connect 10 0 9 1;
#X connect 11 0 9 0;
#X connect 12 0 17 1;
#X connect 13 0 17 0;
#X connect 14 0 3 1;
#X connect 15 0 14 0;
#X connect 15 1 14 1;
#X connect 16 0 19 0;
#X connect 17 1 16 1;
#X connect 17 1 18 0;
#X connect 18 0 19 0;
#X connect 19 0 15 1;
#X connect 23 0 8 0;
#X connect 23 0 21 0;
#X connect 24 0 12 1;
#X connect 24 0 13 1;
#X connect 25 0 11 1;
#X connect 25 0 10 1;
#X restore 326 407 pd fft-analysis;
#X obj 326 431 *~;
#X obj 474 448 line~;
#X floatatom 680 49 0 0 0;
#N canvas 194 37 397 591 output 0;
#X obj 62 191 t b;
#X obj 62 144 f;
#X obj 62 96 inlet;
#X text 67 76 mute;
#X obj 62 215 f;
#X msg 127 230 0;
#X msg 62 120 bang;
#X obj 62 167 moses 1;
#X obj 127 207 t b f;
#X obj 91 417 outlet;
#X msg 91 393 set \$1;
#X obj 175 154 moses 1;
#X obj 212 419 dbtorms;
#X obj 212 443 pack 0 100;
#X obj 175 130 r master-lvl;
#X obj 91 360 r master-lvl;
#X obj 78 269 s master-lvl;
#X obj 212 467 s master-amp;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 2 0 6 0;
#X connect 4 0 16 0;
#X connect 5 0 16 0;
#X connect 6 0 1 0;
#X connect 7 0 0 0;
#X connect 7 1 8 0;
#X connect 8 0 5 0;
#X connect 10 0 9 0;
#X connect 11 1 4 1;
#X connect 12 0 13 0;
#X connect 13 0 17 0;
#X connect 14 0 1 1;
#X connect 14 0 11 0;
#X connect 15 0 10 0;
#X connect 15 0 12 0;
#X restore 680 26 pd output;
#X msg 680 2 mute;
#X text 717 43 MASTER;
#X text 717 57 LEVEL;
#X obj 680 74 s master-lvl;
#X obj 472 421 r master-amp;
#N canvas 275 71 767 761 hanning-window 0;
#X obj 92 206 phasor~;
#X obj 92 234 cos~;
#X obj 23 328 tabwrite~ hanning;
#X obj 30 252 -~;
#X obj 30 218 sig~ 1;
#X msg 37 180 0;
#X text 141 13 CALCULATE HANNING;
#X text 141 27 WINDOW TABLE;
#X graph graph1 0 -1 1024 1 275 581 675 281;
#X array hanning 1024 float;
#X pop;
#X msg 275 547 \; hanning resize 1024;
#X obj 93 131 / 1024;
#X obj 93 171 sig~;
#X text 175 148 sample rate / window size;
#X msg 23 144 bang;
#X obj 66 269 sig~ 0.5;
#X obj 49 300 *~;
#X obj 67 96 samplerate~;
#X obj 25 23 r window-size;
#X obj 25 53 t b f;
#X connect 0 0 1 0;
#X connect 1 0 3 1;
#X connect 3 0 15 0;
#X connect 4 0 3 0;
#X connect 5 0 0 1;
#X connect 10 0 11 0;
#X connect 11 0 0 0;
#X connect 13 0 2 0;
#X connect 13 0 5 0;
#X connect 14 0 15 1;
#X connect 15 0 2 0;
#X connect 16 0 10 0;
#X connect 17 0 18 0;
#X connect 18 0 16 0;
#X connect 18 0 13 0;
#X connect 18 1 10 1;
#X restore 675 143 pd hanning-window;
#X msg 393 66 \; window-size 1024 \; pd dsp 1;
#X text 434 370 filter;
#X text 436 385 input;
#X obj 326 254 phasor~ 220;
#X floatatom 358 151 4 0 0;
#X obj 341 185 mtof;
#X obj 351 293 noise~;
#X obj 351 317 *~ 0.12;
#X obj 201 247 adc~;
#X obj 393 12 loadbang;
#X msg 295 80 36;
#X text 13 81 Example using rec2pol & pol2rec;
#X text 84 245 talk into this:;
#X text 401 150 adjust pitch;
#X text 654 419 IM 2001;
#X obj 322 468 dac~;
#X connect 0 0 1 0;
#X connect 1 0 26 0;
#X connect 1 0 26 1;
#X connect 2 0 1 1;
#X connect 3 0 8 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 9 0 2 0;
#X connect 14 0 0 0;
#X connect 15 0 16 0;
#X connect 16 0 14 0;
#X connect 17 0 18 0;
#X connect 18 0 0 0;
#X connect 19 0 0 1;
#X connect 20 0 11 0;
#X connect 20 0 21 0;
#X connect 21 0 15 0;