STM32写的频谱仪的代码 - - Powered by Discuz!

/************************************************************
**注意事项:系统直接集成TFF文件系统
**版本:V1.0
**日期:09-6-10
*************************************************************/
#include "STM32Lib\\stm32f10x.h"
#include "hal.h"
#include <stdio.h>
#include "TFT\\TFTdriver.h"
#include "fft\\FFTInc.h"
//-------------------------------主程序--------------------------------------------------
unsigned int FFT_N = 128; //初始化128点
unsigned int ActualBuf[MAX_FFT_N]; //实部
unsigned int ImagBuf[MAX_FFT_N]; //虚部
unsigned int FFT_dat_W ; //-- 数据宽度
unsigned char Distance ; //-- 频谱条间隔距离
unsigned char Article_W ; //-- 频谱条宽度
unsigned char DOWN_SP ; //-- 频谱条跌落速度
unsigned char DOWN_bit ; //-- 频谱点跌落速度
unsigned char MAX_bit_del ; //-- 频谱点跌维持时间
unsigned int TFT_FFT_H ; //-- 频谱显示区高度
unsigned char FFT_Bit;
unsigned char show_sav[MAX_FFT_N/2]; //--频谱条缓存
unsigned int show_bit[MAX_FFT_N/2]; //--频谱点缓存
void FFT_Show_Init( unsigned int n )
{
unsigned int i;
FFT_dat_W = n / 2; //-- 数据宽度
Distance = 320 / FFT_dat_W ; //-- 频谱条间隔距离
switch( n )
{
case 16:
Article_W = Distance - 3; //--
DOWN_SP = 1; //--
DOWN_bit = 2; //--
MAX_bit_del = 45; //--
FFT_Bit = 4 ; //--
break;
case 32:
Article_W = Distance - 2;
DOWN_SP = 1 ; //
DOWN_bit = 2 ; //
MAX_bit_del = 40 ; //
FFT_Bit = 5 ;
break;
case 64:
Article_W = Distance - 1;
DOWN_SP = 1 ; //
DOWN_bit = 2 ; //
MAX_bit_del = 35 ; //
FFT_Bit = 6 ;
break;
case 128:
Article_W = Distance - 1;
DOWN_SP = 1 ; //
DOWN_bit = 2 ; //
MAX_bit_del = 30 ; //
FFT_Bit = 7 ;
break;
case 256:
Article_W = Distance - 1;
DOWN_SP = 2 ; //
DOWN_bit = 3 ; //
MAX_bit_del = 25 ; //
FFT_Bit = 8 ;
break;
case 512:
Article_W = Distance;
DOWN_SP = 3 ; //
DOWN_bit = 4 ; //
MAX_bit_del = 20 ; //
FFT_Bit = 9 ;
break;
}
TFT_FFT_H = 239 - DOWN_bit - 1; //-- 频谱显示区高度
for ( i = 0 ;i < MAX_FFT_N / 2;i ++ )
{
show_bit[ i ] = show_sav[ i ] = 0;
}
}
//--------------???--??---------------//
union{
struct{
unsigned B_dat :8; //--
unsigned B_del :8; //--
}Bit_bit;
unsigned int Bit_bits;
}Bit_dat; //---
void FFT_Show( unsigned int *buf )
{
int i,j,dat;
for ( i = 1,j = 0;i < FFT_dat_W ;i ++,j += Distance ) //--
{
Bit_dat.Bit_bits = show_bit[ i ]; //--
TFTRectFill( Bit_dat.Bit_bit.B_dat, j , Bit_dat.Bit_bit.B_dat + DOWN_bit + 1,j + Article_W, BLACK,0);//--擦除无效点
TFTRectFill( show_sav[i], j , show_sav[i] + DOWN_bit, j + Article_W, BLACK,0);//--擦除无效频谱条
if ( buf[ i ] > TFT_FFT_H ) dat = TFT_FFT_H; //--限制频谱条数据在工作区范围内
else
dat = buf[i];
// buf[i] = 0; //--
if ( show_sav[i] < dat ) //--有新的频谱条出现
{
TFTRectFill(show_sav[i],j,dat,j + Article_W,RED_BRIGHT,0); //-- 先刷差值
show_sav[i] = dat; //-- 再保存新值
}
if ( Bit_dat.Bit_bit.B_dat < dat ) //--有新的频谱点出现（不和频谱条一起刷新）
{
Bit_dat.Bit_bit.B_dat = dat; //--刷新频谱点
Bit_dat.Bit_bit.B_del = MAX_bit_del; //--频谱点维持时间刷新
}
//---- 刷频谱点
TFTRectFill(Bit_dat.Bit_bit.B_dat,j,Bit_dat.Bit_bit.B_dat+1,j + Article_W,GREEN,0);
if ( show_sav[i] >= DOWN_SP ) show_sav[i] -= DOWN_SP; //频谱条跌落
else show_sav[i] = 0;
if ( Bit_dat.Bit_bit.B_del ) Bit_dat.Bit_bit.B_del --;//--频谱点维持
else
if ( Bit_dat.Bit_bit.B_dat - DOWN_bit > show_sav[i] ) //--防止点跌落超过条
{
if ( Bit_dat.Bit_bit.B_dat >= DOWN_bit )
Bit_dat.Bit_bit.B_dat -= DOWN_bit; //频谱点跌落
else
Bit_dat.Bit_bit.B_dat = 0;
}
else //--点跌落到条顶部后，再维持
Bit_dat.Bit_bit.B_del = MAX_bit_del;
show_bit[i] = Bit_dat.Bit_bits; //--保存变量
}
}
unsigned char luv = 0;
extern unsigned int adcread(void);
int main(void)
{
ChipHalInit();
ChipOutHalInit();
Lcd_Init(); //初始化
FFT_read:
TFTFill(0,0,240,320,BG_COLOR);
FFT_Show_Init( FFT_N );
Int_FFT_TAB( FFT_N );
for(;;)
{
int i;
int del;
for ( i = 0;i < FFT_N; i++ )
{
ActualBuf [i]= adcread(); // 音频实部
ImagBuf[i] = 0; // 音频虚部
del = 520; // 音频采样速率
while(del--);
}
fft( (int *)ActualBuf, (int *)ImagBuf, FFT_Bit, FFT_N );//fft
//--平滑处理
if ( GET_LEFT() ) luv = 1;
if ( GET_RIGHT() ) luv = 0;
//--FFT点数切换 +
if ( GET_UP() )
{
if ( FFT_N < MAX_FFT_N ) FFT_N <<= 1;
else FFT_N = MIN_FFT_N;
while( GET_UP() );
goto FFT_read;
}
//--FFT点数切换 -
if ( GET_DOWN() )
{
if ( FFT_N > MIN_FFT_N ) FFT_N >>= 1;
while( GET_DOWN() );
goto FFT_read;
}
if ( luv ) //--简单的平滑处理
{
for ( i = 2;i < FFT_N;i ++ )
{
if ( ImagBuf[ i-1 ] > ImagBuf[ i ] ) //-- 前一通道大于当前通道，对当前通道进行提升
{
ImagBuf[ i ] += ( ( ImagBuf[ i-1 ] - ImagBuf[ i ]) >> 1 ) ;
}
if ( ImagBuf[ i-1 ] < ImagBuf[ i ] ) //-- 当前通道大于前一通道，对前一通道进行提升
{
ImagBuf[ i-1 ] += ( ( ImagBuf[ i ] - ImagBuf[ i-1 ] ) >> 1);
}
}
}
FFT_Show( ImagBuf );
…………限于本文篇幅余下代码请从51黑下载附件…………

复制代码