单片机阳历转阴历程序

经过本人对函数的优化修改，编译后代码比原来少了近300 字节。

/****************************************************/

/* 获取当前日期的农历及星期*/

/****************************************************/

/*==================================================*/

/*公历年对应的农历数据,每年三字节, 格式: */ /*第一字节BIT7-4 位表示闰月月份,值为0 为无闰月, */ /*BIT3-0 对应农历第1-4 月的大小*/

/*第二字节BIT7-0 对应农历第5-12 月大小, */

/*第三字节BIT7 表示农历第13 个月大小月份对应的位*/ /*为1 表示本农历月大(30 天),为0 表示小(29 天) */ /*第三字节BIT6-5 表示春节的公历月份,BIT4-0 表示春节的公历日期*/

/*类型:Byte:unsigned char Word:unsigned int */ /*本代码中Tim[0]/Tim[1]/Tim[2]分别为当前年月日数据*/

/*其中Tim[0]Bit7 表示世纪,1 为20 世纪19xx,0 为21 世纪20xx*/

/*Tim[10]为周数据/Tim[7]/Tim[8]/Tim[9]为农历数据,根据需要自行更换*/

/*==================================================*/

#include Byte code year_code[597]={

0x04,0xAe,0x53,0x0A,0x57,0x48,0x55,0x26,0xBd, 1901-1903

0x0d,0x26,0x50,0x0d,0x95,0x44,0x46,0xAA,0xB9, 1904-1906

0x05,0x6A,0x4d,0x09,0xAd,0x42,0x24,0xAe,0xB6, 1907-1909

0x04,0xAe,0x4A,0x6A,0x4d,0xBe,0x0A,0x4d,0x52, 1910-1912

0x0d,0x25,0x46,0x5d,0x52,0xBA,0x0B,0x54,0x4e, 1913-1915

0x0d,0x6A,0x43,0x29,0x6d,0x37,0x09,0x5B,0x4B, 1916-1918

0x74,0x9B,0xC1,0x04,0x97,0x54,0x0A,0x4B,0x48, 1919-1921

0x5B,0x25,0xBC,0x06,0xA5,0x50,0x06,0xd4,0x45, 1922-1924

//

// // // // // // // 0x4A,0xdA,0xB8,0x02,0xB6,0x4d,0x09,0x57,0x42, 1925-1927

0x24,0x97,0xB7,0x04,0x97,0x4A,0x66,0x4B,0x3e, 1928-1930

0x0d,0x4A,0x51,0x0e,0xA5,0x46,0x56,0xd4,0xBA, 1931-1933

0x05,0xAd,0x4e,0x02,0xB6,0x44,0x39,0x37,0x38, 1934-1936

0x09,0x2e,0x4B,0x7C,0x96,0xBf,0x0C,0x95,0x53, 1937-1939

0x0d,0x4A,0x48,0x6d,0xA5,0x3B,0x0B,0x55,0x4f, 1940-1942

0x05,0x6A,0x45,0x4A,0xAd,0xB9,0x02,0x5d,0x4d, 1943-1945

0x09,0x2d,0x42,0x2C,0x95,0xB6,0x0A,0x95,0x4A, 1946-1948

0x7B,0x4A,0xBd,0x06,0xCA,0x51,0x0B,0x55,0x46, 1949-1951

0x55,0x5A,0xBB,0x04,0xdA,0x4e,0x0A,0x5B,0x43, 1952-1954

0x35,0x2B,0xB8,0x05,0x2B,0x4C,0x8A,0x95,0x3f, 1955-1957

//

//

//

//

//

//

//

//

//

//

//

0x0e,0x95,0x52,0x06,0xAA,0x48,0x7A,0xd5,0x3C, 1958-1960

0x0A,0xB5,0x4f,0x04,0xB6,0x45,0x4A,0x57,0x39, 1961-1963

0x0A,0x57,0x4d,0x05,0x26,0x42,0x3e,0x93,0x35, 1964-1966

0x0d,0x95,0x49,0x75,0xAA,0xBe,0x05,0x6A,0x51, 1967-1969

0x09,0x6d,0x46,0x54,0xAe,0xBB,0x04,0xAd,0x4f, 1970-1972

0x0A,0x4d,0x43,0x4d,0x26,0xB7,0x0d,0x25,0x4B, 1973-1975

0x8d,0x52,0xBf,0x0B,0x54,0x52,0x0B,0x6A,0x47, 1976-1978

0x69,0x6d,0x3C,0x09,0x5B,0x50,0x04,0x9B,0x45, 1979-1981

0x4A,0x4B,0xB9,0x0A,0x4B,0x4d,0xAB,0x25,0xC2, 1982-1984

0x06,0xA5,0x54,0x06,0xd4,0x49,0x6A,0xdA,0x3d, 1985-1987

0x0A,0xB6,0x51,0x09,0x37,0x46,0x54,0x97,0xBB, 1988-1990

//

//

//

//

//

//

//

//

//

//

//

0x04,0x97,0x4f,0x06,0x4B,0x44,0x36,0xA5,0x37, 1991-1993

0x0e,0xA5,0x4A,0x86,0xB2,0xBf,0x05,0xAC,0x53, 1994-1996

0x0A,0xB6,0x47,0x59,0x36,0xBC,0x09,0x2e,0x50, 1997-1999

0x0C,0x96,0x45,0x4d,0x4A,0xB8,0x0d,0x4A,0x4C, 2000-2002

0x0d,0xA5,0x41,0x25,0xAA,0xB6,0x05,0x6A,0x49, 2003-2005

0x7A,0xAd,0xBd,0x02,0x5d,0x52,0x09,0x2d,0x47, 2006-2008

0x5C,0x95,0xBA,0x0A,0x95,0x4e,0x0B,0x4A,0x43, 2009-2011

0x4B,0x55,0x37,0x0A,0xd5,0x4A,0x95,0x5A,0xBf, 2012-2014

0x04,0xBA,0x53,0x0A,0x5B,0x48,0x65,0x2B,0xBC, 2015-2017

0x05,0x2B,0x50,0x0A,0x93,0x45,0x47,0x4A,0xB9, 2018-2020

0x06,0xAA,0x4C,0x0A,0xd5,0x41,0x24,0xdA,0xB6, 2021-2023

//

//

//

//

//

//

//

//

//

//

//