热列祝贺:中国共产党第十七次全国代表大会胜利闭幕   颜色主题: 　 网页游戏 软件下载 软件文章 常用网址 自助友情
　首页 ┆ 程序设计 ┆ 数据库 ┆ 操作系统 ┆ 办公系列 ┆ WEB开发 ┆ 项目专题 ┆ 网络安全 ┆ 图形图像 ┆ 站点地图 ┆ 友情链接
　您的位置: >首页 >WEB开发 >JavaScript >用JScript实现公历到农历的日期转换
　　文章搜索
按名称 按简介
　　本类推荐
· 层遇到select框时
· 在网页中控制wmplayer播放器
· JS实现浏览器菜单命令
· 用JScript实现公历到农历的日...
· VML Chart 控件
· javascript版的日期输入控件
· Select的OnChange()事件
· 我也写了个日历控件
· 用Javascript制作一个可自动填...
· JavaScript[对象.属性]集锦之一
　　本类排行
· 用Javascript制作一个可自动填...
· VML Chart 控件
· 层遇到select框时
· 在网页中控制wmplayer播放器
· 我也写了个日历控件
· 用JScript实现公历到农历的日...
· 使用回车,移动焦点.
· javascript版的日期输入控件
· Select的OnChange()事件
· JS实现浏览器菜单命令
· JavaScript[对象.属性]集锦之三
· JavaScript[对象.属性]集锦之一
· 文档对象
· JavaScript常用内部对象
· document.execCommand() 解析
· 事件处理
· JavaScript实用的一些技巧
· showModalDialog和showModeles...
· JavaScript[对象.属性]集锦之二
用JScript实现公历到农历的日期转换

本文介绍了用查表法实现的公历到农历日期转换的方法，给出了实用的JScript脚本。可接受的公历日期范围是2001-1-1至2050-12-31。

// 数组LunarDaysOfMonth存入农历2001年到2050年每年中的月天数信息
// 农历每月只能是29或30天，一年用12(或13)个二进制位表示，从高到低，对应位为1表示30天，否则29天
var LunarDaysOfMonth = new Array
(
  0xd4a8, 0xd4a0, 0xda50, 0x5aa8, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, // 2001-2010
  0xb4a0, 0xb550, 0xb550, 0x55a8, 0x4ba0, 0xa5b0, 0x52b8, 0x52b0, 0xa930, 0x74a8, // 2011-2020
  0x6aa0, 0xad50, 0x4da8, 0x4b60, 0x9570, 0xa4e0, 0xd260, 0xe930, 0xd530, 0x5aa0, // 2021-2030
  0x6b50, 0x96d0, 0x4ae8, 0x4ad0, 0xa4d0, 0xd258, 0xd250, 0xd520, 0xdaa0, 0xb5a0, // 2031-2040
  0x56d0, 0x4ad8, 0x49b0, 0xa4b8, 0xa4b0, 0xaa50, 0xb528, 0x6d20, 0xada0, 0x55b0 // 2041-2050
);

// 数组LunarLeapYear存放农历2001年到2050年闰月的月份，如没有则为0，从高到低，每字节存两年
var LunarLeapYear = new Array
(
  0x40, 0x02, 0x07, 0x00, 0x50, // 2001-2010
  0x04, 0x09, 0x00, 0x60, 0x04, // 2011-2020
  0x00, 0x20, 0x60, 0x05, 0x00, // 2021-2030
  0x30, 0xb0, 0x06, 0x00, 0x50, // 2031-2040
  0x02, 0x07, 0x00, 0x50, 0x03 // 2041-2050
);


// 返回农历iLunarYear年的闰月月份，如没有则返回0
function GetLeapMonth(iLunarYear)
{
  var Leap = LunarLeapYear[(iLunarYear - 2001) >> 1];
  return (((iLunarYear - 2001) & 1) == 0) ? (Leap >> 4) : (Leap & 0x0f);
}

// 返回农历iLunarYer年iLunarMonth月的天数，结果是一个长整数
// 如果iLunarMonth不是闰月， 高字为0，低字为该月的天数
// 如果iLunarMonth是闰月， 高字为后一个月的天数，低字为前一个月的天数
function LunarMonthDays(iLunarYear, iLunarMonth)
{
  var High;
  var Low;
  var Bit;

  High = 0;
  Low = 29;
  Bit = 16 - iLunarMonth;
  if ((iLunarMonth > GetLeapMonth(iLunarYear)) && (GetLeapMonth(iLunarYear) > 0)) Bit--;
  if ((LunarDaysOfMonth[iLunarYear - 2001] & (1 << Bit)) > 0) Low++;
  if (iLunarMonth == GetLeapMonth(iLunarYear))
  {
    High = ((LunarDaysOfMonth[iLunarYear - 2001] & (1 << (Bit-1))) > 0) ? 30 : 29;
  }

  return Low + (High << 16);
}

