★★日历代码1

清清牧晨 2005-11-14

展开全文

//生成当前公历年、月、日 ==> GongliStr
var curYear = curTime.getFullYear();
var curMonth = curTime.getMonth()+1;
var curDay = curTime.getDate();
var gongliStr = curYear + "年";
if (curMonth < 10)
gongliStr = gongliStr + "0" + curMonth + "月";
else
gongliStr = gongliStr + curMonth + "月";

if (curDay < 10)
gongliStr = gongliStr + "0" + curDay + "日";
else
gongliStr = gongliStr + curDay + "日";

//生成当前公历星期 ==> WeekdayStr

var curWeekday = curTime.getDay();
var weekdayStr = weekName[curWeekday]
//计算到初始时间1921年2月8日的天数：1921-2-8(正月初一)
var theDate = (curYear - 1921) * 365 + Math.floor((curYear - 1921.0) / 4) + curDay + monthAdd[curMonth - 1] - 38

if ((curYear % 4) == 0 && curMonth > 2)
theDate ++;

//计算农历天干、地支、月、日
var isEnd = 0;
var m = 0,k,n;
while (1){
if (nongliData[m] < 4095)
  k = 11
else
  k = 12

n = k
while (1){
  if (n < 0)
   break;
  //获取NongliData[m]的第n个二进制位的值
  bit = nongliData[m]
  for (var i=0;i< n;i++)
   bit = Math.floor(bit / 2.0);
  bit = bit % 2
  if (theDate <= (29 + bit)){
   isEnd = 1
   break;
  }
  theDate -= 29 + bit;
  n--;
}
if (isEnd == 1)
  break;
m ++;
}
curYear = 1921 + m;
curMonth = k - n + 1;
curDay = theDate;
if (k == 12){
if (curMonth == (Math.floor(nongliData[m] / 65536.0) + 1))
  curMonth = 1 - curMonth;
else If (curMonth > (Math.floor(NongliData(m) / 65536.0) + 1))
  curMonth = curMonth - 1
}

var o=new Object();
o.year=new Date().getFullYear();
o.month=new Date().getMonth()+1;
o.date=new Date().getDate();
o.day=new Date().getDay();
o.dayName=weekName[o.day];
o.nYear=tianGang[((curYear - 4) % 60) % 10] + diZhi[((curYear - 4) % 60) % 12] + "年"
if (curMonth < 1)
o.nMonth = "闰" + monName[-1 * curMonth];
else
o.nMonth = monName[curMonth];
o.nMonth+="月";
o.nDate=dayName[curDay];
o.nZodiac=shuXiang[((curYear - 4) % 60) % 12];
return o
}
var ny=nl();
var s="<style>#sheneyan_calc{text-align:center;border:double 3px;width:90px}#sheneyan_calc li{color:#40a040;list-style:none}</style><ul id=‘sheneyan_calc‘><li>"+(ny.year)+"年"+(ny.month)+"月</li><li style=‘font-weight:bold;font-size:25px;color:#ff8040‘>"+(ny.date)+"</li><li>"+ny.dayName+"</li><li>"+ny.nYear+"("+ny.nZodiac+")"+"</li><li>"+ny.nMonth+ny.nDate+"</li></ul>"
document.write(s)
</script>

如果你希望使用按钮来显示的话：
把我最后一行代码

document.write(s)

删除。
然后把你的按钮写成

<input type="button" onclick="document.getElementById(‘calc‘).innerHTML=s" value=‘显示日历‘>
<div id="calc"></div>

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
                  <SCRIPT language=JavaScript>
function Year_Month(){
    var now = new Date();
    var yy = now.getYear();
    var mm = now.getMonth()+1;
    var cl = ‘<font color="#0000df">‘;
    if (now.getDay() == 0) cl = ‘<font color="#FF0000">‘;
    if (now.getDay() == 6) cl = ‘<font color="#00c000">‘;
    return(cl + yy + ‘年‘ + mm + ‘月</font>‘); }
function Date_of_Today(){
    var now = new Date();
    var cl = ‘<font color="#ff0000">‘;
    if (now.getDay() == 0) cl = ‘<font color="#FF0000">‘;
    if (now.getDay() == 6) cl = ‘<font color="#00c000">‘;
    return(cl + now.getDate() + ‘</font>‘); }
function Day_of_Today(){
    var day = new Array();
    day[0] = "星期日";
    day[1] = "星期一";
    day[2] = "星期二";
    day[3] = "星期三";
    day[4] = "星期四";
    day[5] = "星期五";
    day[6] = "星期六";
    var now = new Date();
    var cl = ‘<font color="#0000df">‘;
    if (now.getDay() == 0) cl = ‘<font color="#FF0000">‘;
    if (now.getDay() == 6) cl = ‘<font color="#00c000">‘;
    return(cl + day[now.getDay()] + ‘</font>‘); }
