基於單片機的音樂播放器

❶ 利用單片機實現簡單的兩首歌曲的音樂播放器

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