【正文】 數(shù)（1小時），24次計數(shù)（1天），2231次計數(shù)（1個月），12次計數(shù)（1年）。圖53 計時子程序流程圖 圖54 顯示子程序流程圖 顯示子程序模塊的實現(xiàn)顯示原理在前面已給予了說明，流程圖如圖54所示。 圖55 時鐘設(shè)定子程流程圖 日期、定時設(shè)定子程序模塊的實現(xiàn)日期、定時的設(shè)定同時鐘設(shè)定。 誤差分析及校正當T0中斷時，需重裝定時初值，且要加上從斷開T0中斷到允許T0中斷共有13個周期，以減小誤差，故理論重裝定時初值為（TH0）=4CH，（TL0）=13H。本設(shè)計選用后者實現(xiàn)閃動，用定時器T1進行控制。 定時音與顯示相沖突問題及解決方案，頻率1K～2K，～1毫秒，小于6 毫秒，因顯示時每個數(shù)碼管顯示1毫秒，至少需要6毫秒，故蜂鳴器響時無法進行顯示。ORG 0020H START: MOV R0,20H 。50MS定時初值（T0計時用） MOV TH0,4CH MOV TL1,00H MOV TH1,4CH SETB EA SETB ET0 SETB TR0 MOV R4,14H START1: LCALL DISPLAY LCALL KEY JB ,$+6 DATE1: LCALL DATE JB ,$+6 TIMEA: LCALL TIME JB ,$+6 SETTIME1: LCALL SETTIME JB ,$+6 JNB 0EH,$+6 。TL=06H,TH=4CH ADD A,TL0 。重裝初值（高8位修正值） SETB TR0 DJNZ R4, $+5 。定時比較程序。鬧鈴2顯示標志位置位 SJMP RING TIME3: JNB 0DH,OUTTIME MOV A,31H CJNE A,3DH,OUTTIME MOV A,32H CJNE A,3EH,OUTTIME SETB 0AH 。 TIME: LCALL DL1S LCALL KEY JB ,$+5 SJMP $+5 LJMP START1 CLR ET0 CLR TR0 MOV 30H,00H SETB 05H SETB 06H 。等待鍵釋放 INC 32H MOV A,32H CJNE A,18H,$+6 MOV 32H,00H SETB 05H SETB 06H SJMP TIMEHOUR CLR 05H CLR 06H INC 32H MOV A,32H CJNE A,18H,$+6 MOV 32H,00H SJMP TIMEHOUR1 TIMEMIN: CLR 05H CLR 06H SETB 03H 。等待鍵釋放 INC 31H MOV A,31H CJNE A,3CH,$+6 MOV 31H,00H SETB 03H SETB 04H SJMP TIMEMIN1 CLR 03H CLR 04H INC 31H MOV A,31H CJNE A,3CH,$+6 MOV 31H,00H SJMP TIMEMIN2 TIMEOUT: CLR 03H CLR 04H CLR ET1 CLR TR1 MOV R4,14H SETB ET0 SETB TR0 LCALL DISPLAY LCALL KEY JNB ,$6 。 INTT1: PUSH ACC PUSH PSW MOV TL1,00H MOV TH1,4CH DJNZ R2,INTT1OUT MOV R2,06H JNB 01H,$+7 CPL 02H SJMP INTT1OUT JNB 03H,$+7 CPL 04H SJMP INTT1OUT JNB 05H,$+5 CPL 06H INTT1OUT: POP PSW POP ACC RETI。顯示時長 LCALL DL02S LCALL KEY JNB ,TIME1SET JNB ,DISPLAYTIME2 DJNZ 40H,$12 CLR 08H RET DISPLAYTIME2: CLR 08H SETB 09H LCALL DISPLAY LCALL KEY JNB ,$6 。顯示時長 LCALL DL02S LCALL KEY JNB ,$+9 JNB ,TIME3SET1 DJNZ 40H,$12 CLR 0AH LCALL DISPLAY LCALL KEY JNB ,$6 。等待鍵按下 JB ,$9 TIME1HOUR1: LCALL DL02S LCALL KEY JNB ,$+19 。等待鍵按下 JB ,$9 TIME1MIN2: LCALL DL02S LCALL KEY JNB ,$+19 。等待鍵按下 JB ,$9 INC 36H MOV A,36H CJNE A,02H,$+6 MOV 36H,00H CPL 0BH LCALL DISPLAY LCALL KEY JNB ,$6 。等待鍵按下 JB ,$9 TIME2HOUR1: LCALL DL02S LCALL KEY JNB ,$+19 。等待鍵按下 JB ,$9 TIME2MIN2: LCALL DL02S LCALL KEY JNB ,$+19 。等待鍵按下 JB ,$9 INC 39H MOV A,39H CJNE A,02H,$+6 MOV 39H,00H CPL 0CH LCALL DISPLAY