function CurentTime(){
    var now = new Date();
    var hh = now.getHours();
    var mm = now.getMinutes();
    var ss = now.getTime() % 60000;
    ss = (ss - (ss % 1000)) / 1000;
    var clock = hh+‘:‘;
    if (mm < 10) clock += ‘0‘;
    clock += mm+‘:‘;
    if (ss < 10) clock += ‘0‘;
    clock += ss;
    return(clock); }
function refreshCalendarClock(){
document.all.calendarClock1.innerHTML = Year_Month();
document.all.calendarClock2.innerHTML = Date_of_Today();
document.all.calendarClock3.innerHTML = Day_of_Today();
document.all.calendarClock4.innerHTML = CurentTime(); }
var webUrl = webUrl;
document.write(‘<table border="0" cellpadding="0" cellspacing="0"><tr><td>‘);
document.write(‘<table id="CalendarClockFreeCode" border="0" cellpadding="0" cellspacing="0" width="60" height="70" ‘);
document.write(‘style="position:absolute;visibility:hidden" bgcolor="#eeeeee">‘);
document.write(‘<tr><td align="center"><font ‘);
document.write(‘style="cursor:hand;color:#ff0000;font-family:宋体;font-size:14pt;line-height:120%" ‘);
if (webUrl != ‘netflower‘){
   document.write(‘</td></tr><tr><td align="center"><font ‘);
   document.write(‘style="cursor:hand;color:#2000ff;font-family:宋体;font-size:9pt;line-height:110%" ‘);
}
document.write(‘</td></tr></table>‘);
document.write(‘<table border="0" cellpadding="0" cellspacing="0" width="61" bgcolor="#D67929" height="70">‘);
document.write(‘<tr><td valign="top" width="100%" height="100%">‘);
document.write(‘<table border="1" cellpadding="0" cellspacing="0" width="58" bgcolor="#6B6D6B" height="67">‘);
document.write(‘<tr><td align="center" width="100%" height="100%" >‘);
document.write(‘<font id="calendarClock1" style="font-family:宋体;font-size:7pt;line-height:120%"> </font><br>‘);
document.write(‘<font id="calendarClock2" style="color:#ff0000;font-family:Arial;font-size:14pt;line-height:120%"> </font><br>‘);
document.write(‘<font id="calendarClock3" style="font-family:宋体;font-size:9pt;line-height:120%"> </font><br>‘);
document.write(‘<font id="calendarClock4" style="color:#000080;font-family:宋体;font-size:8pt;line-height:120%"><b> </b></font>‘);
document.write(‘</td></tr></table>‘);
document.write(‘</td></tr></table>‘);
document.write(‘</td></tr></table>‘);
setInterval(‘refreshCalendarClock()‘,1000);
</SCRIPT>

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

[code]<script language="Javascript">

</script>
<script language="javascript">CAL();</script> [/code]

\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>本地计算机时间</title>
</head>

<body>

<SCRIPT language=JavaScript>
<!--
/*****************************************************************************
日期资料
*****************************************************************************/

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)

var solarMonth=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var Gan=new Array("甲","乙","丙","丁","戊","己","庚","辛","壬","癸");
var Zhi=new Array("子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥");
var Animals=new Array("鼠","牛","虎","兔","龙","蛇","马","羊","猴","鸡","狗","猪");
var solarTerm = new Array("小寒","大寒","立春","雨水","惊蛰","春分","清明","谷雨","立夏","小满","芒种","夏至","小暑","大暑","立秋","处暑","白露","秋分","寒露","霜降","立冬","小雪","大雪","冬至")
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 nStr1 = new Array(‘日‘,‘一‘,‘二‘,‘三‘,‘四‘,‘五‘,‘六‘,‘七‘,‘八‘,‘九‘,‘十‘)
var nStr2 = new Array(‘初‘,‘十‘,‘廿‘,‘卅‘,‘　‘)
var monthName = new Array("JAN","FEB","MAR","APR","MAY","JUN","JUL","AUG","SEP","OCT","NOV","DEC");

