单片机蜂鸣器播放音乐.doc

#include #define uchar unsigned char#define uint unsigned intsbit speaker = P17; 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 高3uchar code yin30=0xFF,0xFF,0xFB,0x90,0xFC,0x0C,0xFC,0x44,0xFC,0xAC,0xFD,0x09,0xFD,0x34,0xFD,0x82,0xFD,0xC8,0xFE,0x06,0xFE,0x22,0xFA,0X15,0XFB,0x04,0xFA,0x67,0xFE,0x85;uchar code song197=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 song246=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 song3131=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 song437=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 song5144=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 song685=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 song7138=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 song877=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,0x