单片机蜂鸣器播放音乐

#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int
sbit speaker = P1^7;
uint j;
uchar m=1;
uchar flag;
uchar line;
uchar code * data song;
// 休止符低6 低7 中1 中2 中3 中4 中5 中 6 中7 高 1 低 3 低 5 低 4 高3
uchar code yin[30]={0xFF,0xFF,0xFB,0x90,0xFC,0x0C,0xFC,0x44,0xFC,0xAC,0xFD,0x09,0xFD,0x34,0xF D,0x82,0xFD,0xC8,0xFE,0x06,0xFE,0x22,0xFA,0X15,0XFB,0x04,0xFA,0x67,0xFE,0x85};
uchar code song1[97]={0x34,0x32,0x32,0x34,0x42,0x51, //<<干杯，朋友>>
0x62,0x52,0x42,0x32,0x34,0x04,
0x74,0x74,0x62,0x62,0x64,
0x3c,0x04,
0x64,0x62,0x52,0x42,0x32,0x34,
0x33,0x31,0x32,0x72,0x76,0x72,
0x83,0x81,0x82,0x82,0x82,0x74,0x72,
0x7c,0x04,
0x63,0x61,0x62,0x62,0x64,0x72,0x82,
0x72,0x74,0x72,0x62,0x52,0x42,0x32,
0x42,0x44,0x42,0x42,0x52,0x62,0x52,
0x5c,0x04,
0x64,0x62,0x62,0x64,0x72,0x82,
0x72,0x74,0x72,0x62,0x52,0x42,0x32,
0x42,0x46,0x53,0x41,0x42,0x32,
0x3c,0x04,
0x44,0x48,0x02,0x32,
0x3f,
0x44,0x48,0x02,0x32,
0x3f,
0x34,0x0c,
0xFF};
uchar code song2[46]={0x12,0x52,0x52,0x52,0x56,0x42, //<<兰花草>>
0x32,0x42,0x32,0x22,0x18,
0x82,0x82,0x82,0x82,0x86,0x72,
0xB2,0x72,0x72,0x62,0x58,
0x52,0x82,0x82,0x72,0x56,0x42,
0x32,0x42,0x32,0x22,0x16,0xB2,
0xB2,0x32,0x32,0x22,0x16,0x52,
0x42,0x32,0x22,0xC2,0x88,
0xFF};
uchar code song3[131]={0x52,0x42, //<<两只蝴蝶>>
0x58,0x02,0x42,0x52,0x42,
0x38,0x04,0x12,0x32,
0x44,0x42,0x52,0x42,0x32,0x12,0x12,
0xC8,0x04,0x52,0x42,
0x58,0x02,0x42,0x52,0x42,
0x38,0x04,0x12,0x32,
0x44,0x42,0x52,0x42,0x32,0x12,0x32,
0x48,0x04,0x52,0x42,
0x58,0x02,0x42,0x52,0x42,
0x38,0x04,0x12,0x32,
0x44,0x42,0x52,0x42,0x32,0x12,0x11,0x31,
0xC8,0x04,0x52,0x72,
0x78,0x02,0x72,0x82,0x72,
0x58,0x04,0x42,0x42,
0x44,0x42,0x52,0x42,0x32,0x12,0x12,
0x32,0x32,0x3C,
0x09,0x72,0x72,0x82,
0xA2,0x92,0x92,0x82,0x52,0x42,0x42,0x42,
0x58,0x02,0x52,0x52,0x72,
0x84,0x84,0x02,0x12,0x52,0x42,
0x48,0x04,0x52,0x72,
0x72,0x52,0x74,0x02,0xA4,0x92,
0x82,0x92,0x54,0x02,0x82,0x82,0x92,
0x82,0x72,0x52,0x42,0x02,0xC4,0x12,
0x3C,
0xFF};
uchar code song4[37]={0xC4,0x12,0x32,0x44,0x42,0x52, //<<祈祷>>
0x52,0x44,0x32,0x32,0x12,0x14,
0x12,0x12,0x32,0x42,0x54,0x44,
0x4F,
0xC4,0x12,0x32,0x44,0x42,0x72,
0x58,0x42,0x32,0x34,
0x14,0x12,0x32,0x34,0x32,0x12,
0x1F,
0xFF};
uchar code song5[144]={0x52,0x62, //<<阳光总在风雨后>>
0x74,0x74,0x74,0x34,
0x42,0x34,0x52,0x56,0x42,
0x34,0x34,0x14,0x32,0x12,
0x12,0xC2,0xC4,0x04,0x52,0x62,
0x74,0x74,0x74,0x34,
0x42,0x34,0x52,0x56,0x42,
0x34,0x32,0x12,0x12,0x34,0x42,
0x4C,0x52,0x42,
0x34,0x32,0x42,0x32,0x12,0x12,0xC2,
0xC2,0x54,0x52,0x54,0x52,0x52,
0x42,0x32,0x32,0x12,0x32,0x42,0x32,0x52,
0x5C,0x52,0x42,
0x34,0x32,0x42,0x32,0x12,0x12,0xC2,
0xC2,0x54,0x52,0x54,0x02,0x52,
0x52,0x42,0x32,0x12,0x32,0x84,0x72,
0x7F,
0x0F,
0x74,0x72,0x52,0x54,0x74,
0x82,0x52,0x52,0x72,0x78,
0x34,0x32,0x32,0x42,0x54,0x72,
0x7F,
0x86,0x82,0x72,0x52,0x54,
0x72,0x84,0x32,0x36,0x52,
0x42,0x52,0x42,0x32,0x34,0x12,0x32,
0x32,0x42,0x4C,
0x86,0x82,0x72,0x52,0x54,
0x72,0x84,0x52,0x56,0x52,
0x42,0x52,0x72,0x82,0x52,0x34,0x12,
0x12,0x32,0x3C,
0xFF};
uchar code song6[85]={0x04,0x24,0x14,0xC4, //<<心心相印>>
0x54,0x54,0x48,
0x04,0x54,0x44,0x34,
0x22,0x14,0xB2,0xC8,
0x04,0x12,0xC2,0x16,0x12,
0x76,0x52,0x46,0x12,
0x3F,
0x04,0xB4,0xD4,0xC4,
0x14,0x28,0xC4,
0x14,0x12,0x32,0x16,0xC2,
0x54,0x78,0x34,
0x4C,0x42,0x52,
0x86,0x72,0x76,0x52,
0x74,0x28,0x42,0x52,
0x46,0x12,0x26,0x12,
0xCF,
0x04,0x24,0x14,0xC4,
0x56,0x52,0x48,
0x04,0x54,0x44,0x34,
0x22,0x14,0xB2,0xC8,
0x04,0x34,0x14,0xC4,
0x12,0x32,0x18,0x42,0x42,
0x74,0x58,0x44,
0x3F,
0xFF};
uchar code song7[138]={0xC2,0xC2,0x12, //<<最浪漫的事>>
0x34,0x32,0x32,0x32,0x12,0x12,0x52,
0x54,0x02,0xC2,0x12,
0x32,0x32,0x32,0x32,0x34,0x52,0x72,
0x7C,0x02,0x72,
0x82,0x72,0x82,0x72,0x84,0x72,0x41,0x51,
0x52,0x41,0x31,0x34,0x02,0x32,0x32,0x12,
0x34,0x32,0x12,0x32,0x54,0x42,
0x32,0x32,0x32,0x32,0x34,0x52,0x72,
0x7C,0x72,0x72,
0x82,0x72,0x82,0x72,0x84,0x82,0x72,
0x42,0x52,0x42,0x34,0x12,0x12,0x32,
0xC4,0x52,0x42,0x34,0x12,0x12,
0x31,0x41,0x32,0x3C,
0x0A,0x72,0x82,0xA2,
0x84,0x82,0x72,0x82,0x72,0x52,0x72,
0x78,0x02,0x72,0x82,0xA2,
0x84,0x82,0x72,0x82,0x72,0x82,0x32,
0x38,0x02,0x32,0x42,0x52,
0x64,0x62,0x72,0x82,0x82,0x72,0x82,
0x82,0xA2,0x82,0x82,0x82,0xA2,0x82,0x72,
0x78,0x72,0x32,0x82,0x72,
0x78,0x72,0x82,0xA3,0x51,
0x42,0x51,0x41,0x3C,
0xFF};
uchar code song8[77]={0xC2,0xC2,0x34,0x42,0x42, //<<一生有你>>
0x52,0x41,0x51,0x5C,
0x04,0xC2,0xC2,0x34,0x42,0x42,
0x52,0x31,0x41,0x4C,
0x04,0xC2,0xC2,0x34,0x42,0x42,
0x52,0x41,0x51,0x58,0x32,0x52,
0x4C,0x42,0x32,
0x34,0x32,0x42,0x48,
0x04,0xC2,0xC2,0x34,0x42,0x42,
0x72,0x41,0x51,0x5C,
0x04,0xC2,0xC2,0x32,0x32,0x42,0x42,
0x52,0x42,0x4C,
0x04,0xC2,0xC2,0x34,0x42,0x42,
0x52,0x41,0x51,0x58,0x32,0x52,
0x4C,0x42,0x32,
0x32,0x42,0x4C,
0xFF};
uchar code song9[]={0X54,0XC4,0X12,0X32,0X34, //<<宁夏>>
0X52,0X52,0X52,0X52,0X42,0X32,0X34,
0XC1,0XC2,0X52,0XC2,0X12,0X32,0X34,
0X11,0X12,0X31,0X12,0XC2,
0X78,0X72,0X52,0X52,0X42,
0X32,0X42,0X52,0X11,0XC1,0XC4,0XC1,0XC1,0XC1,0XC1,
0X12,0X32,0X32,0X12,0X42,0X42,0X44,
0XC2,0X12,0X32,0X42,0X52,0X72,0X72,0X82,
0X41,0X51,0X42,0X48,0X42,0X12,
0X3C,0X72,0X62,
0X3C,0X72,0X62,
0X3C,0X72,0X62,
0x21,0x31,0x41,0x51,0x61,0x71,0x81,0x91,0x61,0x71,0x81,0x91,
0X3F,
0X3F,
0X54,0XC2,0XC2,0X42,0XC2,0XC4,
0X34,0X32,0X42,0X52,0XC2,0XC4,
0XD2,0XC2,0X12,0X22,0X38,
0X12,0X22,0X32,0X42,0X48,
0xFF};
uchar code song10[]={0x32,0x31,0x41, //<<老鼠爱大米>>
0x52,0x52,0x42,0x31,0x41,0x44,0x31,0x41,
0x52,0x52,0x42,0x32,0x34,0x71,0x11,
0x74,0x71,0x71,0x11,0x31,0x34,0x32,
0x32,0x32,0x32,0x31,0x41,0x44,0x32,0x41,0x51,
0x52,0x52,0x72,0x81,0x41,0x44,0x52,0x41,0x31,
0x32,0x32,0x42,0x51,0x71,0x74,0x71,0x71,
0x12,0x31,0x31,0x31,0x52,0x42,0x32,0x32,0x41,0x31,
0x34,0x52,0x51,0x71,
0x72,0x71,0x71,0x72,0x71,0x81,0x84,0x52,0x42,
0x32,0x32,0x32,0x41,0x51,0x54,0x51,0x71,
0x72,0x72,0x72,0x81,0xA1,0xA2,0x82,0x72,0x52,
0x42,0x32,0x32,0x12,0x44,0x51,0x71,
0x72,0x72,0x71,0x82,0x71,0x84,0x52,0x42,
0x32,0x32,0x32,0x41,0x51,0x54,0x51,0x71,
0x72,0x72,0x72,0x81,0xA1,0xA2,0x82,0x72,0x51,0x41,
0x42,0x42,0x44,0x32,0x51,0x61,
0x72,0x42,0x44,0x52,0x41,0x31,
0x34,0x52,0x41,0x31,0x34,0x52,0x42,
0x52,0x32,0x52,0x81,0x71,0x74,0x51,0x71,
0x82,0x81,0x71,0x72,0x81,0x71,0x74,0x51,0x41,0x31,
0x42,0x41,0x51,0x42,0x31,0x41,0x44,0x52,0x41,0x31,
0x34,0x52,0x41,0x31,0x34,0x52,0x42,
0x52,0x32,0x52,0x81,0x71,0x74,0x51,0x41,
0x82,0x82,0xA2,0x71,0x81,0x72,0x71,0x51,0x41,0x31,
0x44,0x41,0x31,0x41,0x51,0x44,0x52,0x52,
0x42,0x31,0x34,0x52,0x41,0x31,
0x42,0x31,0x34,
0xFF};
uchar code song11[]={0XC2,0XB2, //<<泰坦尼克号>>
0X36,0X52,0X42,0X32,0X11,0XC1,0XB2,
0XC6,0X12,0XC4,0X12,0XC2,
0X76,0XA2,0X82,0X72,0X51,0X41,0X32,
0X4C,0X42,0X32,
0X74,0X82,0X74,0X82,0X72,
0X52,0X41,0X38,0X32,0X42,
0X16,0XC2,0X72,0X52,0X42,0X42,
0X3C,0XC2,0XB2,
0X36,0X52,0X42,0X32,0X11,0XC1,0XB2,
0XC6,0X12,0XC4,0X12,0XC2,
0X76,0XA2,0X82,0X72,0X51,0X41,0X32,
0X4C,0X42,0X32,
0X76,0X82,0X74,0X82,0X72,
0X53,0X41,0X38,0X32,0X42,
0X16,0XC2,0X72,0X52,0X41,0X51,0X12,
0XCC,0XC2,0XB2,
0X16,0XC2,0X72,0X52,0X42,0X42,
0X3C,0X32,0X32,
0X26,0X22,0X24,0X42,0X32,
0x22,0x12,0x18,0x02,0x52,
0X46,0X12,0X44,0X72,0X82,
0X5C,0X52,0X52,
0X46,0X42,0X74,0X42,0X32,
0X36,0X42,0X58,
0X82,0X72,0X62,0X52,0X46,0X32,
0X3C,0X12,0XB2,
0X36,0X52,0X42,0X32,0X11,0XC1,0XB2,
0XC6,0X12,0XC4,0X12,0XC2,
0X76,0XA2,0X82,0X72,0X51,0X41,0X32,
0X48,0X02,0X42,0X52,0X62,
0X76,0X82,0X74,0X82,0X72,
0X56,0X41,0X38,0X32,0X22,
0X16,0XC2,0X72,0X52,0X42,0X42,
0X3C,0X04,0X04,0X04,0X04,
0xFF};
uchar code song12[]={0x34,0x32, //<<喜欢你>>
0x34,0x34,0x24,0x34,0x32,0x32,0x24,0x38,0x44,0x58,0x48, 0x34,0x32,0x34,0x34,0x24,0x38,0x34,0x7F,0x34,0x32,0x34,0x32,
0x24,0x38,0x34,0x24,0x38,0x44,0x58,0x48,0x34,0x32,0x34,0x34,
0x24,0x38,0x34,0x7F,0x16,0x4C,0x74,
0x78,0x64,0x54,0x48,0x54,0x64,0x58,0x44,0x34,0x24,0x38,0x24,
0x14,0x12,0x21,0x11,0x78,0x68,0x3F,0x4C,0x74,
0x78,0x64,0x52,0x42,0x48,0x54,0x64,0x58,0x44,0x34,0x24,0x38,0x24,
0x24,0x38,0x44,0x58,0x48,0x3C,
0xFF};
//**********************************************************************//
// 延时程序//
//**********************************************************************//
void delay(uint d) //延时d微秒，最大延时65536微妙
{
while(d--);
}
/*延时1/4拍时间即187ms*/
void delay187ms(void)
{
uchar t;
for(t=0;t<130;t++) delay(100);
}
void main()
{
uchar i;
uchar k;
delay(100);
TMOD=0x01;
IT0=1;
EX0=1;
TR0=1;
ET0=1;
EA=1;
song=song1;
while(1)
{
switch(m)
{
case 1 :song=song1;break;
case 2 :song=song2;break;
case 3 :song=song3;break;
case 4 :song=song4;break;
case 5 :song=song5;break;
case 6 :song=song6;break;
case 7 :song=song7;break;
case 8 :song=song8;break;
case 9 :song=song9;break;
case 10 :song=song10;break;
case 11 :song=song11;break;
case 12 :song=song12;break;
default :m=1;song=song1;break;
}
j=0;
flag=1;
while(*(song+j)!=0xFF&&flag)
{
k=*(song+j)&0x0F; //取出节拍
line=*(song+j)>>4; //取出音
TH0=yin[2*line];
TL0=yin[2*line+1];
TR0=1;
if ((yin[2*line]==0xFF)&&(yin[2*line+1]==0xFF))
{
TR0=0;
}
for(i=k;i>0;--i)
{
delay187ms();
}
TR0=0;
j++;
}
for(i=0;i<20;i++)delay187ms();
m++;
}
}
/* 每个音符的发声*/
void timer1() interrupt 1
{
TH0=yin[2*line];
TL0=yin[2*line+1];
speaker = !speaker;
}
void int0() interrupt 0
{
flag=0;
TR0=0;
}。