//国历节日 *表示放假日
var sFtv = new Array(
"0101*元旦",
"0214 情人节",
"0303 我生日",
"0308 妇女节",
"0312 植树节",
"0315 消费者权益日",
"0317 St. Patrick‘s",
"0401 愚人节",
"0501 劳动节",
"0504 青年节",
"0512 护士节",
"0512 茵生日",
"0601 儿童节",
"0614 Flag Day",
"0701 建党节香港回归纪念",
"0703 炎黄在线诞辰",
"0718 托普诞辰",
"0801 建军节",
"0808 父亲节",
"0909 毛泽东逝世纪念",
"0910 教师节",
"0928 孔子诞辰",
"1001*国庆节",
"1006 老人节",
"1024 联合国日",
"1111 Veteran‘s / Remembrance Day",
"1112 孙中山诞辰纪念",
"1220 澳门回归纪念",
"1225 Christmas Day",
"1226 毛泽东诞辰纪念")

//农历节日 *表示放假日
var lFtv = new Array(
"0101*春节",
"0115 元宵节",
"0505 端午节",
"0707 七夕情人节",
"0715 中元节",
"0815 中秋节",
"0909 重阳节",
"1208 腊八节",
"1224 小年",
"0100*除夕")

//某月的第几个星期几
var wFtv = new Array(
"0131 Martin Luther King Day",
"0231 President‘s Day",
"0520 母亲节",
"0530 Armed Forces Day",
"0531 Victoria Day",
"0716 合作节",
"0730 被奴役国家周",
"0811 Civic Holiday",
"0911 Labor Holiday",
"1021 Columbus Day",
"1144 Thanksgiving")

/*****************************************************************************
日期计算
*****************************************************************************/

//====================================== 传回农历 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 = offset + 40
this.monCyl = 14

   for(i=1900; i<2050 && 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
}

//==============================传回国历 y年某m+1月的天数
function solarDays(y,m) {
   if(m==1)
      return(((y%4 == 0) && (y%100 != 0) || (y%400 == 0))? 29: 28)
   else
      return(solarMonth[m])
}
//============================== 传入 offset 传回干支, 0=甲子
function cyclical(num) {
   return(Gan[num%10]+Zhi[num%12])
}

//============================== 月历属性
function calElement(sYear,sMonth,sDay,week,lYear,lMonth,lDay,isLeap,cYear,cMonth,cDay) {

      this.isToday    = false;
      //国历
      this.sYear      = sYear;
      this.sMonth     = sMonth;
      this.sDay       = sDay;
      this.week       = week;
      //农历
      this.lYear      = lYear;
      this.lMonth     = lMonth;
      this.lDay       = lDay;
      this.isLeap     = isLeap;
      //干支
      this.cYear      = cYear;
      this.cMonth     = cMonth;
      this.cDay       = cDay;

this.color = ‘‘;

      this.lunarFestival = ‘‘; //农历节日
      this.solarFestival = ‘‘; //国历节日
      this.solarTerms    = ‘‘; //节气

}

//===== 某年的第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
   var lDPOS = new Array(3)
   var n = 0
   var firstLM = 0

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

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

for(var i=0;i<this.length;i++) {

      if(lD>lX) {
         sDObj = new Date(y,m,i+1)    //当月一日日期
         lDObj = new Lunar(sDObj)     //农历
         lY    = lDObj.year           //农历年
         lM    = lDObj.month          //农历月
         lD    = lDObj.day            //农历日
         lL    = lDObj.isLeap         //农历是否闰月
         lX    = lL? leapDays(lY): monthDays(lY,lM) //农历当月最後一天

         if(n==0) firstLM = lM
         lDPOS[n++] = i-lD+1
      }

      //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,
                               cyclical(lDObj.yearCyl) ,cyclical(lDObj.monCyl), cyclical(lDObj.dayCyl++) )

      if((i+this.firstWeek)%7==0)   this[i].color = ‘red‘ //周日颜色
      if((i+this.firstWeek)%14==13) this[i].color = ‘red‘ //周休二日颜色
   }

   //节气
   tmp1=sTerm(y,m*2 )-1
   tmp2=sTerm(y,m*2+1)-1
   this[tmp1].solarTerms = solarTerm[m*2]
   this[tmp2].solarTerms = solarTerm[m*2+1]
   if(m==3) this[tmp1].color = ‘red‘ //清明颜色

   //国历节日
   for(i in sFtv)
      if(sFtv[i].match(/^(\d{2})(\d{2})([\s\*])(.+)$/))
         if(Number(RegExp.$1)==(m+1)) {
            this[Number(RegExp.$2)-1].solarFestival += RegExp.$4 + ‘ ‘
            if(RegExp.$3==‘*‘) this[Number(RegExp.$2)-1].color = ‘red‘
         }

   //月周节日
   for(i in wFtv)
      if(wFtv[i].match(/^(\d{2})(\d)(\d)([\s\*])(.+)$/))
         if(Number(RegExp.$1)==(m+1)) {
            tmp1=Number(RegExp.$2)
            tmp2=Number(RegExp.$3)
            this[((this.firstWeek>tmp2)?7:0) + 7*(tmp1-1) + tmp2 - this.firstWeek].solarFestival += RegExp.$5 + ‘ ‘
         }

   //农历节日
   for(i in lFtv)
      if(lFtv[i].match(/^(\d{2})(.{2})([\s\*])(.+)$/)) {
         tmp1=Number(RegExp.$1)-firstLM
         if(tmp1==-11) tmp1=1
         if(tmp1 >=0 && tmp1<n) {
            tmp2 = lDPOS[tmp1] + Number(RegExp.$2) -1
            if( tmp2 >= 0 && tmp2<this.length) {
               this[tmp2].lunarFestival += RegExp.$4 + ‘ ‘
               if(RegExp.$3==‘*‘) this[tmp2].color = ‘red‘
            }
         }
      }

   //黑色星期五
   if((this.firstWeek+12)%7==5)
      this[12].solarFestival += ‘黑色星期五 ‘

