久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 15880|回復(fù): 6
收起左側(cè)

基于51單片機(jī)和FFT算法的音頻頻譜分析

  [復(fù)制鏈接]
ID:102668 發(fā)表于 2016-1-16 05:15 | 顯示全部樓層 |閱讀模式

  1. #include<STC12C5A60S2.H>
  2. typedef unsigned char uint8;
  3. typedef unsigned int  uint16;
  4. #define  channel  0x01     //設(shè)置AD通道為 P1.0
  5. #define ADC_POWER   (1<<7)
  6. #define ADC_SPEEDHH (0x03<<5)
  7. #define ADC_START   (1<<3)
  8. #define PADCH       (1<<5)
  9. #define ADC_FLAG    (1<<4)
  10. #define P_3 P3 //32列掃描控制
  11. sbit sw=P1^2;//74HC154組切換控制位
  12. //放大128倍后的sin整數(shù)表(128)
  13. code char SIN_TAB[128]={0,6,12,18,24,30,36,42,48,54,59,65,70,75,80,85,89,94,98,102,
  14.                         105,108,112,114,117,119,121,123,124,125,126,126,126,126,126,
  15.       125,124,123,121,119,117,114,112,108,105,102,98,94,89,85,80,75,
  16.       70,65,59,54,48,42,36,30,24,18,12,6,0,-6,-12,-18,-24,-30,-36,-42,
  17.       -48,-54,-59,-65,-70,-75,-80,-85,-89,-94,-98,-102,-105,-108,-112,
  18.       -114,-117,-119,-121,-123,-124,-125,-126,-126,-126,-126,-126,-125,
  19.       -124,-123,-121,-119,-117,-114,-112,-108,-105,-102,-98,-94,-89,-85,
  20.       -80,-75,-70,-65,-59,-54,-48,-42,-36,-30,-24,-18,-12,-6};
  21. //放大128倍后的cos整數(shù)表(128)
  22. code char COS_TAB[128]={127,126,126,125,124,123,121,119,117,114,112,108,105,102,98,94,
  23.                         89,85,80,75,70,65,59,54,48,42,36,30,24,18,12,6,0,-6,-12,-18,-24,
  24.       -30,-36,-42,-48,-54,-59,-65,-70,-75,-80,-85,-89,-94,-98,-102,
  25.       -105,-108,-112,-114,-117,-119,-121,-123,-124,-125,-126,-126,-126,
  26.       -126,-126,-125,-124,-123,-121,-119,-117,-114,-112,-108,-105,-102,
  27.       -98,-94,-89,-85,-80,-75,-70,-65,-59,-54,-48,-42,-36,-30,-24,-18,
  28.       -12,-6,0,6,12,18,24,30,36,42,48,54,59,65,70,75,80,85,89,94,98,102,
  29.       105,108,112,114,117,119,121,123,124,125,126,126};
  30. //采樣存儲序列表
  31. code char LIST_TAB[128] = {0,64,32,96,16,80,48,112,8,72,40,104,24,88,56,120,4,68,36,100,20,84,52,116,
  32.                            12,76,44,108,28,92,60,124,2,66,34,98,18,82,50,114,10,74,42,106,26,90,58,
  33.          122,6,70,38,102,22,86,54,118,14,78,46,110,30,94,62,126,1,65,33,97,17,81,49,
  34.          113,9,73,41,105,25,89,57,121,5,69,37,101,21,85,53,117,13,77,45,109,29,93,61,
  35.          125,3,67,35,99,19,83,51,115,11,75,43,107,27,91,59,123,7,71,39,103,23,87,55,
  36.          119,15,79,47,111,31,95,63,127};
  37. uint8 LED[32]={0x80,0x00,0xC0,0x00,0xE0,0x00,0xF0,0x00,
  38.                0xF8,0x00,0xFC,0x00,0xFE,0x00,0xFF,0x00,
  39.                0xff,0x80,0xff,0xC0,0xff,0xE0,0xff,0xF0,
  40.       0xff,0xF8,0xff,0xFC,0xff,0xFE,0xff,0xFF,};
  41. uint8 COUNT=15,COUNT1=0,ADC_Count=0,LINE=15,G=0,T;
  42. uint8 i,j,k,b,p,anum,led=0;               
  43. int Temp_Real,Temp_Imag,temp;                // 中間臨時變量
  44. uint16 TEMP1,max=0;
  45. int xdata Fft_Real[128];
  46. int xdata Fft_Image[128];               // fft的虛部
  47. uint8 xdata LED_TAB2[16];    //記錄 漂浮物 是否需要 停頓一下
  48. uint8 xdata LED_TAB[16];    //記錄紅色柱狀
  49. uint8 xdata LED_TAB1[16];    //記錄 漂浮點(diǎn)
  50. /////////////shop60610364.taobao.com/////////
  51. void FFT()//基2fft
  52. {               
  53.     for( i=1; i<=7; i++)                            /* for(1) */
  54.     {
  55.         b=1;
  56.         b <<=(i-1);                                 //碟式運(yùn)算,用于計算隔多少行計算例如 第一極 1和2行計算
  57.         for( j=0; j<=b-1; j++)                      /* for (2) */
  58.         {
  59.             p=1;
  60.             p <<= (7-i);           
  61.             p = p*j;
  62.             for( k=j; k<128; k=k+2*b)               /* for (3)  */
  63.             {
  64.                 Temp_Real=Fft_Real[k];
  65.     Temp_Imag=Fft_Image[k];
  66.     temp=Fft_Real[k+b];
  67.                 Fft_Real[k]=Fft_Real[k]+((Fft_Real[k+b]*COS_TAB[p])>>7)+((Fft_Image[k+b]*SIN_TAB[p])>>7);
  68.                 Fft_Image[k]=Fft_Image[k]-((Fft_Real[k+b]*SIN_TAB[p])>>7)+((Fft_Image[k+b]*COS_TAB[p])>>7);
  69.                 Fft_Real[k+b]=Temp_Real-((Fft_Real[k+b]*COS_TAB[p])>>7)-((Fft_Image[k+b]*SIN_TAB[p])>>7);
  70.                 Fft_Image[k+b]=Temp_Imag+((temp*SIN_TAB[p])>>7)-((Fft_Image[k+b]*COS_TAB[p])>>7);          // 移位.防止溢出. 結(jié)果已經(jīng)是本值的 1/64              
  71.                 Fft_Real[k] >>= 1;            
  72.                 Fft_Image[k] >>= 1;
  73.                 Fft_Real[k+b] >>= 1;               
  74.                 Fft_Image[k+b] >>= 1;
  75.                                                                               
  76.             }   
  77.         }
  78.     }
  79. for(j=0;j<16;j++)//16分頻           
  80. {                    
  81.   TEMP1=((((Fft_Real[j+1]* Fft_Real[j+1]))+((Fft_Image[j+1]*Fft_Image[j+1])))>>1);//求各頻段幅值
  82.   if(TEMP1<1)TEMP1=0;
  83.   LED_TAB[j]=TEMP1;
  84.   if(LED_TAB[j]>max)max=LED_TAB[j];
  85. }
  86. if(max>16)//分級量化
  87. {
  88.    max/=16;
  89.    for(j=0;j<16;j++)LED_TAB[j]/=max;
  90. }      
  91. }

  92. void delay2us(void)   //2us延時
  93. {
  94.     unsigned char a,b;
  95.     for(b=1;b>0;b--)
  96.         for(a=3;a>0;a--);
  97. }

  98. void Init()
  99. {

  100. //-----------------------------------------------------------------------------------
  101.      P1ASF = 0x02;                 //0000,0010, 將 P1.1 置成模擬口
  102.      AUXR1 &=0xFB;                 //1111,1011, 令 ADRJ=0
  103.   EADC=1;        //AD中斷打開
  104.   ADC_CONTR = ADC_POWER | ADC_SPEEDHH | ADC_START | channel;//1110 1001   1打開 A/D (ADC_POWER)轉(zhuǎn)換電源;11速度為90周期一次;
  105.                                                       //0中斷標(biāo)志清零;1啟動adc(ADC_START);001AD通道打開(這里為P1.1);
  106. //-----------------------------------------------------------------------------------

  107.   P2M0=1;
  108.      TMOD=0X12;      
  109.   TH0=0xb0;                                      
  110.   TL0=0xb0;
  111.   TH1=0xfe;              
  112.   TL1=0Xd4;
  113.   ET0=1;            //定時器0 打開
  114.   TR0=0;            //關(guān)閉定時器
  115.   ET1=1;
  116.   TR1=1;
  117.   PT1=0;
  118.   PT0=1;
  119.      IPH=PADCH;
  120.   IP=PADC;        //中斷優(yōu)先級
  121.   EA=1;         //總中斷打開
  122. }
  123. //----------------------------------------------------------------------------------------

  124. void ADC_Finish() interrupt 5
  125. {    ADC_CONTR &= !ADC_FLAG;
  126.      Fft_Real[LIST_TAB[ADC_Count]]=(int)((ADC_RES)<<1)+(ADC_RESL>>1)*2;//按LIST_TAB表里的順序,進(jìn)行存儲采樣值
  127.    if(ADC_Count<=127)ADC_Count++;
  128.    else {EADC=0;TR0=0;}               
  129. }
  130. //---------------------------------------------------------------------------------------
  131. void LED_Display() interrupt 3      //中斷一次顯示一列
  132. {   
  133.   TH1=0xfe;            
  134. TL1=0Xd4;      
  135.     G++;         
  136.     if(G==33)G=1;
  137. switch(G)             //往點(diǎn)陣屏填充一列的數(shù)據(jù)
  138.    {
  139.   case 1:sw=1;anum=LED_TAB[0];P_3=0x00;break;
  140.   case 2:anum=LED_TAB[0];P_3=0x01;break;
  141.   case 3:anum=LED_TAB[1];P_3=0x02;break;
  142.   case 4:anum=LED_TAB[1];P_3=0x03;break;
  143.   case 5:anum=LED_TAB[2];P_3=0x04;break;
  144.   case 6:anum=LED_TAB[2];P_3=0x05;break;
  145.   case 7:anum=LED_TAB[3];P_3=0x06;break;
  146.   case 8:anum=LED_TAB[3];P_3=0x07;break;
  147.   case 9:anum=LED_TAB[4];P_3=0x08;break;
  148.   case 10:anum=LED_TAB[4];P_3=0x09;break;
  149.   case 11:anum=LED_TAB[5];P_3=0x0a;break;
  150.   case 12:anum=LED_TAB[5];P_3=0x0b;break;
  151.   case 13:anum=LED_TAB[6];P_3=0x0c;break;
  152.   case 14:anum=LED_TAB[6];P_3=0x0d;break;
  153.   case 15:anum=LED_TAB[7];P_3=0x0e;break;
  154.   case 16:anum=LED_TAB[7];P_3=0x0f;break;
  155.   case 17:sw=0;anum=LED_TAB[8];P_3=0x00;break;
  156.   case 18:anum=LED_TAB[8];P_3=0x10;break;
  157.   case 19:anum=LED_TAB[9];P_3=0x20;break;
  158.   case 20:anum=LED_TAB[9];P_3=0x30;break;
  159.   case 21:anum=LED_TAB[10];P_3=0x40;break;
  160.   case 22:anum=LED_TAB[10];P_3=0x50;break;
  161.   case 23:anum=LED_TAB[11];P_3=0x60;break;
  162.   case 24:anum=LED_TAB[11];P_3=0x70;break;
  163.   case 25:anum=LED_TAB[12];P_3=0x80;break;
  164.   case 26:anum=LED_TAB[12];P_3=0x90;break;
  165.   case 27:anum=LED_TAB[13];P_3=0xa0;break;
  166.   case 28:anum=LED_TAB[13];P_3=0xb0;break;
  167.   case 29:anum=LED_TAB[14];P_3=0xc0;break;
  168.   case 30:anum=LED_TAB[14];P_3=0xd0;break;
  169.   case 31:anum=LED_TAB[15];P_3=0xe0;break;
  170.   case 32:anum=LED_TAB[15];P_3=0xf0;break;
  171.      
  172.   }
  173.     for(led=0;led<=anum;led++)     //遞增
  174.       { P0=LED[2*led+1];
  175.      P2=LED[2*led];
  176.      delay2us();
  177.    
  178.    }           //遞減
  179.     for(;led>=0;led--)
  180.       { P0=LED[2*led+1];
  181.      P2=LED[2*led];
  182.      delay2us();
  183.    }
  184. }
  185. //------------------------------------------------------------------------------------------------------------
  186. void Ad_Control() interrupt 1      //控制采樣率
  187. {
  188. ADC_CONTR = ADC_POWER | ADC_SPEEDHH| ADC_START | channel;  //開始AD采集
  189. }
  190.          
  191. //===============================================================================================================
  192. void main()
  193. {
  194.     uint8 i;
  195.   Init();
  196. while(1)
  197. {  
  198.   ADC_Count=0;
  199.   TR0=1;
  200.   EADC=1; //開啟定時器中斷0,開啟ADC
  201.   while(ADC_Count<128);
  202.         for(i=0;i<128;i++)
  203.         {
  204.          Fft_Image[i]=0;
  205.         }
  206.   FFT();//FFT運(yùn)算并轉(zhuǎn)換為各頻段幅值        
  207.   
  208. }
  209. }