// 返回农历iLunarYear年的总天数
function LunarYearDays(iLunarYear)
{
  var Days;
  var tmp;

  Days = 0;
  for (var i=1; i <= 12; i++)
  {
    tmp = LunarMonthDays(iLunarYear, i);
    Days = Days + ((tmp >> 16) & 0xffff); //取高位
    Days = Days + (tmp & 0xffff); //取低位
  }

  return Days;
}

// 将农历iLunarYear年格式化成天干地支记年法表示的字符串
function FormatLunarYear(iLunarYear)
{
  var szText1 = new String("甲乙丙丁戊己庚辛壬癸");
  var szText2 = new String("子丑寅卯辰巳午未申酉戌亥");
  var strYear;

  strYear = szText1.substr((iLunarYear - 4) % 10, 1);
  strYear = strYear + szText2.substr((iLunarYear - 4) % 12, 1);

  return strYear + "年";
}

// 将农历iLunarMonth月格式化成农历表示的字符串
function FormatLunarMonth(iLunarMonth)
{
  var szText = new String("正二三四五六七八九十");
  var strMonth;

  if (iLunarMonth <= 10)
  {
    strMonth = szText.substr(iLunarMonth - 1, 1);
  }
  else if (iLunarMonth == 11) strMonth = "十一";
  else strMonth = "十二";

  return strMonth + "月";
}

// 将农历iLunarDay日格式化成农历表示的字符串
function FormatLunarDay(iLunarDay)
{
  var szText1 = new String("初十廿三");
  var szText2 = new String("一二三四五六七八九十");
  var strDay;
  if ((iLunarDay != 20) && (iLunarDay != 30))
  {
    strDay = szText1.substr((iLunarDay - 1) / 10, 1) + szText2.substr((iLunarDay - 1) % 10, 1);
  }
  else if (iLunarDay != 20)
  {
    strDay = szText1.substr(iLunarDay / 10, 1) + "十";
  }
  else
  {
    strDay = "二十";
  }

  return strDay;
}

// 将公历日期转换为农历日期，返回农历表示的字符串
function GetLunarDateString(SolarDate)
{
  var tmp;
  var iLunarYear;
  var iLunarMonth;
  var iLunarDay;
  var Leap = false;
  var MinMilli = 1000 * 60;
  var HrMilli = MinMilli * 60;
  var DyMilli = HrMilli * 24;

  // 从2001年1月1日算起，给定的公历日期已经过去的天数
  // 11323是1970年1月1日到2001年1月1日之间的天数，因为Date是从1970年1月1日作为起点的
  var iSpanDays = Math.round(SolarDate.getTime() / DyMilli) - 11323;

  // 公历2001年1月24日为农历2001年正月初一，差23天
  if (iSpanDays < 23)
  {
    iYear = 2000;
    iLunarMonth = 12;
    iLunarDay = iSpanDays + 7;
  }
  else
  {
    // 从农历2001年正月初一算起
    iSpanDays = iSpanDays - 23;
    iLunarYear = 2001;
    iLunarMonth = 1;
    iLunarDay = 1;

    // 计算农历年
    tmp = LunarYearDays(iLunarYear);
    while (iSpanDays >= tmp)
    {
        iSpanDays -= tmp;
        iLunarYear++;
        tmp = LunarYearDays(iLunarYear);
    }

    // 计算农历月
    tmp = LunarMonthDays(iLunarYear, iLunarMonth) & 0xffff; //取低字
    while (iSpanDays >= tmp)
    {
        iSpanDays -= tmp;
        if (iLunarMonth == GetLeapMonth(iLunarYear)) // 该年该月闰月
        {
          tmp = LunarMonthDays(iLunarYear, iLunarMonth) >> 16; //取高字
          if (iSpanDays < tmp)
          {
            Leap = (tmp > 0) ? true : false; // 闰月的后个月？
            break;
          }
          iSpanDays = iSpanDays - tmp;
        }

        iLunarMonth++;
        tmp = LunarMonthDays(iLunarYear,iLunarMonth) & 0xffff; //取低字
    }

    // 计算农历日
    iLunarDay += iSpanDays;
  }

  return FormatLunarYear(iLunarYear) + (Leap ? "闰" : "") + FormatLunarMonth(iLunarMonth) + FormatLunarDay(iLunarDay);
}

调用方法举例如下：

var today= new Date();   // 今天是2004-3-5
var str = GetLunarDateString(today);

结果是 “甲申年二月十五”。

再举两个例子：

var date1 = new Date(2008, 9, 1);   // 2008-10-1
var date2 = new Date(2050, 4, 18);   // 2050-5-18
var str1 = GetLunarDateString(date1);
var str2 = GetLunarDateString(date2);

结果分别是 “戊子年九月初三” 和 “庚午年闰三月廿八”。

注意在Date中，月的范围是0-11。
　　相关软件
　　相关文章
下载帮助 发布软件 自助友情 友情链接 网站导航 广告服务 法律声明 联系我们
六世下载 版权所有 ©2005-2007
本站的数据收集于网络,版权归原作者及出版社所有 如果您觉得侵犯了您的版权请来信告诉我们,我们会尽快删除其内容！
鲁ICP备05050400号