#! /usr/bin/env python3 # -*- coding:utf-8 -*- # Author : mayi # Blog : http://www.cnblogs.com/mayi0312/ # Date : 2019/1/14 # Name : test01 # Software : PyCharm # Note : 用於實現根據公曆計算農曆的功能 # 匯入模組 import datetime # 陣列g_lunar_month_day存入陰曆1901年到2050年每年中的月天數資訊， # 陰曆每月只能是29或30天，一年用12（或13）個二進位制位表示，對應位為1表30天，否則為29天 g_lunar_month_day = [ 0x4ae0, 0xa570, 0x5268, 0xd260, 0xd950, 0x6aa8, 0x56a0, 0x9ad0, 0x4ae8, 0x4ae0, # 1910 0xa4d8, 0xa4d0, 0xd250, 0xd548, 0xb550, 0x56a0, 0x96d0, 0x95b0, 0x49b8, 0x49b0, # 1920 0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada8, 0x2b60, 0x9570, 0x4978, 0x4970, 0x64b0, # 1930 0xd4a0, 0xea50, 0x6d48, 0x5ad0, 0x2b60, 0x9370, 0x92e0, 0xc968, 0xc950, 0xd4a0, # 1940 0xda50, 0xb550, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, 0xb4a8, 0x6ca0, # 1950 0xb550, 0x55a8, 0x4da0, 0xa5b0, 0x52b8, 0x52b0, 0xa950, 0xe950, 0x6aa0, 0xad50, # 1960 0xab50, 0x4b60, 0xa570, 0xa570, 0x5260, 0xe930, 0xd950, 0x5aa8, 0x56a0, 0x96d0, # 1970 0x4ae8, 0x4ad0, 0xa4d0, 0xd268, 0xd250, 0xd528, 0xb540, 0xb6a0, 0x96d0, 0x95b0, # 1980 0x49b0, 0xa4b8, 0xa4b0, 0xb258, 0x6a50, 0x6d40, 0xada0, 0xab60, 0x9370, 0x4978, # 1990 0x4970, 0x64b0, 0x6a50, 0xea50, 0x6b28, 0x5ac0, 0xab60, 0x9368, 0x92e0, 0xc960, # 2000 0xd4a8, 0xd4a0, 0xda50, 0x5aa8, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, # 2010 0xb4a0, 0xb550, 0xb550, 0x55a8, 0x4ba0, 0xa5b0, 0x52b8, 0x52b0, 0xa930, 0x74a8, # 2020 0x6aa0, 0xad50, 0x4da8, 0x4b60, 0x9570, 0xa4e0, 0xd260, 0xe930, 0xd530, 0x5aa0, # 2030 0x6b50, 0x96d0, 0x4ae8, 0x4ad0, 0xa4d0, 0xd258, 0xd250, 0xd520, 0xdaa0, 0xb5a0, # 2040 0x56d0, 0x4ad8, 0x49b0, 0xa4b8, 0xa4b0, 0xaa50, 0xb528, 0x6d20, 0xada0, 0x55b0, # 2050 ] # 陣列gLanarMonth存放陰曆1901年到2050年閏月的月份，如沒有則為0，每位元組存兩年 g_lunar_month = [ 0x00, 0x50, 0x04, 0x00, 0x20, # 1910 0x60, 0x05, 0x00, 0x20, 0x70, # 1920 0x05, 0x00, 0x40, 0x02, 0x06, # 1930 0x00, 0x50, 0x03, 0x07, 0x00, # 1940 0x60, 0x04, 0x00, 0x20, 0x70, # 1950 0x05, 0x00, 0x30, 0x80, 0x06, # 1960 0x00, 0x40, 0x03, 0x07, 0x00, # 1970 0x50, 0x04, 0x08, 0x00, 0x60, # 1980 0x04, 0x0a, 0x00, 0x60, 0x05, # 1990 0x00, 0x30, 0x80, 0x05, 0x00, # 2000 0x40, 0x02, 0x07, 0x00, 0x50, # 2010 0x04, 0x09, 0x00, 0x60, 0x04, # 2020 0x00, 0x20, 0x60, 0x05, 0x00, # 2030 0x30, 0xb0, 0x06, 0x00, 0x50, # 2040 0x02, 0x07, 0x00, 0x50, 0x03 # 2050 ] # 年份 ly = `零一二三四五六七八九` # 月份 lm = `正二三四五六七八九十冬臘` # 日份 ld = `初一初二初三初四初五初六初七初八初九初十十一十二十三十四十五十六十七十八十九二十廿一廿二廿三廿四廿五廿六廿七廿八廿九三十` def strToDate(c_date): """ 將8位日期字串轉換成日期格式 :param c_date: 8位日期字串 :return: 對應的日期格式：若返回-1代表字串長度不對，若返回-2代表轉換失敗，字串格式非法 """ if len(c_date) != 8: # 字串長度不正確 return -1 # 年 year = int(c_date[:4]) # 月 month = int(c_date[4:6]) # 日 day = int(c_date[6:]) try: d_date = datetime.date(int(year), int(month), int(day)) return d_date except: # 轉換失敗，格式非法 return -2 def lunarYearDays(year): """ 計算某農曆年有多少天 :param year: 年份（農曆） :return: 農曆天數 """ days = 0 for i in range(1, 13): (high, low) = lunarMonthDays(year, i) days += high days += low return days def lunarMonthDays(year, month): """ 計算某年某月農曆有多少天 :param year: 年份（農曆） :param month: 月份（農曆） :return: 天數 """ if (year < 1901): return 30 high, low = 0, 29 iBit = 16 - month if (month > getLeapMonth(year)) and getLeapMonth(year): iBit -= 1 if (g_lunar_month_day[year - 1901] & (1 << iBit)): low += 1 if (month == getLeapMonth(year)): if (g_lunar_month_day[year - 1901] & (1 << (iBit - 1))): high = 30 else: high = 29 return (high, low) def getLeapMonth(year): """ 返回該年的閏月，若返回0，代表該年沒有閏月 :param year: 年份（農曆） :return: 閏月的月份，若該年沒有閏月，則返回0 """ flag = g_lunar_month[(year - 1901) // 2] if (year - 1901) % 2: return flag & 0x0f else: return flag >> 4 def lunarDate(d_date): """ 將公曆日期轉換成農曆日期（查表法） :param d_date: 公曆日期 :return: 農曆日期 """ # 從1901.1.1計算，至今過了多少天 delta_days = (d_date - datetime.date(1901, 1, 1)).days # 陽曆1901年02月19日為陰曆1901年正月初一 # 陽曆1901年01月01日到1901年02月19日共有49天 if delta_days < 49: year = 1901 - 1 if delta_days < 19: month = 11 day = delta_days + 11 else: month = 12 day = delta_days - 18 else: # 下面從陰曆1901年正月初一算起 delta_days -= 49 year, month, day = 1901, 1, 1 # 計算年 temp = lunarYearDays(year) while delta_days >= temp: delta_days -= temp year += 1 temp = lunarYearDays(year) # 計算月 (foo, temp) = lunarMonthDays(year, month) while delta_days >= temp: delta_days -= temp if (month == getLeapMonth(year)): (temp, foo) = lunarMonthDays(year, month) if (delta_days < temp): year, month, day = 0, 0, 0 delta_days -= temp month += 1 (foo, temp) = lunarMonthDays(year, month) # 計算日 day += delta_days # 將數字年份資訊轉成中文年份資訊 temp_year = str(year) year = "" for i in temp_year: year += ly[int(i)] return "農曆：%s年%s月%s" % (year, lm[month - 1], ld[(day - 1) * 2:day * 2]) # 主函式 def main(): # 輸入8位公曆日期（字串） c_date = input("請輸入8位的公曆日期（如：20180101）：") # 將8位字串轉成日期格式 d_date = strToDate(c_date) if d_date == -1: print("您輸入的公曆日期長度錯誤！") return -1 elif d_date == -2: print("您輸入的公曆日期格式錯誤！") return -1 # 將公曆日期轉換成農曆日期 l_date = lunarDate(d_date) # 分別列印公曆、農曆 print("公曆：%s" % (d_date)) print(l_date) # 入口函式 if __name__ == `__main__`: main()
實驗結果如下：
請輸入8位的公曆日期（如：20180101）：20190114 公曆：2019-01-14 農曆：二零一八年臘月初九