【正文】 間，并通過DS1307顯示當前時間，設(shè)定定時時間后，LED顯示倒計時，當定時時間到時，斷開繼電器并發(fā)出報警。 附 錄1. 初始化程序ORG 0000H LJMP CHSH ；設(shè)置主程序入口 ORG 0003H LJMP INTA ；設(shè)置INT0中斷服務(wù)程序入口ORG 000BHLJMP T0_SEV ；設(shè)置T0中斷服務(wù)程序入口ORG 0013H LJMP INTB ；設(shè)置INT1中斷服務(wù)程序入口ORG 0030HCHSH: MOV SP,60H ；初始化程序，設(shè)置堆棧MOV A, 00H ；A寄存器清0 MOV 0H, A ；存儲單元清0 MOV 31H, A MOV 32H, A MOV 33H, A MOV 34H, A MOV 35H, A CLR 26H CLR 27H CLR 28H CLR RS0 ；設(shè)置0工作區(qū) CLR RS1 MOV TMOD, 01H ；計數(shù)器初始化 MOV TH0, 0ECH MOV TL0, 78H MOV TCON, 10H MOV IE, 8FH ；開中斷MAIN: MOV 22H, 04H MOV 23H, 08H MOV 25H, 01 MOV 26H, 02 MOV 27H, 05LP2: MOV R1, 22H MOV R2, 23H LCALL OSC_Q ；啟動晶振RT: MOV R1, 22H MOV R2, 23HLCALL READ ；讀時間 LCALL BCDP26H: JNB 26H, P28H JNB 27H, RTNT: MOV R2, 34H CJNE R2, 0, J34HMOV R2, 35H CJNE R2, 0, J35H ；判斷定時時間到否 SETB SDA ；時間到，斷開繼電器 SETB 28H ；開蜂鳴器，發(fā)出報警 CLR SCL CLR 26H SJMP BBJ34H: DEC 34H ；定時時間倒計時 SJMP BBJ35H: DEC 35HMOV 34H, 59SJMP BBP28H: JB 8H, NT1 SJMP RTNT1: JB 27H, SCLH SJMP RTP36H: MOV R2, 36H CJNE R2, 59, J36H CLR 28H SETB SCL MOV 36H, 00H SJMP BBJ36H: INC 36HBB: CLR 27H LJMP RTBCD: MOV R7, 03 ；二進制數(shù)轉(zhuǎn)換成BCD碼MOV R1, 40H MOV R0, 2AHBCD1: MOV A, R0 ANL A, 0F0H SWAP AMOV R1, A INC R1 MOV A, R0 ANL A, 0FH MOV R1, A INC R1 DEC R0 DJNZ R7, BCD1 RETINTA: PUSH APUSH BPUSH PSWMOV 31H, 08H ；（31H）=08HMOV 29H, 00H ；（29H）=00HLP0: JB , NEXT0 ；，無鍵按下轉(zhuǎn)NEXT0LCALL DELAY1 ；有鍵按下，延時1msJB , LP0 ；判斷是否松開，否，再判斷LP1: JNB , LP1 ；是，轉(zhuǎn)LP0INC 29H ；，（29H）+1MOV 30H, 1HSJMP LO1NEXT0: JB SCL, L1 ；判斷SCL鍵，無鍵按下轉(zhuǎn)NEXT0LCALL DELAY1 ；有鍵按下，延時1msJB SCL, NEXT0LD1: JNB SCL, LD1MOV 29H, 0MOV 30H, 1DJNZ 31H, LO1 ； 是，（31H）1SJMP LLLO1: MOV A, 31HCJNE A, 08H, LO2 ；是否時針十位？否，轉(zhuǎn)LO2MOV A, 29HCJNE A, 03H, LA1 ；十位大于3嗎？否，轉(zhuǎn)LA1MOV 29H, D0H ；是的，清零LA1: MOV 40H, 29H ；（29H）→(40H)SJMP L1 ；轉(zhuǎn)L1LO2: MOV A, 31HCJNE A, 07H, LO3 ；是否時針個位？否，轉(zhuǎn)LO3MOV A, 40HCJNE A, 2, A1MOV A, 29HCJNE A, 4, LA2MOV 29H, 0SJMP LA2A1: MOV A, 29H CJNE A, 0AH, LA2 ；是大于9？否，轉(zhuǎn)LA2 MOV 29H, 00H ；（29H）清零LA2: MOV 41H, 29H ；（29H）→(41H)SJMP L1 ；轉(zhuǎn)到L1LO3: MOV A, 31HCJNE A, 06H, LO4 ；是分針十位嗎？否，轉(zhuǎn)LO4MOV A, 29HCJNE A, 06H, LA3 ；大于6？否，轉(zhuǎn)LA3MOV 29H, 00H ；（29H）清零LA3: MOV 42H, 29H ；（29H）→(42H) SJMP L1 ；轉(zhuǎn)L1LO4: MOV A, 29H CJNE A, 0AH, LA4 ；分針個位大于9？否，轉(zhuǎn)LA4 MOV 29H, 00H ；（29H）清零LA4: MOV 43H, 29H ；（29H）→(43H)L1: MOV A, 31HCJNE A, 04H, LP0 ；（31H）=0返回，否則轉(zhuǎn)LP0LL: MOV A, 40H ANL A, 0FH SWAP AADD A, 41HMOV 32H, AMOV A, 42HANL A, 0FHSWAP AADD A, 43HMOV 33H, APUSH PSWCLR RS0CLR RS1POP PSWPOP PSWPOP BPOP ASETB EX0CLR TR0MOV TH0, 0FFHMOV TL0, 00HSETB TR0SETB ET0MOV R1, 26HMOV R2, 25HMOV R0, 32HLCALL WRITE ；設(shè)置時間RETIT0_SEV: PUSH A ；LED定時掃描程序PUSH PSW ；保護現(xiàn)場SETB RS1 ；RSRS2=11HSETB RS0 ；選擇3組工作寄存器CLR TR0 ；停止T0定時控制器CLR ET0 ；停止T0中斷ETB EA ；關(guān)中斷MOV R2, 08H ；設(shè)置顯示器位數(shù)MOV R0, 40H ；設(shè)置段碼首地址MOV R1, 80H ；設(shè)置位碼首地址GO_ON: MOV A, R2 ；送顯示位數(shù)到ACJNE A, 31H, NO_FLASH；判斷是否閃爍位？否，轉(zhuǎn)移到NO_FLASHDJNZ 30H, FLASH ；是閃爍位，轉(zhuǎn)移到FLASHNO_FLASH: MOV P2, R1 ；送位碼到P2口MOV P0, R1 ；將段碼送到P0口LCALL DELAY1 ；調(diào)延時子程序FLASH: INC R0 ；段碼地址+1INC R1 ；位碼地址+1DJNZ R2, GO_ON ；判斷8位都顯示完否；沒完繼續(xù)顯示下位MOV P2, 00H ；8位都顯示完后，關(guān)顯示器MOV TH0, 0ECCH MOV TL0, 78H ；重置T0計數(shù)初值POP PSWPOP A ；恢復(fù)現(xiàn)場SETB ET0 ；允許T0中斷SETB TR0 ；啟動T0開始定時SETB EA ；開中斷RETI ；中斷返回DELAY1: MOV R3, 02H ；延時1ms子程序AGAIN: MOV R4, F9H DELAY: DJNZ R3, AGAIN RETINTB: SETB SETB SCLCLR EX0CLR EX1SETB EAPUSH APUSH BPUSH P