C++阳历转阴历算法及实现
2014-05-29 23:35
405 查看
关于日历的一些基本常识:
阳历:每年12个月,1、3、5、7、8、10、12月都为31天;2月份平年28天,闰年((year%400==0)||(year%4==0&&year%100!=0))为29天,其余月份为30天。
闰年(year):(year%400==0)||(year%4==0&&year%100!=0)
据此可知,某一天是星期几可通过下面的函数返回值获取:
阴历,却没有这些规律可循。阴历分大小月,大月30天,小月29天,但一年中哪个月为大月,哪个月为小月,却是不定的。阴历每十年有4个润年,但哪一年为润年也是不定的。而润月中,哪个润月为大月,哪个为小月也是不定的。因此,推算阴历就没有一个统一的算法。
阴历:阴历是要靠天文观测的,因此上面这些不确定的数据,是可以从天文台得到的。
自定义一个农历数据信息,用数组表示为:
说明:
1.以上数据是经过整理的1900到2049年的农历数据信息;
2.每个数据代表一年,从阳历1900.1.31日起,为第一个数据年的开始,即阳历1900.1.31=阴历0.1.1。150个数据可推150年的阴历,因此目前最大只能推算到2049年,以后的推导,还需要从天文台得到新的数据后才能推导,否则将出现误差。
3.第一条数据 0x04bd8 表示 代表阳历1900.1.31为始的阴历0年,0x04bd8是5个16进制数,共20bit,即二进制表示为:0000 0100 1011 1011 1000
前4位,即0在这一年是润年时才有意义,它代表这年润月的大小月,为1则润大月,为0则润小月;
中间12位,即4bd,每位代表一个月,为1则为大月,为0则为小月;
最后4位,即8,代表这一年的润月月份,为0则不润。首4位要与末4位搭配使用。
根据以上信息,
1.确定是否存在农历的闰月 并返回闰月
2.回闰月的天数
3.农历当年总天数,354?355 384 383
最后给出一个阳历转阴历的算法,供参考
阳历:每年12个月,1、3、5、7、8、10、12月都为31天;2月份平年28天,闰年((year%400==0)||(year%4==0&&year%100!=0))为29天,其余月份为30天。
闰年(year):(year%400==0)||(year%4==0&&year%100!=0)
据此可知,某一天是星期几可通过下面的函数返回值获取:
int weekOfDate(int year,int month,day) { return (day+2*month+3*(month+1)/5+year+year/4-year/100+year/400)%7+1; }
阴历,却没有这些规律可循。阴历分大小月,大月30天,小月29天,但一年中哪个月为大月,哪个月为小月,却是不定的。阴历每十年有4个润年,但哪一年为润年也是不定的。而润月中,哪个润月为大月,哪个为小月也是不定的。因此,推算阴历就没有一个统一的算法。
阴历:阴历是要靠天文观测的,因此上面这些不确定的数据,是可以从天文台得到的。
自定义一个农历数据信息,用数组表示为:
unsigned long int LunarInfo[]= { 0x04bd8,0x04ae0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,//1900---1909 0x04ae0,0x0a5b6,0x0a4d0,0x0d250,0x1d255,0x0b540,0x0d6a0,0x0ada2,0x095b0,0x14977,//1910---1919 0x04970,0x0a4b0,0x0b4b5,0x06a50,0x06d40,0x1ab54,0x02b60,0x09570,0x052f2,0x04970,//1920 0x06566,0x0d4a0,0x0ea50,0x06e95,0x05ad0,0x02b60,0x186e3,0x092e0,0x1c8d7,0x0c950,//1930 0x0d4a0,0x1d8a6,0x0b550,0x056a0,0x1a5b4,0x025d0,0x092d0,0x0d2b2,0x0a950,0x0b557,//1940 0x06ca0,0x0b550,0x15355,0x04da0,0x0a5b0,0x14573,0x052b0,0x0a9a8,0x0e950,0x06aa0,//1950 0x0aea6,0x0ab50,0x04b60,0x0aae4,0x0a570,0x05260,0x0f263,0x0d950,0x05b57,0x056a0,//1960 0x096d0,0x04dd5,0x04ad0,0x0a4d0,0x0d4d4,0x0d250,0x0d558,0x0b540,0x0b6a0,0x195a6,//1970 0x095b0,0x049b0,0x0a974,0x0a4b0,0x0b27a,0x06a50,0x06d40,0x0af46,0x0ab60,0x09570,//1980 0x04af5,0x04970,0x064b0,0x074a3,0x0ea50,0x06b58,0x055c0,0x0ab60,0x096d5,0x092e0,//1990 0x0c960,0x0d954,0x0d4a0,0x0da50,0x07552,0x056a0,0x0abb7,0x025d0,0x092d0,0x0cab5,//2004 07552 0x0a950,0x0b4a0,0x0baa4,0x0ad50,0x055d9,0x04ba0,0x0a5b0,0x15176,0x052b0,0x0a930,//2010 0x07954,0x06aa0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0ea65,0x0d530, //2028 0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,//2030 0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0,//2040--2049 /*0x14b63*///2050 };
说明:
1.以上数据是经过整理的1900到2049年的农历数据信息;
2.每个数据代表一年,从阳历1900.1.31日起,为第一个数据年的开始,即阳历1900.1.31=阴历0.1.1。150个数据可推150年的阴历,因此目前最大只能推算到2049年,以后的推导,还需要从天文台得到新的数据后才能推导,否则将出现误差。
3.第一条数据 0x04bd8 表示 代表阳历1900.1.31为始的阴历0年,0x04bd8是5个16进制数,共20bit,即二进制表示为:0000 0100 1011 1011 1000
前4位,即0在这一年是润年时才有意义,它代表这年润月的大小月,为1则润大月,为0则润小月;
中间12位,即4bd,每位代表一个月,为1则为大月,为0则为小月;
最后4位,即8,代表这一年的润月月份,为0则不润。首4位要与末4位搭配使用。
根据以上信息,
1.确定是否存在农历的闰月 并返回闰月
UCHAR GetLeapMonth(UINT LunarYear) { return LunarInfo[LunarYear-1900]& 0xf; }
2.回闰月的天数
UCHAR GetLeapMonthDays(UINT LunarYear) { if(GetLeapMonth(LunarYear)) return( ( (LunarInfo[LunarYear-1900]) & 0x10000 ) ? 30:29 ); else return (0); }
3.农历当年总天数,354?355 384 383
UCHAR GetLunarCurentMonthDays(UINT LunarYear, UCHAR LunarMonth) { return( (LunarInfo[LunarYear-1900] & (0x10000>>LunarMonth) ) ? 30:29 ); }
最后给出一个阳历转阴历的算法,供参考
UCHAR SolarToLunar(UINT year,UINT month,UINT day)/* 输入阳历时期 年 月 日 */ { /* 阳历1900.1.1 在阳历为1900.1.31 时阴历为1900.1.1 即1900年正月初一 */ UINT totalday=0;/*记录农历1900.1.1日到今天相隔的天数 */ UCHAR runyueflag=0;//标记是否有闰月 UCHAR LeapMonth=0; UCHAR yearflag=0; if(year<1900 || year>2049 || month>12 || month==0 || (year==1900 && month==1) ) return 0; if(day>SloarMonthDays(year,month) || day==0) return 0; //计算1900.1.1 到 输入年月的天数 totalday=GetSolarTotalDays(year, month)+day-30; /* 阳历从1900.1.31(农历1900.1.1)到今天的总天数(减30 实际少了一天)。 */ m_uilunaryear=1900; while(totalday>385) //385大于一年 留出一年多的时间用于条件计算 { totalday-=GetLunarYearTotalDays(m_uilunaryear); // m_uilunaryear++; } if(totalday>GetLunarYearTotalDays(m_uilunaryear)) //排除m_uilunaryear有闰月的情况 { totalday-=GetLunarYearTotalDays(m_uilunaryear); m_uilunaryear++; } LeapMonth=GetLeapMonth(m_uilunaryear); //当前闰哪个月 if(LeapMonth) runyueflag=1; //有闰月则一年为13个月 else runyueflag=0; //没闰月则一年为12个月 if(totalday==0) //刚好一年 { m_uilunarday=GetLunarCurentMonthDays(m_uilunaryear,12); m_uilunarmonth=12; } else { m_uilunarmonth=1; while(m_uilunarmonth<=12) { if( runyueflag==1 && m_uilunarmonth==(LeapMonth+1) ) //闰月处理 { if(totalday>GetLeapMonthDays(m_uilunaryear)) { totalday-=GetLeapMonthDays(m_uilunaryear); //该年闰月天数 } //lunar_month--; runyueflag=0; continue; } if( totalday > GetLunarCurentMonthDays(m_uilunaryear,m_uilunarmonth ) ) { totalday=totalday-GetLunarCurentMonthDays(m_uilunaryear,m_uilunarmonth); //该年该月天数 m_uilunarmonth++; } else { m_uilunarday=totalday; break; } } } }
相关文章推荐
- python实现的阳历转阴历(农历)算法
- 算法I-IV(C++实现)-读书笔记(1)
- 内存管理:算法及其c/c++实现 翻译一
- C#实现的阴历阳历互相转化类实例
- 单源最短路 Dijkstra 算法 C++高效实现
- C/C++面试之算法系列--如何实现用更少的空间表示英文字母(a ~ z)构成char A[n]字符串
- 【学习】关于电梯算法的C++实现
- 较高人工智能的人机博弈程序实现(多个算法结合)含C++源码
- 较高人工智能的人机博弈程序实现(多个算法结合)含C++源码
- 较高人工智能的人机博弈程序实现(多个算法结合)含C++源码
- 用C++实现warshall的算法
- 内存管理:算法及其c/c++实现 翻译二
- 内存管理:算法及其c/c++实现 翻译六
- 内存管理:算法及其c/c++实现 翻译五
- 较高人工智能的人机博弈程序实现(多个算法结合)含C++源码
- LCS 算法之C++实现
- 关于电梯算法的C++实现(zt)
- C++递归实现欧几里德(Euclid)算法
- 实现阳历转阴历的方法