ORG 0000H ；主程序
CLR P3.6 ；清零
MOV R0, #00H
CLR P3.7 ；關報警
CLR P3.6 ；關鎖
CLR P1.5 ；關指紋輸入
MOV R0, #00H
MOV TMOD, #20H
MOV TL1, #0F4H
MOV TH1, #0F4H
SETB TR1 ；啟動定時器T1
KEY: JE P1.5, #1, LP2 ：指紋匹配開鎖
LJMP KEP1 ；進入密碼開鎖
;*********************************************************密碼57618程序
KEP1: MOV P2, #0FFH ；關顯示
MOV A, P0 ；判斷有建按下
CPL A
ANL A, #0FFH
JNZ JP
JMP WAIT
JP: LCALL D10MS
MOV A, P0
CPL A
CJNE A, #01H, KEY02
MOV P2, #89H
LJMP KEY1
KEY02: CJNE A, #02H, KEY03
MOV P2, #89H
LJMP KJP1
KEY03: CJNE A, #04H, KEY04
MOV P2, #89H
LJMP KJP1
KEY04: CJNE A, #08H, KEY05
MOV P2, #89H
LJMP KJP1
KEY05: CJNE A, #10H, KEY06
MOV P2, #89H
LJMP KJP1
KEY06: CJNE A, #08H, KEY07
MOV P2, #89H
LJMP KJP1
KEY07: CJNE A, #08H, KEY08
MOV P2, #89H
LJMP KJP1
KEY08: MOV P2, #89H
KJP1: MOV A, P0
CJNE A, #0FFH KJP1
KJMP WAIT
;**********************************************************************
KEY1: LCALL MP
CJNE A, #02H, KEY03
MOV P2, #89H
KEY2: LCALL MP
CJNE A, #04H, KEY02
MOV P2, #89H
KEY3: LCALL MP
CJNE A, #08H, KEY02
MOV P2, #89H
KEY4: LCALL MP
CJNE A, #10H, KEY02
MOV P2, #89H
KEY5: MOV A, PO
CJNE A, #0FFH, KEY5
MOV P2, #0FFH
MOV R5, #30H
KEY6: MOV A, P0
CPL A
ANL A, #0FFH
JNZ BB2
MOV A, P1
CPL A
ANL A, #07H
JZ BB1
LCALL D10MS
MOV A, P1
CPL A
ANL A, #07H
JZ BB1
CJNE A, #04H, B1
MOV P2, #89H
LJMP LP2
B1: CJNE A, #01H
MOV P2, #89H
LJMP K0P1
BL1: CJNE A, #02H
MOV 2, #89H
LJMP K0P1
BB2: LCALL D10MS
MOV A, P0
CPL A
ANL A, #07H
JZ BB1
LJMP K0P1
BB1: MOV R7, #0C8H
;**************************************************************報警程序
LP1: MOV R3, #05H
P01: MOV R7, 30a0h
p02: SETB P3.7
LCALL P01A
DJNZ R7, P02
DJNZ R3, P01
CLR P3.7
CJNE RO, #03H, P03
LJMP LP1
P03: CLR P3.6
RET
;*************************************************************開鎖程序
LP2: SETB P3.6
LCALL T5S
CLR P3.6
MOV R0, #00H
RET |
