LNEXT:

ACALL LAMP ;調(diào)用燈顯示程序

AJMP LOOP ;反復(fù)循環(huán)，主程序到此結(jié)束

DELAY:

MOV R7,#100

D1: MOV R6,#100

DJNZ R6,$

DJNZ R7,D1

RET

;----------------------------------------延時(shí)程序，鍵盤處理中調(diào)用

KEYPROC:

MOV A,B ;從B寄存器中獲取鍵值

JB ACC.2,KeyStart ;分析鍵的代碼，某位被按下，則該位為1（因?yàn)樵?a class="contentlabel" href="http://www.antipu.com.cn/news/listbylabel/label/鍵盤">鍵盤程序中已取反）

JB ACC.3,KeyOver

JB ACC.4,KeyUp

JB ACC.5,KeyDown

AJMP KEY_RET

KeyStart:

SETB StartEnd ;第一個(gè)鍵按下后的處理

AJMP KEY_RET

KeyOver:

CLR StartEnd ;第二個(gè)鍵按下后的處理

AJMP KEY_RET

KeyUp: SETB UpDown ;第三個(gè)鍵按下后的處理

AJMP KEY_RET

KeyDown:

CLR UpDown ;第四個(gè)鍵按下后的處理

KEY_RET:RET

KEY:

CLR F0 ;清F0，表示無鍵按下。

ORL P3,#00111100B ;將P3口的接有鍵的四位置1

MOV A,P3 ;取P3的值

ORL A,#11000011B ;將其余4位置1

CPL A ;取反

JZ K_RET ;如果為0則一定無鍵按下

ACALL DELAY ;不然延時(shí)去鍵抖

ORL P3,#00111100B

MOV A,P3

ORL A,#11000011B

CPL A

JZ K_RET

MOV B,A ;確實(shí)有鍵按下，將鍵值存入B中

SETB F0 ;設(shè)置有鍵按下的標(biāo)志

K_RET:

ORL P3,#00111100B ;此處循環(huán)等待鍵的釋放

MOV A,P3

ORL A,#11000011B

CPL A

JZ K_RET1 ;直到讀取的數(shù)據(jù)取反后為0說明鍵釋放了，才從鍵盤處理程序中返回

AJMP K_RET