【導(dǎo)讀】時(shí)間，并可以通過按鍵輸入調(diào)整的萬年歷時(shí)鐘。教材、元器件數(shù)據(jù)手冊(cè)、網(wǎng)上相關(guān)資料。設(shè)計(jì)原理圖、電路圖、程序流程圖，仿真調(diào)試過程抓圖、正常工作圖片。以及上述文檔的電子稿。設(shè)計(jì)、分析電原理圖。本文介紹了基于AT89C51單片機(jī)的多功能電子萬年歷的硬件結(jié)構(gòu)和軟硬件設(shè)計(jì)方法。AT89C51單片機(jī)為控制器，以串行時(shí)鐘日歷芯片DS1302記錄日歷和時(shí)間，它可以對(duì)年、月、日、時(shí)、分、秒進(jìn)行計(jì)時(shí)，還具有閏年補(bǔ)償?shù)榷喾N功能。萬年歷采用直觀的數(shù)字顯示，可以在LED上同時(shí)顯示。樣、電路簡潔、成本低廉等諸多優(yōu)點(diǎn)，具有廣闊的市場(chǎng)前景。

　　

【正文】 42H 。 DA4 EQU 43H 。 DA5 EQU 44H 。 DA6 EQU 45H 。 DA7 EQU 46H 。 DA8 EQU 47H 。 DA9 EQU 48H 。第九個(gè)顯示緩存 。定義位標(biāo)志 XSBZ BIT 00H 。 T0BZ BIT 01H 。 BLBZ BIT 02H 。 LED1 BIT 。 1 。定義端口 。程序部分 ORG 0000H LJMP MAIN 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 21 ORG 0003H 。 LJMP WZD0 ORG 0013H 。 LJMP T0ZD // ORG 000BH 。 // LJMP WZD1 // ORG 001BH 。 // LJMP T1ZD // ORG 0023H 。 // LJMP UAZD ORG 0030H TAB1: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H 。共陰段碼 DB 7FH,6FH,77H,7CH,39H,5EH,79H,71H,00H TAB2: DB 0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82 。共陽顯示段碼 DB 0xf8,0x80,0x90,0x88,0x83,0xa7,0xa1 。0F,全滅 DB 0x86,0x8e,0xff MAIN: MOV SP,5FH 。 MOV A,0FFH 。 MOV P0,A 。 MOV P1,A MOV P2,A MOV P3,A MOV TMOD,20H 。T1 方式 1 MOV TH0,3CH 。50ms 定時(shí) MOV TL0,0B0H 。 // MOV SCON,50H 。方式 1，開接收 // MOV PCON,00H 。不加倍 SETB TR0 。打開 T1 SETB ET0 。開 T0中斷 SETB EA ?？傊袛? 22 MOV R7,9 。初始化顯示緩存區(qū) MOV DPTR,TAB2 。送入 09 段碼 MOV R0,30H 。變量首地址 MOV R1,40H 。顯緩首地址 CSXS: CLR A 。 MOV @R0,A 。清變量 MOVC A,@A+DPTR 。讀入段碼 MOV @R1,A 。送到顯緩 INC R1 。地址加一 INC R0 。 INC DPTR 。 DJNZ R7,CSXS 。 SETB XSBZ 。置顯示標(biāo)志 LOOP: NOP。 CALL T0CL 。調(diào)定時(shí)處理 CALL XSZC 。調(diào)顯示輸出 CALL SJCL 。調(diào)數(shù)據(jù)處理 SJMP LOOP 。 SJCL: JB BLBZ,SJCL1 。數(shù)據(jù)處理，有要求？ RET SJCL1: MOV R0,40H 。Y，顯緩首址 MOV DPTR,TAB2 。段碼表首地址 MOV A,MER 。月份拆分 MOV B,10 。十位數(shù)取出 DIV AB 。 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 INC R0 。指向下一顯緩 MOV A,B 。取個(gè)位 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 23 INC R0 MOV A,RER 。日拆分 MOV B,10 。十位數(shù)取出 DIV AB 。 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 INC R0 。指向下一顯緩 MOV A,B 。取個(gè)位 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 INC R0 。 MOV A,SER 。時(shí)拆分 MOV B,10 。十位數(shù)取出 DIV AB 。 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 INC R0 。指向下一顯緩 MOV A,B 。取個(gè)位 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 INC R0 。 MOV A,FER 。分拆分 MOV B,10 。十位數(shù)取出 DIV AB 。 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 INC R0 。指向下一顯緩 MOV A,B 。取個(gè)位 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 INC R0 。 24 MOV A,XQR 。星期拆分 MOVC A,@A+DPTR 。取段碼 MOV @R0,A 。送顯緩 SETB XSBZ 。 RET XSZC: JB XSBZ,XSC0 。 有顯示要求？ RET 。 XSC0: CLR XSBZ 。有，清標(biāo)志 MOV R7,9 。9 個(gè)單元 MOV R6,00H 。第一單元位碼 MOV R1,40H 。 XSC1: MOV A,R6 。送出位碼 MOV P2,A 。 MOV A,@R1 。送出段碼 MOV P0,A 。 INC R1 。 地址加一 INC R6 。 DJNZ R7,XSC1 。 RET T0CL: JB T0BZ,T0CL0 。 RET T0CL0: CLR T0BZ 。 INC K 。 MOV A,K 。 CJNE A,10,TCLM 。 MOV K,0 。 CPL LED1 INC MMR 。 MOV A,MMR 。 CJNE A,120,TCLM 。 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 25 MOV MMR,0 。 INC FER 。 MOV A,FER 。 CJNE A,60,TCLM1 。 MOV FER,0 。 INC SER 。 MOV A,SER 。 CJNE A,24,TCLM1 。 MOV SER,0 。 INC XQR 。 MOV A,XQR 。 CJNE A,8,T0CL1 。 MOV XQR,0 。 INC XQR T0CL1: INC RER 。 MOV A,RER 。 CJNE A,32,TCLM1 。 MOV RER,0 。 INC RER INC MER 。 MOV A,MER 。 CJNE A,13,TCLM1 。 MOV MER,0 。 INC MER TCLM1: SETB BLBZ 。 TCLM: NOP RET 。中斷程序 WZD0: NOP 。 RETI WZD1: NOP 26 RETI T0ZD: NOP 。 MOV TH0,3CH 。50ms 定時(shí) MOV TL0,0B0H 。 SETB T0BZ 。 RETI T1ZD: NOP RETI UAZD: NOP PUSH PSW PUSH ACC JNB RI,UAZD1 。 CLR RI 。 MOV A,SBUF 。 MOV DPTR,TAB1 。 MOVC A,@A+DPTR 。 MOV P0,A 。 UAZD1: CLR TI 。 POP ACC POP PSW RETI END