基于单片机的音乐播放器

❶ 利用单片机实现简单的两首歌曲的音乐播放器

void exten0() interrupt 0
{
count++;
if(count==3)
count = 1;
TR0 = 1;
}

❷ 用单片机播放音乐

作为单片机的重要硬件资源之一，利用定时器可以产生各种固定频率的方波信号，也可以产生包括“Do”、“Re”、“Me”——等音阶在内的各种频率声音。将各个音阶连接在一起，便可组成一支曲子或是演奏一段旋律。基于这个思想，笔者设计了一款特殊的“音乐播放器”，其核心器件采用AT89C2051单片机。本播放器具有电路简单，功能强大等特点。极为适合初学者仿制。 一、功能特色 本播放器可实现循环播放、上一曲、下一曲、复位等功能。为了体现乐曲播放过程中的动态效果，在P1口增加了8只LED，作随机闪烁以指示旋律的节奏。 二、硬件设计 电路以AT89C2051为主控制器，S1为复位键，S2、S3分别为上一曲、下一曲选择键。晶振采用12MHz，音乐信号由P3.7口输出，经9012放大后推动喇叭发声(电路图见附图)。 三、软件设计 程序中根音选取的是C调三个8度内的音符，共21个音。每个音符对应频率由定时器T0产生(音符频率及对应计数初值见附表)。为了程序调用方便，每个音符都对应一个编码。占用一个字节。在程序中以查表的方式加载计数初值。当值为00H时表示空拍，与节拍码配合完成节拍发音。节拍码也占一个字节，其总时间长度等于基本时间乘以节拍码的值。节拍码值为01H时，表示当前乐曲结束，为00H时，表示全部乐曲结束。为了编码简单，一般节拍码高半字节表示整拍，低半字节表示分数，只要基本延时设定恰当即可，为了及时响应键盘操作。键扫描指令安排在基本延时时间子程序中。按键每按下一次，乐曲数目计数器R5加“1”或减“1”，然后根据R5的内容转向不同的乐曲。 本程序包含4首乐曲，若要增加更多的乐曲，在存储空间许可的情况下(可直接换用4k的AT89C4051)，只要参照所附的编码表将简谱转化为相应的代码附着在乐曲数据表中即可。

❸ 用80C51单片机设计一个音乐播放器

给你个程序，能播放《世上只有妈妈好》。要是要原理图和说明文档可以跟我说一声。
/***************************************************************
* 世上只有妈妈好》＋流水灯随音乐的节拍的快慢而动
* P3.7输出使实现蜂鸣器演奏歌曲功能
****************************************************************/

#include <reg51.h>
sbit BELL=P3^7; //小喇叭
sbit key1=P3^5;
unsigned char timer0h,timer0l,time,led=1,j=0;
unsigned char flagd=0;

//世上只有妈妈好数据表
code unsigned char sszymmh[]={ 6,2,3, 5,2,1, 3,2,2, 5,2,2, 1,3,2,
6,2,1, 5,2,1,6,2,4, 3,2,2, 5,2,1, 6,2,1, 5,2,2, 3,2,2, 1,2,1,
6,1,1, 5,2,1, 3,2,1, 2,2,4, 2,2,3, 3,2,1, 5,2,2,5,2,1, 6,2,1,
3,2,2, 2,2,2, 1,2,4, 5,2,3, 3,2,1,2,2,1, 1,2,1, 6,1,1, 1,2,1,
5,1,6, 0,0,0
};

// 音阶频率表 高八位
code unsigned char FREQH[]={0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
} ;

// 音阶频率表 低八位
code unsigned char FREQL[]={0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
0xEE,0x44, 0x6B,0xB4,0xF4,0x2D, 0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
};

void delay(unsigned char t)
{
unsigned char sum1;
unsigned long sum2;
for(sum1=0;sum1<t;sum1++)
{
for(sum2=0;sum2<5000;sum2++)//节奏快慢
{;}
}
TR0=0;
}

