用51单片机实现公历与农历、星期的转换.PDFVIP

济南济南 朱思荣朱思荣 济南济南 朱思荣朱思荣 一一 概述概述 一一 概述概述 公历是全世界通用的历法 以地球绕太阳的一周为一年 一年365 天 分为12 个月 1 3 5 7 8 10 12 月为 31 天 2 月为28 天 其余月份为30 天 事实上地球绕太阳一周共365 天5 小时48 分46 秒 比公历一年多出5 小时48 分46 秒 为使年误差不累积 公历年用闰年法来消除年误差 由于每年多出5 小时48 分46 秒 每4 年累计多出23 小时15 分4 秒 接近 1 天 天文学家就规定每4 年有一个闰年 把2 月由28 天改为29 天 凡是公历年代能被4 整除 的那一年就是闰年 但是这样一来 每4 年又少了44 分56 秒 为了更准确地计时 天文学家又规定 凡能被100 整除 的年份 只有能被400 整除才是闰年 即每400 年要减掉3 个闰年 经过这样处理后实际上每400 年的误差只有2 小时 53 分20 秒 已相当准确了 农历与公历不同 农历把月亮绕地球一周作为一月 因为月亮绕地球一周不是一整天 所以农历把月分为大月和小 月 大月30 天 小月29 天 通过设置大小月 使农历日始终与月亮与地球的位置相对应 为了使农历的年份与公历年 相对应 农历通过设置闰月的办法使它的平均年长度与公历年相等 农历是中国传统文化的代表之一 并与农业生产联 系密切 中国人民特别是广大农民十分熟悉并喜爱农历 公历与农历是我国目前并存的两种历法 各有其固有的规律 农历与月球的运行相对应 其影响因素多 它的大小 月和闰月与天体运行有关 计算十分复杂 且每年都不一致 因此要用单片机实现公历与农历的转换 用查表法是最方 便实用的办法 51 系列单片机因其在功能上能满足大部份对速度要求不高的应用场合的要求 且价格低廉 开发工具普及程度高 是目前应用最多的单片机之一 本文介绍一种用51 单片机实现从 1901 年到2099 年 199 年公历日到农历日及星期的转 换方法 并向读者提供完整的51 汇编程序 二二 基本原理基本原理 二二 基本原理基本原理 实现公历与农历的转换 一般采用查表法 按日查表是速度最快的方法 但51 单片机寻址能力有限 不可能采用 按日查表的方法 除按日查外 我们可以通过按月查表和按年查表的方法 再通过适当的计算 来确定公历日所对应的 农历日期 本文采用的是按年查表法 最大限度地减少表格所占的程序空间 对于农历月来说 大月为30 天 小月为29 天 这是固定不变的 这样我们就可用1 个BIT 位 来表示大小月信 息 农历一年 如有闰月为13 个月 否则是12 个月 所以一年需要用13 个BIT 闰月在农历年中所在的月份并不固定 大部分闰月分布在农历2 8 月 但也有少量年份在9 月以后 所以要表示闰月的信息 至少要4BIT 在这里我们用4BIT 的值来表示闰月的月份 值为0 表示本年没有闰月 有了以上信息 还不足以判断公历日对应的农历日 因为还需要一 个参照日 我们选用农历正月初一所对应的公历日期作参照日 公历日最大为31 日 需要5BIT 来表示 而春节所在的 月份不是1 月就是2 月 用 1BIT 就够了 考虑到表达方便 我们用2BIT 来表示春节月 2BIT 的值直接表示月份 这 样一年的农历信息只用3 个字节就全部包括了 计算公历日对应的农历日期的方法 先计算出公历日离当年元旦的天数 然后查表取得当年的春节日期 计算出春 节离元旦的天数 二者相减即可算出公历日离春节的天数 以后只要根据大小月和闰月信息 减一月天数 调整一月农 历月份 即可推算出公历日所对应的农历日期 如公历日不到春节日期 农历年要比公历年小一年 农历大小月取前一 年的信息 农历月从12 月向前推算 公历日是非常有规律的 所以公历日所对应的星期天可以通过计算直接得到 理论上公元0 年1 月1 日为星期日 只要求得公历日离公元0 年1 月1 日的日子数 除7 后的余数就是星期天 为了简化计算 采用月校正法 根据公历的 年月日可直接计算出星期天 其算法是 日期 年份 所过闰年数 月校正数之和除7 的余数就是星期天 但如果是在 闰年又不到3 月份 上述之和要减一天再除7 其