[分享]js农历日历方法

html代码:

<center></center>

js代码:

var lunarInfo = new Array(
    0x04bd8, 0x04ae0, 0x0a570, 0x054d5, 0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0, 0x055d2,
    0x04ae0, 0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540, 0x0d6a0, 0x0ada2, 0x095b0, 0x14977,
    0x04970, 0x0a4b0, 0x0b4b5, 0x06a50, 0x06d40, 0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970,
    0x06566, 0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7, 0x0c950,
    0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557,
    0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5d0, 0x14573, 0x052d0, 0x0a9a8, 0x0e950, 0x06aa0,
    0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0,
    0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b5a0, 0x195a6,

    0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570,
    0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0,
    0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5,
    0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930,
    0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530,
    0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45,
    0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0,

    //下面的是从 2050 到 2100 年的
    0x14b63, /* 2050 */
    0x09370, 0x049f8, 0x04970, 0x064b0, 0x168a6, /**/
    0x0ea50, 0x06b20, 0x1a6c4, 0x0aae0, 0x0a2e0, /* 2060 */
    0x0d2e3, 0x0c960, 0x0d557, 0x0d4a0, 0x0da50, /* 2065 */
    0x05d55, 0x056a0, 0x0a6d0, 0x055d4, 0x052d0, /* 2070 */
    0x0a9b8, 0x0a950, 0x0a4a0, 0x0b6a6, 0x0ad50, /* 2075 */
    0x055a0, 0x0aba0, 0x0a5b0, 0x052b0, 0x0b273, /* 2080 */
    0x06930, 0x07337, 0x06aa0, 0x0ad50, 0x14b55, /* 2085 */
    0x04b60, 0x0a570, 0x054e4, 0x0d260, 0x0e968, /* 2090 */
    0x0d520, 0x0daa0, 0x16aa6, 0x056d0, 0x04ae0, /* 2095 */
    0x0a9d4, 0x0a4d0, 0x0d150, 0x0f252, 0x0d520 /* 2100 */
)
var Animals = new Array("鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪");
var Gan = new Array("甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸");
var Zhi = new Array("子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", "亥");
var now = new Date();
var SY = now.getFullYear();
var SM = now.getMonth();
var SD = now.getDate();

var sTermInfo = new Array(0, 21208, 42467, 63836, 85337, 107014, 128867, 150921, 173149, 195551, 218072, 240693, 263343, 285989, 308563, 331033, 353350, 375494, 397447, 419210, 440795, 462224, 483532, 504758)
var solarTerm = new Array("小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", "夏至", "小暑", "大暑", "立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至")
var lFtv = new Array("0101*春节", "0115 元宵节", "0202 龙抬头", "0505 端午节", "0707 乞巧节", "0715 中元节", "0815 中秋节", "0909 重阳节", "1208 腊八节", "1223 小年", "0100*除夕")
var sFtv = new Array("0101*元旦", "0308 妇女节", "0312 植树节", "0315 消费者权益日", "0501 国际劳动节", "0504 青年节", "0512 国际护士节", "0601 国际儿童节", "0701 建党节 香港回归纪念日", "0801 建军节", "0910 教师节", "1001*国庆节", "1220 澳门回归纪念日")

//==== 传入 offset 传回干支, 0=甲子
function cyclical(num) {
    return (Gan[num % 10] + Zhi[num % 12])
}

//===== 某年的第n个节气为几日(从0小寒起算)
function sTerm(y, n) {
    var offDate = new Date((31556925974.7 * (y - 1900) + sTermInfo[n] * 60000) + Date.UTC(1900, 0, 6, 2, 5));
    return (offDate.getUTCDate());
}

//====== 返回阴历 (y年,m+1月)

