/*
* @ Lunar.java
* @ 根据公历日期y/m/d推算出农历日期(属象,天支地干等)
* @ author Qiangwei He
* @ v1.0 2009/12/10 jdk1.6 compile
*
* field:
* int y,m,d; ----solar calendar(input)
* long[7] lunarInt ----.year0 .month1 .day2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6(output)
* String[7] lunarStr ----.animal0 .lunarMonth1 .lunarDay2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6(output)
* method:
* final int lYearDays(int y) ----传回农历 y年的总天数
* final int leapDays(int y) ----传回农历 y年闰月的天数
* final int leapMonth(int y) ----传回农历 y年闰哪个月 1-12 , 没闰传回 0
* final int monthDays(int y,int m) ----传回农历 y年m月的总天数
* final String AnimalsYear(int y) ----传回农历 y年的生肖
* final String cyclicalm(int num) ----传入 月日的offset 传回干支, 0=甲子
* final String cyclical(int y) ----传入 offset 传回干支, 0=甲子
* final long[] getLunarInt() ----return lunarInt[7]
* final String[] getLunarStr() ----return lunarStr[7]
* void printLunar() ----print lunar calendar
*
* You acknowledge that this software is not designed, licensed or intended
* for use in the design, construction, operation or maintenance of any
* nuclear facility.
* Copyright (c) 2009 Qiang Ltd. All Rights Reserved.
*/
import java.util.*;
public class Lunar
{
int y,m,d; //solar calendar
long[] lunarInt = new long[7]; //.year0 .month1 .day2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
String[] lunarStr = new String[7];//.animal0 .lunarMonth1 .lunarDay2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
public Lunar(int y,int m,int d)
{
this.y=y>=1900 && y<2100?y:2000; //default 2000
this.m=m>0 && m<13?m:1; //default 1
this.d=d>0 && d<32?d:1; //default 1
}
final static long[] lunarInfo=new long[]
{0x04bd8,0x04ae0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,
0x04ae0,0x0a5b6,0x0a4d0,0x0d250,0x1d255,0x0b540,0x0d6a0,0x0ada2,0x095b0,0x14977,
0x04970,0x0a4b0,0x0b4b5,0x06a50,0x06d40,0x1ab54,0x02b60,0x09570,0x052f2,0x04970,
0x06566,0x0d4a0,0x0ea50,0x06e95,0x05ad0,0x02b60,0x186e3,0x092e0,0x1c8d7,0x0c950,
0x0d4a0,0x1d8a6,0x0b550,0x056a0,0x1a5b4,0x025d0,0x092d0,0x0d2b2,0x0a950,0x0b557,
0x06ca0,0x0b550,0x15355,0x04da0,0x0a5d0,0x14573,0x052d0,0x0a9a8,0x0e950,0x06aa0,
0x0aea6,0x0ab50,0x04b60,0x0aae4,0x0a570,0x05260,0x0f263,0x0d950,0x05b57,0x056a0,
0x096d0,0x04dd5,0x04ad0,0x0a4d0,0x0d4d4,0x0d250,0x0d558,0x0b540,0x0b5a0,0x195a6,
0x095b0,0x049b0,0x0a974,0x0a4b0,0x0b27a,0x06a50,0x06d40,0x0af46,0x0ab60,0x09570,
0x04af5,0x04970,0x064b0,0x074a3,0x0ea50,0x06b58,0x055c0,0x0ab60,0x096d5,0x092e0,
0x0c960,0x0d954,0x0d4a0,0x0da50,0x07552,0x056a0,0x0abb7,0x025d0,0x092d0,0x0cab5,
0x0a950,0x0b4a0,0x0baa4,0x0ad50,0x055d9,0x04ba0,0x0a5b0,0x15176,0x052b0,0x0a930,
0x07954,0x06aa0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0ea65,0x0d530,
0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,
0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0};
final public static int lYearDays(int y)//====== 传回农历 y年的总天数
{
int i,sum = 348;
for(i=0x8000; i>0x8; i>>=1)
{
if ((lunarInfo[y-1900] & i)!=0) sum+=1;
}
return(sum+leapDays(y));
}
final public static int leapDays(int y)//====== 传回农历 y年闰月的天数
{
if(leapMonth(y)!=0)
{
if ((lunarInfo[y-1900] & 0x10000)!=0) return 30;
else return 29;
}
else return 0;
}
final public static int leapMonth(int y)//====== 传回农历 y年闰哪个月 1-12 , 没闰传回 0
{
return (int)(lunarInfo[y-1900] & 0xf);
}
final public static int monthDays(int y,int m)//====== 传回农历 y年m月的总天数
{
if ((lunarInfo[y-1900] & (0x10000>>m))==0) return 29;
else return 30;
}
final public static String AnimalsYear(int y)//====== 传回农历 y年的生肖
{
final String[] Animals=new String[] {"鼠","牛","虎","兔","龙","蛇","马","羊","猴","鸡","狗","猪"};
return Animals[(y-4)%12];
}
final public static String cyclicalm(int num)//====== 传入 月日的offset 传回干支, 0=甲子
{
final String[] Gan=new String[] {"甲","乙","丙","丁","戊","己","庚","辛","壬","癸"};
final String[] Zhi=new String[] {"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥"};
return (Gan[num%10]+Zhi[num%12]);
}
final public static String cyclical(int y)//====== 传入 offset 传回干支, 0=甲子
{
int num=y-1900+36;
return (cyclicalm(num));
}
final public long[] getLunarInt()
//传出y年m月d日对应的农历.year0 .month1 .day2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
{
//long[] lunarInt = new long[7]; //.year0 .month1 .day2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
int i=0,temp=0,leap=0;
GregorianCalendar baseDate = new GregorianCalendar(1900,0,31);
GregorianCalendar objDate = new GregorianCalendar(y,m-1,d);
long offset = (objDate.getTimeInMillis()-baseDate.getTimeInMillis())/86400000L;
lunarInt[5] = offset + 40;
lunarInt[4] = 14;
for(i=1900; i<2050 && offset>0; i++) {
temp = lYearDays(i);
offset -= temp;
lunarInt[4] += 12;
}
if(offset<0) {
offset += temp;
i--;
lunarInt[4] -= 12;
}
lunarInt[0] = i;
lunarInt[3] = i-1864;
leap = leapMonth(i); //闰哪个月
lunarInt[6] = 0;
for(i=1; i<13 && offset>0; i++) {
//闰月
if(leap>0 && i==(leap+1) && lunarInt[6]==0)
{ --i; lunarInt[6] = 1; temp = leapDays((int)lunarInt[0]); }
else
{ temp = monthDays((int)lunarInt[0],i); }
//解除闰月
if(lunarInt[6]==1 && i==(leap+1)) lunarInt[6] = 0;
offset -= temp;
if(lunarInt[6] == 0) lunarInt[4] ++;
}
if(offset==0 && leap>0 && i==leap+1){
if(lunarInt[6]==1)
{ lunarInt[6] = 0; }
else
{ lunarInt[6] = 1; --i; --lunarInt[4];}
}
if(offset<0){ offset += temp; --i; --lunarInt[4]; }
lunarInt[1] = i;
lunarInt[2] = offset + 1;
return lunarInt;
}
final public String[] getLunarStr()
{
long[] lun=getLunarInt();
//String[] lunarStr = new String[7];//.animal0 .lunarMonth1 .lunarDay2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
String lMonth="";
switch((int)lun[1])
{
case 1:lMonth="一";break;
case 2:lMonth="二";break;
case 3:lMonth="三";break;
case 4:lMonth="四";break;
case 5:lMonth="五";break;
case 6:lMonth="六";break;
case 7:lMonth="七";break;
case 8:lMonth="八";break;
case 9:lMonth="九";break;
case 10:lMonth="十";break;
case 11:lMonth="十一";break;
case 12:lMonth="十二";break;
}
String lDay = "";
if(lun[2]==10)
lDay="初十";
int two = (int)((lun[2])/10);
if(two==0)
lDay = "初";
if(two==1)
lDay = "十";
if(two==2)
lDay = "廿";
if(two==3)
lDay = "卅";
int one = (int)(lun[2]%10);
switch(one)
{
case 1:lDay += "一";break;
case 2:lDay += "二";break;
case 3:lDay += "三";break;
case 4:lDay += "四";break;
case 5:lDay += "五";break;
case 6:lDay += "六";break;
case 7:lDay += "七";break;
case 8:lDay += "八";break;
case 9:lDay += "九";break;
}
lunarStr[0]=AnimalsYear((int)lun[0]);
lunarStr[1]=lMonth;
lunarStr[2]=lDay;
lunarStr[3]=cyclical((int)lun[0]);
lunarStr[4]=cyclicalm((int)lun[4]);
lunarStr[5]=cyclicalm((int)lun[5]);
lunarStr[6]=lun[6]==0?"":"闰";
return lunarStr;
}
public void printLunar()
{
getLunarStr();
System.out.println("公历:"+y+"年"+m+"月"+d+"日");
System.out.println("农历:"+lunarInt[0]+"年"+lunarInt[1]+"月"+lunarInt[2]+"日");
System.out.println("农历:"+lunarStr[0]+"年"+lunarStr[6]+lunarStr[1]+"月"+lunarStr[2]+", "+lunarStr[3]+"年"+lunarStr[4]+"月"+lunarStr[5]+"日");
}
public static void main(String[] args)
{
Calendar cld = Calendar.getInstance();
int year = cld.get(Calendar.YEAR);
int month = cld.get(Calendar.MONTH)+1;
int day = cld.get(Calendar.DAY_OF_MONTH);
//if(args.length!=3) return;
//int year = new Integer(args[0]).intValue();
//int month = new Integer(args[1]).intValue();
//int day = new Integer(args[2]).intValue();
Lunar nongli = new Lunar(year,month,day);
nongli.printLunar();
}
}
运行结果:
公历:2009年12月31日
农历:2009年11月16日
农历:牛年十一月十六, 己丑年丙子月庚戌日