void t0int() interrupt 1
{
TR0=0;
BELL=!BELL;
TH0=timer0h;
TL0=timer0l;
TR0=1;
}

void song()
{
TH0=timer0h;
TL0=timer0l;
TR0=1;
delay(time);
}

void main(void)
{
unsigned char k,i;
TMOD=1; //置CT0定时工作方式1
EA=1;ET0=1;//IE=0x82 //CPU开中断,CT0开中断

while(1)
{
i=0;
time=1;
while(time)
{
if(j==8)
{
//led=1;
j=0;flagd=~flagd;
if(flagd)
{
led=0x80;
}
else
{
led=1;
}
}
else
{
P2=~led;
if(flagd)
{
led=led>>1;
}
else
{
led=led<<1;
}
j++;
}

k=sszymmh[i]+7*sszymmh[i+1]-1;
timer0h=FREQH[k];
timer0l=FREQL[k];
time=sszymmh[i+2];
i=i+3;
song();
}
}
}

❹ 80c51单片机音乐播放器设计

正好做了一个音乐程序，贡献出来给你吧，希望你能满意。
电路连接很简单，在P3.0端口接个蜂鸣器，不过效果一般。如果想效果好点，就加个放大电路，接个小功率喇叭就行。因为这里发电路不方便，所以如果需要放大电路，可加我QQ：7468485。

音乐程序的设计原理和程序如下：
设计原理
⑴ 总体原理：
乐曲中不同的音符，实质就是不同频率的声音。通过单片机产生不同的频率的脉冲信号，经过放大电路，由蜂鸣器放出，就产生了美妙和谐的乐曲。
⑵ 单片机产生不同频率脉冲信号的原理：
1）要产生音频脉冲，只要算出某一音频的脉冲（1/频率），然后将此周期除以2，即为半周期的时间，利用定时器计时这个半周期的时间，每当计时到后就将输出脉冲的I/O反相，然后重复计时此半周期的时间再对I/O反相，就可以在I/O脚上得到此频率的脉冲。
2）利用8051的内部定时器使其工作在计数器模式MODE1下，改变计数值TH0及TL0以产生不同频率的方法如下：
例如，频率为523Hz，其周期天/523 S=1912uS，因此只要令计数器计时956uS/1us=956，在每计数956次时就将I/O反接，就可得到中音DO（532Hz）。
计数脉冲值与频率的关系公式如下：
N=Fi/2/Fr
（N：计数值，Fi：内部计时一次为1uS，故其频率为1MHz，Fr：要产生的频率 ）
⑶ 其计数值的求法如下：
T=65536-N=65536-Fi/2/Fr
计算举例：
设K=65536,F=1000000=Fi=1MHz，求低音DO（261Hz）、中音DO（523Hz）、高音DO（1046Hz）的计数值。
T=65536-N=65536-Fi/2/Fr=65536-1000000/2/Fr=65536-500000/Fr
低音DO的T=65536-500000/262=63627
中音DO的T=65536-500000/523=64580
高音DO的T=65536-500000/1047=65059
⑷ C调个音符频率与计数值T的对照表如下表所示：

表9.1 C调各音符频率与计数值T的对照表
音符 频率（Hz） 简谱码T值 音符 频率（Hz） 简谱码T值
低1DO 262 63628 #4FA# 740 64860
#1DO# 277 63731 中5SO 784 64898
低2RE 294 63835 #5SO# 831 64923
#2RE# 311 63928 中6LA 880 64968
低3M 330 64103 #6 932 64994
低4FA 349 64103 中7SI 988 65030
#4FA# 370 64260 高1DO 1046 65058
低5SO 392 64260 #1DO# 1109 65085
#5SO# 415 64331 高2RE 1175 65110
低6LA 440 64400 #2RE# 1245 65124
#6 466 64463 高3M 1318 65157
低7SI 494 64524 高4FA 1397 65178
中1DO 523 64580 #4FA# 1480 65198

