KEYIN:
MOV DPTR,#7FFFH
MOVX A,@DPTR
ANL A,#1FH
MOV R3,A
LCALL D_l0ms
MOVX A,QDPTR
ANL A,#1FH
CJNE A,R3,PASS
CJNE A,#FEh,TO_2
LJMP KEY1
TO_2:
CJNE A,#1DH,TO_3
LJMP KEY2
TO_3:
CJNE A,#1BH,TO_4
LJMP KEY3
TO_4:
CJNE A,#17H,TO_5
LJMP KEY4
TO_5:
CJNE A,#0FH,PASS
LJMP KEYS
PASS:
RET
KEY1
……
RET
KEY2
……
RET
KEY3
……
RET
KEY4
……
RET
KEY5
……
RET