【正文】 ACALL DELAY ；消除抖動(dòng) N15: JB ,N17 ； K4（秒鐘加 1鍵）按了？不是則跳至 N17 17 ACALL DELAY ；消除抖動(dòng) MOV A,R4 ；將秒寄存器的值載入 A ADD A,01 ； A內(nèi)容加 1 DA A ；做十進(jìn)制調(diào)整 MOV R4,A ；將 A的值存入秒寄存器 CJNE A,60H,N16 ；是否超過(guò) 60秒？不是則跳至 N16 MOV R4,00 ；是則清除分寄存器的值為 00 N16: JNB ,$ ； K4（秒鐘加 1鍵）放開了？ ACALL DELAY ；消除抖動(dòng) N17: AJMP LOOPS ；轉(zhuǎn)至 LOOPS SETTIME:CLR ；定時(shí)模式 CLR SETB MOV ADR46,00H MOV A,READ ；讀 93C46地址為 ADR46中的數(shù)據(jù) ACALL TO9346 LOOPB:ACALL DISP ；調(diào)用 DISP JB ,N21 ； K1（模式選擇鍵）按了？不是則跳至 N21 ACALL DELAY ；消除抖動(dòng) 18 JNB ,$ ； K1（模式選擇鍵）放開了？ ACALL DELAY ；消除抖動(dòng) AJMP LOOP ；轉(zhuǎn)至 LOOP N21: JB ,N22 ； K2（定時(shí)器組加 1鍵）按了？不是則跳至 N22 ACALL DELAY ；消除抖動(dòng) MOV A,ADR46 ；將地址載入 A CLR C ；清除進(jìn)位位 RRC A ； A右移 1位 ADD A,01H ；地址加 1 MOV R6,A ；將 A存入 R6 CLR C ；清除進(jìn)位位 RLC A ； A左移 1位 MOV ADR46,A ；將 A中地址存入 ADR46 MOV A,READ ；讀 93C46地址為 ADR46中的數(shù)據(jù) ACALL TO9346 JNB ,$ ； K2（定時(shí)器組加 1鍵）放開了？ ACALLDELAY ；消除抖動(dòng) N22: JB ,N24 ； K3（定時(shí)器分鐘加 1鍵）按了？不 19 是則跳至 N24 ACALLDELAY ；消除抖動(dòng) MOV A,R4 ；將 定時(shí)器分寄存器的值載入 A ADD A,01 ； A內(nèi)容加 1 DA A ；做十進(jìn)制調(diào)整 MOV R4,A ；將 A的值存入定時(shí)器分寄存器 CJNE A,60H,N23 ；是否超過(guò) 60分？不是則跳至 N16 MOV R4,00H ；是則清除分寄存器的值為 00 N23: JNB ,$ ； K3（定時(shí)器分鐘加 1鍵）放開了？ ACALL DELAY ；消除抖動(dòng) N24: JB ,N26 ； K4（定時(shí)器時(shí)鐘加 1鍵）按了？不是則跳至 N26 ACALL DELAY ；消除抖動(dòng) MOV A,R5 ；將定時(shí)器時(shí)寄 存器的值載入 A ADD A,01H ； A內(nèi)容加 1 DA A ；做十進(jìn)制調(diào)整 MOV R5,A ；將 A的值存入定時(shí)器時(shí)寄存器 CJNE A,24H,N25 ；是否超過(guò) 24時(shí)？不是則跳至 N25 MOV R5,00 ；是則清除分寄存器的值為 00 20 N25:JNB ,$ ； K4（定時(shí)器時(shí)鐘加 1鍵）放開了？ ACALL DELAY ；消除抖動(dòng) N26:JB ,N27 ； K5（改變定時(shí)器狀態(tài)存儲(chǔ)鍵）按了？不是則跳至 N27 ACALL DELAY ；消除抖動(dòng) INC R3 ；改變 R3最低位的值（表示定 時(shí)器的狀態(tài)， 1表示開， 0 表示關(guān)） MOV A,WRITE ；將 A的值寫入 93C46地址為 ADR46中 ACALL TO9346 JNB ,$ ； K5（改變定時(shí)器狀態(tài)存儲(chǔ)鍵）放開了？ ACALL DELAY ；消除抖動(dòng) N27:AJMP LOOPB ；轉(zhuǎn)至 LOOPB 93C46程序： TO9346:SETB CS ； CS=1 SETB DI ； DI=1 SETB CLK ； CLK=1 ACALL DELAY CLR CLK ； CLK=0 21 ACALL DELAY MOV DPTR,JPTBL46 JMP A+DPTR； JPTBL46:AJMPSREAD ；讀 AJMP SWRITE ；寫 AJMP SEWEN ；寫使能 AJMP SEWDS ；寫禁止 SREAD: MOV A,ADR46 ；地址載入 A ADD A,80H ； 10XXXX讀指令 ACALL SDT46 ；讀入地址 ACALL RDT46 ；讀定時(shí)器時(shí)鐘數(shù)據(jù) MOV R5,A ；存入 R5 ACALL RDT46 ；讀定時(shí)器分鐘數(shù)據(jù) MOV R4,A ；存入 R4 INC ADR46 ；地址加 1 MOV A,ADR46 ；地址 載入 A ADD A,80H ； 10XXXX讀指令 ACALL SDT46 ；讀入地址 ACALL RDT46 ；讀定時(shí)器狀態(tài)數(shù)據(jù) 22 ACALL RDT46 DEC ADR46 MOV R3,A ；存入 R3 AJMP EX9346 SWRITE:MOVA,ADR46 ；寫入地址載入 A ADD A,40H ； 01XXXX寫指令 ACALL SDT46 ； 載入地址 MOV A,R5 ；載入定時(shí)器時(shí)鐘數(shù)據(jù) ACALL SDT46 ；寫入定時(shí)器時(shí)鐘數(shù)據(jù) MOV A,R4 ；載入定時(shí)器分鐘數(shù)據(jù) ACALL SDT46 ；寫入定時(shí)器分鐘數(shù)據(jù) INC ADR46 ；地址加 1 MOV A,ADR46 ；寫入地址載入 A ADD A,40H ； 01XXXX寫指令 ACALL SDT4