公历转农历、生肖、干支纪年、节气算法研究和C程序实现

已于 2024-06-05 23:55:24 修改
阅读量2.7k 收藏 26
点赞数 9
分类专栏： MCU 笔记 文章标签： 单片机 算法
于 2021-08-29 17:44:58 首次发布
本文章为CSDN博主Tyrion.Mon原创，未经博主允许不得转载，转载请附上原文链接以及本版权信息。
本文链接：https://blog.csdn.net/Stack_/article/details/119980697
版权
MCU 同时被 2 个专栏收录
33 篇文章 11 订阅
订阅专栏
笔记
33 篇文章 2 订阅
订阅专栏
本文介绍了如何通过查表法实现公历与农历的转换，重点在于农历数据的制表，数据来源于香港天文台1901年至2100年的农历对照数据。同时，提到了农历年月日的计算方式，以及干支纪年和生肖的计算。程序实现了根据公历年月日计算农历月日，并提供了计算24节气的日期。
摘要由CSDN通过智能技术生成

[本文发布于https://blog.csdn.net/Stack_/article/details/119980697，未经许可不得转载，转载须注明出处]


一、参考文章


阳历转阴历算法概述

1900年至2100年公历、农历互转Js代码

农历的那些事儿（一）

香港天文台农历数据（txt版）

香港天文台农历数据（pdf版）


二、关于农历


查阅了大量关于公历转农历的博文之后，明确了：所谓的公历转农历算法即系基于查表法推算。因为农历无明显规律，数据需要天文台观测得到，因此无法用公式将公历转成农历。

如果愿意花钱，可以每天发请求从特定网站获取json文本并解析得到这些数据。不像时间和天气信息，免费的农历服务都是些小网站在提供，有些已经停止了这些服务，或者即将关停。

要制表就需要公历 - 农历对照数据。

官方网站 - 香港天文台，仅此一家在网上公开了公历 - 农历对照数据。

都说内地仅紫金山天文台有发布农历数据，前几年也发布了农历国标，但数据在哪呢？


三、制表 （年月日）


上面的博文的数据均来自香港天文台，香港天文台公开的数据范围为1901年至2100年。

上面的博文的博主已将对照数据按一定格式转成了十六进制数据制成了表，发布在博文内或者GitHub上。在此感谢那两位博主。



/* 经文本对比，两组数据的1933年、1996年、2033年、2057年、2060年有区别 */
/* 遂和天文台的数据对比，嗯。。。两组数据你错我就对 */
/* 注意只对比了有区别的这几个年份，并没有验证所所有年份数据 */
/* 1900年的数据两个都对，第二组只包含了1900年的农历十一、十二月份 */
/* 1900年1月31日为正月初一 */
/* 1901年2月19日为正月初一 */
@ CSDN Tyrion.Mon
uint32_t NongLi_Info[] = 
{
    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-1929
    0x06566, 0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7, 0x0c950, //1930-1939       //1933有误
    0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557, //1940-1949
    0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5b0, 0x14573, 0x052b0, 0x0a9a8, 0x0e950, 0x06aa0, //1950-1959
    0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0, //1960-1969
    0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b6a0, 0x195a6, //1970-1979
    0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570, //1980-1989
    0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0, //1990-1999       //1996有误
    0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5, //2000-2009
    0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930, //2010-2019
    0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530, //2020-2029
    0x05aa0, 0x076a3, 0x096d0, 0x04afb, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45, //2030-2039
    0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0, //2040-2049
    0x14b63, 0x09370, 0x049f8, 0x04970, 0x064b0, 0x168a6, 0x0ea50, 0x06b20, 0x1a6c4, 0x0aae0, //2050-2059       //2057有误
    0x0a2e0, 0x0d2e3, 0x0c960, 0x0d557, 0x0d4a0, 0x0da50, 0x05d55, 0x056a0, 0x0a6d0, 0x055d4, //2060-2069       //2060有误
    0x052d0, 0x0a9b8, 0x0a950, 0x0b4a0, 0x0b6a6, 0x0ad50, 0x055a0, 0x0aba4, 0x0a5b0, 0x052b0, //2070-2079
    0x0b273, 0x06930, 0x07337, 0x06aa0, 0x0ad50, 0x14b55, 0x04b60, 0x0a570, 0x054e4, 0x0d160, //2080-2089
    0x0e968, 0x0d520, 0x0daa0, 0x16aa6, 0x056d0, 0x04ae0, 0x0a9d4, 0x0a2d0, 0x0d150, 0x0f252, //2090-2099
    0x0d520                                                                                   //2100
};

uint32_t LUNAR_INFO[] = {
    0x00010, 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-1929
    0x06566, 0x0d4a0, 0x0ea50, 0x16a95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7, 0x0c950, //1930-1939
    0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557, //1940-1949
    0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5b0, 0x14573, 0x052b0, 0x0a9a8, 0x0e950, 0x06aa0, //1950-1959
    0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0, //1960-1969
    0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b6a0, 0x195a6, //1970-1979
    0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570, //1980-1989
    0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x05ac0, 0x0ab60, 0x096d5, 0x092e0, //1990-1999
    0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5, //2000-2009
    0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930, //2010-2019
    0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530, //2020-2029
    0x05aa0, 0x076a3, 0x096d0, 0x026fb, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45, //2030-2039       //2033有误
    0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0, //2040-2049
    0x14b63, 0x09370, 0x049f8, 0x04970, 0x064b0, 0x168a6, 0x0ea50, 0x06aa0, 0x1a6c4, 0x0aae0, //2050-2059
    0x092e0, 0x0d2e3, 0x0c960, 0x0d557, 0x0d4a0, 0x0da50, 0x05d55, 0x056a0, 0x0a6d0, 0x055d4, //2060-2069
    0x052d0, 0x0a9b8, 0x0a950, 0x0b4a0, 0x0b6a6, 0x0ad50, 0x055a0, 0x0aba4, 0x0a5b0, 0x052b0, //2070-2079
    0x0b273, 0x06930, 0x07337, 0x06aa0, 0x0ad50, 0x14b55, 0x04b60, 0x0a570, 0x054e4, 0x0d160, //2080-2089
    0x0e968, 0x0d520, 0x0daa0, 0x16aa6, 0x056d0, 0x04ae0, 0x0a9d4, 0x0a2d0, 0x0d150, 0x0f252, //2090-2099
    0x0d520                                                                                   //2100
};

每个32位数据各代表一年，其中bit0 - bit16共17位有意义。

位含义
bit [3:0]数值范围为0 - C 。0 代表此年不存在闰月，非零表示此年有闰月，具体数值 1 - C 表示闰月月份
bit [15:4]bit 15 - bit 4 分别代表此年的1 - 12月，为 0 表示此月为小月（29日），为 1 表示大月（30日）
bit16在bit [3:0] 为 0 时忽略；其值仅在bit [3:0]不为 0 时有效，为1时表示该年闰月为大月，为 0 时表小月
闰年闰月
每隔开两三年出现一次闰年，闰年比非闰年多出一个月，例如某年为闰年，闰月月份为5月，则在5月和6月之间增加一个闰月，称为闰5月某年闰月为大月还是小月需要根据bit16确定

四、干支纪年


根据 天干 ：甲、乙、丙、丁、戊、己、庚、辛、壬、癸 以及 地支 ： 子（鼠）、丑（牛）、寅（虎）、卯（兔）、辰（龙）、巳（蛇）、午（马）、未（羊）、申（猴）、酉（鸡）、戌（狗）、亥（猪） 混合编排，60年一个轮回。

以立春还是正月初一作为干支纪年上一年和下一年的界限，众说纷纭。小米手机的日历是以正月初一作为界限。

1901年和2021年都是辛丑年，辛丑条约距今已120年。


在这里插入图片描述


五、二十四节气


参考文章

二十四节气的日期数学计算公式

计算公式基本都与这一篇相同，20世纪与22世纪的数据不全。


六、程序实现


实现了根据公历年月日计算出农历月日、生肖、干支纪年、节气，在VS CODE上验证过一小部分，不保证不会出错。


#include <stdio.h>
#include <stdint.h>
#include <math.h>



uint32_t LUNAR_INFO[] = {@ CSDN Tyrion.Mon
    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-1929
    0x06566, 0x0d4a0, 0x0ea50, 0x16a95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7, 0x0c950, //1930-1939
    0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557, //1940-1949
    0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5b0, 0x14573, 0x052b0, 0x0a9a8, 0x0e950, 0x06aa0, //1950-1959
    0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0, //1960-1969
    0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b6a0, 0x195a6, //1970-1979
    0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570, //1980-1989
    0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x05ac0, 0x0ab60, 0x096d5, 0x092e0, //1990-1999
    0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5, //2000-2009
    0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930, //2010-2019
    0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530, //2020-2029
    0x05aa0, 0x076a3, 0x096d0, 0x04afb, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45, //2030-2039
    0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0, //2040-2049
    0x14b63, 0x09370, 0x049f8, 0x04970, 0x064b0, 0x168a6, 0x0ea50, 0x06aa0, 0x1a6c4, 0x0aae0, //2050-2059
    0x092e0, 0x0d2e3, 0x0c960, 0x0d557, 0x0d4a0, 0x0da50, 0x05d55, 0x056a0, 0x0a6d0, 0x055d4, //2060-2069
    0x052d0, 0x0a9b8, 0x0a950, 0x0b4a0, 0x0b6a6, 0x0ad50, 0x055a0, 0x0aba4, 0x0a5b0, 0x052b0, //2070-2079
    0x0b273, 0x06930, 0x07337, 0x06aa0, 0x0ad50, 0x14b55, 0x04b60, 0x0a570, 0x054e4, 0x0d160, //2080-2089
    0x0e968, 0x0d520, 0x0daa0, 0x16aa6, 0x056d0, 0x04ae0, 0x0a9d4, 0x0a2d0, 0x0d150, 0x0f252, //2090-2099
    0x0d520                                                                                   //2100
};

typedef struct
{
    uint16_t year;
    uint8_t month;
    uint8_t date;
    uint8_t week;
    uint8_t hour;
    uint8_t minute;
    uint8_t second;
} Solar_t;  //公历

typedef struct
{
    uint8_t has_leap_month;     // 1 此年有闰月, 0 无
    /* 如果有闰月下面2个才有意义 */
    uint8_t leapWhichMonth;     // 此年闰月是哪个月份
    uint8_t leapMonthis_30days; // 1 此年闰大月, 0 闰小月

    uint8_t month;              // 当前农历月份
    uint8_t is_leap_month;      // 1 当前农历月是闰月 0非闰月
    uint8_t date;               // 当前农历日
    uint8_t animal;             // 此农历年生肖 1 - 12 : 鼠 - 猪
    uint8_t tian_gan;           // 1-10甲、乙、丙、丁、戊、己、庚、辛、壬、癸
    uint8_t di_zhi;             // 1-12子、丑、寅、卯、辰、巳、午、未、申、酉、戌、亥
} Lunar_t;  //农历




/**
  * @brief  计算公历年份是闰还是平
  * @note   
  * @param  
  * @retval 
  * @author PWH @ CSDN Tyrion.Mon
  * @date   2021/6
  */
uint8_t IsLeapYear(uint16_t year)
{
	if((year % 4 == 0 && year % 100 != 0) || year % 400 == 0)
		return 1; //是闰年
	return 0;   //是平年
}

/**
  * @brief  计算公历两个日期的间隔天数
  * @note   Solar2的年月日必须晚于Solar1或相等
  * @param  
  * @retval 
  * @author PWH @ CSDN Tyrion.Mon
  * @date   2021/6
  */
uint32_t Calc_Solar_DateInterval(Solar_t *Solar1, Solar_t *Solar2)
{
    int16_t i = 0;
    uint8_t MonthDays[12] = {31, 28, 31, 30, 31, 30,          31, 31, 30, 31, 30, 31};
    uint32_t TotalDays1 = 0;    //Solar1
    uint32_t TotalDays2 = 0;    //Solar2
    uint32_t TotalDays = 0;     //记录间隔总天数

    /* 计算从Solar1->year 1月1日到Solar1->month Solar2->date的总天数 */
    MonthDays[1] = (IsLeapYear(Solar1->year) ? 29 : 28);
    for (i = 1; i < Solar1->month; i++)
    {
        TotalDays1 += MonthDays[i - 1];  //累计1月到month-1月的天数
    }
    TotalDays1 += Solar1->date;          //最后加上month月已达天数，和值即为本年1月1日到输入日期的天数

    /* 计算从Solar2->year 1月1日到Solar2->month Solar2->date的总天数 */
    MonthDays[1] = (IsLeapYear(Solar2->year) ? 29 : 28);
    for (i = 1; i < Solar2->month; i++)
    {
        TotalDays2 += MonthDays[i - 1];
    }
    TotalDays2 += Solar2->date;

    /* 如果为同一年 */
    if (Solar1->year == Solar2->year)
    {
        TotalDays = TotalDays2 - TotalDays1;
    }
    else
    {
        /* 计算两个年份之间的年份的总天数 */
        for (i = Solar1->year + 1; i < Solar2->year; i++)
        {
            TotalDays += (IsLeapYear(i) ? 366 : 365);
        }
        /* Solar1->year剩余天数 + 两年之间年份总天数 + Solar2->year已过天数 */
        TotalDays += ((IsLeapYear(Solar1->year) ? 366 : 365) - TotalDays1 + TotalDays2);
    }
    printf("TotalDays = %d\r\n", TotalDays);
    return TotalDays;
}

/**
  * @brief  计算此农历年是否有闰月
  * @note   
  * @param  
  * @retval -1 输入错误
  *         0 无闰月
  *         1 有闰月
  * @author PWH @ CSDN Tyrion.Mon
  * @date   2021/6
  */
int8_t Calc_thisLunarYear_HasLeapMonth(uint16_t SolarYear, Lunar_t *Lunar)
{
    if (SolarYear < 1900 || SolarYear > 2100) return -1;

    /* 为 0 或者大于12， 无闰月 */
    if ((LUNAR_INFO[SolarYear - 1900] & 0x0000000f) == 0 || (LUNAR_INFO[SolarYear - 1900] & 0x0000000f) > 12)
    {
        Lunar->has_leap_month = 0;
        return 0;
    }
    /* 存在闰月 */
    Lunar->has_leap_month = 1;
    Lunar->leapWhichMonth = LUNAR_INFO[SolarYear - 1900] & 0x0000000f;                  // bit3-bit0 该年闰月月份
    Lunar->leapMonthis_30days = (LUNAR_INFO[SolarYear - 1900] >> 16) & 0x00000001;      // bit16 闰月为大还是小 1大0小

    return 1;
}
/**
  * @brief  计算此年农历月（非闰月）的天数
  * @note   
  * @param  
  * @retval -1 输入错误
  *         正确值为29或30
  * @author PWH @ CSDN Tyrion.Mon
  * @date   2021/6
  */
int8_t Calc_thisLunarMonth_Days(uint16_t SolarYear, uint8_t LunarMonth)
{
    if (SolarYear < 1900 || SolarYear > 2100) return -1;
    if (LunarMonth < 1 || LunarMonth > 12) return -1;
                                            /* 农历1月bit15， 2月bit14，12月bit4 */
    if ( ( LUNAR_INFO[SolarYear - 1900] >> ((12 - LunarMonth) + 4) ) & 0x00000001 )
    {
        return 30;
    }
    else
    {
        return 29;
    }
}
/**
  * @brief  根据间隔天数计算农历月日
  * @note   1900/1/31为正月初一，鼠年，以此为起点
  * @param  
  * @retval 
  * @author PWH @ CSDN Tyrion.Mon
  * @date   2021/6
  */
int8_t Calc_Lunar_From_DateInterval(uint32_t DateInterval, Lunar_t *LU)
{
    uint16_t SolarYear = 1900;
    uint32_t DI_temp = 0;
    int8_t err;

    LU->has_leap_month = 0;
    LU->leapWhichMonth = 0;
    LU->leapMonthis_30days = 0;
    LU->is_leap_month = 0;      //1900农历1月非闰月
    LU->month = 1;              //1900正月初一始
    LU->date = 1;
    LU->animal = 1;             //鼠
    LU->tian_gan = 7;           //庚
    LU->di_zhi = LU->animal;    //子

    while (1)
    {
        /* 查询此年是否存在闰月，闰月为闰几月，闰大月还是闰小月 */
        err = Calc_thisLunarYear_HasLeapMonth(SolarYear, LU);
        if (err == -1) return -1;   //输入参数有误
        
        /* 如果当前月为闰月 */
        if (LU->is_leap_month == 1)
        {
            /* 为大月，则加30日，否则29日 */
            DI_temp += LU->leapMonthis_30days ? 30 : 29;
        }
        else    /* 当前月非闰月 */
        {               /* 查询非闰月月份的天数 */
            DI_temp += Calc_thisLunarMonth_Days(SolarYear, LU->month);
        }
        /* 总天数已达, 当前月即是目标农历月 */
        if (DI_temp >= DateInterval)
        {
            /* 如果当前月为闰月 */
            if (LU->is_leap_month == 1)
            {
                LU->date = (LU->leapMonthis_30days ? 30 : 29) - (DI_temp - DateInterval);
            }
            else
            {
                LU->date = Calc_thisLunarMonth_Days(SolarYear, LU->month) - (DI_temp - DateInterval);
            }
            return 1;
        }

        /* 未达 */

        /* 此年有闰月 并且今年未到过闰月 */
        if ((LU->has_leap_month == 1) && (LU->is_leap_month == 0))
        {
            /* 如果此年闰月月份和当前月一样, 此时应该在当前月和下一个月之间插入一个闰月 */
            /* 因为上面的步骤已累加了闰月前一个月份的天数，所以直接跳到闰月，并标记当前月为闰月 */
            if (LU->leapWhichMonth == LU->month)
            {
                LU->is_leap_month = 1;  //标记现在是闰月,如果当前月是5月,匹配上了,那这个闰月就是闰5月
                printf("SolarYear %d LEAP MONTH is %d\r\n", SolarYear, LU->leapWhichMonth);
            }
            else
            {
                LU->month += 1;
            }
        }
        /* 此年有闰月且今个月为闰月   或者 此年无闰月 */
        else if ( ((LU->has_leap_month == 1) && (LU->is_leap_month == 1))
                || (LU->has_leap_month == 0) )
        {
            LU->is_leap_month = 0;  //闰月下一个月为非闰月
            LU->month += 1;
        }
        /* 溢出处理， 生肖， 天干地支 */
        if (LU->month > 12)
        {
            if (++SolarYear > 2100) return -1;
            LU->month = 1;
            if (++LU->animal > 12)
            {
                LU->animal = 1;
            }
            if (++LU->tian_gan > 10)
            {
                LU->tian_gan = 1;
            }
        }
        LU->di_zhi = LU->animal;
    }
}

/**
  * @brief  公历年月日转农历月日
  * @note   
  * @param  
  * @retval 
  * @author PWH @ CSDN Tyrion.Mon
  * @date   2021/6
  */
int8_t Solar2Lunar(Solar_t *so, Lunar_t *lu)
{
    Solar_t solar_1900;

    /* 1900/1/31为正月初一，鼠年，以此为起点 */
    solar_1900.year = 1900; /* 不 */
    solar_1900.month = 1;   /* 要 */
    solar_1900.date = 31;   /* 改 */
    return Calc_Lunar_From_DateInterval(Calc_Solar_DateInterval(&solar_1900, so) + 1, lu);
}

/**
  * @brief  计算某个公历年的24节气对应日期
  * @note    2月 立春 雨水
  *          3月 惊蛰 春分
  *          4月 清明 谷雨
  *          5月 立夏 小满
  *          6月 芒种 夏至
  *          7月 小暑 大暑
  *          8月 立秋 处暑
  *          9月 白露 秋分
  *         10月 寒露 霜降
  *         11月 立冬 小雪
  *         12月 大雪 冬至
  *          1月 小寒 大寒
  * @param  
  * @retval 
  * @author PWH @ CSDN Tyrion.Mon
  * @date   2021/6
  */
int8_t Calc_24SolarTerms(uint16_t SolarYear, uint8_t *Array_24SolarTermDate)
{
    uint8_t i = 0;
    uint8_t Y = SolarYear % 100;    //年份后两位
    double D = 0.2422;
    double C_20xx[] =               //21世纪24个节气的C值
    {
        3.87, 18.73, 5.63, 20.646, 4.81, 20.1,
        5.52, 21.04, 5.678, 21.37, 7.108, 22.83,
        7.5, 23.13, 7.646, 23.042, 8.318, 23.438,
        7.438, 22.36, 7.18, 21.94, 5.4055, 20.12
    };

    if (SolarYear < 2001 || SolarYear > 2099) return -1;

    for (i = 0; i < 24; i++)
    {
        if (i <= 1 || i >= 22)
            Array_24SolarTermDate[i] = ((uint16_t)(Y * D + C_20xx[i])) - ((Y - 1) / 4);
        else
            Array_24SolarTermDate[i] = ((uint16_t)(Y * D + C_20xx[i])) - (Y / 4);
        /* 例外 */
        if (SolarYear == 2026 && i == 1)
        {
            Array_24SolarTermDate[i] -= 1;  //例外：2026年计算得出的雨水日期应调减一天为18日。
        }
        else if (SolarYear == 2084 && i == 3)
        {
            Array_24SolarTermDate[i] += 1;  //例外：2084年的计算结果加1日。
        }
        else if (SolarYear == 1911 && i == 6)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1911年的计算结果加1日
        }
        else if (SolarYear == 2008 && i == 7)
        {
            Array_24SolarTermDate[i] += 1;  //例外：2008年的计算结果加1日
        }
        else if (SolarYear == 1902 && i == 8)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1902年的计算结果加1日
        }
        else if (SolarYear == 1928 && i == 9)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1928年的计算结果加1日。
        }
        else if ((SolarYear == 1925 || SolarYear == 2016) && i == 10)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1925年和2016年的计算结果加1日。
        }
        else if (SolarYear == 1922 && i == 11)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1922年的计算结果加1日。
        }
        else if (SolarYear == 2002 && i == 12)
        {
            Array_24SolarTermDate[i] += 1;  //例外：2002年的计算结果加1日。
        }
        else if (SolarYear == 1927 && i == 14)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1927年的计算结果加1日。
        }
        else if (SolarYear == 1942 && i == 15)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1942年的计算结果加1日。
        }
        else if (SolarYear == 2089 && i == 17)
        {
            Array_24SolarTermDate[i] += 1;  //例外：2089年的计算结果加1日。
        }
        else if (SolarYear == 2089 && i == 18)
        {
            Array_24SolarTermDate[i] += 1;  //例外：2089年的计算结果加1日。
        }
        else if (SolarYear == 1978 && i == 19)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1978年的计算结果加1日。
        }
        else if (SolarYear == 1954 && i == 20)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1954年的计算结果加1日。
        }
        else if ((SolarYear == 1918 || SolarYear == 2021) && i == 21)
        {
            Array_24SolarTermDate[i] -= 1;  //例外：1918年和2021年的计算结果减1日。
        }
        else if (SolarYear == 1982 && i == 22)
        {
            Array_24SolarTermDate[i] += 1;  //例外：1982年计算结果加1日，2019年减1日。
        }
        else if (SolarYear == 2019 && i == 22)
        {
            Array_24SolarTermDate[i] -= 1;  //例外：1982年计算结果加1日，2019年减1日。
        }
        else if (SolarYear == 2082 && i == 23)
        {
            Array_24SolarTermDate[i] += 1;  //例外：2082年的计算结果加1日
        }
    }

    return 1;
}
int main(void)
{
    uint8_t i;
    Solar_t solar_1;
    Lunar_t Lunar_1;
    uint8_t Array_24SoTermDate[12];

    solar_1.year = 1901;
    solar_1.month = 9;
    solar_1.date = 4;

    Solar2Lunar(&solar_1, &Lunar_1);

    printf("has_leap_month = %d\r\n", Lunar_1.has_leap_month);
    printf("leapWhichMonth = %d\r\n", Lunar_1.leapWhichMonth);
    printf("leapMonthis_30days = %d\r\n", Lunar_1.leapMonthis_30days);
    printf("month = %d\r\n", Lunar_1.month);
    printf("is_leap_month = %d\r\n", Lunar_1.is_leap_month);
    printf("date = %d\r\n", Lunar_1.date);
    printf("animal = %d\r\n", Lunar_1.animal);
    printf("tiangan = %d, dizhi = %d\r\n", Lunar_1.tian_gan, Lunar_1.di_zhi);

    if (Calc_24SolarTerms(2008, Array_24SoTermDate) != -1)
    {
        for (i = 0; i < 24; i++)
            printf("SolarTerm  %d: date %d\r\n", i, Array_24SoTermDate[i]);
    }
    while (1)
    {
        /* code */
    }
    
    return 0;
}







