电子密码锁程序清单.docVIP

附录 ;电子密码锁 汇编 源代码 ;******************************** BUFF EQU 6FH ;当前输入的密码 TIMERS2 EQU 6EH ;密码输入错误的次数 TIMERS EQU 6DH ;输入数字的位数 ;密码输入缓冲区 PS1 EQU 6CH PS2 EQU 6BH PS3 EQU 6AH PS4 EQU 69H PS5 EQU 68H PS6 EQU 67H PS7 EQU 66H PS8 EQU 65H PS9 EQU 64H PS10 EQU 63H PS11 EQU 62H PS12 EQU 61H PS13 EQU 60H PS14 EQU 5FH PS15 EQU 5EH PS16 EQU 5DH ;AT24C02读取缓冲区 AT1 EQU 5CH AT2 EQU 5BH AT3 EQU 5AH AT4 EQU 59H AT5 EQU 58H AT6 EQU 57H AT7 EQU 56H AT8 EQU 55H AT9 EQU 54H AT10 EQU 53H AT11 EQU 52H AT12 EQU 51H AT13 EQU 50H AT14 EQU 4FH AT15 EQU 4EH AT16 EQU 4DH ;新密码输入缓冲区 NEW1 EQU 4CH NEW2 EQU 4BH NEW3 EQU 4AH NEW4 EQU 49H NEW5 EQU 48H NEW6 EQU 47H NEW7 EQU 46H NEW8 EQU 45H NEW9 EQU 44H NEW10 EQU 43H NEW11 EQU 42H NEW12 EQU 41H NEW13 EQU 40H NEW14 EQU 3FH NEW15 EQU 3EH NEW16 EQU 3DH PS_NEW1 BIT 20H ;新密码第一次标志位 PS_NEW2 BIT 21H ;新密码第二次标志位 PSW_F BIT 22H ;密码是否正确的标志位 RD_F BIT 23H ;读取密码是否成功标志 WR_F BIT 24H ;写入密码是否成功标志 ;LCD1602控制位 E BIT P3.0 ;使能端,读操作时，高电平有效;写操作时,下降沿有效 RW BIT P3.1 ;读操作为0,写操作为1 RS BIT P3.2 ;寄存器选择输入端 ;AT24C02控制位 SCL BIT P3.6 SDA BIT P3.7 ORG 0000H AJMP START ORG 0030H ;******************************** START: ;初始化 MOV SP, #70H MOV TMOD, #11H MOV TH0, #3CH MOV TL0, #0B0H MOV TH1, #3CH MOV TL1, #0B0H MOV P0,#01H ;清除屏幕,地址计数器AC=0,自动增一模式 LCALL ENABLE MOV P0,#38H ;8位数据总线,显示两行 LCALL ENABLE MOV P0,#38H LCALL ENABLE MOV P0,#38H LCALL ENABLE MOV P0,#06H ;显示模式,AC自动增一,显示不位移 LCALL ENABLE MOV P0,#0CH ;开显示,不显示光标 LCALL ENABLE SETB P2.0 ;低电平开锁 CLR P2.1 ;低电平蜂鸣器响 MOV BUFF,#0FFH MOV TIMERS2,#00H CLR PSW_F CLR RD_F CLR WR_F LCALL INITPS ;初始化密码 LCALL INITAT LCALL INITNEW LCALL SEC SETB P2.1 ;关蜂鸣器 LCALL AT_RD ;读取AT24C02中存储的密码 JB RD_F,SETLCD LCALL SETAT ;读取密码失败则载入初始密码 SETLCD: NOP MOV DPTR,#SHOW_PS LCALL LCD LCALL T100MSD ;******************************** MAIN: ;程序开始 MOV BUFF,#0FFH LCALL KS ;检查有没有按键按下 JNZ LK1 ;有按键按下则跳转 LCALL T500MSD AJMP MAIN ;没有则继续检查 LK1: LCALL T10MSD LCALL SBIE ;按键识别子程序 MOV R4, BUFF CJNE R4, #0FFH,CH_KF ;识别到按键则跳转 LCALL T100MSD AJMP MAIN ;否则继续检查键盘 ;******************************** CH_KF: ;重