|
|
圖片1.png (341.61 KB, 下載次數(shù): 136)
下載附件
2017-5-21 14:01 上傳
這是我焊接的系統(tǒng)的正面圖
QQ圖片20170521125442.jpg (1.87 MB, 下載次數(shù): 120)
下載附件
2017-5-21 14:02 上傳
這是系統(tǒng)的背面圖
主函數(shù)程序部分： 單片機(jī)源程序如下:
- #include "src\STC12C5A.h"
- #include <intrins.h> //51基本運(yùn)算（包括_nop_空函數(shù)）
- #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, //“愛(ài)心”圖標(biāo)數(shù)組
- 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) //延時(shí)函數(shù)
- {
- uint j;
- while(--t)
- {
- for(j=0;j<5;j++);
- }
- }
- void IOINIT() //初始化IO口工作模式
- {
- P0M1 = 0x00; P0M0 = 0xff; P0=0; //點(diǎn)陣列（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; //點(diǎn)陣行（X0（Left））（L:OFF； H，H+:ON,ON+;）
- P3M1 = B(00000000); P3M0 = B(11111111);P3=0; //點(diǎn)陣行（X1（Right））（L:OFF； H，H+:ON,ON+;）
- P1ASF =B(00000011); //將P10,P11的IO設(shè)置為模擬輸入功能；
- }
- void BufToLED_Refresh() //把LEDBuf的數(shù)值數(shù)據(jù)傳到P0,通過(guò)LED顯示出來(lái)
- {
- uchar data i; //定義循環(huán)變量i
- uint temp=0x7fff; //定義temp
- for(i=0;i<32;i+=2) //循環(huán)16次操作
- {
- P0=0x00; //P0輸出低電平
- P2=temp/256; //P2為前8位
- P3=temp%256; //P3為后8位
- P0=~LEDBuf[i]; //調(diào)用LEDBuf數(shù)組取反
- Delays(DelayTime); //延時(shí)一下
- P2=0xff; //消隱
- P3=0xff; //消隱
- temp>>=1; //右移一位
- temp|=0x8000; //目的是為從左到右依次允許點(diǎn)亮LED(列)提供條件
- }
- }
- void LOVE() //“愛(ài)心”圖標(biāo)顯示
- {
- uchar data i; //定義循環(huán)變量i
- uint temp=0x7fff; //定義temp
- for(i=0;i<16;i++) //循環(huán)16次操作
- {
- P0=0x00; //P0輸出低電平
- P2=temp/256; //P2為前8位
- P3=temp%256; //P3為后8位
- P0=ax[i+tt]; //調(diào)用“愛(ài)心”圖標(biāo)數(shù)據(jù)
- Delays(DelayTime); //延時(shí)一下
- P2=0xff; //消隱
- P3=0xff; //消隱
- temp>>=1; //右移一位
- temp|=0x8000; //目的是為從左到右依次允許點(diǎn)亮LED(列)提供條件
- }
- }
- void Timer_INT() //定時(shí)器初始化
- {
- TMOD = 0x10; //高4位控制T/C1
- EA = 1; //開(kāi)總中斷
- TH1 = 0x00; //16位計(jì)數(shù)寄存器T1高8位
- TL1 = 0x00; //16位計(jì)數(shù)寄存器T1低8位
- ET1 = 1; //T/C1中斷開(kāi)
- TR1 = 1; //T/C1啟動(dòng)
- }
- void ax_xs() //愛(ài)心顯示
- {
- uint pp=4000; //定義pp=4000
- while(pp--) //如果PP減1后為真(即pp減1后不為0,直到pp=0才跳出while循環(huán))
- {
- if(pp%250==0) //如果PP/250,余數(shù)為0(即pp能被250整除)
- {
- tt++; //tt加1
- }
- LOVE(); //“愛(ài)心”圖標(biāo)顯示
- }
- pp=4000; //pp重新賦值0
- while(pp--) //如果PP減1后為真(即pp減1后不為0,直到pp=0才跳出while循環(huán))
- {
- LOVE(); //“愛(ài)心”圖標(biāo)顯示
- }
- pp=4000; //pp重新賦值0
- while(pp--) //如果PP減1后為真(即pp減1后不為0,直到pp=0才跳出while循環(huán))
- {
- if(pp%250==0) //如果PP/250,余數(shù)為0(即pp能被250整除)
- {
- tt++; //tt加1
- }
- LOVE(); //“愛(ài)心”圖標(biāo)顯示
- }
- }
- void Main() //主函數(shù)入口
- {
- uint data Count=700; //定義變量Count
- uchar data i,Cgain,num=0; //定義變量 i,Cgain,num
- IOINIT(); //初始化IO口工作模式
- ax_xs(); //愛(ài)心顯示
- InitADC(); //ADC初始化
- Timer_INT(); //定時(shí)器初始化
- while(1) //主循環(huán)
- {
- for(i=0;i<65;i++) //for循環(huán)操作65次(讀取64次ADC轉(zhuǎn)換結(jié)果)
- {
- dd[i].real=(GetADCResult(0)+GetADCResult(1))<<gain;
- //讀取 ad 結(jié)果并放大 2 的 gain（變量）次方，然后給 FFT 算法的緩存區(qū)賦值
- }
- processfft(); //傅立葉變化及處理
- if(dd[2].real<32) //如果讀取到的AD結(jié)果<32(即音頻幅度太小)
- {
- if(++Count==300) //電平值過(guò)小，則降低gain，減少噪音的電平顯示
- {
- Count=0; //Count清0
- gain=6; //gain=6
- }
- }
- else //否則在AD結(jié)果在正常音頻范圍
- {
- Count=1; //Count賦值1(為下次的音頻幅度太小做準(zhǔn)備)
- if(++num==0xAF) //播放時(shí)，Auto gain；
- {
- num=0; //num清0
- /*自動(dòng)增益的作用: 當(dāng)輸入的音頻信號(hào)的音量變大或變小時(shí)，采樣的 AD 值幅度也會(huì)有相應(yīng)趨勢(shì)的變化，
- 于是根據(jù)這個(gè)值自動(dòng)調(diào)節(jié) AD 值放大的倍數(shù)，維持在一定的范圍內(nèi)，從而使顯示的效果最好，
- 不會(huì)出現(xiàn)滿(mǎn)屏或者空屏的現(xiàn)象*/
- //自動(dòng)增益；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
- ……………………
- …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
0.png (47.05 KB, 下載次數(shù): 148)
下載附件
2017-5-21 15:59 上傳
所有資料51hei提供下載:
音樂(lè)頻譜程序.zip
(78.7 KB, 下載次數(shù): 373)
2017-5-21 14:05 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
|
評(píng)分
-
查看全部評(píng)分
|
[復(fù)制鏈接]
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
