• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1export function ConvertLunarCalendar(gregorianCalendarYear, gregorianCalendarMonth, gregorianCalendarDay) {
2    let lunarIndex1 = 2,
3        lunarIndex2 = 9,
4        lunarIndex3 = 10,
5        lunarIndex4 = 11,
6        lunarDay1 = 20,
7        lunarDay2 = 21,
8        hour = 24,
9        minutes = 60,
10        multiple = 1000,
11        initialLunarTime = 1949
12
13    let lunarMonth = ['正', '二', '三', '四', '五', '六', '七', '八', '九', '十', '冬', '腊'],
14        lunarDay = ['一', '二', '三', '四', '五', '六', '七', '八', '九', '十', '初', '廿'],
15        heavenlyStemsAnd = ['甲', '乙', '丙', '丁', '戊', '己', '庚', '辛', '壬', '癸'],
16        earthlyBranches = ['子', '丑', '寅', '卯', '辰', '巳', '午', '未', '申', '酉', '戌', '亥'];
17
18    let LUNAR_MON_START_INDEX = 0
19    let LUNAR_MON_END_INDEX = 11
20
21    let lunarCalendar = [
22        0x0b557,
23        0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5b0, 0x14573, 0x052b0, 0x0a9a8, 0x0e950, 0x06aa0,
24        0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0,
25        0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b6a0, 0x195a6,
26        0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570,
27        0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0,
28        0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5,
29        0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930,
30        0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530,
31        0x05aa0, 0x076a3, 0x096d0, 0x04afb, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45,
32        0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0,
33        0x14b63, 0x09370, 0x049f8, 0x04970, 0x064b0, 0x168a6, 0x0ea50, 0x06b20, 0x1a6c4, 0x0aae0,
34        0x0a2e0, 0x0d2e3, 0x0c960, 0x0d557, 0x0d4a0, 0x0da50, 0x05d55, 0x056a0, 0x0a6d0, 0x055d4,
35        0x052d0, 0x0a9b8, 0x0a950, 0x0b4a0, 0x0b6a6, 0x0ad50, 0x055a0, 0x0aba4, 0x0a5b0, 0x052b0,
36        0x0b273, 0x06930, 0x07337, 0x06aa0, 0x0ad50, 0x14b55, 0x04b60, 0x0a570, 0x054e4, 0x0d160,
37        0x0e968, 0x0d520, 0x0daa0, 0x16aa6, 0x056d0, 0x04ae0, 0x0a9d4, 0x0a2d0, 0x0d150, 0x0f252,
38        0x0d520
39    ]
40
41    function ConvertLunarCalendar(gregorianCalendarYear, gregorianCalendarMonth, gregorianCalendarDay) {
42        gregorianCalendarMonth -= 1;
43        let daySpan = (Date.UTC(gregorianCalendarYear, gregorianCalendarMonth, gregorianCalendarDay) - Date.UTC(initialLunarTime, 0, leapFebruarySmallDay)) / (hour * minutes * minutes * multiple) + 1;
44        let outputLunarYear, outputLunarMonth, outputLunarDay;
45        for (let j = 0; j < lunarCalendar.length; j++) {
46            daySpan -= lunarYearDays(lunarCalendar[j]);
47            if (daySpan <= 0) {
48                outputLunarYear = initialLunarTime + j;
49                daySpan += lunarYearDays(lunarCalendar[j]);
50                break
51            }
52        }
53        let k = 0
54        for (; k < lunarYearMonths(lunarCalendar[outputLunarYear - initialLunarTime]).length; k++) {
55            daySpan -= lunarYearMonths(lunarCalendar[outputLunarYear - initialLunarTime])[k];
56            if (daySpan <= 0) {
57                if (hasLeapMonth(lunarCalendar[outputLunarYear - initialLunarTime]) > -1 && hasLeapMonth(lunarCalendar[outputLunarYear - initialLunarTime]) <= k) {
58                    if (hasLeapMonth(lunarCalendar[outputLunarYear - initialLunarTime]) < k) {
59                        outputLunarMonth = k;
60                    } else if (hasLeapMonth(lunarCalendar[outputLunarYear - initialLunarTime]) === k) {
61                        outputLunarMonth = '闰' + k;
62                    } else {
63                        outputLunarMonth = k + 1;
64                    }
65                } else {
66                    outputLunarMonth = k + 1;
67                }
68                daySpan += lunarYearMonths(lunarCalendar[outputLunarYear - initialLunarTime])[k];
69                break
70            }
71        }
72        if (outputLunarMonth == undefined) {
73            outputLunarMonth = (k > LUNAR_MON_END_INDEX) ? LUNAR_MON_END_INDEX + 1 : k;
74            outputLunarMonth = (k == LUNAR_MON_START_INDEX) ? LUNAR_MON_START_INDEX + 1 : k;
75        } else {
76            outputLunarMonth = (outputLunarMonth > LUNAR_MON_END_INDEX) ? LUNAR_MON_END_INDEX + 1 : outputLunarMonth;
77            outputLunarMonth = (outputLunarMonth == LUNAR_MON_START_INDEX) ? LUNAR_MON_START_INDEX + 1 : outputLunarMonth;
78        }
79
80        outputLunarDay = daySpan;
81        if (hasLeapMonth(lunarCalendar[outputLunarYear - initialLunarTime]) > -1 && (typeof (outputLunarMonth) === 'string' && outputLunarMonth.indexOf('闰') > -1)) {
82            let reg = /\d/.exec(outputLunarMonth)
83            outputLunarMonth = `闰${lunarMonth[Number(reg)- 1]}`
84        } else {
85            outputLunarMonth = lunarMonth[outputLunarMonth - 1];
86        }
87        outputLunarYear = getHeavenlyStemsAnd(outputLunarYear) + getEarthlyBranches(outputLunarYear);
88        if (outputLunarDay < lunarIndex4) {
89            outputLunarDay = `${lunarDay[lunarIndex3]}${lunarDay[outputLunarDay-1]}`
90        } else if (outputLunarDay > lunarIndex3 && outputLunarDay < lunarDay1) {
91            outputLunarDay = `${lunarDay[lunarIndex2]}${lunarDay[outputLunarDay-lunarIndex4]}`
92        } else if (outputLunarDay === lunarDay1) {
93            outputLunarDay = `${lunarDay[1]}${lunarDay[lunarIndex2]}`
94        } else if (outputLunarDay > lunarDay1 && outputLunarDay < leapFebruaryBigDay) {
95            outputLunarDay = `${lunarDay[lunarIndex4]}${lunarDay[outputLunarDay-lunarDay2]}`
96        } else if (outputLunarDay === leapFebruaryBigDay) {
97            outputLunarDay = `${lunarDay[lunarIndex1]}${lunarDay[lunarIndex2]}`
98        }
99        return {
100            lunarYear: outputLunarYear,
101            lunarMonth: outputLunarMonth,
102            lunarDay: outputLunarDay,
103        }
104    }
105
106    function hasLeapMonth(outputLunarYear) {
107        let lastHexadecimalDigit = 0xf
108        if (outputLunarYear & lastHexadecimalDigit) {
109            return outputLunarYear & lastHexadecimalDigit
110        } else {
111            return -1
112        }
113    }
114
115    let leapFebruarySmallDay = 29,
116        leapFebruaryBigDay = 30
117
118    function leapMonthDays(outputLunarYear) {
119        let hexadecimalFirstDigit = 0xf0000
120        if (hasLeapMonth(outputLunarYear) > -1) {
121            return (outputLunarYear & hexadecimalFirstDigit) ? leapFebruaryBigDay : leapFebruarySmallDay
122        } else {
123            return 0
124        }
125    }
126
127    let convertToHexDigit = 0x8000,
128        convertToHex = 0x8
129
130    function lunarYearDays(outputLunarYear) {
131        let totalDays = 0;
132        for (let i = convertToHexDigit; i > convertToHex; i >>= 1) {
133            let monthDays = (outputLunarYear & i) ? leapFebruaryBigDay : leapFebruarySmallDay;
134            totalDays += monthDays;
135        }
136        if (hasLeapMonth(outputLunarYear) > -1) {
137            totalDays += leapMonthDays(outputLunarYear);
138        }
139        return totalDays
140    }
141
142    function lunarYearMonths(outputLunarYear) {
143        let monthArr = [];
144        for (let i = convertToHexDigit; i > convertToHex; i >>= 1) {
145            monthArr.push((outputLunarYear & i) ? leapFebruaryBigDay : leapFebruarySmallDay);
146        }
147        if (hasLeapMonth(outputLunarYear)) {
148            monthArr.splice(hasLeapMonth(outputLunarYear), 0, leapMonthDays(outputLunarYear));
149        }
150        return monthArr
151    }
152
153    let Day3 = 3
154
155    function getHeavenlyStemsAnd(outputLunarYear) {
156        let heavenlyStemsAndKey = (outputLunarYear - Day3) % lunarIndex3;
157        if (heavenlyStemsAndKey === 0) heavenlyStemsAndKey = lunarIndex3;
158        return heavenlyStemsAnd[heavenlyStemsAndKey - 1]
159    }
160
161    function getEarthlyBranches(outputLunarYear) {
162        let monthMultiple = 12
163        let EarthlyBranchesKey = (outputLunarYear - Day3) % monthMultiple;
164        if (EarthlyBranchesKey === 0) EarthlyBranchesKey = monthMultiple;
165        return earthlyBranches[EarthlyBranchesKey - 1]
166    }
167
168    return ConvertLunarCalendar(gregorianCalendarYear, gregorianCalendarMonth, gregorianCalendarDay)
169}