spectrum analyzer FFT picbasic code?

[leemarrow]

Hi,
anyone have some ideas or example for FFT picbasic code?
 

[fernandodiaz]

YOU NEED APLICATION FOR AUDIO RANGE?

[leemarrow]

YOU NEED APLICATION FOR AUDIO RANGE?

yes, i need for audio application

[fernandodiaz]

FIRST I THINK YOU NEED SOME  FILTER BAND PASS  SIMIRARITY TO ECUALIZER
EACH FILTER ONE OPAMP
BUY OR BUILD EQUALIZER "http://users.otenet.gr/~athsam/EQ_10_band.htm"
SCALING 5 VOLTS AND CONVERT DC  OUTPUT  EACH OP AMP
THE OUTPUT SCALING DC 0-5 volts "no more", CONECT TO A/D CHANNEL http://www.tigoe.net/pcomp/pic/pic-analog.shtml

CHANEL 0 CONECT TO 20 TO 50 HZ  CHANEL1 CONNECT TO 70 -100HZ CHANEL 3 CONNECT 200-500 HZ
CHANEL 4 CONNECT TO 500 TO 1KHZ AND NEXT

THE PROGRAM MAKE  SAMPLES IN ALL CHANELS, THE VALUE OBTAIN A SPECTRUM AUDIO
AND DEBUG SERIAL TERMINAL.

http://en.wikipedia.org/wiki/Equalization_filter
http://en.wikipedia.org/wiki/High-pass_filter
http://en.wikipedia.org/wiki/Low-pass_filter
[email protected]

BEST REGARDS

[leemarrow]

Hi, no other external device need, only ADC on board
I need FFT routine  in picbasic

[maxiboost]

like this ..

http://diy.elektroda.eu/?p=40

[fernandodiaz]

Here a sample spectrum analizer lcd graphic FFT

[leemarrow]

Hi,
this sample is for melabs picbasic or proton picbasic?

[bbarney]

It's for Proton Lee

[gem1144aaa]

Hi

when i compile using ide 1.0.4.6 & compiler 3.2.5.5 it gives many errors especially on the include file "Variable Definitions.Inc"

any idea ?

regards
 

[fernandodiaz]

The  problem is,  the version support only [128]  words array , the new version support [256]


***** ' Complex Value FFT data buffer (256 * 2 bytes per value)

Dim FFT_Data[256] As Word *****

maybe split  DATA1[128] as word
                     DATA2[128] as word  obtain 256 values and modify all dependient var "Data" in all  code
and other option  is compile in new version..