⑸ 每个音符使用1个字节，字节的高4位代表音符的高低，低4位代表音符的节拍，下表为节拍码的对照。但如果1拍为0.4秒，1/4拍是0.1秒，只要设定延迟时间就可求得节拍的时间。假设1/4节拍为1DELAY，则1拍应为4DELAY，以此类推。所以只要求得1/4拍的DELAY时间，其余的节拍就是它的倍数，如下表为1/4和1/8节拍的时间设定。
表9.2 节拍码对照表
1/4节拍 1/8节拍
节拍码 节拍数 节拍码 节拍数
1 1/4拍 1 1/8拍
2 2/4拍 2 1/4拍
3 3/4拍 3 3/8拍
4 1拍 4 1/2拍
5 1又1/4拍 5 5/8拍
6 1又1/2拍 6 3/4拍
7 1又3/4拍 7 7/8拍
8 2拍 8 1拍
9 2又1/4拍 9 1又1/8拍
A 2又1/2拍 A 1又1/4拍
B 2又3/4拍 B 1又3/8拍
C 3拍 C 1又1/2拍
D 3又1/4拍 D 1又5/8拍
E 3又1/2拍 E 1又3/4拍
F 3又3/4拍 F 1又7/8拍
表9.3 各调节拍的时间设定表
1/4节拍 1/8节拍
曲调值 DELAY 曲调值 DELAY
调4/4 125毫秒 调4/4 62毫秒
调3/4 187毫秒 调3/4 94毫秒
调2/4 250毫秒 调2/4 125毫秒
⑹ 建立音乐的步骤：
1）先把吧乐谱的音符找出，然后由上表建立T值表的顺序。
2）把T值表建立在TABLE1，构成发音符的计数值放在“TABLE”。
3）简谱码（音符）为高位，节拍为（节拍数）为低4位，音符节拍码放在程序的“TABLE”处。

表9.4 简谱对应的简谱码、T值、节拍数
简谱 发音 简谱码 T值 节拍码 节拍数
5 低5SO 1 64260 1 1/4拍
6 低6LA 2 64400 2 2/4拍
7 低7SI 3 64524 3 3/4拍
1 中1DO 4 64580 4 1拍
2 中2RE 5 64684 5 1又1/4拍
3 中3M 6 64777 6 1又2/4拍
4 中4FA 7 64820 7 1又3/4拍
5 中5SO 8 64898 8 2拍
6 中6LA 9 64968 9 2又1/4拍
7 中7SI A 65030 A 2又2/4拍
1 高1DO B 65058 B 2又3/4拍
2 高2RE C 65110 C 3拍
3 高3M D 65157 D 3又1/4拍
4 高4FA E 65178 E 3又2/4拍
5 高5SO F 65217 F 3又3/4拍
不发音 0

