[转]一个阳历转农历的java程序

  1 import java.text.ParseException;
  2 import java.text.SimpleDateFormat;
  3 import java.util.Calendar;
  4 import java.util.Date;
  5 import java.util.*;
  6  
  7 public class Lunar {
  8     private int year;
  9     private int month;
 10     private int day;
 11     private boolean leap;
 12     final static String chineseNumber[] = {"一", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一", "十二"};
 13     static SimpleDateFormat chineseDateFormat = new SimpleDateFormat("yyyy年MM月dd日");
 14     final static long[] lunarInfo = new long[]
 15     {0x04bd8, 0x04ae0, 0x0a570, 0x054d5, 0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0, 0x055d2,
 16      0x04ae0, 0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540, 0x0d6a0, 0x0ada2, 0x095b0, 0x14977,
 17      0x04970, 0x0a4b0, 0x0b4b5, 0x06a50, 0x06d40, 0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970,
 18      0x06566, 0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7, 0x0c950,
 19      0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557,
 20      0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5d0, 0x14573, 0x052d0, 0x0a9a8, 0x0e950, 0x06aa0,
 21      0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0,
 22      0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b5a0, 0x195a6,
 23      0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570,
 24      0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0,
 25      0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5,
 26      0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930,
 27      0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530,
 28      0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45,
 29      0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0};
 30  
 31 //====== 传回农历 y年的总天数
 32     final private static int yearDays(int y) {
 33         int i, sum = 348;
 34         for (i = 0x8000; i > 0x8; i >>= 1) {
 35             if ((lunarInfo[y - 1900] & i) != 0) sum += 1;
 36         }
 37         return (sum + leapDays(y));
 38     }
 39  
 40 //====== 传回农历 y年闰月的天数
 41     final private static int leapDays(int y) {
 42         if (leapMonth(y) != 0) {
 43             if ((lunarInfo[y - 1900] & 0x10000) != 0)
 44                 return 30;
 45             else
 46                 return 29;
 47         } else
 48             return 0;
 49     }
 50  
 51 //====== 传回农历 y年闰哪个月 1-12 , 没闰传回 0
 52     final private static int leapMonth(int y) {
 53         return (int) (lunarInfo[y - 1900] & 0xf);
 54     }
 55  
 56 //====== 传回农历 y年m月的总天数
 57     final private static int monthDays(int y, int m) {
 58         if ((lunarInfo[y - 1900] & (0x10000 >> m)) == 0)
 59             return 29;
 60         else
 61             return 30;
 62     }
 63  
 64 //====== 传回农历 y年的生肖
 65     final public String animalsYear() {
 66         final String[] Animals = new String[]{"鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪"};
 67         return Animals[(year - 4) % 12];
 68     }
 69  
 70 //====== 传入 月日的offset 传回干支, 0=甲子
 71     final private static String cyclicalm(int num) {
 72         final String[] Gan = new String[]{"甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸"};
 73         final String[] Zhi = new String[]{"子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", "亥"};
 74         return (Gan[num % 10] + Zhi[num % 12]);
 75     }
 76  
 77 //====== 传入 offset 传回干支, 0=甲子
 78     final public String cyclical() {
 79         int num = year - 1900 + 36;
 80         return (cyclicalm(num));
 81     }
 82  
 83     /**
 84      * 传出y年m月d日对应的农历.
 85      * yearCyl3:农历年与1864的相差数 ?
 86      * monCyl4:从1900年1月31日以来,闰月数
 87      * dayCyl5:与1900年1月31日相差的天数,再加40 ?
 88      *
 89      * @param cal
 90      * @return
 91      */
 92     public Lunar(Calendar cal) {
 93         int yearCyl, monCyl, dayCyl;
 94         int leapMonth = 0;
 95         Date baseDate = null;
 96         try {
 97             baseDate = chineseDateFormat.parse("1900年1月31日");
 98         } catch (ParseException e) {
 99             e.printStackTrace(); //To change body of catch statement use Options | File Templates.
100         }
101  
102 //求出和1900年1月31日相差的天数
103         int offset = (int) ((cal.getTime().getTime() - baseDate.getTime()) / 86400000L);
104         dayCyl = offset + 40;
105         monCyl = 14;
106  
107 //用offset减去每农历年的天数
108 // 计算当天是农历第几天
109 //i最终结果是农历的年份
110 //offset是当年的第几天
111         int iYear, daysOfYear = 0;
112         for (iYear = 1900; iYear < 2050 && offset > 0; iYear++) {
113             daysOfYear = yearDays(iYear);
114             offset -= daysOfYear;
115             monCyl += 12;
116         }
117         if (offset < 0) {
118             offset += daysOfYear;
119             iYear--;
120             monCyl -= 12;
121         }
122 //农历年份
123         year = iYear;
124  
125         yearCyl = iYear - 1864;
126         leapMonth = leapMonth(iYear); //闰哪个月,1-12
127         leap = false;
128  
129 //用当年的天数offset,逐个减去每月(农历)的天数,求出当天是本月的第几天
130         int iMonth, daysOfMonth = 0;
131         for (iMonth = 1; iMonth < 13 && offset > 0; iMonth++) {
132 //闰月
133             if (leapMonth > 0 && iMonth == (leapMonth + 1) && !leap) {
134                 --iMonth;
135                 leap = true;
136                 daysOfMonth = leapDays(year);
137             } else
138                 daysOfMonth = monthDays(year, iMonth);
139  
140             offset -= daysOfMonth;
141 //解除闰月
142             if (leap && iMonth == (leapMonth + 1)) leap = false;
143             if (!leap) monCyl++;
144         }
145 //offset为0时,并且刚才计算的月份是闰月,要校正
146         if (offset == 0 && leapMonth > 0 && iMonth == leapMonth + 1) {
147             if (leap) {
148                 leap = false;
149             } else {
150                 leap = true;
151                 --iMonth;
152                 --monCyl;
153             }
154         }
155 //offset小于0时,也要校正
156         if (offset < 0) {
157             offset += daysOfMonth;
158             --iMonth;
159             --monCyl;
160         }
161         month = iMonth;
162         day = offset + 1;
163     }
164  
165     public static String getChinaDayString(int day) {
166         String chineseTen[] = {"初", "十", "廿", "卅"};
167         int n = day % 10 == 0 ? 9 : day % 10 - 1;
168         if (day > 30)
169             return "";
170         if (day == 10)
171             return "初十";
172         else
173             return chineseTen[day / 10] + chineseNumber[n];
174     }
175  
176     public String toString() {
177         return year + "年" + (leap ? "闰" : "") + chineseNumber[month - 1] + "月" + getChinaDayString(day);
178     }
179     
180  
181     public static void main(String[] args) {
182      Calendar cal=Calendar.getInstance();
183      SimpleDateFormat sdf=new SimpleDateFormat("yyyy年MM月dd日");
184      cal.setTimeZone(TimeZone.getDefault());
185      System.out.println("公历日期:"+sdf.format(cal.getTime()));
186      Lunar lunar=new Lunar(cal);
187      System.out.print("农历日期:");
188      System.out.print(lunar.year+"年 ");
189      System.out.print(lunar.month+"月 ");
190      System.out.print(getChinaDayString(lunar.day));
191      System.out.println("*************");
192      System.out.println(lunar);
193     }
194  
195     /*
196  public static void main(String[] args) throws ParseException {
197   Calendar today = Calendar.getInstance();
198   today.setTime(chineseDateFormat.parse("2007年11月6日"));
199   Lunar lunar = new Lunar(today);
200   System.out.println("北京时间:" + chineseDateFormat.format(today.getTime()) + " 农历" + lunar);
201    }
202     */
203 }

 

posted @ 2015-04-30 17:20  rabtor  阅读(247)  评论(0)    收藏  举报