
unsigned char count//定义全局变量,是一个计数器,0-255计数,仔神档用来计时一个频率的时长
sbit speak=P2^3 //蜂念乱鸣器口
unsigned char code song[]={ //歌曲代码,存储方式为:频率,时长,频率,时长...
0x26,0x20,0x20,0x20,0x20,0x20,0x26,0x10,0x20,0x10,0x20,0x80,0x26,0x20,0x30,0x20,
0x30,0x20,0x39,0x10,0x30,0x10,0x30,0x80,0x26,0x20,0x20,0x20,0x20,0x20,0x1c,0x20,
0x20,0x80,0x2b,0x20,0x26,0x20,0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x80,0x26,0x20,
0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x60,0x40,0x10,0x39,0x10,0x26,0x20,
0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x80,0x26,0x20,0x2b,0x10,0x2b,0x10,
0x2b,0x20,0x30,0x10,0x39,0x10,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x20,
0x20,0x10,0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x18,0x20,0x18,0x20,0x26,0x20,
0x20,0x20,0x20,0x40,0x26,0x20,0x2b,0x20,0x30,0x20,0x30,0x20,0x1c,0x20,0x20,0x20,
0x20,0x80,0x1c,0x20,0x1c,0x20,0x1c,0x20,0x30,0x20,0x30,0x60,0x39,0x10,0x30,0x10,
0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x10,0x26,0x10,0x26,0x10,0x2b,0x10,0x2b,0x80,
0x18,0x20,0x18,0x20,0x26,0x20,0x20,0x20,0x20,0x60,0x26,0x10,0x2b,0x20,0x30,0x20,
0x30,0x20,0x1c,0x20,0x20,0x20,0x20,0x80,0x26,0x20,0x30,0x10,0x30,0x10,0x30,0x20,
0x39,0x20,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x10,0x40,0x10,0x20,0x10,
0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x00,
0x30,0x1C,0x10,0x20,0x40,0x1C,0x10,0x18,0x10,0x20,0x10,0x1C,0x10,0x18,0x40,0x1C,
0x20,0x20,0x20,0x1C,0x20,0x18,0x20,0x20,0x80,0xFF,0x20,0x30,0x1C,0x10,0x18,0x20,
0x15,0x20,0x1C,0x20,0x20,0x20,0x26,0x40,0x20,0x20,0x2B,0x20,0x26,0x20,0x20,0x20,
0x30,0x80,0xFF,0x20,0x20,0x1C,0x10,0x18,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,
0x20,0x2B,0x40,0x20,0x20,0x1C,0x10,0x18,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,
0x20,0x2B,0x40,0x20,0x30,0x1C,0x10,0x18,0x20,0x15,0x20,0x1C,0x20,0x20,0x20,0x26,
0x40,0x20,0x20,0x2B,0x20,0x26,0x20,0x20,0x20,0x30,0x80,0x20,0x30,0x1C,0x10,0x20,
0x10,0x1C,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,0x20,0x2B,0x40,0x20,0x15,0x1F,
0x05,0x20,0x10,0x1C,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,0x20,0x2B,0x40,0x20,
0x30,0x1C,0x10,0x18,0x20,0x15,0x20,0x1C,0x20,0x20,0x20,0x26,0x40,0x20,0x20,0x2B,
0x20,0x26,0x20,0x20,0x20,0x30,0x30,0x20,0x30,0x1C,0x10,0x18,0x40,0x1C,0x20,0x20,
0x20,0x26,0x40,0x13,0x60,0x18,0x20,0x15,0x40,0x13,0x40,0x18,0x80,0x00,
}
{
TMOD=0x01//工作方式,16位定时器
IE=0x82 //允许定时器T0中断和总中断
TH0=0xDC //定时器初值高8位,具体时间需要根据晶振计算
TL0=0x00 //定时器初值低8位
}
void time1_int() interrupt 1 //定时器中断函数
{
TH0=0xDC //定时器重赋初值高8位
TL0=0x00 //定时器重赋初值低8位
count++ //计数器自加
}
void delay_xms(unsigned int x) //延时函数
{
unsigned int i,j//定义延时函数局部变量
for(i=0i<xi++)//用for循环实现延时
for(j=0j<3j++) //数值很小,不应该是ms级的,此函数用来改变蜂鸣器频率
}
void play_song(unsigned char i) //歌曲播放函数
{
unsigned char temp1,temp2 //定义局部变量,temp1为频率缓存器,temp2为时长缓存器
unsigned int addr //定义局部变量,是一个数据地址缓存器
count=0 //计数器清零
addr=i*217 //两首歌,数组中0~216为歌曲0,
while(1) //此循环
{
temp1=song[addr++] //从0开始,取偶数地址中的值(频率)放到缓存器temp1,addr自加
if(temp1==0xff) //如果遇到0xff
{
TR0=0 //不允许定时器T0计时
delay_xms(100) //延时,此处0xff可能是停顿符号
}
else if(temp1==0x00) //否则如果遇到0x00
{
return //函数返回,此处的0x00应该是歌曲播完的符号
}
else//否则
{
temp2=song[addr++] //取奇数地址中的值放到缓存器temp2,addr自加
TR0=1 //允许定时器T0计时
while(1) //此循环用来调节蜂鸣器发声频率和时长
{
speak=~speak//蜂鸣器取反,此蜂鸣器为它激式,可以用改变取反频率方式实现发出不同音调
delay_xms(temp1) //延时相应频率所需时长
if(temp2==count)//如果相应频率发声时长与计数器数值相同
{
count=0//计数器清零
break//跳出该while循环
}
}
}
}
}
void main() //主函数
{
time0_init() //调用定时器初始化函数
while(1) //单片机进入正常工作死循环
{
play_song(0) //调用播放歌曲函数,并且播放歌曲0
}
}
/*****
/*我的注释中其实有个错误:取偶数地址中的值放到temp1,取奇数地址中的值放到temp2。因为有0xff停顿符号和0x00停止符号存在于歌曲代码中,以至于偶数地址中并非全是频率代码、奇数地址中并非全是时长代码。但我这样写是方便你理解,所以最后作此说明。*/
*****/
这是我学校电子设计时做的,可以d琴,也有几首歌在里面。。你应该看得懂#include <reg52.h>#define uchar unsigned char#define uint unsigned int
#define ulong unsigned long
sbit BEEP=P2^0//喇弯闷伏叭输出脚uchar th0_f//在中断中装载的罩伍T0的值高8位
uchar tl0_f/埋携/在中断中装载的T0的值低8位
uchar key/*------------------------------------------------
函数声明
------------------------------------------------*/
uchar keyscan(void)//键盘扫描程序
void delay(uint i)//延时子程序/*-------- T0的值,及输出频率对照表 --------------*/
uchar code freq[36*2]={
0xA9,0xEF,//0x3F,0XEE,//00220HZ ,1 //0
0x93,0xF0,//0X3D,0XEF,//00233HZ ,1#
0x73,0xF1,//0X30,0XF0,//00247HZ ,2
0x49,0xF2,//0X18,0XF1,//00262HZ ,2#
0x07,0xF3,//0XE6,0XF1,//00277HZ ,3
0xC8,0xF3, //0XB7,0XF2,//00294HZ ,4
0x73,0xF4, //0X71,0XF3,//00311HZ ,4#
0x1E,0xF5, //0X2A,0XF4,//00330HZ ,5
0xB6,0xF5, //0XCF,0XF4,//00349HZ ,5#
0x4C,0xF6, //0X72,0XF5,//00370HZ ,6
0xD7,0xF6, //0X09,0XF6,//00392HZ ,6#
0x5A,0xF7, //0X97,0XF6,//00415HZ ,7
0xD8,0xF7, //0X20,0XF7,//00440HZ 1 //12
0x4D,0xF8, //0X9F,0XF7,//00466HZ 1# //13
0xBD,0xF8, //0X18,0XF8,//00494HZ 2 //14
0x24,0xF9, //0X88,0XF8,//00523HZ 2# //15
0x87,0xF9, //0XF3,0XF8,//00554HZ 3 //16
0xE4,0xF9, //0X59,0XF9,//00587HZ 4 //17
0x3D,0xFA, //0X05,0XFA,//00622HZ 4# //18
0x90,0xFA, //0X13,0XFA,//00659HZ 5 //19
0xDE,0xFA, //0X66,0XFA,//00698HZ 5# //20
0x29,0xFB, //0XB9,0XFA,//00740HZ 6//21
0x6F,0xFB, //0X05,0XFB,//00784HZ 6# //22
0xB1,0xFB,//0X4D,0XFB,//00831HZ 7 //23
0xEF,0xFB, //0X90,0XFB,//00880HZ `1
0x2A,0xFC, //0XD0,0XFB,//00932HZ `1#
0x62,0xFC,//0X0C,0XFC,//00988HZ `2
0x95,0xFC, //0X44,0XFC,//01046HZ `2#
0xC7,0xFC, //0X7B,0XFC,//01109HZ `3
0xF6,0xFC, //0XAD,0XFC,//01175HZ `4
0x22,0xFD, //0XDD,0XFC,//01244HZ `4#
0x4B,0xFD, //0X0A,0XFD,//01318HZ `5
0x73,0xFD,//0X35,0XFD,//01397HZ `5#
0x98,0xFD, //0X5D,0XFD,//01480HZ `6
0xBB,0xFD, //0X83,0XFD,//01568HZ `6#
0xDC,0xFD, //0XA6,0XFD,//01661HZ `7 //35
}//定时中断0,用于产生唱歌频率
timer0() interrupt 1
{
TL0=tl0_fTH0=th0_f//调入预定时值
BEEP=~BEEP//取反音乐输出IO
}//音乐符号串解释函数
//入口:要解释的音乐符号串,输出的音调串,输出的时长串
changedata(uchar *song,uchar *diao,uchar *jie)
{
uchar i,i1,j
char gaodi//高低+/-12音阶
uchar banyin//有没有半个升音阶
uchar yinchang//音长
uchar code jie7[8]={0,12,14,16,17,19,21,23}//C调的7个值
*diao=*song
for(i=0,i1=0)
{
gaodi=0//高低=0
banyin=0//半音=0
yinchang=4//音长1拍
if((*(song+i)=='|') || (*(song+i)==' ')) i++
//拍子间隔和一个空格过滤
switch(*(song+i))
{
case ',': gaodi=-12i++//低音
break
case '`': gaodi=12i++//高音
break
}
if(*(song+i)==0) //遇到0结束
{
*(diao+i1)=0//加入结束标志0
*(jie+i1)=0
return
}
j=*(song+i)-0x30i++//取出基准音
j=jie7[j]+gaodi//加上高低音
yinc: switch(*(song+i))
{
case '#': //有半音j加一个音阶
i++j++
goto yinc
case '-': //有一个音节加长
yinchang+=4
i++
goto yinc
case '_': //有一个音节缩短
yinchang/=2
i++
goto yinc
case '.': //有一个加半拍
yinchang=yinchang+yinchang/2
i++
goto yinc
}
*(diao+i1)=j//记录音符
*(jie+i1)=yinchang//记录音长
i1++
}
}//奏乐函数
//入口:要演奏的音乐符号串
void play(uchar *songdata)
{
uchar i,c,j=0
uint n
uchar diaodata[48]//音调缓冲
uchar jiedata[48]//音长缓冲
changedata(songdata,diaodata,jiedata)//解释音乐符号串
TR0=1
for(i=0diaodata[i]!=0i++) //逐个符号演奏
{
tl0_f=freq[diaodata[i]*2]//取出对应的定时值送给T0
th0_f=freq[diaodata[i]*2+1]
for(c=0c<jiedata[i]c++) //按照音长延时
{ key = keyscan()
for(n=0n<29500n++)// 29500
if(key != 0xff)//((!K1)||(!K2)||(!K3)||(!K4))//发现按键,立即退出播放
{
TR0=0
return
}
}
TR0=0
for(n=0n<460n++)//460音符间延时
TR0=1
}
TR0=0
}//一分钱
uchar code yifenqian[]={
"5`1|6_`1_5|3_5_2_3_|5-|"
"3_5_6_`1_|5_6_5_3_|1.3__|2-|"
"3_2_1_2_|3-|6_5_3_5_|6-|"
"5_`1_6_5_|3_5_2|5_2_3_2_|1-|"
}//世上只有妈妈好
uchar code mamahao[]={
"6.5_35|`16_5_6-|35_6_53_2_|1_,6_5_3_2-|"
"2.3_55_6_|321-|5.3_2_1_,6_1_|,5--"
}
//找朋友
uchar code zhaopengyou[]={ "5_6_5_6_|5_6_5|5_`1_7_6_|5 3|"
"5_5_3_4_|5_5_3|1_4_3_2_|1_2_1|"
}
//茉莉花
uchar code molihua[]={"33_5_6_`1_`1_6_|55_6_5-|33_5_6_`1_`1_6_|55_6_5-|"
"5553_5_|665-|32_3_53_2_|11_2_1|"
//"3_2_1_3_2.3_|56_`1_5-|23_5_2_3_1_,6_|,5-,61|"
//"2.3_1_2-1_,6_|,5--"
}
//新年好
uchar code xinnianhao[]={
"1_1_1 ,5|3_3_3 1|1_3_5 5|4_3_2-|"
"2_3_4-|3_2_3 1|1_3_2 ,5|,7_2_1-|"
}
//小星星
uchar code xingxing[]={
"1155|665-|4433|221-|"
"5544|332-|5544|332-|"
"1155|665-|4433|221-|"
}
//外婆的澎湖湾
uchar code waipodephw[]={
"3_5_5_5_6_`1_6_5_|`1_`1_`1_6_5-|"
"`3_`3_`3_`3_`4_`3_`2_`1_|`2_`2_`2_`3_`2-|"
"`3_`3_`3_`3_`4_`3_`2_`1_|6_`1_`1_6_5-|"
}
}
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)