function calendar(y, m) {

    var sDObj, lDObj, lY, lM, lD = 1,
        lL, lX = 0,
        tmp1, tmp2, tmp3;
    var cY, cM, cD; //年柱,月柱,日柱
    var lDPOS = new Array(3);
    var n = 0;
    var firstLM = 0;

    sDObj = new Date(y, m, 1, 0, 0, 0, 0); //当月一日日期

    this.length = solarDays(y, m); //公历当月天数
    this.firstWeek = sDObj.getDay(); //公历当月1日星期几

    ////////年柱 1900年立春后为庚子年(60进制36)
    if (m < 2) cY = cyclical(y - 1900 + 36 - 1);
    else cY = cyclical(y - 1900 + 36);
    var term2 = sTerm(y, 2); //立春日期

    ////////月柱 1900年1月小寒以前为 丙子月(60进制12)
    var firstNode = sTerm(y, m * 2) //返回当月「节」为几日开始
    cM = cyclical((y - 1900) * 12 + m + 12);

    //当月一日与 1900/1/1 相差天数
    //1900/1/1与 1970/1/1 相差25567日, 1900/1/1 日柱为甲戌日(60进制10)
    var dayCyclical = Date.UTC(y, m, 1, 0, 0, 0, 0) / 86400000 + 25567 + 10;


    //依节气调整二月分的年柱, 以立春为界
    if (m == 1 && (i + 1) == term2) cY = cyclical(y - 1900 + 36);
    //依节气月柱, 以「节」为界
    if ((i + 1) == firstNode) cM = cyclical((y - 1900) * 12 + m + 13);
    //日柱
    cD = cyclical(dayCyclical + i);

    //sYear,sMonth,sDay,week,
    //lYear,lMonth,lDay,isLeap,
    //cYear,cMonth,cDay
    this[i] = new calElement(y, m + 1, i + 1, nStr1[(i + this.firstWeek) % 7],
        lY, lM, lD++, lL,
        cY, cM, cD);
}

//==== 传回农历 y年的总天数
function lYearDays(y) {
    var i, sum = 348
    for (i = 0x8000; i > 0x8; i >>= 1) sum += (lunarInfo[y - 1900] & i) ? 1 : 0
    return (sum + leapDays(y))
}

//==== 传回农历 y年闰月的天数
function leapDays(y) {
    if (leapMonth(y)) return ((lunarInfo[y - 1900] & 0x10000) ? 30 : 29)
    else return (0)
}

//==== 传回农历 y年闰哪个月 1-12 , 没闰传回 0
function leapMonth(y) {
    return (lunarInfo[y - 1900] & 0xf)
}

//====================================== 传回农历 y年m月的总天数
function monthDays(y, m) {
    return ((lunarInfo[y - 1900] & (0x10000 >> m)) ? 30 : 29)
}

//==== 算出农历, 传入日期物件, 传回农历日期物件
//     该物件属性有 .year .month .day .isLeap .yearCyl .dayCyl .monCyl
function Lunar(objDate) {
    var i, leap = 0,
        temp = 0
    var baseDate = new Date(1900, 0, 31)
    var offset = (objDate - baseDate) / 86400000

    this.dayCyl = parseInt(offset) + 40
    this.monCyl = 14

    for (i = 1900; i < 2099 && offset > 0; i++) {
        temp = lYearDays(i)
        offset -= temp
        this.monCyl += 12
    }
    if (offset < 0) {
        offset += temp;
        i--;
        this.monCyl -= 12
    }

    this.year = i
    this.yearCyl = i - 1864

    leap = leapMonth(i) //闰哪个月
    this.isLeap = false

    for (i = 1; i < 13 && offset > 0; i++) {
        //闰月
        if (leap > 0 && i == (leap + 1) && this.isLeap == false) {
            --i;
            this.isLeap = true;
            temp = leapDays(this.year);
        } else {
            temp = monthDays(this.year, i);
        }

        //解除闰月
        if (this.isLeap == true && i == (leap + 1)) this.isLeap = false

        offset -= temp
        if (this.isLeap == false) this.monCyl++
    }

    if (offset == 0 && leap > 0 && i == leap + 1)
        if (this.isLeap) {
            this.isLeap = false;
        }
    else {
        this.isLeap = true;
        --i;
        --this.monCyl;
    }

    if (offset < 0) {
        offset += temp;
        --i;
        --this.monCyl;
    }

    this.month = i
    this.day = offset + 1
}

//==== 公元日期
function YYMMDD() {
    var cl = '<font color="" style="font-size:10pt;">';
    return (cl + SY + '年' + (SM + 1) + '月' + SD + '日</font>');
}

//==== 星期
function weekday() {
    var day = new Array("<font color='red' style='font-size:10pt;'>星期日</font>",
        "<font style='font-size:10pt;'>星期一</font>",
        "<font style='font-size:10pt;'>星期二</font>",
        "<font style='font-size:10pt;'>星期三</font>",
        "<font style='font-size:10pt;'>星期四</font>",
        "<font style='font-size:10pt;'>星期五</font>",
        "<font style='font-size:10pt;'>星期六</font>");
    return (day[now.getDay()]);
}

