大家好，我在學(xué)習(xí)單片機(jī)的時(shí)候遇到了問(wèn)題，想請(qǐng)各位好友的幫助，我自己設(shè)計(jì)了個(gè)工程，包括兩個(gè)部分，一個(gè)是來(lái)實(shí)現(xiàn)蜂鳴器的音樂(lè)響聲，另外是實(shí)現(xiàn)8個(gè)流水燈的操作，我想把這兩個(gè)獨(dú)立的程序組合起來(lái)可是總是實(shí)現(xiàn)不了，希望能得到各位高手的指點(diǎn)，程序如下：
第一個(gè)是實(shí)現(xiàn)：?jiǎn)纹瑱C(jī)的唱歌
#define uchar unsigned char //定義一下方便使用
#define uint unsigned int
#define ulong unsigned long
#include //包括一個(gè)52標(biāo)準(zhǔn)內(nèi)核的頭文件
sbit BEEP=P0^7; //喇叭輸出腳
uchar th0_f; //在中斷中裝載的T0的值高8位
uchar tl0_f; //在中斷中裝載的T0的值低8位
uchar code freq[36*2]={ //T0的值,及輸出頻率對(duì)照表
0xA9,0xEF,//00220HZ ,1 //0
0x93,0xF0,//00233HZ ,1#
0x73,0xF1,//00247HZ ,2
0x49,0xF2,//00262HZ ,2#
0x07,0xF3,//00277HZ ,3
0xC8,0xF3,//00294HZ ,4
0x73,0xF4,//00311HZ ,4#
0x1E,0xF5,//00330HZ ,5
0xB6,0xF5,//00349HZ ,5#
0x4C,0xF6,//00370HZ ,6
0xD7,0xF6,//00392HZ ,6#
0x5A,0xF7,//00415HZ ,7
0xD8,0xF7,//00440HZ 1 //12
0x4D,0xF8,//00466HZ 1# //13
0xBD,0xF8,//00494HZ 2 //14
0x24,0xF9,//00523HZ 2# //15
0x87,0xF9,//00554HZ 3 //16
0xE4,0xF9,//00587HZ 4 //17
0x3D,0xFA,//00622HZ 4# //18
0x90,0xFA,//00659HZ 5 //19
0xDE,0xFA,//00698HZ 5# //20
0x29,0xFB,//00740HZ 6 //21
0x6F,0xFB,//00784HZ 6# //22
0xB1,0xFB,//00831HZ 7 //23
0xEF,0xFB,//00880HZ `1
0x2A,0xFC,//00932HZ `1#
0x62,0xFC,//00988HZ `2
0x95,0xFC,//01046HZ `2#
0xC7,0xFC,//01109HZ `3
0xF6,0xFC,//01175HZ `4
0x22,0xFD,//01244HZ `4#
0x4B,0xFD,//01318HZ `5
0x73,0xFD,//01397HZ `5#
0x98,0xFD,//01480HZ `6
0xBB,0xFD,//01568HZ `6#
0xDC,0xFD,//01661HZ `7 //35
};
/********************************************************************
函 數(shù) 名：time0()
功 能：定時(shí)中斷0子程序
說(shuō) 明：用于產(chǎn)生唱歌頻率
入口參數(shù)：無(wú)
返 回 值：無(wú)
設(shè) 計(jì)：yangm_cui 日 期：2008-03-19
修 改： 日 期：
***********************************************************************/
timer0() interrupt 1
{
TL0=tl0_f;TH0=th0_f; //調(diào)入預(yù)定時(shí)值
BEEP=~BEEP; //取反音樂(lè)輸出IO
}
/********************************************************************
函 數(shù) 名：changedata()
功 能：音樂(lè)符號(hào)串解釋子程序
說(shuō) 明：音樂(lè)符號(hào)串解釋
入口參數(shù)：要解釋的音樂(lè)符號(hào)串,輸出的音調(diào)串,輸出的時(shí)長(zhǎng)串
返 回 值：無(wú)
設(shè) 計(jì)：yangm_cui 日 期：2008-03-19
修 改： 日 期：
***********************************************************************/
changedata(uchar *song,uchar *diao,uchar *jie)
{
uchar i,i1,j;
char gaodi; //高低+/-12音階
uchar banyin; //有沒(méi)有半個(gè)升音階
uchar yinchang; //音長(zhǎng)
uchar code jie7[8]={0,12,14,16,17,19,21,23}; //C調(diào)的7個(gè)值
*diao=*song;
for(i=0,i1=0;;)
{
gaodi=0; //高低=0
banyin=0; //半音=0
yinchang=4; //音長(zhǎng)1拍
if((*(song+i)=='|') || (*(song+i)==' ')) i++;
switch(*(song+i)) //拍子間隔和一個(gè)空格過(guò)濾
{
case ',': gaodi=-12;i++; //低音
break;
case '`': gaodi=12;i++; //高音
break;
}
if(*(song+i)==0) //遇到0結(jié)束
{
*(diao+i1)=0; //加入結(jié)束標(biāo)志0
*(jie+i1)=0;
return;
}
j=*(song+i)-0x30; i++; //取出基準(zhǔn)音
j=jie7[j]+gaodi; //加上高低音
yinc: switch(*(song+i))
{
case '#': //有半音j加一個(gè)音階
i++;j++;
goto yinc;
case '-': //有一個(gè)音節(jié)加長(zhǎng)
yinchang+=4;
i++;
goto yinc;
case '_': //有一個(gè)音節(jié)縮短
yinchang/=2;
i++;
goto yinc;
case '.': //有一個(gè)加半拍
yinchang=yinchang+yinchang/2;
i++;
goto yinc;
}
*(diao+i1)=j; //記錄音符
*(jie+i1)=yinchang; //記錄音長(zhǎng)
i1++;
}
}
/********************************************************************
函 數(shù) 名：play()
功 能：奏樂(lè)子程序
說(shuō) 明：
入口參數(shù)：要演奏的音樂(lè)符號(hào)串
返 回 值：無(wú)
設(shè) 計(jì)：yangm_cui 日 期：2008-03-19
修 改： 日 期：
***********************************************************************/
void play(uchar *songdata)
{
uchar i,c,j=0;
uint n;
uchar xdata diaodata[112]; //音調(diào)緩沖
uchar xdata jiedata[112]; //音長(zhǎng)緩沖
changedata(songdata,diaodata,jiedata); //解釋音樂(lè)符號(hào)串
TR0=1;
for(i=0;diaodata!=0;i++) //逐個(gè)符號(hào)演奏
{
tl0_f=freq[diaodata*2]; //取出對(duì)應(yīng)的定時(shí)值送給T0
th0_f=freq[diaodata*2+1];
for(c=0;c
for(n=0;n<32000;n++);
TR0=0;
for(n=0;n<500;n++); //音符間延時(shí)
TR0=1;
}
TR0=0;
}
//仙劍
//樂(lè)譜數(shù)組定義
uchar code xianjian[]={
"|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|"
"3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|"
"67_6_55_3_|5--3_5_|26_5_32_3_|3---|"
"26_6_6-|16_6_66_7_|`17_6_76_7_|3.--3_|"
"67_6_55_3_|5--3_5_|67_6_76_7_|3---|"
"26_6_6-|16_6_66_7_|`17_6_7.5_|6---|"
};
/******************************************************************** 函 數(shù) 名：main()
功 能：主程序
說(shuō) 明：樂(lè)譜方式輸入的音樂(lè)播放,仙劍奇?zhèn)b傳
入口參數(shù)：
返 回 值：無(wú)
設(shè) 計(jì)：yangm_cui 日 期：2008-03-19
修 改： 日 期：
***********************************************************************/
void main(void) // 主程序
{
TMOD = 0x01; //使用定時(shí)器0的16位工作模式
TR0 = 0;
ET0 = 1;
EA = 1;
while(1)
{
play(xianjian);
}
}
第二個(gè)是實(shí)現(xiàn)流水燈的操作：
#include<reg52.h> //52單片機(jī)頭文件
#include <intrins.h> //包含有左右循環(huán)移位子函數(shù)的庫(kù)
#define uint unsigned int //宏定義
#define uchar unsigned char //宏定義
void delay(uint z) //延時(shí)函數(shù),z的取值為這個(gè)函數(shù)的延時(shí)ms數(shù)，如delay(200);大約延時(shí)200ms.
{ //delay(500);大約延時(shí)500ms.
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
void main() //主函數(shù)
{
uchar a,i,j;
while(1) //大循環(huán)
{
for(j=0;j<2;j++)//主要是為了實(shí)現(xiàn)兩次LED燈的循環(huán)，每次包括自上而下也包括自下而上。
{
a=0xfe; //賦初值
for(i=0;i<8;i++) //左移
{
P1=a; //點(diǎn)亮小燈
delay(200); //延時(shí)200毫秒
a=_crol_(a,1); //將a變量循環(huán)左移一位
}
a=0x7f;
for(i=0;i<8;i++) //右移
{
P1=a; //點(diǎn)亮小燈
delay(200); //延時(shí)200毫秒
a=_cror_(a,1); //將a變量循環(huán)右移一位
}
}
P1=0xff; //全部熄滅
for(j=0;j<10;j++)
{
delay(300); //延時(shí)
P1=~P1; //全部取反10次，既閃爍5次
}
}
}
希望能得到各位大俠的回帖，我將不甚感激！！謝謝！�。� |
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
