1 / 15
文档名称:

密码锁程序.doc

格式:doc   大小:91KB   页数:15页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

密码锁程序.doc

上传人:mh900965 2018/2/13 文件大小:91 KB

下载得到文件列表

密码锁程序.doc

相关文档

文档介绍

文档介绍:;ESW2是控制型按键,可以实现快加
;=======变量及常数定义段====
INCLUDE "";添加变量等定义模块
;===========================
ORG 0000H
LJMP MAIN
ORG 001BH
LJMP TIM1
ORG 0030H
MAIN: INCLUDE "";添加初始化模块
LCALL EEPR ;读EEPROM子程序
MLOOP: LCALL DELAY
LCALL RDKEY ;调用读键状态及去抖处理
LCALL SDISP ;调用数码管动态显示
MOV A,STA ;根据状态值散转相应模块
ANL A,#03H
RL A
MOV DPTR,#MTAB
JMP ***@A+DPTR
MTAB: AJMP WORK0 ;转移到时间设定模块
AJMP WORK1 ;转移到走时模块
AJMP WORK2 ;转移到密码模块
AJMP WORK3 ;转移到音乐模块
;-------时间设定模块-----------------
WORK0: SETB FLON
SETB LED4
JNB ESW1,WK01 ;设置闪烁位
CLR ESW1
MOV A,TZSTA
ADD A,#02H
MOV TZSTA,A
CJNE A,#06H,WK01
MOV TZSTA,#00H
MOV STA,#01H ;转到走时模块
LJMP MLOOP
WK01: JNB SW2,WK03
JNB TF0,ESDIP
CLR TF0
SETB TR0
MOV TH0,#0F0H
MOV TL0,#60H
DJNZ Y400MS,WK01
MOV Y400MS,#100
JNB SW2,WK03
MOV A,TZSTA
ANL A,#07H
MOV DPTR,#MTAB1
JMP ***@A+DPTR
MTAB1: AJMP WK020
AJMP WK021
AJMP WK022
ESDIP: LCALL SDISP
LJMP MLOOP
WK020: MOV A,HOUR
ADD A,#01H
DA A
CJNE A,#24H,W0
MOV HOUR,#00H
MOV HOUL,#00H
MOV HOUH,#00H
LJMP WK03
W0: MOV HOUR,A
MOV XS,A
ANL A,#0F0H
SWAP A
MOV HOUH,A
MOV A,XS
ANL A,#0FH
MOV HOUL,A
LJMP WK03
WK021: MOV A,MINH
INC A
CJNE A,#06H,W1
MOV MINH,#00H
LJMP WK03
W1: MOV MINH,A
LJMP WK03
WK022: MOV A,MINL
INC A
CJNE A,#0AH,W2
MOV MINL,#00H
LJMP WK03
W2: MOV MINL,A
WK03: LJMP MLOOP
;-------走时模块-----------------------------
WORK1: CLR FLON
CLR LED6
JB EK7,WK10
JB EK9,WK11
JNB ESW1,WK12
SETB FLON
MOV STA,#00H
LJMP WK13
WK10: CLR FLON
MOV SNUM0,#00H
MOV SNUM1,#00H
MOV SNUM2,#00H
MOV R2,#00H
SETB LED0
MOV STA,#02H
LJMP WK13
WK11: MOV STA,#03H
LJMP WK13
WK12: LCALL JIS ;调用计时子程序
JNB JS,WK13
CLR JS
WK13: LJMP MLOOP
;-------调用计时子程序------------------------------
JIS: DJNZ J500,JS5
CLR LED4
MOV J500,#125
DJNZ JS1S,JS5
SETB LED4
MOV JS1S,#2
MOV A,SECL
CJNE A,#09H,JS0
MOV SECL,#0
MOV A,SECH
CJNE A,#05H,JS1
MOV SECH,#0
MOV A,MIN