//今日
if(y==tY && m==tM) this[tD-1].isToday = true;

}

//====================== 中文日期
function cDay(d){
var s;

   switch (d) {
      case 10:
         s = ‘初十‘; break;
      case 20:
         s = ‘二十‘; break;
         break;
      case 30:
         s = ‘三十‘; break;
         break;
      default :
         s = nStr2[Math.floor(d/10)];
         s += nStr1[d%10];
   }
   return(s);
}

///////////////////////////////////////////////////////////////////////////////

var cld;

function drawCld(SY,SM) {
var i,sD,s,size;
cld = new calendar(SY,SM);

   if(SY>1874 && SY<1909) yDisplay = ‘光绪‘ + (((SY-1874)==1)?‘元‘:SY-1874)
   if(SY>1908 && SY<1912) yDisplay = ‘宣统‘ + (((SY-1908)==1)?‘元‘:SY-1908)
   if(SY>1911 && SY<1950) yDisplay = ‘民国‘ + (((SY-1911)==1)?‘元‘:SY-1911)
//   if(SY>1949) yDisplay = ‘共和国‘ + (((SY-1949)==1)?‘元‘:SY-1949)

// GZ.innerHTML = yDisplay +‘年农历‘ + cyclical(SY-1900+36) + ‘年【‘+Animals[(SY-4)%12]+‘】‘;

if(SY>1949) yDisplay = ‘‘

GZ.innerHTML = yDisplay +‘ 农历‘ + cyclical(SY-1900+36) + ‘年【‘+Animals[(SY-4)%12]+‘】‘;

YMBG.innerHTML = " " + SY + "<BR> " + monthName[SM];

for(i=0;i<42;i++) {

sObj=eval(‘SD‘+ i);
lObj=eval(‘LD‘+ i);

sObj.className = ‘‘;

sD = i - cld.firstWeek;

if(sD>-1 && sD<cld.length) { //日期内
sObj.innerHTML = sD+1;

if(cld[sD].isToday) sObj.className = ‘todyaColor‘; //今日颜色

sObj.style.color = cld[sD].color; //国定假日颜色

         if(cld[sD].lDay==1) //显示农历月
            lObj.innerHTML = ‘<b>‘+(cld[sD].isLeap?‘闰‘:‘‘) + cld[sD].lMonth + ‘月‘ + (monthDays(cld[sD].lYear,cld[sD].lMonth)==29?‘小‘:‘大‘)+‘</b>‘;
         else //显示农历日
            lObj.innerHTML = cDay(cld[sD].lDay);

         s=cld[sD].lunarFestival;
         if(s.length>0) { //农历节日
            if(s.length>6) s = s.substr(0, 4)+‘…‘;
            s = s.fontcolor(‘red‘);
         }
         else { //国历节日
            s=cld[sD].solarFestival;
            if(s.length>0) {
               size = (s.charCodeAt(0)>0 && s.charCodeAt(0)<128)?8:4;
               if(s.length>size+2) s = s.substr(0, size)+‘…‘;
               s = s.fontcolor(‘blue‘);
            }
            else { //廿四节气
               s=cld[sD].solarTerms;
               if(s.length>0) s = s.fontcolor(‘limegreen‘);
            }
         }
         if(s.length>0) lObj.innerHTML = s;

      }
      else { //非日期
         sObj.innerHTML = ‘‘;
         lObj.innerHTML = ‘‘;
      }
   }
}

