找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 8530|回復(fù): 7
打印 上一主題 下一主題
收起左側(cè)

STM32上的FFT求電壓電流諧波含量源碼

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:135788 發(fā)表于 2017-11-30 10:46 | 只看該作者 |只看大圖 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
此源代碼是基于STM32上的FFT求電壓電流諧波含量,改代碼可以在各個(gè)平臺(tái)上方便移植

單片機(jī)源程序如下:

  1. void FFT(float dataR[NUM_FFT],float dataI[NUM_FFT])
  2. {
  3.         int x0,x1,x2,x3,x4,x5,x6,xx;
  4.         int i,j,k,b,p,L;
  5.         float TR,TI,temp;
  6.        
  7.         /********** following code invert sequence ************/
  8.         for ( i=0;i<NUM_FFT;i++ )
  9.         {
  10.                 x0=x1=x2=x3=x4=x5=x6=0;
  11.                 x0=i&0x01; x1=(i/2)&0x01; x2=(i/4)&0x01; x3=(i/8)&0x01;x4=(i/16)&0x01; x5=(i/32)&0x01; x6=(i/64)&0x01;
  12.                 xx=x0*64+x1*32+x2*16+x3*8+x4*4+x5*2+x6;
  13.                 dataI[xx]=dataR[i];
  14.         }
  15.         for ( i=0;i<NUM_FFT;i++ )
  16.         {
  17.                 dataR[i]=dataI[i]; dataI[i]=0;
  18.         }

  19.         /************** following code FFT *******************/
  20.         for ( L=1;L<=7;L++ )
  21.         { /* for(1) */
  22.                 b=1; i=L-1;
  23.                 while ( i>0 )
  24.                 {
  25.                         b=b*2; i--;
  26.                 } /* b= 2^(L-1) */
  27.                 for ( j=0;j<=b-1;j++ ) /* for (2) */
  28.                 {
  29.                         p=1; i=7-L;
  30.                         while ( i>0 ) /* p=pow(2,7-L)*j; */
  31.                         {
  32.                                 p=p*2; i--;
  33.                         }
  34.                         p=p*j;
  35.                         for ( k=j;k<128;k=k+2*b ) /* for (3) */
  36.                         {
  37.                                 TR=dataR[k]; TI=dataI[k]; temp=dataR[k+b];
  38.                                 dataR[k]=dataR[k]+dataR[k+b]*cos_tab[p]+dataI[k+b]*sin_tab[p];
  39.                                 dataI[k]=dataI[k]-dataR[k+b]*sin_tab[p]+dataI[k+b]*cos_tab[p];
  40.                                 dataR[k+b]=TR-dataR[k+b]*cos_tab[p]-dataI[k+b]*sin_tab[p];
  41.                                 dataI[k+b]=TI+temp*sin_tab[p]-dataI[k+b]*cos_tab[p];
  42.                         } /* END for (3) */
  43.                 } /* END for (2) */
  44.         } /* END for (1) */
  45. } /* END FFT */


  46. void InitForFFT()
  47. {
  48. ……………………

  49. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
FFT.zip (1.49 KB, 下載次數(shù): 178)




評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏6 分享淘帖 頂 踩1
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:277249 發(fā)表于 2018-1-18 09:52 | 只看該作者
跟你描述的差距太大啊,就兩個(gè)函數(shù),跟電壓和電流有啥關(guān)系,這不騙人嗎
回復(fù)

使用道具 舉報(bào)

板凳
ID:184706 發(fā)表于 2018-4-21 13:41 | 只看該作者
讓我檢查一下你的程序
回復(fù)

使用道具 舉報(bào)

地板
ID:262859 發(fā)表于 2018-5-14 21:42 | 只看該作者
這個(gè)可以用來測(cè)諧波次數(shù)嘛
回復(fù)

使用道具 舉報(bào)

5#
ID:262859 發(fā)表于 2018-5-14 21:43 | 只看該作者
這個(gè)可以測(cè)諧波次數(shù)嘛啊?
回復(fù)

使用道具 舉報(bào)

6#
ID:504971 發(fā)表于 2019-10-29 09:26 | 只看該作者
厲害 啊
回復(fù)

使用道具 舉報(bào)

7#
ID:381834 發(fā)表于 2020-4-17 00:29 | 只看該作者
下載來學(xué)習(xí)一下
回復(fù)

使用道具 舉報(bào)

8#
ID:541246 發(fā)表于 2020-10-14 08:54 | 只看該作者
代碼參考價(jià)值有限,沒有必要注釋,謹(jǐn)慎下載
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表