1/4拍的延迟时间=187毫秒
DELAY: MOV R7,#2
D2: MOV R4,#187
D3: MOV R3,#248
DJNZ R3,$
DJNZ R4,D3
DJNZ R7,D2
RET
4．程序范例
ORG 0000H ；主程序起始地址
SJMP START ；跳至主程序
ORG 000BH ；TIMER0中断起 始地址
LJMP TIM0 ；跳至TIMER0中断子程序
START: MOV TMOD,#01H ；设T0在M1
MOV IE,#82H ；中断使能
START0:MOV 30H,#00 ；取简谱码指针
NEXT: MOV A,30H ；简谱码指针载入A
MOV DPTR,#TAB ；至TAB取简谱码
MOVC A,@A+DPTR ；
MOV R2,A ；渠道的简谱码暂存于R2
JZ END0 ；是否渠道00（结束码）
ANL A,#0FH ；不是，则取低4位（节拍码）
MOV R5,A ；将节拍码存入R5
MOV A,R2 ；将取到的简谱码再载入A
SWAP A ；高低4位交换
ANL A,#0FH ；取低4位（音符码）
JNZ SING ；取到的音符码是否为0？
CLR TR0 ；开始，则不发音
SJMP D1 ；跳至D1
SING: DEC A ；取到的音符码减1（不含0）
MOV 22H,A ；存入（22H）
RL A ；乘2
MOV DPTR,#TAB1 ；至TABLE1取相对的高位字节计数值
MOVC A,@A+DPTR ；
MOV TH0,A ；取到的高位字节存入TH0
MOV 21H,A ；取到的高位字节存入（21H）
MOV A,22H ；在载入取到的音符码
RL A ；乘2
INC A ；加1
MOVC A,@A+DPTR ；至TABLE1取相对的低位字节计数值
MOV TL0,A ；取到的低位字节存入TL0
MOV 20H,A ；取到的低位字节存入（20H）
SETB TR0 ；启动TIMER0
D1: LCALL DELAY ；其本单位时间1/4拍187毫秒
INC 30H ；取简谱码指针加1
JMP NEXT ；取下一个简谱码
END0： CLR TR0 ；停止TIMER0
JMP START0 ；重复循环
TIM0： PUSH ACC ；将A的值暂存于堆栈
PUSH PSW ；将PSW的值暂存于堆栈
MOV TL0，20H ；重设计数值
MOV TH0，21H ；
CPL P3.0 ；将P3.0位反相,控制蜂鸣器发声
POP PSW ；至堆栈取回PSW的值
POP ACC ；至堆栈取回A的值
RETI
DELAY：MOV R7，#02
D2： MOV R4，#187
D3： MOV R3，#248
DJNZ R3，$
DJNZ R4，D3
DJNZ R7，D2
RET
TAB1： ；决定节拍
DW 64260，64400，64521，64580
DW 64684，64777，64820，64898
DW 64968，65030，65058，65110
DW 65157，65178，65217
TAB: ；乐曲名称《梁祝》
DB 02H,82H,62H,52H,48H,02H,52H,32H,22H,18H
DB 83H,91H,72H,62H,51H,61H,71H,61H,83H,61H
DB 81H,51H,61H,71H,61H,51H,46H,82H,32H,52H
DB 22H,42H,16H,21H,41H,18H,0E4H,13H,21H,43H
DB 51H,21H,41H,12H,83H,81H,61H,81H,58H,53H
DB 61H,31H,22H,13H,21H,42H,52H,0E2H,42H,21H
DB 11H,91H,41H,18H,63H,81H,32H,52H,21H,41H,
DB 16H,0E4H,11H,21H,31H,51H,26H,11H,21H,43H
DB 51H,82H,62H,52H,61H,51H,42H,21H,11H,0E4H
DB 44H,21H,41H,21H,11H,0E1H,11H,21H,41H,18H
DB 61H,81H,51H,61H,51H,41H,32H,21H,41H,18H
DB 08H,0H,04H ；曲子最后静音5拍长的时间
DB 00H ；乐曲结束
END

❺ 单片机 音乐播放器+亮灯

//《世上只有妈妈好》51单片机C语言程序和音乐采灯程序

//2007-5-22作者：徐学军

//此程序在硬件上调试通过

//本程序的单片机晶振采用11．0592MHZ

//此程序的流水灯随音乐的节拍的快慢而动

//程序对应的单片机的完整的电路图已经插在了程序中,可以单击放大查看

#include<reg51.h>

sbitspeaker=P2^0;//接音频放大电路,

//sbitspeaker=P3^2;

sbitsw=P3^0;//电后位后,sw合上后就开始放音乐,灯开始闪动,sw断开,音乐停止,灯也同时停止闪动

unsignedchartimer0h,timer0l,time,led=1,j=0;

unsignedcharflagd=0;

//世上只有妈妈好数据表

codeunsignedcharsszymmh[]={6,2,3,5,2,1,3,2,2,5,2,2,1,3,2,6,2,1,5,2,1,

6,2,4,3,2,2,5,2,1,6,2,1,5,2,2,3,2,2,1,2,1,

6,1,1,5,2,1,3,2,1,2,2,4,2,2,3,3,2,1,5,2,2,

5,2,1,6,2,1,3,2,2,2,2,2,1,2,4,5,2,3,3,2,1,

2,2,1,1,2,1,6,1,1,1,2,1,5,1,6,0,0,0

};

