基于單片機(jī)的指紋智能鎖代碼

ORG     0000H         ；主程序
       CLR    P3.6           ；清零
       MOV   R0,  #00H
       CLR    P3.7           ；關(guān)報(bào)警
       CLR    P3.6           ；關(guān)鎖
       CLR    P1.5           ；關(guān)指紋輸入
       MOV   R0,  #00H
       MOV   TMOD,  #20H
       MOV   TL1,  #0F4H
       MOV   TH1,  #0F4H
       SETB   TR1           ；啟動(dòng)定時(shí)器T1
KEY:   JE     P1.5, #1, LP2    ：指紋匹配開鎖
       LJMP   KEP1          ；進(jìn)入密碼開鎖
;*********************************************************密碼57618程序
KEP1:  MOV   P2,  #0FFH    ；關(guān)顯示
       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

;**************************************************************報(bào)警程序
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

謝謝分享