// alert(CLD.SY.selectedIndex+" "+CLD.SM.selectedIndex);

     for(i=0;i<42;i++)
     {
        sD = i - cld.firstWeek;
        if(sD>-1 && sD<cld.length)
        { //日期内
         if ((cld[sD].lMonth==CLD.D2.selectedIndex+1)&&(cld[sD].lYear==CLD.D1.selectedIndex+1900))
         {
     yangy=CLD.SY.selectedIndex+1900; yangm=CLD.SM.selectedIndex ;
     tt=false;
     break;
     }
         }
     }
   break;
}
//  alert(yangy+" "+yangm);

//CLD.SY.selectedIndex=yangy;//-1900;
//pushBtm(‘YU‘);
//pushBtm(‘YD‘);
CLD.SM.selectedIndex=yangm;
pushBtm(‘MD‘);
pushBtm(‘MU‘);



}
//changeLong end

function changeCld() {
   var y,m;
   y=CLD.SY.selectedIndex+1900;
   m=CLD.SM.selectedIndex;
   drawCld(y,m);
}

var Today = new Date();
var tY = Today.getFullYear();
var tM = Today.getMonth();
var tD = Today.getDate();
//////////////////////////////////////////////////////////////////////////////

var width = "130";
var offsetx = 2;
var offsety = 16;

var x = 0;
var y = 0;
var snow = 0;
var sw = 0;
var cnt = 0;

var dStyle;
document.onmousemove = mEvn;

//显示详细日期资料
function mOvr(v) {
   var s,festival;
   var sObj=eval(‘SD‘+ v);
   var d=sObj.innerHTML-1;

      //sYear,sMonth,sDay,week,
      //lYear,lMonth,lDay,isLeap,
      //cYear,cMonth,cDay

if(sObj.innerHTML!=‘‘) {

sObj.style.cursor = ‘s-resize‘;

      if(cld[d].solarTerms == ‘‘ && cld[d].solarFestival == ‘‘ && cld[d].lunarFestival == ‘‘)
         festival = ‘‘;
      else
         festival = ‘<TABLE WIDTH=100% BORDER=0 CELLPADDING=2 CELLSPACING=0 BGCOLOR="#CCFFCC"><TR><TD>‘+
         ‘<FONT COLOR="#000000" STYLE="font-size:9pt;">‘+cld[d].solarTerms + ‘ ‘ + cld[d].solarFestival + ‘ ‘ + cld[d].lunarFestival+‘</FONT></TD>‘+
         ‘</TR></TABLE>‘;

      s= ‘<TABLE WIDTH="130" BORDER=0 CELLPADDING="2" CELLSPACING=0 BGCOLOR="#000066"><TR><TD>‘ +
         ‘<TABLE WIDTH=100% BORDER=0 CELLPADDING=0 CELLSPACING=0><TR><TD ALIGN="right"><FONT COLOR="#ffffff" STYLE="font-size:9pt;">‘+
         cld[d].sYear+‘ 年 ‘+cld[d].sMonth+‘ 月 ‘+cld[d].sDay+‘ 日<br>星期‘+cld[d].week+‘<br>‘+
         ‘<font color="violet">农历‘+(cld[d].isLeap?‘闰 ‘:‘ ‘)+cld[d].lMonth+‘ 月 ‘+cld[d].lDay+‘ 日</font><br>‘+
         ‘<font color="yellow">‘+cld[d].cYear+‘年 ‘+cld[d].cMonth+‘月 ‘+cld[d].cDay + ‘日</font>‘+
         ‘</FONT></TD></TR></TABLE>‘+ festival +‘</TD></TR></TABLE>‘;

document.all["detail"].innerHTML = s;

   if (snow == 0) {
         dStyle.left = x+offsetx-(width/2);
         dStyle.top = y+offsety;
     dStyle.visibility = "visible";
     snow = 1;
   }
}
}

//清除详细日期资料
function mOut() {
if ( cnt >= 1 ) { sw = 0 }
if ( sw == 0 ) { snow = 0; dStyle.visibility = "hidden";}
else cnt++;
}

//取得位置
function mEvn() {
   x=event.x;
   y=event.y;
if (document.body.scrollLeft)
    {x=event.x+document.body.scrollLeft; y=event.y+document.body.scrollTop;}
if (snow){
      dStyle.left = x+offsetx-(width/2)
      dStyle.top = y+offsety
}
}

///////////////////////////////////////////////////////////////////////////

function tick() {
   var today
   today = new Date()
   Clock.innerHTML = today.toLocaleString().replace(/(年|月)/g, "/").replace(/日/, "");
//   Clock.innerHTML = TimeAdd(today.toGMTString(), CLD.TZ.value)
   window.setTimeout("tick()", 1000);
}