//音阶频率表高八位

codeunsignedcharFREQH[]={

0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,

0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC,//1,2,3,4,5,6,7,8,i

0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,

0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,

};

//音阶频率表低八位

codeunsignedcharFREQL[]={

0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,

0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F,//1,2,3,4,5,6,7,8,i

0xEE,0x44,0x6B,0xB4,0xF4,0x2D,

0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,

};

voiddelay(unsignedchart)

{

unsignedchart1;

unsignedlongt2;

for(t1=0;t1<t;t1++)

{

for(t2=0;t2<8000;t2++)

{

;

}

}

TR0=0;

}

voidt0int()interrupt1

{

TR0=0;

speaker=!speaker;

TH0=timer0h;

TL0=timer0l;

TR0=1;

}

voidsong()

{

TH0=timer0h;

TL0=timer0l;

TR0=1;

delay(time);

}

voidmain(void)

{

unsignedchark,i;

TMOD=1;//置CT0定时工作方式1

EA=1;ET0=1;//IE=0x82//CPU开中断,CT0开中断

while(1)

{

i=0;

time=1;

sw=1;

while(time)

{

if(sw)

{P0=0;i=0;continue;}

if(j==8)

{

//led=1;

j=0;flagd=~flagd;

if(flagd)

{

led=0x80;

}

else

{

led=1;

}

}

else

{

P0=~led;

if(flagd)

{

led=led>>1;

}

else

{

led=led<<1;

}

j++;

}

k=sszymmh[i]+7*sszymmh[i+1]-1;

timer0h=FREQH[k];

timer0l=FREQL[k];

time=sszymmh[i+2];

i=i+3;

song();

}

}

}

❻ 单片机设计音乐播放器程序和仿真图（用汇编语言）急求~谢谢！！！

NUMEQU30H
UPEQUP3.6
DNEQUP3.7
ORG0000H
AJMPSTART;Fosc＝12MHz
ORG000BH;T0中断入口地址
AJMPINT_T0
ORG001BH;T1中断入口地址
AJMPINT_T1

START:
MOVSP,#60H
MOVTMOD,#11H
MOVIE,#8AH
MOVIP,#08H	;T1中断优先于T0中断
MOV	TH1,#3CH
MOV	TL1,#0BH		;以上为系统初始化，T=60ms

W1:	MOV	P2,#01110001B;等待提示"F"	,01110001
LCALL	GETKEY
CJNEA,#0FFH,W1
MOVA,B
CJNEA,#0AH,W2
LCALLKEY_A;输入键是'A',转KEY_A
SJMP	W1

W2:	CJNE	A,#0BH,W3
	LCALLKEY_B;输入键是'B',转KEY_B

W3:	CJNE	A,#0CH,W4
	LCALLKEY_C;输入键是'C',转KEY_C
W4:	CJNE	A,#0DH,W5
	LCALLKEY_D
SJMP	W1;输入键是'D',转KEY_D
W5:	CJNEA,#0EH,W6	;下一首
	INCNUM
	MOVA,NUM
	CJNEA,#4,W51
W51:
	JCW52
	MOVNUM,#0
W52:
	MOVA,NUM
	SJMPD0
W6:	CJNEA,#0FH,W7	;上一首
	MOVA,NUM
	JNZW61
	MOVNUM,#4
W61:
	DECNUM
	MOVA,NUM
	SJMPD0
W7:
	SJMP	W1
KEY_A:;从1～4按顺序播放
	LCALL	MUSIC1;乐曲《我和你》
	LCALL	MUSIC2;乐曲《万水千山总是情》
	LCALL	MUSIC3;乐曲《送别》
	LCALL	MUSIC4;乐曲《北京欢迎您》
	RET
KEY_B:;从1～4循环播放
T11:	LCALL	KEY_A
	SJMP	T11
	RET
