zbqy.cnblogs.comBETA.png)
又找到一个关于农历的代码
好像有点问题
等有时间再好好看看吧
帖出来
这个没有使用数据库
节气和星座还没有出来
/**/using System;namespace YyAy.Web.WebClass{ #region 使用范例 // 可将这段代码取消注释运行可以得到示例结果。。 // public class MyTest // { // //方法一，用LunarDate类 // public string Mothed1() // { // DateTime _d = DateTime.Now; // LunarDate ld = new LunarDate(_d) ; // string result = ""; // result += "干支年："+ ld.LunarYear +"\r\n"; // result += "生肖："+ ld.Animal +"\r\n"; // result += "月："+ ld.LunarMonth +"\r\n"; // result += "日："+ ld.LunarDay +"\r\n"; // result += "节气："+ ld.SolarTerm +"\r\n"; // result += "数字农历年："+ ld.Year +"月"+ ld.Month +"日"+ ld.Day +"\r\n"; // return result; // } // // //方法二，用LunarDateClass类 // public string Mothed2() // { // DateTime _d = DateTime.Now; // LunarDateClass ldc = new LunarDateClass(_d) ; // string result = ""; // result += "干支年："+ ldc.LunarYear +"\r\n"; // result += "生肖："+ ldc.Animal +"\r\n"; // result += "月："+ ldc.LunarMonth +"\r\n"; // result += "日："+ ldc.LunarDay +"\r\n"; // result += "节气："+ ldc.SolarTerm +"\r\n"; // //ldc.LunarDate 返回 LunarDate对象。。 // result += "数字农历年："+ ldc.LunarDate.Year +"月"+ ldc.LunarDate.Month +"日"+ ldc.LunarDate.Day +"\r\n"; // return result; // } // } #endregion #region LunarDatepublic class LunarDateClass
{private const ushort START_YEAR = 1901;
private const ushort END_YEAR = 2050;
private DateTime m_Date = DateTime.MinValue;private LunarDate m_LunarDate = null;
private string m_LunarYear = "", m_LunarMonth = "", m_LunarDay = "";
private string m_Animal = "", m_Constellation = "", m_SolarTerm = "";
/// <summary>始化农历类。</summary> public LunarDateClass() { this.Date = DateTime.Today;}
/// <summary>以公历日期初始化农历类。</summary> /// <param name="dt">初始化公历日期。要查询的日期。</param> public LunarDateClass(DateTime dt) { this.Date = dt.Date;}
/// <summary>初始化公历日期。要查询的日期。</summary> public DateTime Date { get { return m_Date; }set
{this.m_Animal = "";
this.m_Constellation = "";
this.m_LunarDate = null;
this.m_LunarDay = "";
this.m_LunarMonth = "";
this.m_LunarYear = "";
this.m_SolarTerm = "";
m_Date = value;}
}
#region LunarDateClassData /// <summary>星座名称。</summary>private string[] ConstellationName =
{"白羊座", "金牛座", "双子座", "巨蟹座", "狮子座", "处女座",
"天秤座", "天蝎座", "射手座", "摩羯座", "水瓶座", "双鱼座"
};
/// <summary>节气名称。</summary>private string[] LunarHolDayName =
{"小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨",
"立夏", "小满", "芒种", "夏至", "小暑", "大暑", "立秋", "处暑",
"白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至"
};
/// <summary> /// 数组gLunarDay存入阴历1901年到2050年每年中的月天数信息， /// 阴历每月只能是29或30天，一年用12（或13）个二进制位表示， /// 对应位为1表30天，否则为29天. /// 测试数据只有1901.1.1 --2050.12.31 /// </summary>private int[] gLunarMonthDay = {
0x4ae0, 0xa570, 0x5268, 0xd260, 0xd950, 0x6aa8, 0x56a0, 0x9ad0, 0x4ae8, 0x4ae0, //1910 0xa4d8, 0xa4d0, 0xd250, 0xd548, 0xb550, 0x56a0, 0x96d0, 0x95b0, 0x49b8, 0x49b0, //1920 0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada8, 0x2b60, 0x9570, 0x4978, 0x4970, 0x64b0, //1930 0xd4a0, 0xea50, 0x6d48, 0x5ad0, 0x2b60, 0x9370, 0x92e0, 0xc968, 0xc950, 0xd4a0, //1940 0xda50, 0xb550, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, 0xb4a8, 0x6ca0, //1950 0xb550, 0x55a8, 0x4da0, 0xa5b0, 0x52b8, 0x52b0, 0xa950, 0xe950, 0x6aa0, 0xad50, //1960 0xab50, 0x4b60, 0xa570, 0xa570, 0x5260, 0xe930, 0xd950, 0x5aa8, 0x56a0, 0x96d0, //1970 0x4ae8, 0x4ad0, 0xa4d0, 0xd268, 0xd250, 0xd528, 0xb540, 0xb6a0, 0x96d0, 0x95b0, //1980 0x49b0, 0xa4b8, 0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada0, 0xab60, 0x9370, 0x4978, //1990 0x4970, 0x64b0, 0x6a50, 0xea50, 0x6b28, 0x5ac0, 0xab60, 0x9368, 0x92e0, 0xc960, //2000 0xd4a8, 0xd4a0, 0xda50, 0x5aa8, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, //2010 0xb4a0, 0xb550, 0xb550, 0x55a8, 0x4ba0, 0xa5b0, 0x52b8, 0x52b0, 0xa930, 0x74a8, //2020 0x6aa0, 0xad50, 0x4da8, 0x4b60, 0x9570, 0xa4e0, 0xd260, 0xe930, 0xd530, 0x5aa0, //2030 0x6b50, 0x96d0, 0x4ae8, 0x4ad0, 0xa4d0, 0xd258, 0xd250, 0xd520, 0xdaa0, 0xb5a0, //2040 0x56d0, 0x4ad8, 0x49b0, 0xa4b8, 0xa4b0, 0xaa50, 0xb528, 0x6d20, 0xada0, 0x55b0 //2050 };
/// <summary>数组gLanarMonth存放阴历1901年到2050年闰月的月份，如没有则为0，每字节存两年</summary>private byte[] gLunarMonth = {
0x00, 0x50, 0x04, 0x00, 0x20, //1910 0x60, 0x05, 0x00, 0x20, 0x70, //1920 0x05, 0x00, 0x40, 0x02, 0x06, //1930 0x00, 0x50, 0x03, 0x07, 0x00, //1940 0x60, 0x04, 0x00, 0x20, 0x70, //1950 0x05, 0x00, 0x30, 0x80, 0x06, //1960 0x00, 0x40, 0x03, 0x07, 0x00, //1970 0x50, 0x04, 0x08, 0x00, 0x60, //1980 0x04, 0x0a, 0x00, 0x60, 0x05, //1990 0x00, 0x30, 0x80, 0x05, 0x00, //2000 0x40, 0x02, 0x07, 0x00, 0x50, //2010 0x04, 0x09, 0x00, 0x60, 0x04, //2020 0x00, 0x20, 0x60, 0x05, 0x00, //2030 0x30, 0xb0, 0x06, 0x00, 0x50, //2040 0x02, 0x07, 0x00, 0x50, 0x03 //2050 };
//数组gLanarHoliDay存放每年的二十四节气对应的阳历日期 //每年的二十四节气对应的阳历日期几乎固定，平均分布于十二个月中 // 1月 2月 3月 4月 5月 6月 //小寒 大寒 立春 雨水 惊蛰 春分 清明 谷雨 立夏 小满 芒种 夏至 // 7月 8月 9月 10月 11月 12月 //小暑 大暑 立秋 处暑 白露 秋分 寒露 霜降 立冬 小雪 大雪 冬至 //********************************************************************************* // 节气无任何确定规律,所以只好存表,要节省空间,所以.... //**********************************************************************************} //数据格式说明: //如1901年的节气为 // 1月 2月 3月 4月 5月 6月 7月 8月 9月 10月 11月 12月 // 6, 21, 4, 19, 6, 21, 5, 21, 6,22, 6,22, 8, 23, 8, 24, 8, 24, 8, 24, 8, 23, 8, 22 // 9, 6, 11,4, 9, 6, 10,6, 9,7, 9,7, 7, 8, 7, 9, 7, 9, 7, 9, 7, 8, 7, 15 //上面第一行数据为每月节气对应日期,15减去每月第一个节气,每月第二个节气减去15得第二行 // 这样每月两个节气对应数据都小于16,每月用一个字节存放,高位存放第一个节气数据,低位存放 //第二个节气的数据,可得下表private byte[] gLunarHolDay = {
0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1901 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1902 0x96, 0xA5, 0x87, 0x96, 0x87, 0x87, 0x79, 0x69, 0x69, 0x69, 0x78, 0x78, //1903 0x86, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x78, 0x87, //1904 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1905 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1906 0x96, 0xA5, 0x87, 0x96, 0x87, 0x87, 0x79, 0x69, 0x69, 0x69, 0x78, 0x78, //1907 0x86, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1908 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1909 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1910 0x96, 0xA5, 0x87, 0x96, 0x87, 0x87, 0x79, 0x69, 0x69, 0x69, 0x78, 0x78, //1911 0x86, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1912 0x95, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1913 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1914 0x96, 0xA5, 0x97, 0x96, 0x97, 0x87, 0x79, 0x79, 0x69, 0x69, 0x78, 0x78, //1915 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1916 0x95, 0xB4, 0x96, 0xA6, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x87, //1917 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x77, //1918 0x96, 0xA5, 0x97, 0x96, 0x97, 0x87, 0x79, 0x79, 0x69, 0x69, 0x78, 0x78, //1919 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1920 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x87, //1921 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x77, //1922 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x69, 0x69, 0x78, 0x78, //1923 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1924 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x87, //1925 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1926 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1927 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1928 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1929 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1930 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1931 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1932 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1933 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1934 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1935 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1936 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1937 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1938 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1939 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1940 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1941 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1942 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1943 0x96, 0xA5, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1944 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1945 0x95, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1946 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1947 0x96, 0xA5, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1948 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x79, 0x78, 0x79, 0x77, 0x87, //1949 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1950 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1951 0x96, 0xA5, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1952 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1953 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x68, 0x78, 0x87, //1954 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1955 0x96, 0xA5, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1956 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1957 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1958 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1959 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1960 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1961 0x96, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1962 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1963 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1964 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1965 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1966 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1967 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1968 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1969 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1970 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1971 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1972 0xA5, 0xB5, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1973 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1974 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1975 0x96, 0xA4, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x89, 0x88, 0x78, 0x87, 0x87, //1976 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1977 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x78, 0x87, //1978 0x96, 0xB4, 0x96, 0xA6, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1979 0x96, 0xA4, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1980 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x77, 0x87, //1981 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1982 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1983 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //1984 0xA5, 0xB4, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1985 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1986 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x79, 0x78, 0x69, 0x78, 0x87, //1987 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //1988 0xA5, 0xB4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1989 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1990 0x95, 0xB4, 0x96, 0xA5, 0x86, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1991 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //1992 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1993 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1994 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x76, 0x78, 0x69, 0x78, 0x87, //1995 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //1996 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1997 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1998 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1999 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2000 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2001 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //2002 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //2003 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2004 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2005 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2006 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //2007 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2008 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2009 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2010 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x78, 0x87, //2011 0x96, 0xB4, 0xA5, 0xB5, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2012 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //2013 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2014 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //2015 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2016 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //2017 0xA5, 0xB4, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2018 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //2019 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x86, //2020 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2021 0xA5, 0xB4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2022 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //2023 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2024 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2025 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2026 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //2027 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2028 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2029 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2030 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //2031 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2032 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x86, //2033 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x78, 0x88, 0x78, 0x87, 0x87, //2034 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2035 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2036 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2037 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2038 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2039 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2040 0xA5, 0xC3, 0xA5, 0xB5, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2041 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2042 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2043 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x88, 0x87, 0x96, //2044 0xA5, 0xC3, 0xA5, 0xB4, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2045 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //2046 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2047 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA5, 0x97, 0x87, 0x87, 0x88, 0x86, 0x96, //2048 0xA4, 0xC3, 0xA5, 0xA5, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x86, //2049 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x78, 0x78, 0x87, 0x87 //2050 };
#endregion #region Core /// <summary> /// 取得指定阴历年的阴历闰月月份。 /// </summary> /// <param name="iLunarYear">年份。</param> /// <returns>返回指定年的闰月月份。</returns>private int GetLeapMonth(ushort iLunarYear)
{ byte Flag; if (iLunarYear < START_YEAR || iLunarYear > END_YEAR) { return 0;}
Flag = gLunarMonth[(iLunarYear - START_YEAR) / 2];
if ((iLunarYear - START_YEAR) % 2 == 0) { return Flag >> 4;}
else { return Flag & 0x0F;}
}
/// <summary> /// 计算指定阴历年月的总天数。 /// </summary> /// <param name="iLunarYear">年份。</param> /// <param name="iLunarMonth">月份。</param> /// <returns> /// 返回阴历阴历年月的天数，如果该月为闰月，高字为第二个该月的天数，否则高字为0。 /// </returns> /// <remarks> /// 指定年月范围在1901年1月---2050年12月之间。 /// </remarks>private uint GetLunarMonthDays(ushort iLunarYear, ushort iLunarMonth)
{ int Height, Low; int iBit; if (iLunarYear < START_YEAR || iLunarYear > END_YEAR) { return 30;}
Height = 0;
Low = 29;
iBit = 16 - iLunarMonth;
if (iLunarMonth > GetLeapMonth(iLunarYear) && GetLeapMonth(iLunarYear) > 0) {iBit--;
}
if ((gLunarMonthDay[iLunarYear - START_YEAR] & (1 << iBit)) > 0) {Low++;
}
if (iLunarMonth == GetLeapMonth(iLunarYear)) { if ((gLunarMonthDay[iLunarYear - START_YEAR] & (1 << (iBit - 1))) > 0) {Height = 30;
}
else {Height = 29;
}
}
return (uint)(Low) | (uint)(Height) << 16; //合成为uint
}
/// <summary> /// 计算指定阴历年总天数。 /// </summary> /// <param name="iLunarYear">指定阴历年，范围1901-2050。</param> /// <returns>返指定阴历年的总天数。</returns>private int GetLunarYearDays(ushort iLunarYear)
{ int Days; uint tmp; if (iLunarYear < START_YEAR || iLunarYear > END_YEAR) { return 0;}
Days = 0;
for (ushort i = 1; i <= 12; i++)
{tmp = GetLunarMonthDays(iLunarYear, i);
Days = Days + ((ushort)(tmp >> 16) & 0xFFFF); //取高位
Days = Days + (ushort)(tmp); //取低位
}
return Days;}
/// <summary> /// 计算从1901年1月1日过iSpanDays天后的阴历日期 /// </summary> /// <param name="iYear">返回的年份。</param> /// <param name="iMonth">返回的月份。</param> /// <param name="iDay">返回的日子。</param> /// <param name="iSpanDays">天数。</param>private void CalcLunarDate(out ushort iYear, out ushort iMonth, out ushort iDay, uint iSpanDays)
{ uint tmp; //阳历1901年2月19日为阴历1901年正月初一 //阳历1901年1月1日到2月19日共有49天 if (iSpanDays < 49) {iYear = START_YEAR - 1;
if (iSpanDays < 19) {iMonth = 11;
iDay = (ushort)(11 + iSpanDays);}
else {iMonth = 12;
iDay = (ushort)(iSpanDays - 18);}
return;}
//下面从阴历1901年正月初一算起 iSpanDays = iSpanDays - 49;
iYear = START_YEAR;
iMonth = 1;
iDay = 1;
//计算年 tmp = (uint)GetLunarYearDays(iYear); while (iSpanDays >= tmp) {iSpanDays = iSpanDays - tmp;
iYear++;
tmp = (uint)GetLunarYearDays(iYear);}
//计算月 tmp = GetLunarMonthDays(iYear, iMonth); //取低位 while (iSpanDays >= tmp) {iSpanDays = iSpanDays - tmp;
if (iMonth == GetLeapMonth(iYear)) { tmp = (GetLunarMonthDays(iYear, iMonth) >> 16) & 0xFFFF; //取高位 if (iSpanDays < tmp) { break;}
iSpanDays = iSpanDays - tmp;
}
iMonth++;
tmp = GetLunarMonthDays(iYear, iMonth); //取低位 }
//计算日 iDay = (ushort)(iDay + iSpanDays);}
#endregion #region 星座 /// <summary> /// 计算指定当前日期的星座序号。 /// </summary> /// <returns>星座序号。</returns>private int GetConstellationIndex()
{ int Y, M, D;Y = m_Date.Year;
M = m_Date.Month;
D = m_Date.Day;
Y = M * 100 + D;
if (Y >= 321 && Y <= 419) { return 0;}
else if (Y >= 420 && Y <= 520)
{ return 1;}
else if (Y >= 521 && Y <= 620)
{ return 2;}
else if (Y >= 621 && Y <= 722)
{ return 3;}
else if (Y >= 723 && Y <= 822)
{ return 4;}
else if (Y >= 823 && Y <= 922)
{ return 5;}
else if (Y >= 923 && Y <= 1022)
{ return 6;}
else if (Y >= 1023 && Y <= 1121)
{ return 7;}
else if (Y >= 1122 && Y <= 1221)
{ return 8;}
else if (Y >= 1222 || Y <= 119)
{ return 9;}
else if (Y >= 120 && Y <= 218)
{ return 10;}
else if (Y >= 219 && Y <= 320)
{ return 11;}
else { return -1;}
}
/// <summary> /// 格式化星座序号为星座名称。 /// </summary> /// <param name="ConstellationIndex">星座序号。</param> /// <returns>星座名称。</returns>private string FormatConstellation(int ConstellationIndex)
{ if (ConstellationIndex >= 0 && ConstellationIndex <= 11) { return ConstellationName[ConstellationIndex];}
else {return "";
}
}
#endregion #region 节气 /// <summary> /// 计算公历当天对应的节气序号。 /// </summary> /// <returns>返回值0-23为节气序号，-1表示不是节气。</returns>private int GetSolarTermIndex()
{ byte Flag; int Day, iYear, iMonth, iDay;iYear = m_Date.Year;
if (iYear < START_YEAR || iYear > END_YEAR) { return -1;}
iMonth = m_Date.Month;
iDay = m_Date.Day;
Flag = gLunarHolDay[(iYear - START_YEAR) * 12 + iMonth - 1];
if (iDay < 15) {Day = 15 - ((Flag >> 4) & 0x0f);
}
else {Day = (Flag & 0x0f) + 15;
}
if (iDay == Day) { if (iDay > 15) { return (iMonth - 1) * 2 + 1;}
else { return (iMonth - 1) * 2;}
}
else { return -1;}
}
/// <summary> /// 格式化节气序号为节气名称。 /// </summary> /// <param name="SolarTermIndex">节气序号。</param> /// <returns>节气名称。</returns>private string FormatSolarTerm(int SolarTermIndex)
{ //string[] stroe = {"小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", "夏至", "小暑", "大暑", "立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至"};if (SolarTermIndex <= this.LunarHolDayName.Length && SolarTermIndex >= 0)
return this.LunarHolDayName[SolarTermIndex];
return "";
}
#endregion #region 年月日 /// <summary> /// 格式化阴历月份。 /// </summary> /// <param name="iYear">年份。</param> /// <returns>干支记年。</returns>private string FormatLunarYear(int iYear)
{string strG = "甲乙丙丁戊己庚辛壬癸";
string strZ = "子丑寅卯辰巳午未申酉戌亥";
return strG.Substring((iYear - 4) % 10, 1) + strZ.Substring((iYear - 4) % 12, 1);}
/// <summary> /// 格式化阴历年份。 /// </summary> /// <param name="iYear">年份。</param> /// <returns>生肖。</returns>private string FormatAnimalYear(int iYear)
{string strSX = "鼠牛虎免龙蛇马羊猴鸡狗猪";
return strSX.Substring((iYear - 4) % 12, 1);}
/// <summary> /// 格式化阴历月份。 /// </summary> /// <param name="iMonth">月份。</param> /// <returns>中文月份。</returns>private string FormatLunarMonth(int iMonth)
{string szText = "正二三四五六七八九十";
if (iMonth <= 10) return szText.Substring(iMonth - 1, 1) + "月";
if (iMonth == 11) return "十一月";
if (iMonth == 12) return "十二月";
return "";
}
/// <summary> /// 格式化阴历日子。 /// </summary> /// <param name="iDay">日子。</param> /// <returns>中文日子。</returns>private string FormatLunarDay(int iDay)
{string szText1 = "初十廿三";
string szText2 = "一二三四五六七八九十";
string strDay = "";
if (iDay != 20 && iDay != 30) { try {strDay = szText1.Substring((iDay - 1) / 10, 1);
strDay = strDay + szText2.Substring((iDay - 1) % 10, 1);
}
catch (Exception) {}
}
else {strDay = szText1.Substring((iDay / 10), 1);
strDay = strDay + "十";}
return strDay;}
#endregion #region OutPut /// <summary>阴历日期,以LunarDate(年日月)形式表示。</summary> public LunarDate LunarDate {get
{if (this.m_LunarDate == null)
{ ushort iYear, iMonth, iDay; TimeSpan ts = m_Date - (new DateTime(START_YEAR, 1, 1));this.CalcLunarDate(out iYear, out iMonth, out iDay, (uint)(ts.Days));
this.m_LunarDate = new LunarDate(iYear, iMonth, iDay);
}
return this.m_LunarDate;
}
}
/// <summary>阴历干支记年。</summary>public string LunarYear
{get
{if (m_LunarYear == "")
this.m_LunarYear = this.FormatLunarYear(this.LunarDate.Year);
return this.m_LunarYear;
}
}
/// <summary>阴历生肖。</summary>public string Animal
{get
{if (m_Animal == "")
this.m_Animal = this.FormatAnimalYear(this.LunarDate.Year);
return this.m_Animal;
}
}
/// <summary>格式化后的阴历月份。</summary>public string LunarMonth
{get
{if (this.m_LunarMonth == "")
this.m_LunarMonth = this.FormatLunarMonth(ushort.Parse(this.LunarDate.Month.ToString()));
return this.m_LunarMonth;
}
}
/// <summary>格式化后的阴历日子。</summary>public string LunarDay
{get
{if (this.m_LunarDay == "")
this.m_LunarDay = this.FormatLunarDay(ushort.Parse(this.LunarDate.Day.ToString()));
return this.m_LunarDay;
}
}
/// <summary>格式化后的阴历节气。</summary>public string SolarTerm
{get
{if (this.m_SolarTerm == "")
this.m_SolarTerm = this.FormatSolarTerm(this.GetSolarTermIndex());
return this.m_SolarTerm;
}
}
/// <summary>格式化后的星座。</summary>public string Constellation
{get
{if (this.m_Constellation == "")
this.m_Constellation = this.FormatConstellation(this.GetConstellationIndex());
return this.m_Constellation;
}
}
#endregion}
public class LunarDate
{private int _y, _m, _d;
private string lunardate = "";
private string lunarmonth = "", lunarday = "", lunaryear = "";
private string solarterm = "", animal = ""
按钮的事件处理
private void button1_Click(object sender, EventArgs e)
{DateTime _d = monthCalendar1.SelectionStart;
LunarDate ld = new LunarDate(_d);string result = "";
result += "干支年：" + ld.LunarYear + "\r\n";
result += "生肖：" + ld.Animal + "\r\n";
result += "月：" + ld.LunarMonth + "\r\n";
result += "日：" + ld.LunarDay + "\r\n";
result += "节气：" + ld.SolarTerm + "\r\n";
result += "数字农历年：" + ld.Year + "月" + ld.Month + "日" + ld.Day + "\r\n";
MessageBox.Show(result);
}
