單片機源程序如下:
- #include "src\STC12C5A.h"
- #include <intrins.h> //51基本運算（包括_nop_空函數）
- #include <math.h>
- #include "src\Define.h"
- ///////全局變量///////
- uchar data DelayTime=9;
- uchar data gain=6,tt=0;
- uchar idata refreshflag[40];
- uchar data LEDBuf[35]; //15列；從左到右；亮的位為真（1）；
- #include "src\ADC.c"
- #include "src\fft.h"
- uchar code ax[]={0,0,0,0,0,0,0,0, //“愛心”圖標數組
- 0,0,0,0,0,0,0,0,
- 0x00,0x00,0x00,0x70,0xF8,0xFC,0xFE,0x7F,0x7F,0x7F,0xFE,0xFC,0xF8,0x70,0x00,0x00,
- 0,0,0,0,0,0,0,0,
- 0,0,0,0,0,0,0,0,
- };
- void Delays(uint t) //延時函數
- {
- uint j;
- while(--t)
- {
- for(j=0;j<5;j++);
- }
- }
- void IOINIT() //初始化IO口工作模式
- {
- P0M1 = 0x00; P0M0 = 0xff; P0=0; //點陣列（Y）（L:OFF； H，H+:ON,ON+;）
- P1M1 = B(01000011); P1M0 = B(00110000);P1=B(10111111); //(P17@（高阻，IN）&P16@（高阻，IN） ... P11@(高阻，IN)AD2;P10@(高阻，IN)AD1;
- P2M1 = B(00000000); P2M0 = B(11111111);P2=0; //點陣行（X0（Left））（L:OFF； H，H+:ON,ON+;）
- P3M1 = B(00000000); P3M0 = B(11111111);P3=0; //點陣行（X1（Right））（L:OFF； H，H+:ON,ON+;）
- P1ASF =B(00000011); //將P10,P11的IO設置為模擬輸入功能；
- }
- void BufToLED_Refresh() //把LEDBuf的數值數據傳到P0,通過LED顯示出來
- {
- uchar data i; //定義循環變量i
- uint temp=0x7fff; //定義temp
- for(i=0;i<32;i+=2) //循環16次操作
- {
- P0=0x00; //P0輸出低電平
- P2=temp/256; //P2為前8位
- P3=temp%256; //P3為后8位
- P0=~LEDBuf[i]; //調用LEDBuf數組取反
- Delays(DelayTime); //延時一下
- P2=0xff; //消隱
- P3=0xff; //消隱
- temp>>=1; //右移一位
- temp|=0x8000; //目的是為從左到右依次允許點亮LED(列)提供條件
- }
- }
- void LOVE() //“愛心”圖標顯示
- {
- uchar data i; //定義循環變量i
- uint temp=0x7fff; //定義temp
- for(i=0;i<16;i++) //循環16次操作
- {
- P0=0x00; //P0輸出低電平
- P2=temp/256; //P2為前8位
- P3=temp%256; //P3為后8位
- P0=ax[i+tt]; //調用“愛心”圖標數據
- Delays(DelayTime); //延時一下
- P2=0xff; //消隱
- P3=0xff; //消隱
- temp>>=1; //右移一位
- temp|=0x8000; //目的是為從左到右依次允許點亮LED(列)提供條件
- }
- }
- void Timer_INT() //定時器初始化
- {
- TMOD = 0x10; //高4位控制T/C1
- EA = 1; //開總中斷
- TH1 = 0x00; //16位計數寄存器T1高8位
- TL1 = 0x00; //16位計數寄存器T1低8位
- ET1 = 1; //T/C1中斷開
- TR1 = 1; //T/C1啟動
- }
- void ax_xs() //愛心顯示
- {
- uint pp=4000; //定義pp=4000
- while(pp--) //如果PP減1后為真(即pp減1后不為0,直到pp=0才跳出while循環)
- {
- if(pp%250==0) //如果PP/250,余數為0(即pp能被250整除)
- {
- tt++; //tt加1
- }
- LOVE(); //“愛心”圖標顯示
- }
- pp=4000; //pp重新賦值0
- while(pp--) //如果PP減1后為真(即pp減1后不為0,直到pp=0才跳出while循環)
- {
- LOVE(); //“愛心”圖標顯示
- }
- pp=4000; //pp重新賦值0
- while(pp--) //如果PP減1后為真(即pp減1后不為0,直到pp=0才跳出while循環)
- {
- if(pp%250==0) //如果PP/250,余數為0(即pp能被250整除)
- {
- tt++; //tt加1
- }
- LOVE(); //“愛心”圖標顯示
- }
- }
- void Main() //主函數入口
- {
- uint data Count=700; //定義變量Count
- uchar data i,Cgain,num=0; //定義變量 i,Cgain,num
- IOINIT(); //初始化IO口工作模式
- ax_xs(); //愛心顯示
- InitADC(); //ADC初始化
- Timer_INT(); //定時器初始化
- while(1) //主循環
- {
- for(i=0;i<65;i++) //for循環操作65次(讀取64次ADC轉換結果)
- {
- dd[i].real=(GetADCResult(0)+GetADCResult(1))<<gain;
- //讀取 ad 結果并放大 2 的 gain（變量）次方，然后給 FFT 算法的緩存區賦值
- }
- processfft(); //傅立葉變化及處理
- if(dd[2].real<32) //如果讀取到的AD結果<32(即音頻幅度太小)
- {
- if(++Count==300) //電平值過小，則降低gain，減少噪音的電平顯示
- {
- Count=0; //Count清0
- gain=6; //gain=6
- }
- }
- else //否則在AD結果在正常音頻范圍
- {
- Count=1; //Count賦值1(為下次的音頻幅度太小做準備)
- if(++num==0xAF) //播放時，Auto gain；
- {
- num=0; //num清0
- /*自動增益的作用: 當輸入的音頻信號的音量變大或變小時，采樣的 AD 值幅度也會有相應趨勢的變化，
- 于是根據這個值自動調節 AD 值放大的倍數，維持在一定的范圍內，從而使顯示的效果最好，
- 不會出現滿屏或者空屏的現象*/
- //自動增益；Automatic gain;
- Cgain=dd[2].real/32;
- if(7<Cgain<=8)
- {
- gain=4; //4
- }
- else if(4<Cgain<=6)
- {
- gain=5; //5
- }
- else if(2<Cgain<=4)
- {
- gain=6; //6
- }
- else
- {
- gain=7; //7
- }
- }
- }
- }
- }
- void LEDRefresh_INT() interrupt 3 //定時器中斷服務函數
- {
- TH1 = 0x8A; //定時15ms
- TL1 = 0xD0; //定時時間越小顯示越清楚,但是頻譜變化越緩慢
- //反之......大....抖動大.....頻譜變化越快
- BufToLED_Refresh(); //把LEDBuf的數值數據傳到P0,通過LED顯示出來
- //刷新顯示緩存區數據來點亮點陣屏
- }
所有資料51hei提供下載:
51單片機音樂頻譜設計.7z
(338.03 KB, 下載次數: 156)
2019-11-24 23:37 上傳
點擊文件名下載附件
|
[復制鏈接]
