1
using System;
2
3namespace NetBee.Calendar
4
{
5
public class CNDate
6
{
7 private const ushort START_YEAR = 1901;
8 private const ushort END_YEAR = 2050;
9 private string[] ConstellationName =
10 {
11 "白羊座", "金牛座", "双子座",
12 "巨蟹座", "狮子座", "处女座",
13 "天秤座", "天蝎座", "射手座",
14
"摩羯座", "水瓶座", "双鱼座"};
15 private string[] LunarHolDayName =
16 {
17 "小寒", "大寒", "立春", "雨水",
18 "惊蛰", "春分", "清明", "谷雨",
19 "立夏", "小满", "芒种", "夏至",
20 "小暑", "大暑", "立秋", "处暑",
21 "白露", "秋分", "寒露", "霜降",
22 "立冬", "小雪", "大雪", "冬至"};
23
24 //数组gLunarDay存入阴历1901年到2100年每年中的月天数信息，
25 //阴历每月只能是29或30天，一年用12（或13）个二进制位表示，对应位为1表30天，否则为29天
26 private int[] gLunarMonthDay = {
27 //测试数据只有1901.1.1 --2050.12.31
28 0x4ae0, 0xa570, 0x5268, 0xd260, 0xd950, 0x6aa8, 0x56a0, 0x9ad0, 0x4ae8, 0x4ae0, //1910
29 0xa4d8, 0xa4d0, 0xd250, 0xd548, 0xb550, 0x56a0, 0x96d0, 0x95b0, 0x49b8, 0x49b0, //1920
30 0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada8, 0x2b60, 0x9570, 0x4978, 0x4970, 0x64b0, //1930
31 0xd4a0, 0xea50, 0x6d48, 0x5ad0, 0x2b60, 0x9370, 0x92e0, 0xc968, 0xc950, 0xd4a0, //1940
32 0xda50, 0xb550, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, 0xb4a8, 0x6ca0, //1950
33 0xb550, 0x55a8, 0x4da0, 0xa5b0, 0x52b8, 0x52b0, 0xa950, 0xe950, 0x6aa0, 0xad50, //1960
34 0xab50, 0x4b60, 0xa570, 0xa570, 0x5260, 0xe930, 0xd950, 0x5aa8, 0x56a0, 0x96d0, //1970
35 0x4ae8, 0x4ad0, 0xa4d0, 0xd268, 0xd250, 0xd528, 0xb540, 0xb6a0, 0x96d0, 0x95b0, //1980
36 0x49b0, 0xa4b8, 0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada0, 0xab60, 0x9370, 0x4978, //1990
37 0x4970, 0x64b0, 0x6a50, 0xea50, 0x6b28, 0x5ac0, 0xab60, 0x9368, 0x92e0, 0xc960, //2000
38 0xd4a8, 0xd4a0, 0xda50, 0x5aa8, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, //2010
39 0xb4a0, 0xb550, 0xb550, 0x55a8, 0x4ba0, 0xa5b0, 0x52b8, 0x52b0, 0xa930, 0x74a8, //2020
40 0x6aa0, 0xad50, 0x4da8, 0x4b60, 0x9570, 0xa4e0, 0xd260, 0xe930, 0xd530, 0x5aa0, //2030
41 0x6b50, 0x96d0, 0x4ae8, 0x4ad0, 0xa4d0, 0xd258, 0xd250, 0xd520, 0xdaa0, 0xb5a0, //2040
42 0x56d0, 0x4ad8, 0x49b0, 0xa4b8, 0xa4b0, 0xaa50, 0xb528, 0x6d20, 0xada0, 0x55b0}; //2050
43
44 //数组gLanarMonth存放阴历1901年到2050年闰月的月份，如没有则为0，每字节存两年
45 byte[] gLunarMonth={
46 0x00, 0x50, 0x04, 0x00, 0x20, //1910
47 0x60, 0x05, 0x00, 0x20, 0x70, //1920
48 0x05, 0x00, 0x40, 0x02, 0x06, //1930
49 0x00, 0x50, 0x03, 0x07, 0x00, //1940
50 0x60, 0x04, 0x00, 0x20, 0x70, //1950
51 0x05, 0x00, 0x30, 0x80, 0x06, //1960
52 0x00, 0x40, 0x03, 0x07, 0x00, //1970
53 0x50, 0x04, 0x08, 0x00, 0x60, //1980
54 0x04, 0x0a, 0x00, 0x60, 0x05, //1990
55 0x00, 0x30, 0x80, 0x05, 0x00, //2000
56 0x40, 0x02, 0x07, 0x00, 0x50, //2010
57 0x04, 0x09, 0x00, 0x60, 0x04, //2020
58 0x00, 0x20, 0x60, 0x05, 0x00, //2030
59 0x30, 0xb0, 0x06, 0x00, 0x50, //2040
60 0x02, 0x07, 0x00, 0x50, 0x03}; //2050
61
62 //数组gLanarHoliDay存放每年的二十四节气对应的阳历日期
63 //每年的二十四节气对应的阳历日期几乎固定，平均分布于十二个月中
64 // 1月 2月 3月 4月 5月 6月
65 //小寒 大寒 立春 雨水 惊蛰 春分 清明 谷雨 立夏 小满 芒种 夏至
66 // 7月 8月 9月 10月 11月 12月
67 //小暑 大暑 立秋 处暑 白露 秋分 寒露 霜降 立冬 小雪 大雪 冬至
68 //*********************************************************************************
69 // 节气无任何确定规律,所以只好存表,要节省空间,所以
.
70 //**********************************************************************************}
71 //数据格式说明:
72 //如1901年的节气为
73 // 1月 2月 3月 4月 5月 6月 7月 8月 9月 10月 11月 12月
74 // 6, 21, 4, 19, 6, 21, 5, 21, 6,22, 6,22, 8, 23, 8, 24, 8, 24, 8, 24, 8, 23, 8, 22
75 // 9, 6, 11,4, 9, 6, 10,6, 9,7, 9,7, 7, 8, 7, 9, 7, 9, 7, 9, 7, 8, 7, 15
76 //上面第一行数据为每月节气对应日期,15减去每月第一个节气,每月第二个节气减去15得第二行
77 // 这样每月两个节气对应数据都小于16,每月用一个字节存放,高位存放第一个节气数据,低位存放
78 //第二个节气的数据,可得下表
79 byte[] gLunarHolDay={
80 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1901
81 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1902
82 0x96, 0xA5, 0x87, 0x96, 0x87, 0x87, 0x79, 0x69, 0x69, 0x69, 0x78, 0x78, //1903
83 0x86, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x78, 0x87, //1904
84 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1905
85 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1906
86 0x96, 0xA5, 0x87, 0x96, 0x87, 0x87, 0x79, 0x69, 0x69, 0x69, 0x78, 0x78, //1907
87 0x86, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1908
88 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1909
89 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1910
90 0x96, 0xA5, 0x87, 0x96, 0x87, 0x87, 0x79, 0x69, 0x69, 0x69, 0x78, 0x78, //1911
91 0x86, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1912
92 0x95, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1913
93 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1914
94 0x96, 0xA5, 0x97, 0x96, 0x97, 0x87, 0x79, 0x79, 0x69, 0x69, 0x78, 0x78, //1915
95 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1916
96 0x95, 0xB4, 0x96, 0xA6, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x87, //1917
97 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x77, //1918
98 0x96, 0xA5, 0x97, 0x96, 0x97, 0x87, 0x79, 0x79, 0x69, 0x69, 0x78, 0x78, //1919
99 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1920
100 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x87, //1921
101 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x77, //1922
102 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x69, 0x69, 0x78, 0x78, //1923
103 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1924
104 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x87, //1925
105 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1926
106 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1927
107 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1928
108 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1929
109 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1930
110 0x96, 0xA4, 0x96, 0x96, 0x97, 0x87, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1931
111 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1932
112 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1933
113 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1934
114 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1935
115 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1936
116 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1937
117 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1938
118 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1939
119 0x96, 0xA5, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1940
120 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1941
121 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1942
122 0x96, 0xA4, 0x96, 0x96, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1943
123 0x96, 0xA5, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1944
124 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1945
125 0x95, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1946
126 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1947
127 0x96, 0xA5, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1948
128 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x79, 0x78, 0x79, 0x77, 0x87, //1949
129 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1950
130 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x79, 0x79, 0x79, 0x69, 0x78, 0x78, //1951
131 0x96, 0xA5, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1952
132 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1953
133 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x68, 0x78, 0x87, //1954
134 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1955
135 0x96, 0xA5, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1956
136 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1957
137 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1958
138 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1959
139 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1960
140 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1961
141 0x96, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1962
142 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1963
143 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1964
144 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1965
145 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1966
146 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1967
147 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1968
148 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1969
149 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1970
150 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x79, 0x69, 0x78, 0x77, //1971
151 0x96, 0xA4, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1972
152 0xA5, 0xB5, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1973
153 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1974
154 0x96, 0xB4, 0x96, 0xA6, 0x97, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1975
155 0x96, 0xA4, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x89, 0x88, 0x78, 0x87, 0x87, //1976
156 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1977
157 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x78, 0x87, //1978
158 0x96, 0xB4, 0x96, 0xA6, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1979
159 0x96, 0xA4, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1980
160 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x77, 0x87, //1981
161 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1982
162 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x78, 0x79, 0x78, 0x69, 0x78, 0x77, //1983
163 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //1984
164 0xA5, 0xB4, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //1985
165 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1986
166 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x79, 0x78, 0x69, 0x78, 0x87, //1987
167 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //1988
168 0xA5, 0xB4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1989
169 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //1990
170 0x95, 0xB4, 0x96, 0xA5, 0x86, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1991
171 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //1992
172 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1993
173 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1994
174 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x76, 0x78, 0x69, 0x78, 0x87, //1995
175 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //1996
176 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //1997
177 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //1998
178 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //1999
179 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2000
180 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2001
181 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //2002
182 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //2003
183 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2004
184 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2005
185 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2006
186 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x69, 0x78, 0x87, //2007
187 0x96, 0xB4, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2008
188 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2009
189 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2010
190 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x78, 0x87, //2011
191 0x96, 0xB4, 0xA5, 0xB5, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2012
192 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //2013
193 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2014
194 0x95, 0xB4, 0x96, 0xA5, 0x96, 0x97, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //2015
195 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2016
196 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //2017
197 0xA5, 0xB4, 0xA6, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2018
198 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //2019
199 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x86, //2020
200 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2021
201 0xA5, 0xB4, 0xA5, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2022
202 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x79, 0x77, 0x87, //2023
203 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2024
204 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2025
205 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2026
206 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //2027
207 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2028
208 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2029
209 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2030
210 0xA5, 0xB4, 0x96, 0xA5, 0x96, 0x96, 0x88, 0x78, 0x78, 0x78, 0x87, 0x87, //2031
211 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2032
212 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x86, //2033
213 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x78, 0x88, 0x78, 0x87, 0x87, //2034
214 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2035
215 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2036
216 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x86, //2037
217 0xA5, 0xB3, 0xA5, 0xA5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2038
218 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2039
219 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x96, //2040
220 0xA5, 0xC3, 0xA5, 0xB5, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2041
221 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x88, 0x88, 0x88, 0x78, 0x87, 0x87, //2042
222 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2043
223 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x88, 0x87, 0x96, //2044
224 0xA5, 0xC3, 0xA5, 0xB4, 0xA5, 0xA6, 0x87, 0x88, 0x87, 0x78, 0x87, 0x86, //2045
225 0xA5, 0xB3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x88, 0x78, 0x87, 0x87, //2046
226 0xA5, 0xB4, 0x96, 0xA5, 0xA6, 0x96, 0x88, 0x88, 0x78, 0x78, 0x87, 0x87, //2047
227 0x95, 0xB4, 0xA5, 0xB4, 0xA5, 0xA5, 0x97, 0x87, 0x87, 0x88, 0x86, 0x96, //2048
228 0xA4, 0xC3, 0xA5, 0xA5, 0xA5, 0xA6, 0x97, 0x87, 0x87, 0x78, 0x87, 0x86, //2049
229 0xA5, 0xC3, 0xA5, 0xB5, 0xA6, 0xA6, 0x87, 0x88, 0x78, 0x78, 0x87, 0x87}; //2050
230
231
232 private DateTime m_Date;
233 public DateTime Date
234 {
235 get{ return m_Date;}
236 set{ m_Date = value;}
237 }
238
239 public CNDate()
240 {
241 Date = DateTime.Today;
242 }
243 public CNDate(DateTime dt)
244 {
245 Date = dt.Date; // 2004/3/21
246 }
247 //计算指定日期的星座序号
248 public int GetConstellation()
249 {
250 int Y, M, D;
251 Y = m_Date.Year;
252 M = m_Date.Month;
253 D = m_Date.Day;
254 Y = M * 100 + D;
255 if (((Y >= 321) && (Y <= 419))) { return 0;}
256 else if ((Y >= 420) && (Y <= 520)) { return 1;}
257 else if ((Y >= 521) && (Y <= 620)) { return 2;}
258 else if ((Y >= 621) && (Y <= 722)) { return 3;}
259 else if ((Y >= 723) && (Y <= 822)) { return 4;}
260 else if ((Y >= 823) && (Y <= 922)) { return 5;}
261 else if ((Y >= 923) && (Y <= 1022)) { return 6;}
262 else if ((Y >= 1023) && (Y <= 1121)) { return 7;}
263 else if ((Y >= 1122) && (Y <= 1221)) { return 8;}
264 else if ((Y >= 1222) || (Y <= 119)) { return 9;}
265 else if ((Y >= 120) && (Y <= 218)) { return 10;}
266 else if ((Y >= 219) && (Y <= 320)) { return 11;}
267 else { return -1;};
268 }
269
270 //计算指定日期的星座名称
271 public string GetConstellationName()
272 {
273 int Constellation;
274 Constellation = GetConstellation();
275 if ((Constellation >= 0) && (Constellation <= 11))
276 { return ConstellationName[Constellation];}
277 else
278 { return "";};
279 }
280
281 //计算公历当天对应的节气 0-23，-1表示不是节气
282 public int l_GetLunarHolDay()
283 {
284 byte Flag;
285 int Day, iYear, iMonth, iDay;
286 iYear = m_Date.Year;
287 if ((iYear < START_YEAR) || (iYear > END_YEAR))
288 { return -1;};
289 iMonth = m_Date.Month;
290 iDay = m_Date.Day;
291 Flag = gLunarHolDay[(iYear - START_YEAR) * 12 + iMonth - 1];
292 if (iDay < 15)
293 { Day = 15 - ((Flag >> 4) & 0x0f);}
294 else
295 {Day = (Flag & 0x0f) + 15;};
296 if (iDay == Day)
297 {
298 if (iDay > 15)
299 { return (iMonth - 1) * 2 + 1;}
300 else
301 { return (iMonth - 1) * 2;}
302 }
303 else
304 {return -1;};
305 }
306
307 public string FormatMonth(ushort iMonth, bool bLunar)
308 {
309 string szText = "正二三四五六七八九十";
310 string strMonth;
311 if ((!bLunar) && (iMonth == 1))
312 { return "一月";}
313 if (iMonth <= 10)
314 {
315 strMonth = "";
316 strMonth = strMonth + szText.Substring(iMonth - 1, 1);
317 strMonth = strMonth + "月";
318 return strMonth;
319 }
320 if (iMonth == 11)
321 { strMonth = "十一";}
322 else
323 { strMonth = "十二";}
324 return strMonth + "月";
325 }
326
327 public string FormatLunarDay(ushort iDay) // 2004年3月出现问题 *
328 {
329 string szText1 = "初十廿三";
330 string szText2 = "一二三四五六七八九十";
331 string strDay;
332
333 if(iDay>30)return iDay.ToString();
334
335 if ((iDay != 20) && (iDay != 30))
336 {
337 strDay = szText1.Substring((iDay - 1) / 10, 1);
338 strDay = strDay + szText2.Substring((iDay - 1) % 10, 1);
339 }
340 else
341 {
342 strDay = szText1.Substring((iDay / 10) * 1 + 0, 1);
343 strDay = strDay + "十";
344 }
345 return strDay;
346 }
347
348 public string GetLunarHolDay() // S1
349 {
350 ushort iYear, iMonth, iDay;
351 int i;
352 TimeSpan ts;
353 iYear = (ushort)(m_Date.Year); // 2004
354 if ((iYear < START_YEAR) || (iYear > END_YEAR))
355 { return "";};
356 i = l_GetLunarHolDay(); // -1
357 if ((i >= 0) && (i <= 23))
358 { return LunarHolDayName[i];}
359 else
360 {
361 ts = m_Date - (new DateTime(START_YEAR, 1, 1));
362 l_CalcLunarDate(out iYear, out iMonth, out iDay, (uint)(ts.Days));
363 return FormatMonth(iMonth, true) + FormatLunarDay(iDay);
364 }
365 }
366
367 //返回阴历iLunarYear年的闰月月份，如没有返回0 1901年1月---2050年12月
368 public int GetLeapMonth(ushort iLunarYear)
369 {
370 byte Flag;
371 //if ((iLunarYear < START_YEAR) || (iLunarYear > END_YEAR))
372 //{ return 0;};
373 Flag = gLunarMonth[(iLunarYear - START_YEAR) / 2];
374 if ((iLunarYear - START_YEAR) % 2 == 0)
375 {return Flag >> 4;}
376 else
377 {return Flag & 0x0F;}
378 }
379
380 //返回阴历iLunarYer年阴历iLunarMonth月的天数，如果iLunarMonth为闰月，
381 //高字为第二个iLunarMonth月的天数，否则高字为0 1901年1月---2050年12月
382 public uint LunarMonthDays(ushort iLunarYear, ushort iLunarMonth)
383 {
384 int Height, Low;
385 int iBit;
386 //if ((iLunarYear < START_YEAR) || (iLunarYear > END_YEAR))
387 //{ return 30; }
388 Height = 0;
389 Low = 29;
390 iBit = 16 - iLunarMonth;
391 if ((iLunarMonth > GetLeapMonth(iLunarYear)) && (GetLeapMonth(iLunarYear) > 0))
392 {iBit--;}
393 if ((gLunarMonthDay[iLunarYear - START_YEAR] & (1 << iBit)) > 0)
394 {Low++;}
395 if (iLunarMonth == GetLeapMonth(iLunarYear))
396 {
397 if ((gLunarMonthDay[iLunarYear - START_YEAR] & (1 << (iBit-1)))>0)
398 {Height = 30;}
399 else
400 {Height = 29;}
401 }
402 return (uint)((uint)(Low)|(uint)(Height)<<16); //合成为uint
403 }
404
405 //返回阴历iLunarYear年的总天数 1901年1月---2050年12月
406 public int LunarYearDays(ushort iLunarYear)
407 {
408 int Days;
409 uint tmp;
410 if ((iLunarYear < START_YEAR) || (iLunarYear > END_YEAR))
411 { return 0;};
412 Days = 0;
413 for (ushort i=1; i <= 12; i++)
414 {
415 tmp = LunarMonthDays(iLunarYear, i);
416 Days = Days + ((ushort)(tmp>>16) & 0xFFFF); //取高位
417 Days = Days + (ushort)(tmp); //取低位
418 }
419 return Days;
420 }
421
422 //计算从1901年1月1日过iSpanDays天后的阴历日期
423 public void l_CalcLunarDate(out ushort iYear, out ushort iMonth, out ushort iDay, uint iSpanDays) // S2
424 {
425 uint tmp;
426 //阳历1901年2月19日为阴历1901年正月初一
427 //阳历1901年1月1日到2月19日共有49天
428 if (iSpanDays < 49) // Pass
429 {
430 iYear = START_YEAR - 1;
431 if (iSpanDays < 19)
432 {
433 iMonth = 11;
434 iDay = (ushort)(11 + iSpanDays);
435 }
436 else
437 {
438 iMonth = 12;
439 iDay = (ushort)(iSpanDays - 18);
440 }
441 return;
442 }
443 //下面从阴历1901年正月初一算起
444 iSpanDays = iSpanDays - 49;
445 iYear = START_YEAR;
446 iMonth = 1;
447 iDay = 1;
448 //计算年
449 tmp = (uint)LunarYearDays(iYear);
450 while (iSpanDays >= tmp)
451 {
452 iSpanDays = iSpanDays - tmp;
453 iYear++;
454 tmp = (uint)LunarYearDays(iYear);
455 }
456 //计算月
457 tmp = LunarMonthDays(iYear, iMonth); //取低位
458 while (iSpanDays >= tmp)
459 {
460 iSpanDays = iSpanDays - tmp;
461 if (GetLeapMonth(iYear)==iMonth)
462 {
463 tmp = (ushort)((LunarMonthDays(iYear, iMonth)>>16)&0xFFFF); //取高位
464 if (iSpanDays < tmp)break;
465 iSpanDays = iSpanDays - tmp;
466 }
467 iMonth++;
468 tmp = (ushort)LunarMonthDays(iYear,iMonth); //取低位 * + short Modified <<<<<<
469 }
470 //计算日
471 iDay = (ushort)(iDay + iSpanDays);
472 }
473
474
475 //把iYear年格式化成天干记年法表示的字符串
476 public string FormatLunarYear()
477 {
478 string strYear;
479 string szText1 = "甲乙丙丁戊己庚辛壬癸";
480 string szText2 = "子丑寅卯辰巳午未申酉戌亥";
481 string szText3 = "鼠牛虎免龙蛇马羊猴鸡狗猪";
482 ushort iYear;
483 iYear = (ushort)(m_Date.Year);
484 strYear = szText1.Substring((iYear - 4) % 10, 1);
485 strYear = strYear + szText2.Substring((iYear - 4) % 12, 1);
486 strYear = strYear + " ";
487 strYear = strYear + szText3.Substring((iYear - 4) % 12, 1);
488 strYear = strYear + "年";
489 return strYear;
490 }
491 } //class CNDate
492
493 public class Test
494 {
495 static void Main(string[] args)
496 {
497 CNDate dt = new CNDate(DateTime.Today);
498 Console.WriteLine("今天是：" + dt.Date.ToString() + dt.GetConstellationName());
499 Console.WriteLine(dt.l_GetLunarHolDay());
500 Console.WriteLine(dt.GetLunarHolDay());
501 Console.WriteLine("闰月" + dt.GetLeapMonth(UInt16.Parse(args[0])));
502 Console.WriteLine("2月的天数" + dt.LunarMonthDays(UInt16.Parse(args[0]), UInt16.Parse(args[1])));
503 Console.WriteLine("天数" + dt.LunarYearDays(UInt16.Parse(args[0])));
504 Console.WriteLine("" + dt.FormatLunarYear());
505 dt.Date = DateTime.Today.AddDays(1);
506 Console.WriteLine("明天是：" + dt.Date.ToString() + dt.GetConstellationName());
507 }
508 } //class Test
509
}
此内容由惯性聚合(RSS阅读器)自动聚合整理，仅供阅读参考。 原文来自 — 版权归原作者所有。