;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 申明：
; 1. 本開發(fā)包為共享軟件，你可以免費傳播、使用本軟件，但不得用于商業(yè)目的。
; 2. 傳播時請不要改動版權信息，并注明出處。
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Author:	羅云彬
; Web:		http://asm.yeah.net （羅云彬的編程樂園）
; E-mail:	bigluo@telekbird.com.cn
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Version	1.0
;		Date: 2000.09.15
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 陽歷/農歷轉換計算開發(fā)包
;
; 文件包括：
;	Lunar.inc -- Win32Asm 語言的 include 文件，定義了使用的數(shù)據(jù)結構
;		     如果使用 C 或其他語言請自行修改格式
;	Lunar.dll -- 動態(tài)連接庫文件
;	Lunar.lib -- Lunar.dll 對應的導入庫文件
;
; 開發(fā)包包括一個 Win32Asm 的使用例子在 Example 目錄中
;
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 功能：計算 1901 - 2050 的農歷、節(jié)氣數(shù)據(jù)
; 使用：
;	1. 定義 LUNARDATA 數(shù)據(jù)結構
;	2. 填寫 LUNARDATA 數(shù)據(jù)結構的輸入字段并調用 _GetLunarData
;	3. 輸出結果在 LUNARDATA 數(shù)據(jù)結構的輸出字段中
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 庫文件中可以使用的有 3 個函數(shù)
;
; 1. 取農歷數(shù)據(jù) _GetLunarData(_lpstLunarData)
;	輸入：LUNARDATA 結構地址，輸入陽歷數(shù)據(jù)填寫在結構中
;	輸出：如果成功 eax = 0，返回數(shù)據(jù)在 LUNARDATA 結構中
;	如果輸入輸入超過范圍或不合法，返回 eax <> 0
;
; 2. 取對應陽歷年月的天數(shù) _GetMonthDays(dwYear,dwMonth)
;	輸入：年份，月份
;	輸出：eax = 天數(shù)
;
; 3. 檢測對應年份是否閏年 _IsLeapYear(dwYear)
;	輸入：年份
;	輸出：eax = 1 是閏年，否則 eax = 0
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

_GetLunarData	proto	:DWORD
_GetMonthDays	proto	:DWORD,:DWORD
_GetWeekDay	proto	:DWORD,:DWORD,:DWORD

;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 數(shù)據(jù)結構
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

;********************************************************************
; LUNARDATA 定義輸入參數(shù)和輸出結果
;********************************************************************
LUNARDATA	struct

;********************************************************************
; 下面由調用者填寫，為輸入參數(shù)
;********************************************************************
dwYear		dd	?	;輸入參數(shù) - 年，十進制，例如 2000
dwMonth		dd	?	;輸入參數(shù) - 月，十進制，例如 10
dwDay		dd	?	;輸入參數(shù) - 日，十進制，例如 1

;********************************************************************
; 下面由子程序返回，為輸出參數(shù)
;********************************************************************
dwLunarYear	dd	?	;農歷年，如 2000
dwLunarMonth	dd	?	;農歷月，如 12
dwLunarDay	dd	?	;農歷日，如 31
dwWeekDay	dd	?	;星期，星期日=0，星期一=1 ...
dwIsLeapMonth	dd	?	;是否是閏月，返回 1 為農歷閏月

szLunarYear	db	6 dup (?)	;天干年字符串，如“辛亥”
szLunarYearA	db	4 dup (?)	;天干年字符串，如“鼠”
szLunarMonth	db	10 dup (?)	;農歷月字符串，如“閏十二月”
szLunarDay	db	6 dup (?)	;農歷日字符串，如“初十”
szLunarHolDay	db	6 dup (?)	;農歷節(jié)氣字符串，如“大暑”
szWeekDay	db	8 dup (?)	;星期字符串，如“星期一”

LUNARDATA	ends
;********************************************************************