【導(dǎo)讀】來了很多的改變。尤其是單片機技術(shù)的應(yīng)用產(chǎn)品已經(jīng)隨著社會前進的步伐走進我。電子產(chǎn)品的應(yīng)用可謂多不勝數(shù)，電子萬年歷就是其中的一種。年歷的出現(xiàn)給人們的生活帶來的極大的方便。系統(tǒng)通過數(shù)碼管輸出顯示數(shù)據(jù)，可以顯示當前時間、公農(nóng)歷日期、星期、本設(shè)計著重要描述的就是基于AT89S52的單片機的電子萬年歷。程序）和各個接口模塊的功能及工作過程。本設(shè)計的主導(dǎo)思想是軟硬件相結(jié)合來。[關(guān)鍵詞]單片機；萬年歷；AT89S52；DS1302；于自動控制，智能化儀器，儀表，數(shù)據(jù)采集，軍工產(chǎn)品以及家用電器等各個領(lǐng)域，用對象的特點與軟件結(jié)合，以作完善。從前必須由模擬電路或數(shù)字電路實現(xiàn)的大部分功能，現(xiàn)在已能用。單片機通過軟件方法來實現(xiàn)了。

　　

【正文】 H MOV 32H,8EH MOV 31H,00H 。允許寫 1302 LCALL WRITE MOV 32H,90H MOV 31H,0A6H 。1302充電，充電電流 LCALL WRITE 。 主程序~~~~~~~~~~~ MAIN1: MOV 32H,8DH 。讀 出年 LCALL READ MOV year,31H MOV 32H,8BH。讀出星期 LCALL READ MOV week,31H MOV 32H,89H 。讀出月 LCALL READ MOV month,31H MOV 32H,87H 。讀出日 LCALL READ MOV day,31H MOV 32H,85H。讀出小時 LCALL READ MOV hour,31H MOV 32H,83H。讀出分鐘 LCALL READ MOV minute,31H MOV 32H,81H 。讀出秒 LCALL READ MOV second,31H 。~~~~ 分離緩存~~~~~ MOV R0,year 。年分離，送顯示緩存 LCALL DIVIDE MOV 7BH,R1 MOV 4BH,R1 MOV 7CH,R2 MOV 4CH,R2 MOV 78H,week MOV 48H,week MOV R0,month 。月分離，送顯示緩存 LCALL DIVIDE MOV 79H,R1 MOV 49H,R1 MOV 7AH,R2 MOV 4AH,R2 MOV R0,day 。日分離，送顯示緩存 LCALL DIVIDE MOV 76H,R1 MOV 46H,R1 MOV 77H,R2 MOV 47H,R2 MOV R0,hour 。小時分離，送顯示緩存 LCALL DIVIDE MOV 74H,R1 MOV 44H,R1 MOV 75H,R2 MOV 45H,R2 MOV R0,minute 。分鐘分離，送顯示緩存 LCALL DIVIDE MOV 72H,R1 MOV 42H,R1 MOV 73H,R2 MOV 43H,R2 MOV R0,second 。秒分離，送顯示緩存 LCALL DIVIDE MOV 70H,R1 MOV 40H,R1 MOV 71H,R2 MOV 41H,R2 CLR EA 成都工業(yè)學(xué)院 通信工程系畢業(yè)設(shè)計論文 27 LCALL TOUTOU SETB EA LCALL DISPLAY LCALL GENGXIAN 。更新農(nóng)歷程序 JNB ,SETG111 JNB F0,SSS CLR 。非閏月，則 清零 ,指示燈亮 LJMP MAIN1 SETG111: LJMP SETG SSS: SETB 。閏月，則 置位，指示燈不亮 LJMP MAIN1 。~~~~~~~ 溫度~~~~~~~~ TOUTOU: LCALL CHUSHI LCALL RDTEMP MOV A,TEMPL ANL A,11110000B MOV TEMPL,A MOV A,TEMPH ANL A,00000111B ORL A,TEMPL SWAP A MOV 25H,A MOV A,25H MOV B,64H DIV AB MOV A,B MOV B,0AH DIV AB SWAP A ORL A,B MOV 10H,A RET CHUSHI: LCALL RESET MOV A,0CCH LCALL WRITE111 MOV A,4EH LCALL WRITE111 MOV A,CONFIG12 LCALL WRITE111 RET RDTEMP: LCALL RESET MOV A,0CCH LCALL WRITE111 MOV A,44H LCALL WRITE111 LCALL DL1MS LCALL RESET MOV A,0CCH LCALL WRITE111 MOV A,0BEH LCALL WRITE111 LCALL ERAD111 MOV TEMPL,A LCALL ERAD111 MOV TEMPH,A RET RESET: LA: SETB DAT MOV 52H,200 LB: CLR DAT DJNZ 52H,LB SETB DAT MOV 52H,30 LC: DJNZ 52H,LC CLR C ORL C,DAT JC LB MOV 58H,80 LD: ORL C,DAT JC LP DJNZ 58H,LD SJMP LA LP: MOV 52H,250 LF: DJNZ 52H,LF RET WRITE111: MOV 53H,8 W51HA: SETB DAT MOV 54H,8 RRC A CLR DAT W52HA: DJNZ 54H,W52HA MOV DAT,C MOV 54H,30 W53HA: DJNZ 54H,W53HA DJNZ 53H,W51HA SETB DAT RET ERAD111: CLR EA MOV 58H,8 RD1A: CLR DAT MOV 54H,6 NOP SETB DAT RD2A: DJNZ 54H,RD2A MOV C,DAT RRC A MOV 55H,30 RD3A: DJNZ 55H,RD3A DJNZ 58H,RD1A SETB DAT RET 。公歷設(shè)置程序 ~~~~~~ 成都工業(yè)學(xué)院 通信工程系畢業(yè)設(shè)計論文 27 SETG : SETB TR1 SETB ET1 MOV 32H,8EH MOV 31H,00H 。允許寫 1302 LCALL WRITE MOV 32H,80H MOV 31H,80H 。1302 停止振蕩 LCALL WRITE GWAIT: 。~ LCALL DISPLAY JNB ,GWAIT SETG1: LCALL DISPLAY JNB ,SETG2 JNB ,GADDYEAR JNB ,JIANYEAR AJMP SETG1 GADDYEAR: MOV R7,66H 。年加一 LCALL ADD1 MOV 66H,A CJNE A,51H,GADDYEAR1 MOV 66H,00H AJMP GADDYEAR1 JIANYEAR: MOV R7,66H 。年減一 LCALL JIAN1 MOV 66H,A CJNE A,00H,GADDYEAR1 MOV 66H,51H GADDYEAR1: MOV 32H,8CH 。年值送人 1302 MOV 31H,66H LCALL WRITE MOV R0,66H LCALL DIVIDE 。年分離送顯示緩存 MOV 4BH,R1 MOV 7BH,R1 MOV 4CH,R2 MOV 7CH,R2 WAITT1: 。~~~~~~~ LCALL DISPLAY JNB ,WAITT1 JNB ,WAITT1 AJMP SETG1 SETG2: SETB 0AH 。調(diào)月時閃標志 GWAIT2: LCALL DISPLAY JNB ,GWAIT2 SETG3: LCALL DISPLAY JNB ,SETG4 JNB ,GADDMONTH JNB ,JIANMONTH AJMP SETG3 GADDMONTH: MOV R7,65H 。月加一 LCALL ADD1 MOV 65H,A CJNE A,13H,GADDMONTH1 MOV 65H,01H AJMP GADDMONTH1 JIANMONTH: MOV R7,65H 。月減一 LCALL JIAN1 MOV 65H,A CJNE A,00H,GADDMONTH1 MOV 65H,12H GADDMONTH1: MOV 32H,88H 。月值送人 1302 MOV 31H,65H LCALL WRITE MOV R0,65H LCALL DIVIDE 。月分離，送顯示緩存 MOV 79H,R1 MOV 49H,R1 MOV 7AH,R2 MOV 4AH,R2 WAITT2: LCALL DISPLAY JNB ,WAITT2 JNB ,WAITT2 AJMP SETG3 SETG4: SETB 0BH 。調(diào)日時閃標志 GWAIT4: LCALL DISPLAY JNB ,GWAIT4 SETG5: LCALL DISPLAY JNB ,SETG6 JNB ,GADDDAY JNB ,JIANDAY AJMP SETG5 GADDDAY: MOV R7,63H 。日加一 LCALL ADD1 MOV 63H,A CJNE A,32H,GADDDAY1 MOV 63H,01H JIANDAY: MOV R7,63H 。日減一 LCALL JIAN1 MOV 63H,A CJNE A,00H,GADDDAY1 成都工業(yè)學(xué)院 通信工程系畢業(yè)設(shè)計論文 27 MOV 63H,31H GADDDAY1: MOV 32H,86H 。日值送人 1302 MOV 31H,63H LCALL WRITE MOV R0,63H LCALL DIVIDE 。日分離，送顯示緩存 MOV 76H,R1 MOV 46H,R1 MOV 77H,R2 MOV 47H,R2 WAITT3: 。~~~ LCALL DISPLAY JNB ,WAITT3 JNB ,WAITT3 AJMP SETG5 SETG6: SETB 0CH 。調(diào)星期時閃標志 GWAIT6: LCALL DISPLAY JNB ,GWAIT6 SETG7: LCALL DISPLAY JNB ,SETG8 JNB ,GADDWEEK JNB ,JIANWEEK AJMP SETG7 GADDWEEK: MOV R7,64H 。星期加一 LCALL ADD1 MOV 64H,A CJNE A,07H,GADDWEEK1