KEY_C:;循环播放某一乐曲
T3:	LCALL	GETWORD
	CJNE	A,#0FFH,T3
	MOV	A,B
D0:
	JNZD1
	SJMP	E0
D1:	DECA
	JNZD2
	SJMP	E1
D2:	DECA
	JNZE3
	SJMP	E2
E0:	LCALL	MUSIC1;乐曲《我和你》
	SJMP	E0
E1:	LCALL	MUSIC2;乐曲《万水千山总是情》
	SJMP	E1
E2:	LCALL	MUSIC3;乐曲《送别》
	SJMP	E2
E3:	LCALL	MUSIC4;乐曲《北京欢迎您》
	SJMP	E3
	RET
KEY_D:;从某一乐曲开始播放，播放完后停止
T2:	LCALL	GETWORD
	CJNE	A,#0FFH,T2
	MOV	A,B
	CJNE	A,#00H,B1
	SJMP	C0
B1:	CJNE	A,#01H,B2
	SJMP	C1
B2:	CJNE	A,#02H,C3
	SJMP	C2
C0:	LCALL	MUSIC1;乐曲《我和你》
C1:	LCALL	MUSIC2;乐曲《万水千山总是情》
C2:	LCALL	MUSIC3;乐曲《送别》
C3:	LCALL	MUSIC4;乐曲《北京欢迎您》
	RET
MUSIC1:;第一首《我和你》
	MOVP2,#00000110B			;显示1,00000110
	MOVR5,#11111001B
	MOV52H,#HIGHTABLE10
MOV53H,#LOWTABLE10
	MOVNUM,#0
	LCALLmusic
	RET
MUSIC2:						;第二首《万水千山总是情》
MOV	P2,#01011011B	;显示2,01011011
	MOV	R5,#10100100B			
	MOV52H,#HIGHTABLE20
MOV53H,#LOWTABLE20
	MOVNUM,#1
LCALL	music
	RET
MUSIC3:		;第三首《送别》
	MOV	P2,#01001111B		;显示3,01001111
	MOV	R5,#10110000B
	MOV52H,#HIGHTABLE30
MOV53H,#LOWTABLE30
	MOVNUM,#2
LCALL	music
	RET
MUSIC4:	;第四首《北京欢迎您》
	MOV	P2,#01100110B		;显示4,01100110
	MOV	R5,#10011001B
	MOV52H,#HIGHTABLE40
MOV53H,#LOWTABLE40
	MOVNUM,#3
LCALL	music
	RET
music:	MOVR3,#00H		;音乐解码器
NEXT20:
	MOVA,P3
	ORLA,#0C0H
	MOVP3,A
	MOVA,P3
	CPLA
	ANLA,#0C0H
	JZNEXT21
	POPACC
	POPACC
	LJMPW1
	RET
NEXT21:
MOVA,R3
	MOV	DPH,52H
	MOV	DPL,53H
	MOVC	A,@A+DPTR
	MOV	R2,A
	JZ	STOP
	ANL	A,#0FH
	MOV	R1,A
	MOV	A,R2
	SWAP	A
	ANL	A,#0FH
	JNZ	SING
	CLR	TR0
	JMP	W11
;----------------------------------------------------------
SING:	
DEC	A
	MOV22H,A
	RL	A
	MOVDPTR,#TABLE00
	MOVC	A,@A+DPTR
	MOV	TH0,A
	MOV	21H,A
	MOV	A,22H
	RL	A
	INC	A
	MOVC	A,@A+DPTR
	MOV	TL0,A
	MOV	20H,A
	SETB	TR0
	SETB	TR1
W11:	
LCALL	DELAY3
	INC	R3
	LJMP	NEXT20
;-----------------------------------------------------------
STOP:	
CLR	TR0
	CLR	TR1
RET
;***************************************************
;定时器0中断子程序
;***************************************************
INT_T0:
	CLR	TR0
	MOV	TL0,20H
	MOV	TH0,21H
	CPL	P3.0
	SETB	TR0
	RETI
