【導讀】星期、小時、分、秒，除此之外還有顯示潤年，記憶時間。DS1302可以對年、月、對于數字電子萬年歷采用它,具有較準的計時。參考文獻…………………附錄……………………把握,從而適應社會需要.來越普及，特別是適合在家庭居室、辦公室、大廳、會議室和廣場使用。不斷的研究，不斷的進步。美國DALLAS公司推出的具有涓細電流充電能的低功。耗實時時鐘電路DS1320。它可以對年、月、日、周日、時、分、秒進行計時，還。具有潤年補償的多種功能，而且DS1320的使用壽命長，誤差小。使用Atmel公司高密度非易失性存儲器技術制造，與工業(yè)。80C51產品指令和引腳完全兼容。亦適于常規(guī)編程器。在單芯片上，擁有靈巧的8位CPU和在系統(tǒng)可編程。AT89S52具有以下標準功能：8k字節(jié)Flash，256字節(jié)RAM，32位I/O. 量2級中斷結構，全雙工串行口，片內晶振及時鐘電路。降至0Hz靜態(tài)邏輯操作，支持2種軟件可選擇節(jié)電模式?？臻e模式下，CPU停。止工作，允許RAM、定時器/計數器、串口、中斷繼續(xù)工作。掉電保護方式下，

　　

