公历转农历

转载 2006年06月12日 15:03:00

/*------------农历转换函数-----------*/
char *GetDayOf(PSYSTEMTIME pSt)

 /*天干名称*/
 const char *cTianGan[] = {"甲","乙","丙","丁","戊","己","庚","辛","壬","癸"};
 /*地支名称*/
 const char *cDiZhi[] = {"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥"};
 /*属相名称*/
 const char *cShuXiang[] = {"鼠","牛","虎","兔","龙","蛇","马","羊","猴","鸡","狗","猪"};
 /*农历日期名*/
 const char *cDayName[] = {"*","初一","初二","初三","初四","初五",
       "初六","初七","初八","初九","初十","十一","十二","十三","十四","十五","十六","十","十八","十九","二十","廿一","廿二","廿三","廿四","廿五","廿六","廿七","廿八","廿九","三十"};
 /*农历月份名*/
 const char *cMonName[] = {"*","正","二","三","四","五","六","七","八","九","十","十一","腊"};

 /*公历每月前面的天数*/
 const int wMonthAdd[12] = {0,31,59,90,120,151,181,212,243,273,304,334};
 /*农历数据*/
 const int wNongliData[100] = {2635,333387,1701,1748,267701,694,2391,133423,1175,396438
       ,3402,3749,331177,1453,694,201326,2350,465197,3221,3402
       ,400202,2901,1386,267611,605,2349,137515,2709,464533,1738
       ,2901,330421,1242,2651,199255,1323,529706,3733,1706,398762
       ,2741,1206,267438,2647,1318,204070,3477,461653,1386,2413
       ,330077,1197,2637,268877,3365,531109,2900,2922,398042,2395
       ,1179,267415,2635,661067,1701,1748,398772,2742,2391,330031
       ,1175,1611,200010,3749,527717,1452,2742,332397,2350,3222
       ,268949,3402,3493,133973,1386,464219,605,2349,334123,2709
       ,2890,267946,2773,592565,1210,2651,395863,1323,2707,265877};
 static int wCurYear,wCurMonth,wCurDay;
 static int nTheDate,nIsEnd,m,k,n,i,nBit;
 TCHAR szNongli[30], szNongliDay[10],szShuXiang[10];
 /*---取当前公历年、月、日---*/
 wCurYear = pSt->wYear;
 wCurMonth = pSt->wMonth;
 wCurDay = pSt->wDay;
 /*---计算到初始时间1921年2月8日的天数:1921-2-8(正月初一)---*/
 nTheDate = (wCurYear - 1921) * 365 + (wCurYear - 1921) / 4 + wCurDay + wMonthAdd[wCurMonth - 1] - 38;
 if((!(wCurYear % 4)) && (wCurMonth > 2))
  nTheDate = nTheDate + 1;


 /*--计算农历天干、地支、月、日---*/
 nIsEnd = 0;
 m = 0;
 while(nIsEnd != 1)
 {
  if(wNongliData[m] < 4095)
   k = 11;
  else
   k = 12;
  n = k;
  while(n>=0)
  {
   //获取wNongliData(m)的第n个二进制位的值
   nBit = wNongliData[m];
   for(i=1;i<n+1;i++)
    nBit = nBit/2;

   nBit = nBit % 2;

   if (nTheDate <= (29 + nBit))
   {
    nIsEnd = 1;
    break;
   }

   nTheDate = nTheDate - 29 - nBit;
   n = n - 1;
  }
  if(nIsEnd)
   break;
  m = m + 1;
 }
 wCurYear = 1921 + m;
 wCurMonth = k - n + 1;
 wCurDay = nTheDate;
 if (k == 12)
 {
  if (wCurMonth == wNongliData[m] / 65536 + 1)
   wCurMonth = 1 - wCurMonth;
  else if (wCurMonth > wNongliData[m] / 65536 + 1)
   wCurMonth = wCurMonth - 1;
 }


 /*--生成农历天干、地支、属相 ==> wNongli--*/
 wsprintf(szShuXiang,"%s",cShuXiang[((wCurYear - 4) % 60) % 12]);
 wsprintf(szNongli,"%s(%s%s)年",szShuXiang,cTianGan[((wCurYear - 4) % 60) % 10],cDiZhi[((wCurYear - 4) % 60) % 12]);


 /*--生成农历月、日 ==> wNongliDay--*/
 if (wCurMonth < 1)
  wsprintf(szNongliDay,"闰%s",cMonName[-1 * wCurMonth]);
 else
  strcpy(szNongliDay,cMonName[wCurMonth]);


 strcat(szNongliDay,"月");
 strcat(szNongliDay,cDayName[wCurDay]);
 return strcat(szNongli,szNongliDay);


}

开源多语言公历农历转换

Lunar Solar Calendar Converter 公历(阳历) 农历(阴历)转换,支持时间段从1900-2100 如果需要更长的时间段,利用generate.htm生成的数...
  • problc
  • problc
  • 2015年01月19日 14:00
  • 8691

C#、Asp.Net 农历与阴历之间相互转化工具类

在做一些数据统计或者时间方面的开发时,通常会遇到需要对时间的农历与阴历之间相互进行转化,需要查询当前日期是否为春节或其他节日,判断是否为春节期间“jrDate == "除夕" || jrDate ==...
  • qq285679784
  • qq285679784
  • 2016年04月28日 18:04
  • 1344

关于“1900年至2100年公历、农历互转的js代码”的详细分析

今天讲的是对1900年至2100年公历、农历互转的js代码进行详细分析! 首先来看一下js里面的方法都得到了哪些有用的数据--这里直接在html文档里面引入该js文件,然后调用对应的方法: s...
  • yang00322
  • yang00322
  • 2017年08月12日 17:28
  • 205

C#公历转换到农历

using System;using System.Data;using System.Configuration;using System.Web;using System.Web.Security...
  • zym12021
  • zym12021
  • 2008年02月23日 15:35
  • 1152

oracle农历转公历函数

FUNCTION GetCalendarDate(P_Year in VARCHAR2,             P_Month IN VARCHAR2,             P_Da...
  • bw555
  • bw555
  • 2014年09月17日 09:31
  • 819

[Delphi]公历到农历的转换法

unit CNYear;interfaceuses sysutils;type TCNDate = Cardinal;function DecodeGregToCNDate(dtGreg:TDateT...
  • ie421
  • ie421
  • 2007年04月13日 08:29
  • 531

公历转农历算法(C语言)

#include #include #include unsigned int LunarCalendarDay; unsigned int LunarCalendarTable[199] =...
  • syrchina
  • syrchina
  • 2013年01月24日 19:34
  • 9590

ios阳历转农历

- (BOOL)application:(UIApplication *)application didFinishLaunchingWithOptions:(NSDictionary *)lau...
  • zz1732818683
  • zz1732818683
  • 2014年03月13日 00:16
  • 1085

公历转农历源代码

作者:yaozheng      发表时间:2004-4-29 17:15:00 前段时间做软件写了个公历转农历的函数,目前公开给大家参考,有兴趣的朋友可以在此基础上进一步完善其功能/*-------...
  • Y___Y
  • Y___Y
  • 2006年10月21日 19:45
  • 2707

公历转农历函数

class Program { static void Main(string[] args) { System.Globalizati...
  • a497785609
  • a497785609
  • 2012年01月11日 13:26
  • 1234
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:公历转农历
举报原因:
原因补充:

(最多只允许输入30个字)