;***************************************************
;定时器1中断子程序
;***************************************************
INT_T1:
	CLRTR1
	CLRTR0
	LCALL	KEY_E
	MOVTH1,#3CH
	MOVTL1,#0BH
	DJNZ	60H,OUT
	MOV	60H,#20
OUT:	
SETB	TR1	
	RETI
KEY_E:	
JB	P3.1,L2		;中断键盘检测
	LCALL	DELAY2		;消除抖动
	JB	P3.1,L2		;如果是高电平就跳到L2
	JNBP3.1,$		;如果仍然是低电平就执行中断程序
	MOV	P2,#0111100B	;让LED显示E,01111001
L3:	JB	P3.1,$		;检测低电平，直到低电平时才跳出该指令
	LCALL	DELAY2
	JB	P3.1,L3
	JNBP3.1,$		;如果再来一个高电平才跳出中断
	MOV	P2,R5
L2:	SETBTR0
	RET
GETKEY:			;读ABCD键盘子程序
SA:	JB	P1.0,SB		;读A,是高电平表示没有按键，跳转到SB
	LCALL	DELAY2
	JB	P1.0,SA
	JNB	P1.0,$
	MOV	P2,#01110111B		;显示A,01110111
	MOV	R5,#10001000B
	MOV	A,#0FFH
	MOV	B,#0AH
	RET
SB:	JB	P1.1,C11	;读B，是高电平表示没有按键按下，跳转到C11
	LCALL	DELAY2
	JB	P1.1,SB
	JNB	P1.1,$
	MOV	P2,#01111100B	;显示B,01111100
	MOV	R5,#10000011B
	MOV	A,#0FFH
	MOV	B,#0BH
	RET
C11:JB	P1.2,ED1		;读C
	LCALL	DELAY2
	JB	P1.2,C11
	JNBP1.2,$
	MOV	P2,#00111001B		;显示C,00111001
	MOV	R5,#11000110B
	MOV	A,#0FFH
	MOV	B,#0CH
	RET
ED1:	
JB	P1.3,L0		;读D
	LCALL	DELAY2
	JB	P1.3,ED1
	JNBP1.3,$
	MOV	P2,#01011110B		;显示D,01011110
	MOV	R5,#10100001B
	MOV	A,#0FFH
	MOV	B,#0DH
L0:	JBUP,L01
	LCALLDELAY2
	JBUP,L01
	JNBUP,$
	MOVA,#0FFH
	MOVB,#0EH
	RET
L01:
	JBDN,L02
	LCALLDELAY2
	JBDN,L02
	JNBDN,$
	MOVA,#0FFH
	MOVB,#0FH
L02:
	RET
GETWORD:;读音乐序号子程序
S1:	JB	P1.4,S2		;读1键
	LCALL	DELAY2
	JB	P1.4,S1
	JNB	P1.4,$
	MOV	P2,#00000110B		;显示1
	MOV	R5,#11111001B
	MOV	A,#0FFH
	MOV	B,#00H	
	RET
S2:	JB	P1.5,S3		;读2键		
	LCALL	DELAY2
	JB	P1.5,S2
	JNB	P1.5,$
	MOV	P2,#01011011B		;显示2
	MOV	R5,#10100100B
	MOV	A,#0FFH
	MOV	B,#01H
	RET
S3:	JB	P1.6,S4		;读3键
	LCALL	DELAY2
	JB	P1.6,S3
	JNB	P1.6,$
	MOV	P2,#01001111B			;显示3
	MOV	R5,#10110000B
	MOV	A,#0FFH
	MOV	B,#02H
	RET
S4:	JB	P1.7,L1		;读4键
	LCALL	DELAY2
	JB	P1.7,S1
	JNB	P1.7,$
	MOV	P2,#01100110B			;显示4
	MOV	R5,#10011001B
	MOV	A,#0FFH
	MOV	B,#03H
