Java 农历算法

public class Lunar {

private int year;

private int month;

private int day;

private boolean leap;

final static String chineseNumber[] =

{ "一", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一", "十二" };

final static String Big_Or_Small[] =

{ "大", "小", "大", "小", "大", "小", "大", "大", "小", "大", "小", "大" };

private String[] LunarHolDayName =

{ "小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", "夏至",

"小暑", "大暑", "立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪",

"冬至" };

static SimpleDateFormat chineseDateFormat = new SimpleDateFormat(

" yyyy年MM月dd日 ");

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 };

// ====== 传回农历 y年的总天数

final private static int yearDays(int y)

{

int i, sum = 348;

for (i = 0x8000; i > 0x8; i >>= 1)

{

if ((lunarInfo[y - 1900] & i) != 0)

sum += 1;

}

return (sum + leapDays(y));

}

// ====== 传回农历 y年闰月的天数

final private static int leapDays(int y)

{

if (leapMonth(y) != 0)

{

if ((lunarInfo[y - 1900] & 0x10000) != 0)

return 30;

else

return 29;

}

else

return 0;

}

// ====== 传回农历 y年闰哪个月 1-12 , 没闰传回 0

final private static int leapMonth(int y)

{

return (int) (lunarInfo[y - 1900] & 0xf);

}

// ====== 传回农历 y年m月的总天数

final private static int monthDays(int y, int m)

{

if ((lunarInfo[y - 1900] & (0x10000 >> m)) == 0)

return 29;

else

return 30;

}

// ====== 传回农历 y年的生肖

final public String animalsYear()

{

final String[] Animals = new String[]

{ "鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪" };

return Animals[(year - 4) % 12];

}

// ====== 传入 月日的offset 传回干支, 0=甲子

final private static String cyclicalm(int num)

{

final String[] Gan = new String[]

{ "甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸" };

final String[] Zhi = new String[]

{ "子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", "亥" };

return (Gan[num % 10] + Zhi[num % 12]);

}

// ====== 传入 offset 传回干支, 0=甲子

final public String cyclical()

{

int num = year - 1900 + 36;

return (cyclicalm(num));

}

/** */

/**

* 传出y年m月d日对应的农历. yearCyl3:农历年与1864的相差数 ? monCyl4:从1900年1月31日以来,闰月数

* dayCyl5:与1900年1月31日相差的天数,再加40 ?

*

* @param cal

* @return

*/

public Lunar(Calendar cal)

{

// cal.add(cal.get(Calendar.DAY_OF_MONTH),1);

@SuppressWarnings(" unused ")

int yearCyl, monCyl, dayCyl;

int leapMonth = 0;

Date baseDate = null;

try

{

baseDate = chineseDateFormat.parse(" 1900年1月31日 ");

}

catch (ParseException e)

{

e.printStackTrace(); // To change body of catch statement use

// Options | File Templates.

}

// 求出和1900年1月31日相差的天数

int offset = (int) ((cal.getTime().getTime() - baseDate.getTime()) / 86400000L);

dayCyl = offset + 40;

monCyl = 14;

// 用offset减去每农历年的天数

// 计算当天是农历第几天

// i最终结果是农历的年份

// offset是当年的第几天

int iYear, daysOfYear = 0;

for (iYear = 1900; iYear < 2050 && offset > 0; iYear++)

{

daysOfYear = yearDays(iYear);

offset -= daysOfYear;

monCyl += 12;

}

if (offset < 0)

{

offset += daysOfYear;

iYear--;

monCyl -= 12;

}

// 农历年份

year = iYear;

yearCyl = iYear - 1864;

leapMonth = leapMonth(iYear); // 闰哪个月,1-12

leap = false;

// 用当年的天数offset,逐个减去每月(农历)的天数，求出当天是本月的第几天

int iMonth, daysOfMonth = 0;

for (iMonth = 1; iMonth < 13 && offset > 0; iMonth++)

{

// 闰月

if (leapMonth > 0 && iMonth == (leapMonth + 1) && !leap)

{

--iMonth;

leap = true;

daysOfMonth = leapDays(year);

}

else

daysOfMonth = monthDays(year, iMonth);

offset -= daysOfMonth;

// 解除闰月

if (leap && iMonth == (leapMonth + 1))

leap = false;

if (!leap)

monCyl++;

}

// offset为0时，并且刚才计算的月份是闰月，要校正

if (offset == 0 && leapMonth > 0 && iMonth == leapMonth + 1)

{

if (leap)

{

leap = false;

}

else

{

leap = true;

--iMonth;

--monCyl;

}

}

// offset小于0时，也要校正

if (offset < 0)

{

offset += daysOfMonth;

--iMonth;

--monCyl;

}

month = iMonth;

day = offset + 1;

}

public static String getChinaDayString(int day)

{

String chineseTen[] =

{ "初", "十", "廿", "卅" };

int n = day % 10 == 0 ? 9 : day % 10 - 1;

if (day > 30)

return "";

if (day == 10)

return "初十";

else

return chineseTen[day / 10] + chineseNumber[n];

}

public String toString()

{

return /* cyclical() + "年" + */(leap ? "闰" : "")

+ chineseNumber[month - 1] + "月" + getChinaDayString(day);

}

public String numeric_md()

{// 返回阿拉伯数字的阴历日期

String temp_day;

String temp_mon;

temp_mon = month < 10 ? "0" + month : "" + month;

temp_day = day < 10 ? "0" + day : "" + day;

return temp_mon + temp_day;

}

public String get_month()

{// 返回阴历的月份

return chineseNumber[month - 1];

}

public String get_date()

{// 返回阴历的天

return getChinaDayString(day);

}

public String get_Big_Or_Small()

{// 返回的月份的大或小

return Big_Or_Small[month - 1];

}

}