stc12單片機(jī)制作的隨著音樂(lè)聲音大小變化節(jié)奏的噴泉程序

ID:702185 · 發(fā)表于 2020-3-4 11:08

利用stc12制作的隨著音樂(lè)聲音大小變化節(jié)奏的噴泉

仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

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

#include"reg51.h"
#include"intrins.h"
#define FOSC 18432000L
#define BAUD 9600
typedef unsigned char uchar;
typedef unsigned int uint;
/* ****************************
聲明與ADC有關(guān)的寄存器
ADC 控制寄存器 ADC_CONTR
AD轉(zhuǎn)換結(jié)果寄存器 ADC_RES，
P1口模擬功能控制寄存器 P1ASF
*****************************/
sfr ADC_CONTR =0xBC; //1010 1011 P1.3作為AD輸入
sfr ADC_RES =0xBD; //ADC高8位寄存器
sfr ADC_LOW2 =0xBE; //ADC低2位寄存器
sfr P1ASF =0x9D; //1001 1101
sbit MUTE=P3^0;
sbit PWM=P0^0;
/*定義ADC控制的ADC操作常數(shù)*/
#define ADC_POWER 0x80 //ADC電源控制位B7 1：打開(kāi)電源 0：關(guān)閉電源
#define ADC_FLAG 0x10 //ADC轉(zhuǎn)換結(jié)束標(biāo)志位B4，AD轉(zhuǎn)換完成=1，要用軟件清0
#define ADC_START 0x08 //ADC啟動(dòng)控制位B3，1：開(kāi)始轉(zhuǎn)換轉(zhuǎn)換結(jié)束為0
#define ADC_SPEEDLL 0x00
#define ADC_SPEEDL 0x20
#define ADC_SPEEDH 0x40
#define ADC_SPEEDHH 0x60
void InitUart();
void InitADC();
void SendData(uchar dat);
uchar GetADCResult(uchar ch);
void Delay(uint n);
void ShowResult(uchar ch);
/****************
AD轉(zhuǎn)換
****************/
uchar GetADCResult(uchar ch)
{
ADC_CONTR=ADC_POWER|ADC_SPEEDLL|ch|ADC_START; //啟動(dòng)轉(zhuǎn)換
_nop_();
_nop_();
_nop_(); //等待轉(zhuǎn)換完成
_nop_();
while(!(ADC_CONTR&ADC_FLAG)); //等待轉(zhuǎn)換完成
ADC_CONTR&=~ADC_FLAG; //關(guān)閉ADC
return ADC_RES; //返回AD轉(zhuǎn)換結(jié)果
}
/***************
串口初始化
***************/
void InitUart()
{
SCON=0X5a; //設(shè)置為工作方式1
TMOD=0X20; //設(shè)置計(jì)數(shù)器工作方式2，8位自動(dòng)重裝
TH1=TL1=-(FOSC/12/32/BAUD); //計(jì)數(shù)器初始值設(shè)置，注意波特率是9600的
TR1=1; //打開(kāi)計(jì)數(shù)器
}
/***************
ADC初始化
****************/
void InitADC()
{
P1ASF=0xff; //開(kāi)啟8路ADC
ADC_RES=0; //清除以前的結(jié)果
ADC_CONTR=ADC_POWER|ADC_SPEEDLL;
Delay(2); //開(kāi)啟ADC電源和延時(shí)
}
/**********************
發(fā)送一個(gè)字節(jié)到電腦
***********************/
void SendData(uchar dat)
{
while(!TI); //等待數(shù)據(jù)發(fā)送完成
TI=0; //清除標(biāo)志
SBUF= dat ; //發(fā)送數(shù)據(jù)
}
/**************
軟件延時(shí)=
***********----------------------------------------------------------------****/
void Delay(uint n)
{
uint x;
while(n--)
{
x=5000;
while(x--);
}
}
void delay_50(uint n)
{
uint x;
while(n--)
{
x=50;
while(x--);
}
}
void main()
{
uint date,h1;
InitUart(); //串口初始化
InitADC(); //ADC初始化
ADC_CONTR |=0x80; //開(kāi)啟ADC電源
while(1)
{
if(MUTE)
{
P2=0x00;
P0=0x00;
continue;
}
//SendData(3); //發(fā)送轉(zhuǎn)換通道
// SendData( GetADCResult(3)); //發(fā)送ADC高8位結(jié)果到串口
if(GetADCResult(3)>0x12&&GetADCResult(3)<0x14)
P2=11*GetADCResult(3) ;
else
P2=GetADCResult(3);
date=GetADCResult(3)+40;ev
h1=0xff-date;
PWM=0;
delay_50(date);
PWM=1;
delay_50(h1);
}
}