【正文】 JNZ CON_24 MOV A,100 。年有效數 099 CON_24: DEC A MOV CONvert_yeAr,A MOV A,dpl CLR C SUBB A,3 MOV dpl,A JNC CON_26 DEC dph 。表格指針指向上一年 CON_26: MOV A,temp_Byte5 CLR C SUBB A,temp_Byte4 MOV temp_Byte3,A 。temp_Byte3 中為當前日離春節(jié)的天數 MOV CONvert_mONth,12 。農歷月為 12 月 CLR f0 。19012099 年沒有閏 12 月 ,清閏月標志 CLR A MOVC A,@A+dptr 制作單片機 AT89S52 的萬年歷 24 ANL A,0f0h SWAP A。 MOV temp_Byte4,A 。temp_Byte4 中為閏月 JZ CON_30 。沒有閏月轉移 MOV A,2 。有閏月 ,取第 13 個月天數 MOVC A,@A+dptr MOV C, MOV A,1 MOVC A,@A+dptr RLC A 。ACC 中為最后 6 個月的大小值 SJMP CON_34 CON_30: MOV A,1 MOVC A,@A+dptr 。ACC 中為最后 6 個月的大小值 CON_34: MOV temp_Byte5,A CON_40: MOV A,temp_Byte5 RRC A MOV temp_Byte5,A JC CON_42 MOV B,29 。小月 29 天 SJMP CON_44 CON_42: MOV B,30 。大月 30 天 CON_44: MOV A,temp_Byte3 CLR C SUBB A,B JZ CON_46 。正好夠減 ,就是農歷日 1 日 JNC CON_50 。不夠減一月天數 ,結束農歷月調整 CPL A 。求補取絕對值 INC A CON_46: INC A 。加 1 即為農歷日 MOV B,10 。轉換并保存農歷日 ,月 ,年 DIV AB SWAP A ORL A,B MOV CONvert_dAte,A MOV A,CONvert_mONth MOV B,10 DIV AB SWAP A ORL A,B MOV C,f0 MOV ,C MOV CONvert_mONth,A MOV A,CONvert_yeAr MOV B,10 DIV AB SWAP A ORL A,B MOV CONvert_yeAr,A RET 。結束轉換 CON_50: MOV temp_Byte3,A 。temp_Byte3 存減去一月后的天數 JB f0,CON_52 。是閏月 ,前推一月 ,月份不減 DEC CONvert_mONth。 CON_52: MOV A,CONvert_mONth CJNE A,temp_Byte4,CON_54 CPL f0 。當前月與閏月相同 ,更改閏月標志 CON_54: SJMP CON_40 CON_60: MOV A,temp_Byte4 。春節(jié)日小于當前日 , 農歷年同公歷年 CLR C SUBB A,temp_Byte5 MOV temp_Byte4,A JNC CON_62 DEC temp_Byte3 。temp_Byte3 temp_Byte4 中為公歷日離春節(jié)的天數 CON_62: MOV CONvert_mONth,1 。農歷月為 1 月 CLR A MOVC A,@A+dptr MOV temp_Byte5,A ANL A,0f0h SWAP A。 XCH A,temp_Byte5 。temp_Byte5 中為閏月 , ACC 為當年農歷表第一字節(jié) CLR f0 。第一個月肯定不是閏月 ANL A,0fh MOV temp_Byte1,A MOV A,1 MOVC A,@A+dptr MOV temp_Byte2,A ANL A,0f0h ORL A,temp_Byte1 SWAP A MOV temp_Byte1,A 制作單片機 AT89S52 的萬年歷 25 MOV A,2 MOVC A,@A+dptr MOV C, MOV A,temp_Byte2 ANL A,0fh SWAP A MOV ,C。 MOV temp_Byte2,A 。以上 temp_Byte1, temp_Byte2 各 BIT 存農歷年大小 CON_70: MOV A,temp_Byte2 RLC A MOV temp_Byte2,A MOV A,temp_Byte1 RLC A MOV temp_Byte1,A JC CON_72 MOV B,29 。小月 29 天處理 SJMP CON_74 CON_72: MOV B,30 。大月 30 天 CON_74: MOV A,temp_Byte4 CLR C SUBB A,B JNC CON_78 。低字節(jié)夠減跳轉 MOV B,A 。低字節(jié)不夠減 , B 暫存減后結果 , MOV A,temp_Byte3 JZ CON_76 。高字節(jié)為 0,不夠減 DEC temp_Byte3 MOV temp_Byte4,B SJMP CON_80 CON_76: MOV A,temp_Byte4 LJMP CON_46 。轉日期加 1 后 , 處理并保存轉換后農歷年月日 CON_78: MOV temp_Byte4,A 。temp_Byte3 temp_Byte4 天數為減去一月后天數 CON_80: MOV A,CONvert_mONth CJNE A,temp_Byte5,CON_82 CPL f0 。當前月與閏月相同 ,更改閏月標志 JNB f0,CON_82 。更改標志后是非閏月 ,月份加 1 SJMP CON_70 CON_82: INC CONvert_mONth。 SJMP CON_70 get_dAys_lOw: MOVC A,@A+PC 。取得常年過去月的天數的低字節(jié) RET DB 0,31,59,90,120,151,181,212,243,17,48,78 get_ruN_dAys_lOw: MOVC A,@A+PC 。取得閏年過去月的天數的低字節(jié) RET DB 0,31,60,91,121,152,182,213,244,18,49,79 mONth_dAtA: 。公歷年對應的農歷數據 ,每年三字節(jié) , 。格式第一字節(jié) BIT74 位表示閏月月份 , 值為 0 為無閏月 ,BIT30 對應農歷第 14 月的大小 。第二字節(jié) BIT70 對應農歷第 512 月大小 , 第三字節(jié) BIT7 表示農歷第 13 個月大小 。月份對應的位為 1 表示本農歷月大 (30 天 ), 為 0 表示小 (29 天 ). 。第三字節(jié) BIT65 表示春節(jié)的公歷月份 , BIT40 表示春節(jié)的公歷日期 DB 004h,0Aeh,053h。 1901。 DB 00Ah,057h,048h。 1902 DB 055h,026h,0Bdh。 1903 DB 00dh,026h,050h。 1904 DB 00dh,095h,044h。 1905 DB 046h,0AAh,0B9h。 1906 DB 005h,06Ah,04dh。 1907 DB 009h,0Adh,042h。 1908 DB 024h,0Aeh,0B6h。 1909 DB 004h,0Aeh,04Ah。 1910 DB 06Ah,04dh,0Beh。 1911 DB 00Ah,04dh,052h。 1912 DB 00dh,025h,046h。 1913 DB 05dh,052h,0BAh。 1914 DB 00Bh,054h,04eh。 1915 DB 00dh,06Ah,043h。 1916 DB 029h,06dh,037h。 1917 DB 009h,05Bh,04Bh。 1918 DB 074h,09Bh,0C1h。 1919 DB 004h,097h,054h。 1920 DB 00Ah,04Bh,048h。 1921 DB 05Bh,025h,0BCh。 1922 DB 006h,0A5h,050h。 1923 DB 006h,0d4h,045h。 1924 制作單片機 AT89S52 的萬年歷 26 DB 04Ah,0dAh,0B8h。 1925 DB 002h,0B6h,04dh。 1926 DB 009h,057h,042h。 1927 DB 024h,097h,0B7h。 1928 DB 004h,097h,04Ah。 1929 DB 066h,04Bh,03eh。 1930 DB 00dh,04Ah,051h。 1931 DB 00eh,0A5h,046h。 1932 DB 056h,0d4h,0BAh。 1933 DB 005h,0Adh,04eh。 1934 DB 002h,0B6h,044h。 1935 DB 039h,037h,038h。 1936 DB 009h,02eh,04Bh。 1937 DB 07Ch,096h,0Bfh。 1938 DB 00Ch,095h,053h。 1939 DB 00dh,04Ah,048h。 1940 DB 06dh,0A5h,03Bh。 1941 DB 00Bh,055h,04fh。 1942 DB 005h,06Ah,045h。 1943 DB 04Ah,0Adh,0B9h。 1944 DB 002h,05dh,04dh。 1945 DB 009h,02dh,042h。 1946 DB 02Ch,095h,0B6h。 1947 DB 00Ah,095h,04Ah。 1948 DB 07Bh,04Ah,0Bdh。 1949 DB 006h,0CAh,051h。 1950 DB 00Bh,055h,046h。 1951 DB 055h,05Ah,0BBh。 1952 DB 004h,0dAh,04eh。 1953 DB 00Ah,05Bh,043h。 1954 DB 035h,02Bh,0B8h。 1955 DB 005h,02Bh,04Ch。 1956 DB 08Ah,095h,03fh。 1957 DB 00eh,095h,052h。 1958 DB 006h,0AAh,048h。 1959 DB 07Ah,0d5h,03Ch。 1960 DB 00Ah,0B5h,04fh。 1961 DB 004h,0B6h,045h。 1962 DB 04Ah,057h,039h。 1963 DB 00Ah,057h,04dh。 1964 DB 005h,026h,042h。 1965 DB 03eh,093h,035h。 1966 DB 00dh,095h,049h。 1967 DB 075h,0AAh,0Beh。 1968 DB 005h,06Ah,051h。 1969 DB 009h,06dh,046h。 1970 DB 054h,0Aeh,0BBh。 1971 DB 004h,0Adh,04fh。 1972 DB 00Ah,04dh,043h。 1973 DB 04dh,026h,0B7h。 1974 DB 00dh,025h,04Bh。 1975 DB 08dh,052h,0Bfh。 1976 DB 00Bh,054h,052h。 1977 DB 00Bh,06Ah,047h。 1978 DB 069h,06dh,03Ch。 1979 DB 009h,05Bh,050h。 1980 DB 004h,09Bh,045h。 1981 DB 04Ah,04Bh,0B9h。 1982 DB 00Ah,04Bh,04dh。 1983 DB 0ABh,025h,0C2h。 1984 DB 006h,0A5h,054h。 1985 DB 006h,0d4h,049h。 1986 DB 06Ah,0dAh,03dh。 1987 DB 00Ah,0B6h,051h。 1988 DB 009h,037h,046h。 1989 DB 054h,097h,0BBh。 1990 DB 004h,097h,04fh。 1991 DB 006h,04Bh,044h。 1992 DB 036h,0A5h,037h。 1993 DB 00eh,0A5h,04Ah。 1994 DB 086h,0B2h,0Bfh。 1995 DB 005h,0ACh,053h。 1996 DB 00Ah,0B6h,047h。 1997 DB 059h,036h,0BCh。 1998 DB 009h,02eh,050h。 1999 DB 00Ch,096h,045h。 2021 DB 04dh,04Ah,0B8h。 2021 DB 00dh,04Ah,04Ch。 2021 DB 00dh,0A5h,041