|
經(jīng)過(guò)10幾天的努力,參考http://www.zg4o1577.cn/bbs/dpj-122556-1.html貼子,終于完成OLED C51頻譜顯示,實(shí)際測(cè)試頻譜范圍約500Hz-20KHz,64個(gè)點(diǎn)約150ms。
制作出來(lái)的實(shí)物圖如下:
fft1.png (807.32 KB, 下載次數(shù): 112)
下載附件
2020-4-8 11:05 上傳
fft2.png (1.13 MB, 下載次數(shù): 110)
下載附件
2020-4-8 11:05 上傳
Time.png (26.69 KB, 下載次數(shù): 122)
下載附件
2020-4-8 11:05 上傳
單片機(jī)源程序如下:
- /*
- 0.芯片為STC15W4K58S4
- 1.使用的為IIC OLED,端口為OLED_SDA=P0^1;OLED_SCL=P0^0;
- 2.AD輸入為P1^6;
- 3.晶振選擇為內(nèi)置,24M;
- */
- #include <math.h>
- #include "OLED.h"
- #define FFT_N 64 //定義福利葉變換的點(diǎn)數(shù)
- #define PI 3.1415926535897932384626433832795028841971 //定義圓周率值
- #define Process_sensitivity 0 //修改Process_sensitivity的數(shù)值個(gè)調(diào)整頻譜變化幅度,不建議超過(guò)4
- unsigned char tmrcnt=0;
- float ADC_OutBuf[FFT_N/4];
- struct compx ADC_InBuf[FFT_N]; //FFT輸入和輸出:從S[0]開始存放,根據(jù)大小自己定義
- float SIN_TAB[FFT_N/4+1]; //定義正弦表的存放空間
- struct compx {float real,imag;};
- struct compx EE(struct compx a,struct compx b)
- {
- struct compx c;
- c.real=a.real*b.real-a.imag*b.imag;
- c.imag=a.real*b.imag+a.imag*b.real;
- return(c);
- }
- void create_sin_tab(float *sin_t)
- {
- int i;
- for(i=0;i<=FFT_N/4;i++)
- sin_t[i]=sin(2*PI*i/FFT_N);
- }
- float sin_tab(float pi)
- {
- int n;
- float a=0;
- n=(int)(pi*FFT_N/2/PI);
-
- if(n>=0&&n<=FFT_N/4)
- a=SIN_TAB[n];
- else if(n>FFT_N/4&&n<FFT_N/2)
- {
- n-=FFT_N/4;
- a=SIN_TAB[FFT_N/4-n];
- }
- else if(n>=FFT_N/2&&n<3*FFT_N/4)
- {
- n-=FFT_N/2;
- a=-SIN_TAB[n];
- }
- else if(n>=3*FFT_N/4&&n<3*FFT_N)
- {
- n=FFT_N-n;
- a=-SIN_TAB[n];
- }
-
- return a;
- }
- float cos_tab(float pi)
- {
- float a,pi2;
- pi2=pi+PI/2;
- if(pi2>2*PI)
- pi2-=2*PI;
- a=sin_tab(pi2);
- return a;
- }
- void FFT(struct compx *xin)
- {
- register int f,m,nv2,nm1,i,k,l,j=0;
- struct compx u,w,t;
-
- nv2=FFT_N/2; //變址運(yùn)算,即把自然順序變成倒位序,采用雷德算法
- nm1=FFT_N-1;
- for(i=0;i<nm1;i++)
- {
- if(i<j) //如果i<j,即進(jìn)行變址
- {
- t=xin[j];
- xin[j]=xin[i];
- xin[i]=t;
- }
- k=nv2; //求j的下一個(gè)倒位序
- while(k<=j) //如果k<=j,表示j的最高位為1
- {
- j=j-k; //把最高位變成0
- k=k/2; //k/2,比較次高位,依次類推,逐個(gè)比較,直到某個(gè)位為0
- }
- j=j+k; //把0改為1
- }
-
- {
- int le,lei,ip; //FFT運(yùn)算核,使用蝶形運(yùn)算完成FFT運(yùn)算
- f=FFT_N;
- for(l=1;(f=f/2)!=1;l++) //計(jì)算l的值,即計(jì)算蝶形級(jí)數(shù)
- ;
- for(m=1;m<=l;m++) // 控制蝶形結(jié)級(jí)數(shù)
- { //m表示第m級(jí)蝶形,l為蝶形級(jí)總數(shù)l=log(2)N
- le=2<<(m-1); //le蝶形結(jié)距離,即第m級(jí)蝶形的蝶形結(jié)相距l(xiāng)e點(diǎn)
- lei=le/2; //同一蝶形結(jié)中參加運(yùn)算的兩點(diǎn)的距離
- u.real=1.0; //u為蝶形結(jié)運(yùn)算系數(shù),初始值為1
- u.imag=0.0;
- w.real=cos_tab(PI/lei); //w為系數(shù)商,即當(dāng)前系數(shù)與前一個(gè)系數(shù)的商
- w.imag=-sin_tab(PI/lei);
- for(j=0;j<=lei-1;j++) //控制計(jì)算不同種蝶形結(jié),即計(jì)算系數(shù)不同的蝶形結(jié)
- {
- for(i=j;i<=FFT_N-1;i=i+le) //控制同一蝶形結(jié)運(yùn)算,即計(jì)算系數(shù)相同蝶形結(jié)
- {
- ip=i+lei; //i,ip分別表示參加蝶形運(yùn)算的兩個(gè)節(jié)點(diǎn)
- t=EE(xin[ip],u); //蝶形運(yùn)算,詳見公式
- xin[ip].real=xin[i].real-t.real;
- xin[ip].imag=xin[i].imag-t.imag;
- xin[i].real=xin[i].real+t.real;
- xin[i].imag=xin[i].imag+t.imag;
- }
- u=EE(u,w); //改變系數(shù),進(jìn)行下一個(gè)蝶形運(yùn)算
- }
- }
- }
-
- }
- void Timer0Init(void) //1毫秒@24.000MHz
- {
- AUXR |= 0x80; //定時(shí)器時(shí)鐘1T模式
- TMOD &= 0xF0; //設(shè)置定時(shí)器模式
- TL0 = 0x40; //設(shè)置定時(shí)初值
- TH0 = 0xA2; //設(shè)置定時(shí)初值
- TF0 = 0; //清除TF0標(biāo)志
- TR0 = 1; //定時(shí)器0開始計(jì)時(shí)
- ET0 = 1;
- }
- void Delay(unsigned short n)
- {
- unsigned short x;
- while (n--)
- {
- x = 5000;
- while (x--);
- }
- }
- void InitADC()
- {
- P1ASF = 0xff; //設(shè)置P1口為AD口
- ADC_CONTR =0x80|0x60;
- Delay(2); //ADC上電并延時(shí)
- }
- unsigned short GetADCResult(unsigned char ch)//ch為輸入端口
- {
- ADC_RES = 0;
- ADC_RESL = 0;
- ADC_CONTR =0x80|0x60|ch|0x08;
- _nop_();
- _nop_();
- _nop_();
- _nop_();
- while (!(ADC_CONTR & 0x10));
- ADC_CONTR &= ~0x10;
- return ((unsigned short)(ADC_RES<<2)+ADC_RESL);
- }
- void processfft(void)
- {
- unsigned char data pt=0,i,high,x,temp,p,j;
- for(pt=0;pt<(FFT_N);pt++)
- {
- ADC_InBuf[pt].imag=0;
- }
- FFT(ADC_InBuf);
- for(pt=2,i=0;pt<(FFT_N/2+1);pt+=2)
- {
- ADC_OutBuf[i++] = sqrt(ADC_InBuf[pt].real*ADC_InBuf[pt].real+ADC_InBuf[pt].imag*ADC_InBuf[pt].imag);
- }
- for(i=0;i<(FFT_N/4);i++)
- {
- high=(((unsigned char)ADC_OutBuf[i])>>Process_sensitivity);//修改Process_sensitivity的數(shù)值個(gè)調(diào)整頻譜變化幅度,不建議超過(guò)4
- for(x=0;x<8;x++)
- {
- OLED_SetPos(i*8,7-x);
- temp=0x00;
- for(j=0;j<8;j++)
- {
- OLED_WriteData(temp);
- }
- }
- if(high>64)high=64;
- if(high==0)high=1;
- p=high/8;
- for(x=0;x<p;x++)
- {
- OLED_SetPos(i*8,7-x);
- temp=0xff;
- for(j=0;j<7;j++)
- {
- OLED_WriteData(temp);
- }
- }
- OLED_SetPos(i*8,7-(high/8));
- temp=~0xff>>(high%8);
- for(j=0;j<7;j++)
- {
- OLED_WriteData(temp);
- }
- }
- }
- void main()
- {
- unsigned char i;
- P0M1=0x00;
- P0M0=0x00;
- P1M1=0xc0; //設(shè)定AD輸入為P16/P17,實(shí)際只用了P16
- P1M0=0x00;
- EA=1;
- Oled_Init();
- Timer0Init();
- InitADC();
- create_sin_tab(SIN_TAB);
- while(1)
- {
- if(tmrcnt>=70)
- {
- P55=1;
- for(i=0;i<(FFT_N);i++)
- {
- ADC_InBuf[i].real=((GetADCResult(6))<<Process_sensitivity);//修改Process_sensitivity的數(shù)值個(gè)調(diào)整頻譜變化幅度,不建議超過(guò)4
- }
-
- processfft();
- P55=0;
- tmrcnt=0;
- }
- }
- }
- void Time0() interrupt 1
- {
- tmrcnt++;
- }
復(fù)制代碼 |
-
fft5.png
(1.11 MB, 下載次數(shù): 179)
下載附件
2020-4-8 11:05 上傳
-
fft4.png
(1.39 MB, 下載次數(shù): 161)
下載附件
2020-4-8 11:05 上傳
-
fft3.png
(999.53 KB, 下載次數(shù): 166)
下載附件
2020-4-8 11:05 上傳
-
-
code.rar
2020-4-8 11:07 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
65.44 KB, 下載次數(shù): 224, 下載積分: 黑幣 -5
評(píng)分
-
查看全部評(píng)分
|