復(fù)制代碼


評分

參與人數(shù) 1黑幣 +5 收起 理由
關(guān)外秀才 + 5 贊一個!

查看全部評分

回復(fù)

使用道具 舉報

ID:376558 發(fā)表于 2018-7-21 12:54 | 顯示全部樓層
其中有一個頭文件定義#include<STC12C5A60S2.H>,樓主能否分享一下啊,萬分感謝
回復(fù)

使用道具 舉報

ID:141273 發(fā)表于 2018-9-30 11:56 | 顯示全部樓層
噪音太大如何解決
回復(fù)

使用道具 舉報

ID:1087921 發(fā)表于 2023-7-10 07:39 | 顯示全部樓層
學(xué)習(xí)一下代碼。
回復(fù)

使用道具 舉報

ID:1087921 發(fā)表于 2023-7-10 07:45 | 顯示全部樓層
ADC采樣率是多少?測試的頻率范圍為多少?
回復(fù)

使用道具 舉報

ID:93929 發(fā)表于 2023-7-10 20:55 | 顯示全部樓層
有電路圖嗎?
回復(fù)

使用道具 舉報

ID:1085441 發(fā)表于 2023-7-11 00:00 | 顯示全部樓層
我用STC51單片機(jī)做過一個50Hz的FFT,時鐘頻率用到33M,感覺都勉強(qiáng)。
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

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

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

