中国日历公历+农历算法.docx
《中国日历公历+农历算法.docx》由会员分享，可在线阅读，更多相关《中国日历公历+农历算法.docx（10页珍藏版）》请在冰点文库上搜索。
中国日历公历+农历算法
中国公历算法
中国公历算法不是太难，关键是星期值的确定。
这里给出了简单算法：
publicstaticintdayOfWeek（inty,intm,intd）{
intw=1;//公历一年一月一日是星期一，所以起始值为星期日
y=（y-1）%400+1;//公历星期值分部400年循环一次
intly=（y-1）/4;//闰年次数
ly=ly-（y-1）/100;
ly=ly+（y-1）/400;
intry=y-1-ly;//常年次数
w=w+ry;//常年星期值增一
w=w+2*ly;//闰年星期值增二
w=w+dayOfYear（y,m,d）;
w=（w-1）%7+1;
returnw;
}
中国农历算法
根公历相比，中国农历的算法相当复杂。
我在网上找的算法之中，的算法是最好的一个。
这个算法使用了大量的数据来确定农历月份和节气的分部，它仅实用于公历1901年到2100年之间的200年。
中国农历计算程式
跟据提供的算法，我写了下面这个程式：
[HTML]
/**
*ChineseCalendarGB.java
*Copyright（c）1997-2002byDr.HerongYang.
*中国农历算法-实用于公历1901年至2100年之间的200年
*/
importjava.text.*;
importjava.util.*;
classChineseCalendarGB{
privateintgregorianYear;
privateintgregorianMonth;
privateintgregorianDate;
privatebooleanisGregorianLeap;
privateintdayOfYear;
privateintdayOfWeek;//周日一星期的第一天
privateintchineseYear;
privateintchineseMonth;//负数表示闰月
privateintchineseDate;
privateintsectionalTerm;
privateintprincipleTerm;
privatestaticchar[]daysInGregorianMonth=
{31,28,31,30,31,30,31,31,30,31,30,31};
privatestaticString[]stemNames=
{"甲","乙","丙","丁","戊","己","庚","辛","壬","癸"};
privatestaticString[]branchNames=
{"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥"};
privatestaticString[]animalNames=
{"鼠","牛","虎","兔","龙","蛇","马","羊","猴","鸡","狗","猪"};
publicstaticvoidmain（String[]arg）{
ChineseCalendarGBc=newChineseCalendarGB（）;
Stringcmd="day";
inty=1901;
intm=1;
intd=1;
if（arg.length>0）cmd=arg[0];
if（arg.length>1）y=Integer.parseInt（arg[1]）;
if（arg.length>2）m=Integer.parseInt（arg）;
if（arg.length>3）d=Integer.parseInt（arg）;
c.setGregorian（y,m,d）;
puteChineseFields（）;
puteSolarTerms（）;
if（cmd.equalsIgnoreCase（"year"））{
String[]t=c.getYearTable（）;
for（inti=0;i
}elseif（cmd.equalsIgnoreCase（"month"））{
String[]t=c.getMonthTable（）;
for（inti=0;i
}else{
System.out.println（c.toString（））;
}
}
publicChineseCalendarGB（）{
setGregorian（1901,1,1）;
}
publicvoidsetGregorian（inty,intm,intd）{
gregorianYear=y;
gregorianMonth=m;
gregorianDate=d;
isGregorianLeap=isGregorianLeapYear（y）;
dayOfYear=dayOfYear（y,m,d）;
dayOfWeek=dayOfWeek（y,m,d）;
chineseYear=0;
chineseMonth=0;
chineseDate=0;
sectionalTerm=0;
principleTerm=0;
}
publicstaticbooleanisGregorianLeapYear（intyear）{
booleanisLeap=false;
if（year%4==0）isLeap=true;
if（year%100==0）isLeap=false;
if（year%400==0）isLeap=true;
returnisLeap;
}
publicstaticintdaysInGregorianMonth（inty,intm）{
intd=daysInGregorianMonth[m-1];
if（m==2&&isGregorianLeapYear（y））d++;//公历闰年二月多一天
returnd;
}
publicstaticintdayOfYear（inty,intm,intd）{
intc=0;
for（inti=1;i<>
c=c+daysInGregorianMonth（y,i）;
}
c=c+d;
returnc;
}
publicstaticintdayOfWeek（inty,intm,intd）{
intw=1;//公历一年一月一日是星期一，所以起始值为星期日
y=（y-1）%400+1;//公历星期值分部400年循环一次
intly=（y-1）/4;//闰年次数
ly=ly-（y-1）/100;
ly=ly+（y-1）/400;
intry=y-1-ly;//常年次数
w=w+ry;//常年星期值增一
w=w+2*ly;//闰年星期值增二
w=w+dayOfYear（y,m,d）;
w=（w-1）%7+1;
returnw;
}
privatestaticchar[]chineseMonths={
//农历月份大小压缩表，两个字节表示一年。
两个字节共十六个二进制位数，
//前四个位数表示闰月月份，后十二个位数表示十二个农历月份的大小。
0x00,0x04,0xad,0x08,0x5a,0x01,0xd5,0x54,0xb4,0x09,0x64,0x05,0x59,0x45,
0x95,0x0a,0xa6,0x04,0x55,0x24,0xad,0x08,0x5a,0x62,0xda,0x04,0xb4,0x05,
0xb4,0x55,0x52,0x0d,0x94,0x0a,0x4a,0x2a,0x56,0x02,0x6d,0x71,0x6d,0x01,
0xda,0x02,0xd2,0x52,0xa9,0x05,0x49,0x0d,0x2a,0x45,0x2b,0x09,0x56,0x01,
0xb5,0x20,0x6d,0x01,0x59,0x69,0xd4,0x0a,0xa8,0x05,0xa9,0x56,0xa5,0x04,
0x2b,0x09,0x9e,0x38,0xb6,0x08,0xec,0x74,0x6c,0x05,0xd4,0x0a,0xe4,0x6a,
0x52,0x05,0x95,0x0a,0x5a,0x42,0x5b,0x04,0xb6,0x04,0xb4,0x22,0x6a,0x05,
0x52,0x75,0xc9,0x0a,0x52,0x05,0x35,0x55,0x4d,0x0a,0x5a,0x02,0x5d,0x31,
0xb5,0x02,0x6a,0x8a,0x68,0x05,0xa9,0x0a,0x8a,0x6a,0x2a,0x05,0x2d,0x09,
0xaa,0x48,0x5a,0x01,0xb5,0x09,0xb0,0x39,0x64,0x05,0x25,0x75,0x95,0x0a,
0x96,0x04,0x4d,0x54,0xad,0x04,0xda,0x04,0xd4,0x44,0xb4,0x05,0x54,0x85,
0x52,0x0d,0x92,0x0a,0x56,0x6a,0x56,0x02,0x6d,0x02,0x6a,0x41,0xda,0x02,
0xb2,0xa1,0xa9,0x05,0x49,0x0d,0x0a,0x6d,0x2a,0x09,0x56,0x01,0xad,0x50,
0x6d,0x01,0xd9,0x02,0xd1,0x3a,0xa8,0x05,0x29,0x85,0xa5,0x0c,0x2a,0x09,
0x96,0x54,0xb6,0x08,0x6c,0x09,0x64,0x45,0xd4,0x0a,0xa4,0x05,0x51,0x25,
0x95,0x0a,0x2a,0x72,0x5b,0x04,0xb6,0x04,0xac,0x52,0x6a,0x05,0xd2,0x0a,
0xa2,0x4a,0x4a,0x05,0x55,0x94,0x2d,0x0a,0x5a,0x02,0x75,0x61,0xb5,0x02,
0x6a,0x03,0x61,0x45,0xa9,0x0a,0x4a,0x05,0x25,0x25,0x2d,0x09,0x9a,0x68,
0xda,0x08,0xb4,0x09,0xa8,0x59,0x54,0x03,0xa5,0x0a,0x91,0x3a,0x96,0x04,
0xad,0xb0,0xad,0x04,0xda,0x04,0xf4,0x62,0xb4,0x05,0x54,0x0b,0x44,0x5d,
0x52,0x0a,0x95,0x04,0x55,0x22,0x6d,0x02,0x5a,0x71,0xda,0x02,0xaa,0x05,
0xb2,0x55,0x49,0x0b,0x4a,0x0a,0x2d,0x39,0x36,0x01,0x6d,0x80,0x6d,0x01,
0xd9,0x02,0xe9,0x6a,0xa8,0x05,0x29,0x0b,0x9a,0x4c,0xaa,0x08,0xb6,0x08,
0xb4,0x38,0x6c,0x09,0x54,0x75,0xd4,0x0a,0xa4,0x05,0x45,0x55,0x95,0x0a,
0x9a,0x04,0x55,0x44,0xb5,0x04,0x6a,0x82,0x6a,0x05,0xd2,0x0a,0x92,0x6a,
0x4a,0x05,0x55,0x0a,0x2a,0x4a,0x5a,0x02,0xb5,0x02,0xb2,0x31,0x69,0x03,
0x31,0x73,0xa9,0x0a,0x4a,0x05,0x2d,0x55,0x2d,0x09,0x5a,0x01,0xd5,0x48,
0xb4,0x09,0x68,0x89,0x54,0x0b,0xa4,0x0a,0xa5,0x6a,0x95,0x04,0xad,0x08,
0x6a,0x44,0xda,0x04,0x74,0x05,0xb0,0x25,0x54,0x03
};
//初始日，公历农历对应日期：
//公历1901年1月1日，对应农历4598年11月11日
privatestaticintbaseYear=1901;
privatestaticintbaseMonth=1;
privatestaticintbaseDate=1;
privatestaticintbaseIndex=0;
privatestaticintbaseChineseYear=4598-1;
privatestaticintbaseChineseMonth=11;
privatestaticintbaseChineseDate=11;
publicintcomputeChineseFields（）{
if（gregorianYear<1901||gregorianYear>2100）return1;
intstartYear=baseYear;
intstartMonth=baseMonth;
intstartDate=baseDate;
chineseYear=baseChineseYear;
chineseMonth=baseChineseMonth;
chineseDate=baseChineseDate;
//第二个对应日，用以提高计算效率
//公历2000年1月1日，对应农历4697年11月25日
if（gregorianYear>=2000）{
startYear=baseYear+99;
startMonth=1;
startDate=1;
chineseYear=baseChineseYear+99;
chineseMonth=11;
chineseDate=25;
}
intdaysDiff=0;
for（inti=startYear;i<>
daysDiff+=365;
if（isGregorianLeapYear（i））daysDiff+=1;//leapyear
}
for（inti=startMonth;i<>
daysDiff+=daysInGregorianMonth（gregorianYear,i）;
}
daysDiff+=gregorianDate-startDate;
chineseDate+=daysDiff;
intlastDate=daysInChineseMonth（chineseYear,chineseMonth）;
intnextMonth=nextChineseMonth（chineseYear,chineseMonth）;
while（chineseDate>lastDate）{
if（Math.abs（nextMonth）<>
chineseMonth=nextMonth;
chineseDate-=lastDate;
lastDate=daysInChineseMonth（chineseYear,chineseMonth）;
nextMonth=nextChineseMonth（chineseYear,chineseMonth）;
}
return0;
}
privatestaticint[]bigLeapMonthYears={
//大闰月的闰年年份
6,14,19,25,33,36,38,41,44,52,
55,79,117,136,147,150,155,158,185,193
};
publicstaticintdaysInChineseMonth（inty,intm）{
农历日期的算法
cs99619|2010年10月25日|精品收藏|评论:
（0）|浏览:
（47）
转发至新浪微博转发至腾讯微博转帖到开心网转帖到人人网
当前位置：
笨朱先行»精品收藏»农历日期的算法
阴历日期是以月亮的圆缺为计月单位，其以逢朔为初一，以月望为十五（大月为十六日），以月晦为二十九日（大月为三十日）。
然而目前记时通常用阳历日期表达，如欲将阳历日期换算成阴历日期可以用以下两种方法：
其一是查《新编万年历》，如查1984年6月8日是阴历几日？
翻开万年历6月10日是阴历十一，则逆推6月8日是阴历初九。
其二可以利用公式推算阴历日期：
设：
公元年数－1977（或1901）＝4Q＋R
则：
阴历日期=14Q+10.6（R+1）+年内日期序数-29.5n
（注:
式中Q、R、n均为自然数，R<4）
例：
1994年5月7日的阴历日期为：
1994－1977＝17＝4×4＋1
故：
Q＝4，R＝1则：
5月7日的阴历日期为：
14×4+10.6（1+1）+（31+28+31+30+7）-29.5n
=204.2-29.5n
然后用29.5去除204.2得商数6......27.2，6即是n值，余数27即是阴历二十七日。
（本文出自笨朱先行，转载时请注明出处）
升级会员 