//==== 农历日期
function cDay(m, d) {
    var nStr1 = new Array('日', '一', '二', '三', '四', '五', '六', '七', '八', '九', '十');
    //nStr1:["\u65e5","\u4e00","\u4e8c","\u4e09","\u56db","\u4e94","\u516d","\u4e03","\u516b","\u4e5d","\u5341"],
    var nStr2 = new Array('初', '十', '廿', '卅', '　');
    // nStr2:["\u521d","\u5341","\u5eff","\u5345"],
    var nStr3 = new Array('', '正', '二', '三', '四', '五', '六', '七', '八', '九', '十', '十一', '腊');
    //nStr3:["\u6b63","\u4e8c","\u4e09","\u56db","\u4e94","\u516d","\u4e03","\u516b","\u4e5d","\u5341","\u51ac","\u814a"],
    var s; {
        s = nStr3[m]
    }
    s += '月'
    switch (d) {
        case 10:
            s += '初十';
            break;
        case 20:
            s += '二十';
            break;
        case 30:
            s += '三十';
            break;
        default:
            s += nStr2[Math.floor(d / 10)];
            s += nStr1[parseInt(d % 10)];
    }
    return (s);
}

//==== 中文日期
function solarDay() {
    var sDObj = new Date(SY, SM, SD);
    var lDObj = new Lunar(sDObj);
    var cl = '<font color="" style="font-size:10pt;">';
    var tt = cDay(lDObj.month, lDObj.day);
    return (cl + tt + '</font>');
}

//==== 天干地支 月/日
function solarDay1() {
    var sDObj = new Date(SY, SM, SD);
    var lDObj = new Lunar(sDObj);
    var cl = '<font color="" style="font-size:10pt;">';
    var tt = cyclical(lDObj.monCyl) + ' ' + cyclical(lDObj.dayCyl);
    return (cl + tt + '</font>');
}

//==== 天干地支 年/属相
function solarDay2() {
    var sDObj = new Date(SY, SM, SD);
    var lDObj = new Lunar(sDObj);
    var cl = '<font color="" style="font-size:10pt;">';
    //农历BB'+(cld[d].isLeap?'闰 ':' ')+cld[d].lMonth+cld[d].lDay
    var tt = cyclical(SY - 1900 + 36) + '[' + Animals[(SY - 4) % 12] + ']';
    return (cl + tt + '</font>');
}
document.write("");

//==== 节日/节气
function solarDay3() {
    var sDObj = new Date(SY, SM, SD);
    var lDObj = new Lunar(sDObj);
    var lDPOS = new Array(3)
    var festival = '',
        solarTerms = '',
        solarFestival = '',
        lunarFestival = '',
        tmp1, tmp2;
    //农历节日 
    for (i in lFtv)
        if (lFtv[i].match(/^(\d{2})(.{2})([\s\*])(.+)$/)) {
            tmp1 = Number(RegExp.$1) - lDObj.month
            tmp2 = Number(RegExp.$2) - lDObj.day
            if (tmp1 == 0 && tmp2 == 0) lunarFestival = RegExp.$4
        }
    //国历节日
    for (i in sFtv)
        if (sFtv[i].match(/^(\d{2})(\d{2})([\s\*])(.+)$/)) {
            tmp1 = Number(RegExp.$1) - (SM + 1)
            tmp2 = Number(RegExp.$2) - SD
            if (tmp1 == 0 && tmp2 == 0) solarFestival = RegExp.$4
        }
    //节气
    tmp1 = new Date((31556925974.7 * (SY - 1900) + sTermInfo[SM * 2 + 1] * 60000) + Date.UTC(1900, 0, 6, 2, 5))
    tmp2 = tmp1.getUTCDate()
    if (tmp2 == SD) solarTerms = solarTerm[SM * 2 + 1]
    tmp1 = new Date((31556925974.7 * (SY - 1900) + sTermInfo[SM * 2] * 60000) + Date.UTC(1900, 0, 6, 2, 5))
    tmp2 = tmp1.getUTCDate()
    if (tmp2 == SD) solarTerms = solarTerm[SM * 2]

    if (solarTerms == '' && solarFestival == '' && lunarFestival == '')
        festival = '';
    else
        festival = '<font color="#FF0000" style="font-size:10pt;">' + solarTerms + ' ' + solarFestival + ' ' + lunarFestival + '</font>';

    var cl = '<font color="" style="font-size:10pt;">';
    return (cl + festival + '</font>');
}

function setCalendar() {
    document.write(" " + YYMMDD());
    document.write(" " + weekday());
    document.write("</br>" + solarDay());
    document.write("</br>" + solarDay2());
    document.write(" " + solarDay1());
    document.write(" " + solarDay3());
}

setCalendar();
//-->
document.writeln("<\/font><\/span><\/a><\/div>");
document.writeln("")