快速回復(fù) 返回頂部 返回列表
主站蜘蛛池模板: 亚洲 中文 欧美 日韩 在线观看 | 国产一区二区三区精品久久久 | 欧美亚洲在线视频 | 亚洲 欧美 日韩 精品 | 成人免费视频 | 56pao在线| 亚洲一级黄色 | 国产一区二区三区久久久久久久久 | 欧美亚洲一区二区三区 | 宅男噜噜噜66一区二区 | 91精品国产欧美一区二区成人 | 国产91在线播放 | 一区二区三区国产精品 | 欧美色综合一区二区三区 | 91麻豆精品国产91久久久久久久久 | 欧美日韩国产免费 | 91在线网| 中文字幕在线播放第一页 | 久久久久久国产 | 91精品国产乱码久久久久久 | 中文字幕亚洲视频 | 成人综合在线视频 | 欧美亚洲综合久久 | 91国在线 | 国产成人精品综合 | 日本精品一区二区三区视频 | 久久国产精品-国产精品 | 亚州春色 | 婷婷狠狠 | 人人爽日日躁夜夜躁尤物 | 久久久久久蜜桃一区二区 | 网页av| 国产亚洲精品综合一区 | av黄在线观看 | av国产精品毛片一区二区小说 | 日韩中文一区二区三区 | 欧美日韩一 | 精品久久久久久久久久 | www.亚洲区| 欧美日韩国产一区二区三区 | 久久1区 |