|
|
ORG 0000H
AJMP KEY2
ORG 0100H
KEY2: LCALL KS
JNZ K1
LCALL D10ms
AJMP KEY2
K1: LCALL D10ms
LCALL KS
JNZ K2
AJMP KEY2
K2: MOV R2,#0EFH
MOV R4,#00H
K3: MOV P1,R2
L6: JB P1.0,L1
MOV A,#00H
AJMP LK
L1: JB P1.1,L2
MOV A,#04H
AJMP LK
L2: JB P1.2,L3
MOV A,#08H
AJMP LK
L3: JB P1.3,NEXT
MOV A,#0CH
LK: ADD A,R4
PUSH ACC
NEXT: INC R4
MOV A,R2
JNB ACC.7,KEY2
RL A
MOV R2,A
AJMP K3
K4: LCALL KS
JNZ K4
POP ACC
RET
KS: MOV P1,#0FH
MOV A,P1
XRL A,#0FH
RET
DISPLAY:MOV DPTR,#TABLE
LCALL KEY2
MOVC A,@A+DPTR
MOV P0,A
LJMP DISPLAY
TABLE: DB 03FH,006H,05BH,04FH,66H
DB 6DH,7DH,07H,7FH,6FH
DB 77H,7CH,039H,05EH,79H
DB 71H
D10ms: MOV R7,#25
D1: MOV R6,#200
DJNZ R6,$
RET
END |
|