【单片机代码实现。已运行2年多，偶尔校对一下农历，未发现有错误】



在这里插入图片描述

Tyrion.Mon
关注
专栏目录
实现日期到农历五行八字转换
耍宝王专栏
02-12 963
这个程序是根据一个C版的公历转农历的程序改的，当初改成了VB版的，昨天被我翻出来又改成了伪C++版，因为时间久了，又是几经“转译”，程序未必完美，权当娱乐吧#include #include #include using namespace std;int main(){//////////////////////////////////////////////////
基于组件的C#农历算法
talentz的专栏
06-06 921
// 下面是一个关于C#的农历算法// 日期数据定义方法如下// 前12个字节代表1-12月为大月或是小月，1为大月30天，0为小月29天，// 第13位为闰月的情况，1为大月30天，0为小月29天，第14、15位为闰月的月// 份，使用10进制表示。最后4位为当年家农历新年-即农历1月1日所在公历// 的日期，如0131代表1月31日。// 日期函数使用方式如下i公历年为要输入的公历年，i公历月
JavaScript实战 - 农历（阴历）和公历（阳历）之间的转换
最新发布
逍遥Sean的博客
07-26 1049
在JavaScript中实现农历（阴历）和公历（阳历）之间的转换是一个复杂而又有趣的任务，尤其是在需要处理节气、闰年等特殊情况时更是如此。本文将带领你探索如何用JavaScript实现这两种历法之间的转换。
C#农历算法
11-07
用C#写的农历算法,这里只是一个类,其中包含星座、天干、地支、生肖等。
公历转换农历的算法(JavaScript)
03-14
公历转换农历的算法(JavaScript)是一个比较困难的东西，公历日期程序大家都会写，看看阳历的吧
C# 实现农历计算和转换
加菲猫的快乐生活--我的理想
06-21 1890
/* * 农历类，by aiyao at www.5dz.net*/using System;namespace YyAy.Web.WebClass{ #region 使用范例// 可将这段代码取消注释运行可以得到示例结果。。// public class MyTest// {//  //方法一，用LunarDate类//  public string Mothed1()//  {//
【农历】计算方法--- (阳历转阴历)
Zhangzs8896(小二) 的专栏
09-21 8169
原始材料出自：http://community.csdn.net/Expert/topic/2624/2624967.xml?temp=.7675897先建一表，放初始化资料因为农历的日期，是由天文学家推算出来的，到现在只有到2049年的，以后的有了还可以加入！CREATE TABLE SolarData(    yearId int not null,    data char(7) n
一个日历程序 可农历到公历 公历到农历 第几周 显示节气
03-19
标题中的“一个日历程序 可农历到公历 公历到农历 第几周 显示节气”表明这个程序是一个能够处理日期转换和显示农历与公历之间转换，以及计算日期所在周数和显示节气的实用工具。在这个程序中，有两个关键的类——`...
周易哲学（一）：干支纪年法和四柱八字
xcosy
12-22 2721
什么是支干纪年、支干纪月、支干纪日、二十四节气？ 1、支干纪年
中华干支纪年对照表.doc
09-29
干支纪年与农历相结合，形成了中国传统的黄历，其中包含了节气、吉凶宜忌等丰富信息。在现代，尽管公历已经普遍使用，但干支纪年仍然在民间节日、风水命理等领域发挥着重要作用，体现了中国深厚的文化底蕴和历史传承...
易语言测试源码,易语言取农历年干支属相模块
07-18
农历是中国传统的一种历法，它不仅涉及到日期，还包含了干支纪年系统和生肖属相。干支纪年是用天干（甲、乙、丙、丁、戊、己、庚、辛、壬、癸）和地支（子、丑、寅、卯、辰、巳、午、未、申、酉、戌、亥）的组合来...
C语言实现公历转化为农历
11-02
该资源是C语言的源文件，功能是实现公历转化为农历。VC6.0下编译通过的
C#实现农历日历的方法
09-04
主要介绍了C#实现农历日历的方法,详细分析了使用C#实现农历日历的完整步骤,具有一定参考借鉴价值,需要的朋友可以参考下
中国农历算法
11-07
公历转换为农历算法 C#描述，可用于win8应用开发日历
C#实现功能强大的中国农历日历操作类
09-03
主要介绍了C#实现功能强大的中国农历日历操作类,实例分析了C#操作时间及字符串的技巧,非常具有实用价值,需要的朋友可以参考下
农历和阳历的转换程序
02-11
可以实现农历和阳历的转换，Java语言实现的！
php实现阳历阴历互转的方法
12-18
这个类实现了1891年至2100年之间的阳历到阴历、阴历到阳历的转换，并且还能获取到干支纪年、生肖等附加信息。 `Lunar`类中的关键属性和方法如下： 1. **属性**： - `$MIN_YEAR` 和 `$MAX_YEAR`：定义了支持的最小...
阳历转阴历算法概述
xingshen58的专栏
03-06 496
转载地址：http://www.cnblogs.com/qintangtao/archive/2013/03/01/2938887.html 有关阳历转换阴历的算法解释，挺全的，分享给大家，后期整理成java版本会再次分享
微信小程序计算干支纪年农历及节气
05-26
要计算干支纪年、农历和节气，可以使用一些现成的算法库和数据源来实现。以下是基本步骤： 1. 获取当前日期：通过小程序的API获取当前系统时间，包括年、月、日、时、分、秒等信息。 2. 计算干支纪年：根据当前年份，使用干支纪年的公式计算出该年的干支纪年。具体的计算方法可以参考一些干支纪年的算法库。 3. 计算农历日期：通过一些农历算法库，可以将公历日期转换成农历日期，包括农历年、月、日等信息。 4. 计算节气：根据当前日期，使用一些节气算法库计算出该日期所属的节气名称。 5. 在小程序中显示结果：将计算结果展示在小程序的界面上，可以使用一些UI组件来实现。 需要注意的是，计算农历和节气的算法比较复杂，需要使用一些现成的算法库，比如阴历算法库或者节气算法库。同时，这些算法库中的数据也需要及时更新，以确保计算的准确性。
评论 2
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值