【導(dǎo)讀】題目：基于MCS-51單片機的數(shù)字鐘設(shè)計

　　

【正文】 ** 。從 1302中讀出數(shù)據(jù)放在 67H(高兩位年 )66H(低兩位年 )65H(月 )64H(星期 ) 。63H(日 )62H([小 ]時 )61H(分 )60H(秒 )57H(農(nóng)歷月 )56H(農(nóng)歷日 ) 。顯示緩存單元 7CH7BH(4CH4BH)(年低位 ),7AH79H(4AH49H)月 ,78H(48H)星期 。77H76H(47H46H)日 ,75H74H(45H44H)[小 ]時 ,73H72H(43H42H)分 。71H70H(41H40H)秒 ,5EH5DH(55H54H)農(nóng)歷年 。5CH5BH(53H52H)農(nóng)歷月 ,5AH59H(51H50H)農(nóng)歷日 。閏月標志為 F0，定時器 T1為調(diào)整時間閃爍用。 。 。 SCLK EQU IO EQU RST EQU year DATA 66H month DATA 65H week DATA 64H day DATA 63H hour DATA 62H mintue DATA 61H second DATA 60H DS1302_ADDR DATA 32H DS1302_DATA DATA 31H ORG 0000H AJMP START ORG 0003H RETI ORG 000BH RETI ORG 001BH LJMP INTT1 ORG 0023H RETI ORG 002BH RETI 。*************************** 。* 主 程 序 * 。*************************** 基于 MCS51單片機的數(shù)字鐘設(shè)計 33 START: SETB EA MOV SCON,00H 。串行輸出，方式 0 MOV TMOD,10H 。計數(shù)器 1，方式 1 MOV TL1,00H MOV TH1,00H MOV DS1302_ADDR,8EH MOV DS1302_DATA,00H 。允許寫 1302 LCALL WRITE MOV DS1302_ADDR,90H MOV DS1302_DATA,0A6H 。1302充電，充電電流 LCALL WRITE MAIN1: MOV DS1302_ADDR,8DH 。讀出年 LCALL READ MOV year,DS1302_DATA MOV DS1302_DATA,8BH 。讀出星期 LCALL READ MOV week,DS1302_DATA MOV DS1302_ADDR,89H 。讀出月 LCALL READ MOV month,DS1302_DATA MOV DS1302_ADDR,87H 。讀出日 LCALL READ MOV day,DS1302_DATA MOV DS1302_ADDR,85H 。讀出 [小 ]時 LCALL READ MOV hour,DS1302_DATA MOV DS1302_ADDR,83H 。讀出分 LCALL READ MOV mintue,DS1302_DATA MOV DS1302_ADDR,81H 。讀出秒 LCALL READ MOV second,DS1302_DATA 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 基于 MCS51單片機的數(shù)字鐘設(shè)計 34 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 LCALL DISPLAY LCALL GENGXIAN 。更新農(nóng)歷程序 JNB ,SETG JNB F0,SSS CLR 。閏月， 則 0，指示燈亮 LJMP MAIN1 SSS: SETB 。非閏月，則 ，指示燈滅 LJMP MAIN1 。*************************** 。* 公 歷 設(shè) 置 程 序 * 。*************************** SETG: SETB TR1 SETB ET1 CLR 08H CLR 09H CLR 0AH CLR 0BH CLR 0CH 基于 MCS51單片機的數(shù)字鐘設(shè)計 35 CLR 0DH CLR 0EH CLR 0FH MOV DS1302_ADDR,8EH MOV DS1302_DATA,00H 。允許寫 1302 LCALL WRITE MOV DS1302_ADDR,80H MOV DS1302_DATA,80H 。1302停止振蕩 LCALL WRITE GWAIT: LCALL DISPLAY JNB ,GWAIT SETG1: LCALL DISPLAY JNB ,SETG2 JNB ,GADDYEAR AJMP SETG1 GADDYEAR: MOV R7,66H 。年加 1 LCALL ADD1 MOV 66H,A CJNE A,51H,GADDYEAR1 MOV 66H,01H GADDYEAR1: MOV DS1302_ADDR,8CH 。年值送入 1302 MOV DS1302_DATA,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 AJMP SETG1 SETG2: SETB 0AH 。調(diào)月時閃標志 GWAIT2: LCALL DISPLAY JNB ,GWAIT2 SETG3: LCALL DISPLAY JNB ,SETG4 JNB AJMP SETG3 GADDMONTH: MOV R7,65H 。月加 1 LCALL ADD1 MOV 65H,A CJNE A,13,GADDMONTH1 基于 MCS51單片機的數(shù)字鐘設(shè)計 36 MOV 65H,01H GADDMONTH1: MOV DS1302_ADDR,88H 。月值送入 1302 MOV DS1302_DATA,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 AJMP SETG3 SETG4: SETB 0BH 。調(diào)日時閃標志 GWAIT4: LCALL DISPLAY JNB ,GWAIT4 SETG5: LCALL DISPLAY JNB ,SETG6 JNB ,GADDDAY AJMP SETG5 GADDDAY: MOV R7,63H 。日加 1 LCALL ADD1 MOV 63H,A CJNE A,32H,GADDDAY1 MOV 63H,01H GADDDAY1: MOV DS1302_ADDR,86H 。日值送入 1302 MOV DS1302_DATA,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 AJMP SETG5 SETG6: SETB 0CH 。調(diào)星期時閃標志 GWAIT6: LCALL DISPLAY JNB ,GWAIT6 SETG7: LCALL DISPLAY JNB ,SETG8 JNB ,GADDWEEK AJMP SETG7 基于 MCS51單片機的數(shù)字鐘設(shè)計 37 GADDWEEK: MOV R7,64H LCALL ADD1 MOV 64H,A CJNE A,08,GADDWEEK1 MOV 64H,01H GADDWEEK1: MOV DS1302_ADDR,8AH 。星期值送入 1302 MOV DS1302_DATA,64H LCALL WRITE MOV R0,64H LCALL DIVIDE 。星期分離送顯示緩存 MOV 48H,R1 MOV 78H,R1 WAITT4: LCALL DISPLAY JNB ,WAITT4 AJMP SETG7 SETG8: SETB 0DH 。調(diào) [小 ]時時閃標志 GWAIT8: LCALL DISPLAY JNB ,GWAIT8 SETG9: LCALL DISPLAY JNB ,SETG10 JNB ,GADDHOUR AJMP SETG9 GADDHOUR: MOV R7,62H 。[小 ]時加 1 LCALL ADD1 MOV 62H,A CJNE A,24H,GADDHOUR1 MOV 62H,00H GADDHOUR1: MOV DS1302_ADDR,84H 。[小 ]時值送入 1302 MOV DS1302_DATA,62H LCALL WRITE MOV R0,62H LCALL DIVIDE 。[小 ]時分離送顯示緩存 MOV 74H,R1 MOV 44H,R1 MOV 75H,R2 MOV 45H,R2 WAITT5: LCALL DISPLAY JNB ,WAITT5 AJMP SETG9 SETG10: SETB 0EH 。調(diào)分時閃標志 GWAIT10: LCALL DISPLAY JNB ,GWAIT10 SETG11: LCALL DISPLAY JNB ,SETGOUT 基于 MCS51單片機的數(shù)字鐘設(shè)計 38 JNB ,GADDMINTUE AJMP SETG11 GADDMINTUE: MOV R7,61H 。分加 1 LCALL ADD1 MOV 61H,A CJNE