【正文】 SJMP MAIN_3 MAIN_2: LCALL DISPLAY1 SJMP MAIN_3 MAIN_3: JBC SEC, MAIN_4 SJMP MAIN_1MAIN_4: CPL L1 CPL L2 JNB WARNING,MAIN_5 CPL BEEP INC WARNCNT MOV A, WARNCNT XRL A, 08 JNZ MAIN_5 CLR WARNING MOV WARNCNT, 0 MAIN_6: SETB BEEP MAIN_5: MOV R6, 60 LCALL DEL20_0 SJMP MAIN_1 。****************************************************************。十六進制轉換為BCD碼子程序:HEX2BCD。入口:在BUF中（十六進制形式）。出口:分別存放在HOURH,HORUL,MINUH,MINUL四單元中。****************************************************************HEX2BCD: MOV R0, BUF MOV A, @R0 。取出十六進制數 MOV B, 10 。除以10達到高位BCD碼 CLR C DIV AB MOV HOURH, A 。商存入高位 MOV HOURL, B 。余數存入低位 INC R0 。指向第二字節(jié) MOV A, @R0 MOV B, 10 CLR C DIV AB MOV MINUH, A MOV MINUL, B RET 。****************************************************************。顯示子程序:DISPLAY。入口:待顯示數據在HOURH,HORUL,MINUH,MINUL中(BCD形式)。****************************************************************DISPLAY: LCALL HEX2BCD DISPLAY1: SETB DISPCON MOV A, HOURH ADD A, 30H MOVC A, @A+PC MOV SBUF, A DL1: JNB TI, DL1 CLR TI MOV A, HOURL ADD A, 24H MOVC A, @A+PC ANL A, 0FEH MOV SBUF, ADL2: JNB TI, DL2 CLR TI MOV A, MINUH ADD A, 16H MOVC A, @A+PC MOV SBUF, ADL3: JNB TI, DL3 CLR TI MOV A, MINUL ADD A, 0AH MOVC A, @A+PC MOV SBUF, ADL4: JNB TI, DL4 CLR TI CLR DISPCON RET。****************************************************************。0~9的段碼(共陽數碼管)。****************************************************************。74LS164的3 4 5 6 10 11 12 13 對應數碼管的A，B，C，D，E，F(xiàn)，G，DP。但是串口方式0發(fā)送的首位是最最低位,因此Q0~Q7中的Q0其實是最。高位,因此不能采用下面的的段碼表。SEGTAB: DB 0C0h,0F9H,0A4H,0B0H,99H 。 DB 92H,82H,0F8H,80H,90HSEGTAB: DB 03H,9FH,25H,0DH,99H DB 49H,41H,1FH,01H,09H DB 0FFH。****************************************************************。顯示子程序:DISPLAYNEW。入口:待顯示數據在R0所指向的緩沖區(qū)(BCD形式)。****************************************************************DISPLAYNEW: SETB DISPCON 。關閉顯示 MOV A, @R0 。取出小時數據 MOV DPTR, SEGTABN。指向段碼表首址 MOVC A, @A+DPTR 。取出段碼 MOV SBUF, A 。送入74LS164DNL1: JNB TI, DNL1 。等待發(fā)送完成 CLR TI INC R0 MOV A, @R0 。取出小時數據 MOVC A, @A+DPTR 。取出段碼 ANL A, 0FEH 。顯示時分分隔符:（） MOV SBUF, ADNL2: JNB TI, DNL2 CLR TI INC R0 MOV A, @R0 。取出小時數據 MOVC A, @A+DPTR 。取出段碼 MOV SBUF, ADNL3: JNB TI, DNL3 CLR TI INC R0 MOV A, @R0 。取出小時數據 MOVC A, @A+DPTR 。取出段碼 MOV SBUF, ADNL4: JNB TI, DNL4 CLR TI CLR DISPCON 。打開顯示 RET。****************************************************************。0~9的段碼(共陽數碼管)。****************************************************************。74LS164的3 4 5 6 10 11 12 13 對應數碼管的A，B，C，D，E，F(xiàn)，G，DP。但是串口方式0發(fā)送的首位是最最低位,因此Q0~Q7中的Q0其實是最告慰最。高位,因此不能采用下面的的段碼表。SEGTAB: DB 0C0h,0F9H,0A4H,0B0H,99H 。 DB 92H,82H,0F8H,80H,90HSEGTABN:DB 03H,9FH,25H,0DH,99H DB 49H,41H,1FH,01H,09H DB 0FFH 。****************************************************************。 。****************************************************************DISPLAYP: SETB DISPCON 。關閉顯示 MOV DPTR, PSEG CLR A MOVC A, @A+DPTR 。P.的段碼 MOV SBUF, A 。送入74LS164DPL1: JNB TI, DPL1 。等待發(fā)送完成 CLR TI MOV A, 0FFH MOV SBUF, ADPL2: JNB TI, DPL2 CLR TI MOV A, 0FFH MOV SBUF, ADPL3: JNB TI, DPL3 CLR TI MOV A, 0FFH MOV SBUF, ADPL4: JNB TI, DPL4 CLR TI CLR DISPCON 。打開顯示 RET 。****************************************************************。 。****************************************************************PSEG: DB 30H 。0CH。****************************************************************。12小時制的T0定時中斷子程序:TIMER0。定時時間為100ms,方式1的時間常數為3CB0H。每中斷1次,計數單元加1,10次為1s,到1s進行相應處理 。帶鬧鈴功能。誤差。****************************************************************TIMER0: PUSH ACC CLR FRESH CLR SEC MOV TH0, 3CH MOV TL0, 0B0H INC COUNT MOV A, COUNT JB TFIX, T0_00 XRL A, 10 SJMP T0_01T0_00: XRL A, N 。T0_01: JZ T0_1 POP ACC RETIT0_1: CLR TFIX SETB SEC MOV COUNT, 00H INC SECOND MOV A, SECOND XRL A, 60 JZ T0_2 POP ACC RETIT0_2: SETB FRESH MOV SECOND, 00H INC MINUL MOV A, MINUL XRL A, 0AH JZ T0_3 LJMP ADJUSTT0_3: MOV MINUL, 00H INC MINUH MOV A, MINUH XRL A, 06 JZ T0_30 LJMP ADJUSTT0_30: MOV MINUH, 00H INC HOURL MOV A, HOURH JZ T0_300 MOV A, HOURL XRL A, 03 JZ T0_4 LJMP ADJUSTT0_300: MOV A, HOURL XRL A, 0AH JZ T0_4 LJMP ADJUST T0_4: MOV HOURL, 00 INC HOURH MOV A, HOURH XRL A, 02 JZ T0_40 LJMP ADJUSTT0_40: MOV HOURH, 00 MOV HOURL, 01。 SETB TFIX 。 。時分發(fā)生改變時,必須進行鬧鈴判斷ADJUST: JB WARNSETTED, ADJUST_1 POP ACC RETIADJUST_1: MOV A, HOURH XRL A, WARNHH JNZ ADJUST_2 MOV A, HOURL XRL A, WARNHL JNZ ADJUST_2 MOV A, MINUH XRL A, WARNMH JNZ ADJUST_2 MOV A, MINUL XRL A, WARNML JNZ ADJUST_2 SETB WARNING POP ACC RETIADJUST_2: CLR WARNING POP ACC RETI。****************************************************************。T0定時初始化子程序:T0_INIT。定時時間為100ms,方式1的時間常數為3CB0H。****************************************************************T0_INIT: MOV TMOD, 11H 。T0，T1定時方式1 MOV TH0, 3CH MOV TL0, 0B0H RET 。****************************************************************。UART初始化子程序:UART_INIT。串口工作于方式0（移位寄存器方式）發(fā)送。TXD為時鐘輸出,RXD為數據輸出線,從D0到D7依次輸出。時鐘頻率為fosc/12(波特率)。*************************************************