org 0000h
ajmp main
org 0030h
main:
mov dptr,#tab ;將表頭放入DPTR
lcall key ;調用鍵盤掃描程序
movc a,@a+dptr ;查表后將鍵值送入ACC
mov p0,a ;將Acc值送入P0口
CLR P2.1 ;開顯示
ljmp main ;返回反復循環顯示
KEY: LCALL KS ;調用檢測按鍵子程序
JNZ K1 ;有鍵按下繼續
LCALL DELAY2 ;無鍵按調用延時去抖
AJMP KEY ;返回繼續檢測按鍵
K1: LCALL DELAY2
LCALL DELAY2 ;有鍵按下延時去抖動
LCALL KS ;再調用檢測按鍵程序
JNZ K2 ;確認有按下進行下一步
AJMP KEY ;無鍵按下返回繼續檢測
K2: MOV R2,#0EFH ;將掃描值送入 R2暫存
MOV R4,#00H ;將第一列值送入R4暫存
K3: MOV P1,R2 ;將R2的值送入P1口
L6: JB P1.0,L1 ;P1.0等于1跳轉到L1
MOV A,#00H ;將第一行值送入ACC
AJMP LK ;跳轉到鍵值處理程序
L1: JB P1.1,L2 ;P1.1等于1跳轉到L2
MOV A,#04H ;將第二行的行值送入ACC
AJMP LK ;跳轉到鍵值理程序進行鍵值處理
L2: JB P1.2,L3 ;P1.2等于1跳轉到L3
MOV A,#08H ;將第三行的行值送入ACC
AJMP LK ;跳轉到鍵值處理程序 L3: JB P1.3,NEXT
;P1.3等于1跳轉到NEXT處
MOV A,#0cH ;將第四行的行值送入ACC
LK: ADD A,R4 ;行值與列值相加后的鍵值送入A
PUSH ACC ;將A中的值送入堆棧暫存
K4: LCALL DELAY2 ;調用延時去抖動程序
LCALL KS ;調用按鍵檢測程序
JNZ K4 ;按鍵沒有松開繼續返回檢測
POP ACC ;將堆棧的值送入ACC
RET
NEXT:
INC R4 ;將列值加一
MOV A,R2 ;將R2的值送入A
JNB ACC.7,KEY ;掃描完至KEY處進行下一掃描
RL A ;掃描未完將A中的值右移一位進行下一列的掃描
MOV R2,A ;將ACC的值送入R2暫存
AJMP K3 ;跳轉到K3繼續
KS: MOV P1,#0FH ;將P1口高四位置0低四位值1
MOV A,P1 ;讀P1口
XRL A,#0FH ;將A中的值與A中的值相異或
RET ;子程序返回
DELAY2: ;40ms延時去抖動子程序
MOV R5,#08H
L7: MOV R6,#0FAH
L8: DJNZ R6,L8
DJNZ R5,L7
RET
tab:
db 28h,34h,28h,34h,0a9h,60h,20h,7ah,
20h,21h,61h,74h,30h,62h,0a2h,7eh
;0h0hc9878654a321 輪流顯示鍵盤因為無法表達*# 就用H表示，B用8表示
end |