L1:	RET
DELAY:;延时子程序
PUSH0;保存现场
PUSH1
MOV0,#0H
DELAY1:MOV1,#0H
DJNZ1,$
DJNZ0,DELAY1
POP1;恢复现场
POP0
RET
DELAY2:	MOV	41H,#100	;延时子程序2
F1:	MOV	42H,#250
	DJNZ	42H,$
	DJNZ	41H,F1
	RET
DELAY3:				;延时子程序3	
	MOV	R7,#2
W22:	MOV	R4,#125
W33:	MOV	R0,248
	DJNZ	R0,$
	DJNZ	R4,W33
	DJNZ	R7,W22
	DJNZ	R1,DELAY3
	RET
TABLE00:			;频率表
	DW64260,64400,64524,64580;简码值低音5,低音6,低音7,1
	DW64684,64777,64820,64898;简码值2,3,4,5
	DW64968,65030,65058,65110;简码值6,7,高音1,高音
DW65157,65178,65217;简码值高音3,高音4,高音5
;--------------------------------------------------------------------
;第一首《我和你》
;--------------------------------------------------------------------
TABLE10:DB64H,82H,42H,48H
	DB54H,64H,18H
	DB44H,54H,64H,84H
	DB5CH
	DB64H,84H,44H,04H,42H
	DB54H,64H,28H
	DB54H,14H,54H,64H
		DB4CH
		DB98H,88H
	DB98H,48H
	DB64H,24H,64H,84H
	DB5CH
		DB64H,82H,42H,48H
	DB54H,64H,28H
		DB54H,14H,54H,34H
	DB4CH
		DB00H
;--------------------------------------------------------------------
;第二首《万水千山总是情》
;--------------------------------------------------------------------
TABLE20:	DB64H,74H,84H,04H,82H,94H,84H,6CH
	DB54H,44H,04H,62H,54H,44H,2CH
		DB24H,18H,44H,54H,64H,84H,94H,64H,5CH
	DB64H,74H,84H,04H,82H,94H,84H,6CH
	DB54H,44H,04H,62H,54H,44H,2CH
		DB24H,18H,44H,64H,54H,04H,42H,24H,44H,4CH
	DB64H,84H,9CH,0A4H,94H,74H,84H,04H,92H,8CH,64H,88H
	DB64H,84H,9CH,0A4H,0A4H,94H,84H,64H,5CH
		DB64H,74H,84H,04H,82H,94H,84H,6CH
	DB54H,44H,04H,62H,54H,44H,2CH
	DB24H,18H,44H,64H,54H,42H,24,44H,4CH
		DB00H
;--------------------------------------------------------------------
;第三首《送别》
;--------------------------------------------------------------------
TABLE30:DB84H,62H,82H,0B8H
		DB94H,0B2H,92H,88H
		DB84H,42H,52H,64H,52H,44H
	DB5CH
	DB84H,62H,82H,0B4H,04H,82H
		DB94H,0B4H,88H
	DB84H,52H,62H,74H,04H,32H
	DB4CH
		DB94H,0B4H,0B8H
	DB0A4H,92H,0A2H,0B8H
		DB92H,0A2H,0B2H,92H,92H,82H,62H,42H
	DB5CH
	DB84H,62H,82H,0B4H,04H,0A2H
		DB94H,0B4H,88H
	DB84H,52H,62H,74H,04H,32H
		DB4CH
		DB00H
;--------------------------------------------------------------------
;第四首《北京欢迎您》
;--------------------------------------------------------------------
TABLE40:DB62H,82H,62H,52H,12H
		DB62H,52H,12H,64H
		DB62H,52H,22H,42H
	DB62H,54H
	DB52H,42H,22H,42H
		DB52H,62H,82H,52H
		DB62H,92H,82H,12H
		DB52H,44H
	DB52H,42H,22H,42H
	DB52H,62H,82H,52H
	DB62H,92H,82H,82H
	DB68H
		DB52H,62H,52H,42H
	DB82H,92H,64H
	DB22H,62H,64H
	DB54H,64H
		DB64H,84H
		DB0B2H,82H,94H
	DB02H,92H,82H,62H
		DB62H,82H,88H	
		DB00H
END