基于fir語(yǔ)音信號(hào)的濾波課程設(shè)計(jì)-資料下載頁(yè)
2025-07-04 21:22本頁(yè)面
【正文】 ,poddi。 for (it=0。 it=n1。 it++) { m=it。 is=0。 for (i=0。 i=k1。 i++) { j=m/2。 is=2*is+(m2*j)。 m=j。} fr[it]=pr[is]。 fi[it]=pi[is]。 } pr[0]=。 pi[0]=。 p=(*n)。 pr[1]=cos(p)。 pi[1]=sin(p)。 if (l!=0) pi[1]=pi[1]。 for (i=2。 i=n1。 i++) { p=pr[i1]*pr[1]。 q=pi[i1]*pi[1]。 s=(pr[i1]+pi[i1])*(pr[1]+pi[1])。 pr[i]=pq。 pi[i]=spq。 } for (it=0。 it=n2。 it=it+2) { vr=fr[it]。 vi=fi[it]。 fr[it]=vr+fr[it+1]。 fi[it]=vi+fi[it+1]。 fr[it+1]=vrfr[it+1]。 fi[it+1]=vifi[it+1]。 } m=n/2。 nv=2。 for (l0=k2。 l0=0。 l0) { m=m/2。 nv=2*nv。 for (it=0。 it=(m1)*nv。 it=it+nv) for (j=0。 j=(nv/2)1。 j++) { p=pr[m*j]*fr[it+j+nv/2]。 q=pi[m*j]*fi[it+j+nv/2]。 s=pr[m*j]+pi[m*j]。 s=s*(fr[it+j+nv/2]+fi[it+j+nv/2])。 poddr=pq。 poddi=spq。 fr[it+j+nv/2]=fr[it+j]poddr。 fi[it+j+nv/2]=fi[it+j]poddi。 fr[it+j]=fr[it+j]+poddr。 fi[it+j]=fi[it+j]+poddi。 } } if (l!=0) for (i=0。 i=n1。 i++) { fr[i]=fr[i]/(*n)。 fi[i]=fi[i]/(*n)。 } if (il!=0) for (i=0。 i=n1。 i++) { pr[i]=sqrt(fr[i]*fr[i]+fi[i]*fi[i])。 if (fabs(fr[i])*fabs(fi[i])) { if ((fi[i]*fr[i])0) pi[i]=。 else pi[i]=。 } else pi[i]=atan(fi[i]/fr[i])*。 } return。 }void main(void){ int i,j,n,k,p,s=0。 double x[128],pr[128],pi[128],fr[128],fi[128],mo[128]。 double fs,fstop,r,rm。 int xm,zm,ym。 n=128。 // PLL, WatchDog, enable Peripheral Clocks// This example function is found in the file. InitSysCtrl()。 // Setup only the GP I/O only for McBSP functionality EALLOW。 // Allow access to EALLOW protected registers =0x3F0F。 //as spi and mcbsp pin EDIS。 // Disable access to EALLOW protected registers // Disable CPU interrupts DINT。// Initialize PIE control registers to their default state.// The default state is all PIE interrupts disabled and flags// are cleared. InitPieCtrl()。// Disable CPU interrupts and clear all CPU interrupt flags: IER = 0x0000。 IFR = 0x0000。// Initialize the PIE vector table with pointers to the shell Interrupt // Service Routines (ISR). InitPieVectTable()。 spi_init()。 aic23_init()。 //初始化TLV320AIC23，設(shè)置內(nèi)部寄存器 mcbsp_init()。 // For this example, only initialize the Mcbsp fs = 8000。 fstop = 3000。 npass = fstop/fs。 for (i=0。 i=m。 i++) { xmid[i]=0。 } for(。) { //模擬音頻輸入 for(i=0。i=n1。i++) { mcbsp_read_rdy()。 //MCBSP接收一個(gè)數(shù)據(jù)32位 read_data1 = 。 //右聲道 PA[i]=read_data1。 } //原信號(hào)FFT轉(zhuǎn)換 for (j=0。 j=4。 j++) { for (i=0。 i=n1。 i++) { xm=PA[i]。 x[i]=xm/。 pr[i]=x[i]。 pi[i]=0。 } kfft(pr,pi,128,7,fr,fi,0,1)。 for (i=0。i=n1。i++) { mo[i] = sqrt(fr[i]*fr[i]+fi[i]*fi[i])。 zm = (int)(mo[i]*)。 PC[i] = zm。 } PC[0]=0。 k++。 } //原信號(hào)濾波 firdes(m, npass)。 for (s=0。 s=4。 s++) { for (i=0。 i=n1。 i++) { xm = PA[i]。 u = xm/。 for (p=0。 p=m。 p++) { xmid[mp] = xmid[mp1]。 } xmid[0] = u。 r = 0。 rm= 0。 for (j=0。 j=m。 j++) { r = xmid[j] * h[j]。 rm = rm + r。 } y = rm。 ym = (int)( * y)。 PB[i] = ym。 } } //濾波后的FFT轉(zhuǎn)換 for (j=0。 j=4。 j++) { for (i=0。 i=n1。 i++) { xm=PB[i]。 x[i]=xm/。 pr[i]=x[i]。 pi[i]=0。 } kfft(pr,pi,128,7,fr,fi,0,1)。 for (i=0。i=n1。i++) { mo[i] = sqrt(fr[i]*fr[i]+fi[i]*fi[i])。 zm = (int)(mo[i]*)。 PD[i] = zm。 } PD[0]=0。 k++。 } //原信號(hào)右聲道輸出，濾波后的左聲道輸出 For(i=0。 i=n1。 i++) { mcbsp_write_rdy(PA[i], PB[i])。} }}第23頁(yè) 共 2
范文總結(jié)相關(guān)推薦
鄂ICP備17016276號(hào)-1