function setCookie(name, value) {
var today = new Date()
var expires = new Date()
expires.setTime(today.getTime() + 1000*60*60*24*365)
document.cookie = name + "=" + escape(value) + "; expires=" + expires.toGMTString()
}

function getCookie(Name) {
   var search = Name + "="
   if(document.cookie.length > 0) {
      offset = document.cookie.indexOf(search)
      if(offset != -1) {
         offset += search.length
         end = document.cookie.indexOf(";", offset)
         if(end == -1) end = document.cookie.length
         return unescape(document.cookie.substring(offset, end))
      }
      else return ""
   }
}

/////////////////////////////////////////////////////////

function initial() {
   dStyle = detail.style;
   CLD.SY.selectedIndex=tY-1900;
   CLD.SM.selectedIndex=tM;
   drawCld(tY,tM);

//   CLD.TZ.selectedIndex=getCookie("TZ");
//   changeTZ();
   tick();
}

//-->
</SCRIPT>

<STYLE>.todyaColor {
BACKGROUND-COLOR: aqua
}
</STYLE>

<META content="Microsoft FrontPage 6.0" name=GENERATOR></HEAD>
<BODY onload=initial()>
<SCRIPT language=JavaScript></SCRIPT>

<DIV id=detail style="POSITION: absolute"></DIV>
<FORM name=CLD>
<div align="center">
<TABLE width="672" align="right" height="259" bordercolordark="#CC9900" border="4" background="l11.gif">
<CENTER>
<center>
<TBODY>
</center></center>
<TR>
<TD align=middle vAlign=top width="170" height="255">
<div align="center">
    <center>
<TABLE BORDER=1 COLSPAN=2 width="221">
<CENTER>
    <center><FONT size=2
      style="FONT-SIZE: 9pt">
    <td width="209">
      <p align="center"><font style="font-size:10.8pt" color=RED>本地计算机时间:</FONT></FONT><BR><FONT color=#000080 face=ARIAL
      id=Clock size=3 align="center"></FONT>
      <P>
      </center>
   </CENTER>
   </TABLE>
</center>
    </div>
    <div align="center">
      <center>
      <table border=1 height="1" width="16">
      <td height="1" width="255">
            <table width="212" height="1"><CENTER>
            <center>
      <FONT id=tSave
      style="COLOR: red; FONT-FAMILY: Wingdings; FONT-SIZE: 18pt"></FONT>
      <td height="1" width="152"><font size="2"><FONT style="FONT-SIZE: 9pt">
      <font color="#0000FF">公历</font>年</font><FONT color=#ffffff
            style="FONT-SIZE: 9pt"><SELECT name=SY onchange=changeCld()
            style="FONT-SIZE: 9pt">
              <SCRIPT language=JavaScript></SCRIPT>
            </SELECT> </FONT>月<FONT color=#ffffff
            style="FONT-SIZE: 9pt"><SELECT name=SM onchange=changeCld()
            style="FONT-SIZE: 9pt">
              <SCRIPT language=JavaScript></SCRIPT>
            </SELECT></FONT></font>
      <P><font size="2"><FONT style="FONT-SIZE: 9pt"><font color="#0000FF">阴历</font>年</font><FONT color=#ffffff
            style="FONT-SIZE: 9pt"><SELECT name=D1 onchange=changeLong()
            style="FONT-SIZE: 9pt">
              <SCRIPT language=JavaScript></SCRIPT>
            </SELECT> </FONT>月<FONT color=#ffffff
            style="FONT-SIZE: 9pt"><SELECT name=D2 onchange=changeLong()
            style="FONT-SIZE: 9pt">
              <SCRIPT language=JavaScript></SCRIPT>
            </SELECT></FONT></font></P>
      <div align="center" style="width: 4; height: 1">
      </div>
      <td width="1" align="center" height="1">
      <BUTTON onclick="pushBtm(‘MU‘)" style="FONT-SIZE: 9pt">月↑</BUTTON>
      <BUTTON onclick="pushBtm(‘‘)" style="FONT-SIZE: 9pt">当月</BUTTON>
      <BUTTON onclick="pushBtm(‘MD‘)" style="FONT-SIZE: 9pt">月↓</BUTTON>
      </td>
        </center></center>
<tr>
  <CENTER>
      <TD align=center vAlign=top width=152 height="1">
      <BUTTON onclick="pushBtm(‘YU‘)" style="FONT-SIZE: 9pt">年↑</BUTTON>
      <BUTTON onclick="pushBtm(‘YD‘)" style="FONT-SIZE: 9pt">年↓</BUTTON>
      </TD>
        </center>
      <td colspan=2 width="46" height="1">
          <p align="left"><INPUT onclick="javascript:window.close();" style="FONT-SIZE: 9pt" type=button value=关闭></p>
      </td>

