【正文】 電子鐘共使用兩個(gè)4位一體數(shù)碼管(S02841AB)顯示；系統(tǒng)初始化程序****************************************************ORG 0000H AJMP MAIN ；轉(zhuǎn)到系統(tǒng)初始化程序 ORG 000BH AJMP PITO ；轉(zhuǎn)到定時(shí)器0中斷服務(wù)程序 ORG 0100H MAIN: MOV SP, 60H ；確立堆棧區(qū) MOV TMOD, 01H ；設(shè)定定時(shí)器0為工作方式1 MOV TL0, 0DCH ；裝計(jì)數(shù)器初值 MOV TH0, 0BH CLR CLR TR0H ；TR0置“0”，定時(shí)關(guān)閉 SETB EAH ；EA置“1”，中斷總允許 SETB ET0H ；ET0置“1”，定時(shí)器0中斷 允許 MOV 30H, 10H ；循環(huán)次數(shù) MOV 7EH, 0AH ； MOV R0, 79H MOV R1, 05H PP: MOV R0, 0BH INC R0 DJNZ R1, PP MOV R0, 31H ；時(shí)、分、秒值存儲(chǔ)單元清零 MOV R1, 06H Q00: MOV R0, 00H INC R0 DJNZ R1, Q00；監(jiān)控程序********************************************************** LOOP: LCALL DIR ；調(diào)顯示子程序 LCALL KEY ；調(diào)鍵掃描子程序 LOOP1: JB , KEYA ；A鍵是否按下，是跳轉(zhuǎn)到A鍵功能程序 JB , KEYB ；B鍵是否按下，是跳轉(zhuǎn)到B鍵功能程序 JB , KEYC ；C鍵是否按下，是跳轉(zhuǎn)到C鍵功能程序JB , KEYD ；D鍵是否按下，是跳轉(zhuǎn)到D鍵功能程序 LCALL DIR LJMP LOOP ；跳轉(zhuǎn)到監(jiān)控程序；A鍵功能子程序**************************************************** KEYA: CPL TR0H ；開啟/關(guān)閉定時(shí)器 SETB AJMP LOOP ；返回；B鍵功能子程序**************************************************** KEYB: JB TR0H, KEYBO ；定時(shí)器是否運(yùn)行，是跳轉(zhuǎn) JNB , KEYBOO MOV R0, 36H ；時(shí)值存儲(chǔ)單元地址送R0 LCALL DAAD1 ；調(diào)加1子程序 MOV A, R3 ；時(shí)值加1后的值送累加器A XRL A, 24H JNZ KEYBO ；時(shí)值是否到24時(shí)，否返回 LCALL CLR0 ；時(shí)值存儲(chǔ)單元清零 KEYBO: MOV 7DH, 35H MOV 7EH, 36H KEYBOO: LJMP LOOP ；返回監(jiān)控程序；C鍵功能子程序**************************************************** KEYC: JB 8CH, KEYCO ；定時(shí)器是否運(yùn)行，否跳轉(zhuǎn) JNB , KEYCOO MOV R0, 34H ；分值存儲(chǔ)單元地址送R0 LCALL DAAD1 ；調(diào)加1子程序 MOV A, R3 ；分值加1后的值送累加器A XRL A, 60H JNZ KEYCO ；分值是否到60分，否返回 LCALL CLR0 ；分值存儲(chǔ)單元清零 KEYCO: MOV 7CH, 34H MOV 7BH, 33H KEYCOO: LJMP LOOP ；返回監(jiān)控程序；D鍵功能子程序**************************************************** KEYD: JB 8CH, KEYDO ；定時(shí)器是否運(yùn)行，否跳轉(zhuǎn) JNB , KEYDOO MOV R0, 32H ；秒值存儲(chǔ)單元地址送R0 LCALL DAAD1 ；調(diào)加1子程序 MOV A, R3 ；秒值加1后的值送R0 XRL A, 60H JNZ KEYDO ；秒值是否到60秒，否返回 LCALL CLR0 ；秒值存儲(chǔ)單元清0 KEYDO: MOV 79H, 31H MOV 7AH, 32H KEYDOO: LJMP LOOP ；返回監(jiān)控程序；中斷服務(wù)程序****************************************************** PITO: PUSH PSW ；中斷服務(wù)程序，現(xiàn)場(chǎng)保護(hù) PUSH A SETB RS0 ；選第三組通用寄存器 SETB RS1 MOV TL0, 0DCH ；計(jì)數(shù)器重新加載 MOV TH0, 0BH MOV A, 30H ；循環(huán)次數(shù)減1 DEC A MOV 30H, A JNZ RETO ；不滿16次，轉(zhuǎn)RET0返回 MOV 30H, 10H ；滿16次開始計(jì)時(shí)操作 MOV R0, 32H ；秒顯示單元地址 ACALL DAAD1 ；秒加1 MOV A, R3 ；加1后秒值在R3中 XRL A, 60H ；判是否到60秒 JNZ RETO ；不到轉(zhuǎn)RET0返回 ACALL CLR0 ；到60秒顯示單元清0 MOV R0, 34H ；分顯示單元地址 ACALL DAAD1 ；分加1 MOV A, R3 ；加1后分值在R3中 XRL A, 60H ；判是否到60分 JNZ RETO ；不到轉(zhuǎn)RET0返回 ACALL CLR0 ；到60分顯示單元清0 MOV R0, 36H ；時(shí)顯示單元地址 ACALL DAAD1 ；時(shí)加1 MOV A, R3 ；加1后時(shí)值在R3中 XRL A, 24H ；判是否到24時(shí) JNZ RETO ；不到轉(zhuǎn)RET0返回 ACALL CLR0 ；到24時(shí)顯示單元清0 RETO: CLR RS0 ；返回第0組通用寄存器 CLR RS1 POP A ；現(xiàn)場(chǎng)恢復(fù) POP PSW MOV 79H, 31H ；時(shí)、分、秒值放緩沖區(qū) MOV 7AH, 32H MOV 7BH, 33H MOV 7CH, 34H MOV 7DH, 35H MOV 7EH, 36H RETI ；中斷返回；加1子程序************************************