1、中国公历算法中国公历算法不是太难，关键是星期值的确定。这里给出了简单算法：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;/闰年星期值
3、年*/importjava.text.*;importjava.util.*;classChineseCalendarGBprivateintgregorianYear;privateintgregorianMonth;privateintgregorianDate;privatebooleanisGregorianLeap;privateintdayOfYear;privateintdayOfWeek;/周日一星期的第一天privateintchineseYear;privateintchineseMonth;/负数表示闰月p
4、rivateintchineseDate;privateintsectionalTerm;privateintprincipleTerm;privatestaticchardaysInGregorianMonth=31,28,31,30,31,30,31,31,30,31,30,31;privatestaticStringstemNames=甲,乙,丙,丁,戊,己,庚,辛,壬,癸;privatestaticStringbranchNames=子,丑,寅,卯,辰,巳,午,未,申,酉,戌,亥;privatestaticStringanim
5、alNames=鼠,牛,虎,兔,龙,蛇,马,羊,猴,鸡,狗,猪;publicstaticvoidmain(Stringarg)ChineseCalendarGBc=newChineseCalendarGB();Stringcmd=day;inty=1901;intm=1;intd=1;if(arg.length0)cmd=arg0;if(arg.length1)y=Integer.parseInt(arg1);if(arg.length2)m=Integer.parseInt(arg);if(arg.le
6、ngth3)d=Integer.parseInt(arg);c.setGregorian(y,m,d);puteChineseFields();puteSolarTerms();if(cmd.equalsIgnoreCase(year)Stringt=c.getYearTable();for(inti=0;ielseif(cmd.equalsIgnoreCase(month)Stringt=c.getMonthTable();for(inti=0;ielseSystem.out.println(c.toString();public
7、ChineseCalendarGB()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
8、;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=daysInGregorianM
9、onthm-1;if(m=2&isGregorianLeapYear(y)d+;/公历闰年二月多一天returnd;publicstaticintdayOfYear(inty,intm,intd)intc=0;for(inti=1;ic=c+daysInGregorianMonth(y,i);c=c+d;returnc;publicstaticintdayOfWeek(inty,intm,intd)intw=1;/公历一年一月一日是星期一，所以起始值为星期日y=(y-1)%400+
10、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;privatestaticcharchineseMonths=/农历月份大小压缩表，两个字节表示一年。两个字节共十六个二进制位数，/前四个位数表示闰
11、月月份，后十二个位数表示十二个农历月份的大小。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,0x5
12、6,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,0x0
13、2,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
14、,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,
15、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,0
16、x02,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,0
17、x4a,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日，
18、对应农历4598年11月11日privatestaticintbaseYear=1901;privatestaticintbaseMonth=1;privatestaticintbaseDate=1;privatestaticintbaseIndex=0;privatestaticintbaseChineseYear=4598-1;privatestaticintbaseChineseMonth=11;privatestaticintbaseChineseDate=11;publicintco
19、mputeChineseFields()if(gregorianYear2100)return1;intstartYear=baseYear;intstartMonth=baseMonth;intstartDate=baseDate;chineseYear=baseChineseYear;chineseMonth=baseChineseMonth;chineseDate=baseChineseDate;/第二个对应日，用以提高计算效率/公历2000年1月1日，对应农历4697年11月25日if(gregori
20、anYear=2000)startYear=baseYear+99;startMonth=1;startDate=1;chineseYear=baseChineseYear+99;chineseMonth=11;chineseDate=25;intdaysDiff=0;for(inti=startYear;idaysDiff+=365;if(isGregorianLeapYear(i)daysDiff+=1;/leapyearfor(inti=startMonth;idaysDiff+=days
21、InGregorianMonth(gregorianYear,i);daysDiff+=gregorianDate-startDate;chineseDate+=daysDiff;intlastDate=daysInChineseMonth(chineseYear,chineseMonth);intnextMonth=nextChineseMonth(chineseYear,chineseMonth);while(chineseDatelastDate)if(Math.abs(nextMonth)chineseMonth=nextMonth;chineseDate-=lastDate;lastDate=daysInChineseMonth(chineseYear,chineseMonth);nextMonth=nextChineseMonth(chineseYear,chineseMon