</table>
  <CENTER>
        <table border="1" width="100%" height="1" bordercolordark="#FFFFCC">
        <tr>
          <td width="100%" height="1"><font style="font-size:10.8pt" color=#0> 　
            阴历存在跨月情况，如果查找到的阴历月跨两个公历月，用<font color=blue>[月↑][月↓]</font>翻动可以找到你想要的确切日期。</font></td>
        </tr>
      </table>
      </CENTER>
      </table>
      </center>
    </div>
    <TD align=middle width="423" height="255">
      <DIV style="position: absolute; top: 31; z-index: -1; left: 270; width: 347; height: 108">
        <p>
        <p>
        <p><FONT id=YMBG
      style="COLOR: #f0f0f0; FONT-FAMILY: ‘Arial Black‘; FONT-SIZE: 20pt"> </FONT>
      </DIV>
      <div align="center">
      <center>
      <TABLE border=0 height="27" cellspacing="1">
        <TBODY>
        <TR>
          <TD bgColor=#000080 colSpan=7 align="center" height="24"><FONT color=#000080 size=2
            style="FONT-SIZE: 9pt">月</FONT> <FONT color=#ffffff face=宋体 id=GZ
            size=4></FONT><BR></TD></TR>
        <TR align=middle bgColor=#e0e0e0>
          <TD width=54 height="1" align="center" bgcolor="#99CCFF"><font size="2">日</font></TD>
          <TD width=54 height="1" align="center" bgcolor="#99CCFF"><font size="2">一</font></TD>
          <TD width=54 height="1" align="center" bgcolor="#99CCFF"><font size="2">二</font></TD>
          <TD width=50 height="1" align="center" bgcolor="#99CCFF"><font size="2">三</font></TD>
          <TD width=54 height="1" align="center" bgcolor="#99CCFF"><font size="2">四</font></TD>
          <TD width=54 height="1" align="center" bgcolor="#99CCFF"><font size="2">五</font></TD>
          <TD width=54 height="1" align="center" bgcolor="#99CCFF"><font size="2">六</font></TD></TR>
        <SCRIPT language=JavaScript></SCRIPT>
        </TBODY></TABLE>
      </center>
      </div>
</TD>
</TR></TBODY></TABLE>
</div>
</FORM>

</body>

</html>
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

var year1999="30;29;29;30;29;29;30;29;30;30;30;29"; //354
var year2000="30;30;29;29;30;29;29;30;29;30;30;29"; //354
var year2001="30;30;29;30;29;30;29;29;30;29;30;29;30"; //384
var year2002="30;30;29;30;29;30;29;29;30;29;30;29"; //354
var year2003="30;30;29;30;30;29;30;29;29;30;29;30"; //355
var year2004="29;30;29;30;30;29;30;29;30;29;30;29;30"; //384
var year2005="29;30;29;30;29;30;30;29;30;29;30;29"; //354
var year2006="30;29;30;29;30;30;29;29;30;30;29;29;30";

var month1999="正月;二月;三月;四月;五月;六月;七月;八月;九月;十月;十一月;十二月"
var month2001="正月;二月;三月;四月;闰四月;五月;六月;七月;八月;九月;十月;十一月;十二月"
var month2004="正月;二月;闰二月;三月;四月;五月;六月;七月;八月;九月;十月;十一月;十二月"
var month2006="正月;二月;三月;四月;五月;六月;七月;闰七月;八月;九月;十月;十一月;十二月"
var Dn="初一;初二;初三;初四;初五;初六;初七;初八;初九;初十;十一;十二;十三;十四;十五;十六;十七;十八;十九;二十;廿一;廿二;廿三;廿四;廿五;廿六;廿七;廿八;廿九;三十";

var Ys=new Array(arrLen);
Ys[0]=919094400;Ys[1]=949680000;Ys[2]=980265600;
Ys[3]=1013443200;Ys[4]=1044028800;Ys[5]=1074700800;
Ys[6]=1107878400;Ys[7]=1138464000;

var Yn=new Array(arrLen); //农历年的名称
Yn[0]="己卯年";Yn[1]="庚辰年";Yn[2]="辛巳年";
Yn[3]="壬午年";Yn[4]="癸未年";Yn[5]="甲申年";
Yn[6]="乙酉年";Yn[7]="丙戌年";
var D=new Date();
var yy=D.getYear();
var mm=D.getMonth()+1;
var dd=D.getDate();
var ww=D.getDay();
if (ww==0) ww="<font color=RED>星期日";
if (ww==1) ww="星期一";
if (ww==2) ww="星期二";
if (ww==3) ww="星期三";
if (ww==4) ww="星期四";
if (ww==5) ww="星期五";
if (ww==6) ww="<font color=RED>星期六";
ww=ww;
var ss=parseInt(D.getTime() / 1000);
if (yy<100) yy="19"+yy;

