ok. thank you very much!!
Andrés Ferrari G.
--- El lun 7-sep-09, padovani josepadovani@yahoo.com.br escribió:
De: padovani josepadovani@yahoo.com.br Asunto: Re: [PD] fft and store lists A: "Andres Ferrari" anfex@yahoo.com Fecha: lunes, 7 septiembre, 2009, 6:23 pm Andres Ferrari escreveu:
hello,
Is it possible (in pd of course) to capture the
frequencies and amplitudes by fft and save to a text file?...like a sdif file "made in home"
hola,
I think that it is what you want...
josé
-----Adjunto en línea a continuación-----
#N canvas 276 182 1127 669 10; #N canvas 166 146 900 531 fft-analysis 1; #X obj 15 164 *~; #X obj 14 99 inlet~; #X obj 15 218 rfft~; #X obj 14 306 *~; #X obj 56 306 *~; #X obj 15 356 sqrt~; #X obj 15 8 block~ 512; #X obj 15 332 +~; #X obj 289 307 counter; #X obj 226 103 bang~; #X obj 161 505 textfile; #X msg 351 465 clear; #X obj 409 33 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 280 387; #X obj 227 391 prepend add; #X obj 217 250 t b b b b; #X obj 410 60 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 429 31 reset file; #X text 428 60 save file; #X obj 264 29 inlet; #X obj 251 167 spigot; #X obj 287 77 sel 1; #X obj 287 102 t b b; #X msg 291 125 1; #X msg 332 127 0; #X obj 328 102 t b b; #X obj 352 289 arraycopy tosave; #X obj 152 353 tabdump tosave; #X obj 14 498 tabsend~ analysis; #X obj 36 140 tabreceive~ hann; #X msg 352 265 copy analysis 1 256; #X msg 362 325 -------------blocknumber: $1; #X msg 155 428 write FFTframes.txt cr; #X connect 0 0 2 0; #X connect 1 0 0 0; #X connect 2 0 3 0; #X connect 2 0 3 1; #X connect 2 1 4 0; #X connect 2 1 4 1; #X connect 3 0 7 0; #X connect 4 0 7 1; #X connect 5 0 28 0; #X connect 7 0 5 0; #X connect 8 0 31 0; #X connect 9 0 20 0; #X connect 11 0 10 0; #X connect 12 0 8 2; #X connect 12 0 11 0; #X connect 14 0 10 0; #X connect 15 0 27 0; #X connect 15 1 8 0; #X connect 15 2 30 0; #X connect 16 0 32 0; #X connect 19 0 21 0; #X connect 20 0 15 0; #X connect 21 0 22 0; #X connect 21 1 25 0; #X connect 22 0 23 0; #X connect 22 1 12 0; #X connect 23 0 20 1; #X connect 24 0 20 1; #X connect 25 0 16 0; #X connect 25 1 24 0; #X connect 27 0 14 0; #X connect 29 0 0 1; #X connect 30 0 26 0; #X connect 31 0 14 0; #X connect 32 0 10 0; #X restore 36 299 pd fft-analysis; #X obj 35 274 osc~; #X floatatom 35 228 5 0 0 0 - - -; #X obj 35 250 * 10; #X msg 795 243 0; #X obj 718 288 osc~; #X obj 718 240 samplerate~; #X obj 718 311 *~ -0..5; #X obj 718 334 +~ 0.5; #X obj 718 264 / 512; #X obj 710 217 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X text 110 243 tens of Hz.; #X text 90 225 <- frequency ,; #X text 108 280 click here and; #X text 180 296 <- see; #X obj 723 142 loadbang; #X obj 272 239 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X msg 342 326 ; pd dsp 1; #X msg 341 363 ; pd dsp 0; #X obj 710 359 tabwrite~ hann; #X obj 703 395 table analysis 512; #X obj 704 428 table tosave 255; #X obj 706 469 table hann 512; #X text 8 13 adapted from Help example I02; #X text 297 236 1-sends frames to file/0-saves file.; #X connect 1 0 0 0; #X connect 2 0 3 0; #X connect 3 0 1 0; #X connect 4 0 5 1; #X connect 5 0 7 0; #X connect 6 0 9 0; #X connect 7 0 8 0; #X connect 8 0 19 0; #X connect 9 0 5 0; #X connect 10 0 6 0; #X connect 10 0 4 0; #X connect 10 0 19 0; #X connect 15 0 10 0; #X connect 16 0 0 1;
____________________________________________________________________________________
¡Obtén la mejor experiencia en la web! Descarga gratis el nuevo Internet Explorer 8. http://downloads.yahoo..com/ieak8/?l=e1
-
Andres Ferrari