for (i=0;i<arrLen;i++)
if (ss>=Ys[i]){
iyear=i;
sValue=ss-Ys[i]; //当年的秒数
}
dayiy=parseInt(sValue/spd)+1; //当年的天数

var dpm=year1999;
if (iyear==1) dpm=year2000;
if (iyear==2) dpm=year2001;
if (iyear==3) dpm=year2002;
if (iyear==4) dpm=year2003;
if (iyear==5) dpm=year2004;
if (iyear==6) dpm=year2005;
if (iyear==7) dpm=year2006;
dpm=dpm.split(";");

var Mn=month1999;
if (iyear==2) Mn=month2001;
if (iyear==5) Mn=month2004;
if (iyear==7) Mn=month2006;
Mn=Mn.split(";");

var Dn="初一;初二;初三;初四;初五;初六;初七;初八;初九;初十;十一;十二;十三;十四;十五;十六;十七;十八;十九;二十;廿一;廿二;廿三;廿四;廿五;廿六;廿七;廿八;廿九;三十";
Dn=Dn.split(";");

dayim=dayiy;

var total=new Array(13);
total[0]=parseInt(dpm[0]);
for (i=1;i<dpm.length-1;i++) total[i]=parseInt(dpm[i])+total[i-1];
for (i=dpm.length-1;i>0;i--)
if (dayim>total[i-1]){
dayim=dayim-total[i-1];
miy=i;
}
bsWeek=ww;
bsDate=yy+"年"+mm+"月";
bsDate2=dd;
bsYear="农历"+Yn[iyear];
bsYear2=Mn[miy]+Dn[dayim-1];
if (ss>=Ys[7]||ss<Ys[0]) bsYear=Yn[7];
function CAL(){
document.write("<table border=‘0‘ cellspacing=‘0‘ width=‘100‘ bordercolor=‘#FFFFFF‘ height=‘80‘ cellpadding=‘0‘");
document.write("<tr><td align=‘center‘><b><font color=red>"+bsDate+"</font><br><font face=‘Arial‘ size=‘4‘ color=#FF8040>"+bsDate2+"</font><br><font color=blue><span style=‘FONT-SIZE: 9pt‘>");
document.write(bsWeek+"</span><br>"+"</b><font color=#9B4E00>");
document.write(bsYear+"<br>"+bsYear2+"</td></tr></table>");
}
//-->
</script><script language="javascript">CAL();</script>
<br><OBJECT codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0 width=100% classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000>
<PARAM NAME="_cx" VALUE="5292"><PARAM NAME="_cy" VALUE="5292"><PARAM NAME="FlashVars" VALUE="5292"><PARAM NAME="Movie" VALUE="http://www./733181/uploadpic/200431115162335654.swf"><PARAM NAME="Src" VALUE="http://www./733181/uploadpic/200431115162335654.swf"><PARAM NAME="WMode" VALUE="Window"><PARAM NAME="Play" VALUE="0"><PARAM NAME="Loop" VALUE="-1"><PARAM NAME="Quality" VALUE="High"><PARAM NAME="SAlign" VALUE=""><PARAM NAME="Menu" VALUE="-1"><PARAM NAME="Base" VALUE=""><PARAM NAME="AllowScriptAccess" VALUE="always"><PARAM NAME="Scale" VALUE="ShowAll"><PARAM NAME="DeviceFont" VALUE="0"><PARAM NAME="EmbedMovie" VALUE="0"><PARAM NAME="BGColor" VALUE=""><PARAM NAME="SWRemote" VALUE="">
<embed src=http://www./733181/uploadpic/200431115162335654.swf‘ width="100%" pluginspage=‘http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash‘ type=‘application/x-shockwave-flash‘></embed></OBJECT> <font face="宋体" size=2>
<p>Microsoft VBScript 运行时错误</font> <font face="宋体" size=2 > 错误 ‘800a01b6‘</font>
<p>
<font face="宋体" size=2>对象不支持此属性或方法: ‘Response.flushbuffer‘</font>
<p>
<font face="宋体" size=2>/733181/index.asp</font><font face="宋体" size=2>，行123</font>

||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||

if((this.firstWeek+12)%7==5)
this[12].solarFestival += ‘黑色星期五 ‘