麻烦大伙一分钟时间，帮忙一下。好吗？

Question

//=====  某年的第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  =  0sDObj  =  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;

Answer 1

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)  +  '年  &nbsp;&nbsp;【'+Animals[(SY-4)%12]+'】';YMBG.innerHTML  =  "&nbsp;"  +  SY  +  "<BR>&nbsp;"  +  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  =  '';
}
}
}
function  changeCld()  {
var  y,m;
y=CLD.SY.selectedIndex+1900;
m=CLD.SM.selectedIndex;
drawCld(y,m);
}function  pushBtm(K)  {
switch  (K){
case  'YU'  :
if(CLD.SY.selectedIndex>0)  CLD.SY.selectedIndex--;
break;
case  'YD'  :
if(CLD.SY.selectedIndex<149)  CLD.SY.selectedIndex++;
break;
case  'MU'  :
if(CLD.SM.selectedIndex>0)  {
CLD.SM.selectedIndex--;
}
else  {
CLD.SM.selectedIndex=11;
if(CLD.SY.selectedIndex>0)  CLD.SY.selectedIndex--;
}
break;
case  'MD'  :
if(CLD.SM.selectedIndex<11)  {
CLD.SM.selectedIndex++;
}
else  {
CLD.SM.selectedIndex=0;
if(CLD.SY.selectedIndex<149)  CLD.SY.selectedIndex++;
}
break;
default  :
CLD.SY.selectedIndex=tY-1900;
CLD.SM.selectedIndex=tM;
}
changeCld();
}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,cDayif(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  changeTZ()  {
CITY.innerHTML  =  CLD.TZ.value.substr(6)
setCookie("TZ",CLD.TZ.selectedIndex)
}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>

Answer 2

<SCRIPT  language=VBScript>
<!--
'=====  算世界时间
Function  TimeAdd(UTC,T)
Dim  PlusMinus,  DST,  y
If  Left(T,1)="-"  Then  PlusMinus  =  -1  Else  PlusMinus  =  1
UTC=Right(UTC,Len(UTC)-5)
UTC=Left(UTC,Len(UTC)-4)
y  =  Year(UTC)
TimeAdd=DateAdd("n",  (Cint(Mid(T,2,2))*60  +  Cint(Mid(T,4,2)))  *  PlusMinus,  UTC)
'美国日光节约期间:  4月第一个星日00:00  至  10月最後一个星期日00:00
If  Mid(T,6,1)="*"  And  DateSerial(y,4,(9  -  Weekday(DateSerial(y,4,1))  mod  7)  )  <=  TimeAdd  And  DateSerial(y,10,31  -  Weekday(DateSerial(y,10,31)))  >=  TimeAdd  Then
TimeAdd=CStr(DateAdd("h",  1,  TimeAdd))
tSave.innerHTML  =  "R"
Else
tSave.innerHTML  =  ""
End  If
TimeAdd  =  CStr(TimeAdd)
End  Function
'-->
</SCRIPT><STYLE>.todyaColor  {
BACKGROUND-COLOR:  aqua
}
</STYLE>
<SCRIPT  language=JavaScript><!--
if(navigator.appName  ==  "Netscape"  ||  parseInt(navigator.appVersion)  <  4)
document.write("<h1>你的浏览器无法执行此程序。</h1>此程序在  IE4  以后的版本才能执行!!")
//--></SCRIPT><DIV  id=detail  style="POSITION:  absolute"></DIV>
<div align="left"></div>
<FORM  name=CLD>
  <TABLE>
    <TBODY>
      <TR>
        <TD  vAlign=top  align=middle><FONT  color=#ff6633  size=3>
          <SCRIPT  language=JavaScript>
var  enabled  =  0;  today  =  new  Date();
var  day;  var  date;
if(today.getDay()==0)  day  =  "星期日"
if(today.getDay()==1)  day  =  "星期一"
if(today.getDay()==2)  day  =  "星期二"
if(today.getDay()==3)  day  =  "星期三"
if(today.getDay()==4)  day  =  "星期四"
if(today.getDay()==5)  day  =  "星期五"
if(today.getDay()==6)  day  =  "星期六"
document.fgColor  =  "000000";
date  =  "  佛历  "  +  (today.getYear()+544)  +  "  年  "  +
(today.getMonth()  +  1  )  +  "月  "  +  today.getDate()  +  "日  "  +
day  +"";
document.write(date)
</SCRIPT>
          </FONT><BR><FONT  style="FONT-SIZE:  9pt"  size=2>本地时间:</FONT><BR><FONT  
            id=Clock  face=Arial  color=#000080  size=4  align="center"></FONT>
          <P><!--时区  *表示自动调整为日光节约时间--><FONT  style="FONT-SIZE:  9pt"  size=2><SELECT  
            style="FONT-SIZE:  9pt"  onchange=changeTZ()  name=TZ>  <OPTION  
                value="-1200  安尼威土克、瓜甲兰"  selected>国际换日线<OPTION  
                value="-1100  中途岛、萨摩亚群岛">萨摩亚<OPTION  value="-1000  夏威夷">夏威夷<OPTION  
                value=-0900*阿拉斯加>阿拉斯加<OPTION  value=-0800*太平洋时间(美加)、提亚纳>太平洋<OPTION  
                value="-0700  亚历桑那">美国山区<OPTION  value=-0700*山区时间(美加)>美加山区<OPTION  
                value=-0600*萨克其万(加拿大)>加拿大中部<OPTION  value=-0600*墨西哥市、塔克西卡帕>墨西哥<OPTION  
                value=-0600*中部时间(美加)>美加中部<OPTION  value=-0500*波哥大、里玛>南美洲太平洋<OPTION  
                value=-0500*东部时间(美加)>美加东部<OPTION  value=-0500*印第安纳(东部)>美东<OPTION  
                value=-0400*加拉卡斯、拉帕兹>南美洲西部<OPTION  value="-0400*大西洋时间  加拿大)">大西洋<OPTION  
                value="-0330  新岛(加拿大东岸)">纽芬兰<OPTION  value="-0300  波西尼亚">东南美洲<OPTION  
                value="-0300  布鲁诺斯爱丽斯、乔治城">南美洲东部<OPTION  value=-0200*大西洋中部>大西洋中部<OPTION  
                value=-0100*亚速尔群岛、维德角群岛>亚速尔<OPTION  
                value="+0000  格林威治时间、都柏林、爱丁堡、伦敦">英国夏令<OPTION  
                value="+0000  莫洛维亚(赖比瑞亚)、卡萨布兰卡">格林威治标准<OPTION  
                value="+0100  巴黎、马德里">罗马<OPTION  value="+0100  布拉格,  华沙,  布达佩斯">中欧<OPTION  
                value="+0100  柏林、斯德哥尔摩、罗马、伯恩、布鲁赛尔、维也纳">西欧<OPTION  
                value="+0200  以色列">以色列<OPTION  value=+0200*东欧>东欧<OPTION  
                value=+0200*开罗>埃及<OPTION  value=+0200*雅典、赫尔辛基、伊斯坦堡>GFT<OPTION  
                value=+0200*赫拉雷、皮托里>南非<OPTION  
                value=+0300*巴格达、科威特、奈洛比(肯亚)、里雅德(沙乌地)>沙乌地阿拉伯<OPTION  
                value=+0300*莫斯科、圣彼得堡、贺占、窝瓦格瑞德>俄罗斯<OPTION  value=+0330*德黑兰>伊朗<OPTION  
                value=+0400*阿布达比(东阿拉伯)、莫斯凯、塔布理斯(乔治亚共和)>阿拉伯<OPTION  
                value=+0430*喀布尔>阿富汗<OPTION  value="+0500  伊斯兰马巴德、克洛奇、伊卡特林堡、塔须肯">西亚<OPTION  
                value="+0530  孟买、加尔各答、马垂斯、新德里、可伦坡">印度<OPTION  
                value="+0600  阿马提、达卡">中亚<OPTION  value="+0700  曼谷、亚加达、胡志明市">曼谷<OPTION  
                value="+0800  北京、重庆、黑龙江">中国<OPTION  value="+0800  台湾、香港、新加坡">台北<OPTION  
                value="+0900  东京、大阪、扎幌、汉城、亚库兹(东西伯利亚)">东京<OPTION  
                value="+0930  达尔文">澳洲中部<OPTION  value="+1000  布里斯本、墨尔本、席德尼">席德尼<OPTION  
                value="+1000  霍巴特">塔斯梅尼亚<OPTION  value="+1000  关岛、莫斯比港、海　威">西太平洋<OPTION  
                value=+1100*马哥大、所罗门群岛、新卡伦多尼亚>太平洋中部<OPTION  
                value="+1200  威灵顿、奥克兰">纽西兰<OPTION  
            value="+1200  斐济、肯加塔、马歇尔群岛">斐济</OPTION></SELECT>时间</FONT>  <FONT  id=tSave  
            style="FONT-SIZE:  18pt;  COLOR:  red;  FONT-FAMILY:  Wingdings"></FONT><BR><BR><FONT  
            style="FONT-SIZE:  120pt;  COLOR:  green;  FONT-FAMILY:  Webdings">?</FONT><BR><FONT  
            id=CITY  
            style="FONT-SIZE:  9pt;  WIDTH:  150px;  COLOR:  blue;  FONT-FAMILY:  '宋体'"></FONT></P></TD>
        <TD  align=middle>
          <DIV  style="Z-INDEX:  -1;  POSITION:  absolute;  TOP:  30px"><FONT  id=YMBG  
            style="FONT-SIZE:  100pt;  COLOR:  #f0f0f0;  FONT-FAMILY:  'Arial  Black'">  0000<BR>  JUN</FONT>  
          </DIV>
          <TABLE  border=0>
              <TBODY>
                <TR>
                    <TD  bgColor=#000080  colSpan=7><FONT  style="FONT-SIZE:  9pt"  
                        color=#ffffff  size=2>西历<SELECT  style="FONT-SIZE:  9pt"  
                        onchange=changeCld()  name=SY>  
                            <SCRIPT  language=JavaScript><!--
for(i=1900;i<2050;i++)  document.write('<option>'+i)
//--></SCRIPT>
                        </SELECT>年<SELECT  style="FONT-SIZE:  9pt"  onchange=changeCld()  
                        name=SM>  
                            <SCRIPT  language=JavaScript><!--
for(i=1;i<13;i++)  document.write('<option>'+i)
//--></SCRIPT>
                      </SELECT>月</FONT>  <FONT  id=GZ  face=宋体  color=#ffffff  
                        size=4></FONT><BR></TD></TR>
                <TR  align=middle  bgColor=#e0e0e0>
                    <TD  width=54>日</TD>
                    <TD  width=54>一</TD>
                    <TD  width=54>二</TD>
                    <TD  width=50>三</TD>
                    <TD  width=54>四</TD>
                    <TD  width=54>五</TD>
                  <TD  width=54>六</TD></TR>
                <SCRIPT  language=JavaScript><!--
var  gNum
for(i=0;i<6;i++)  {
document.write('<tr  align=center>')
for(j=0;j<7;j++)  {
gNum  =  i*7+j
document.write('<td  id="GD'  +  gNum  +'"  onMouseOver="mOvr('  +  gNum  +')"  onMouseOut="mOut()"><font  id="SD'  +  gNum  +'"  size=5  face="Arial  Black"')
if(j  ==  0)  document.write('  color=red')
if(j  ==  6)
if(i%2==1)  document.write('  color=red')
else  document.write('  color=green')
document.write('  TITLE="">  </font><br><font  id="LD'  +  gNum  +  '"  size=2  style="font-size:9pt">  </font></td>')
}
document.write('</tr>')
}
//--></SCRIPT>
              </TBODY></TABLE></TD>
        <TD  vAlign=top  align=middle  width=60><BR><BR><BR><BR><BUTTON  
            style="FONT-SIZE:  9pt"  onclick="pushBtm('YU')">年↑</BUTTON><BR><BUTTON  
            style="FONT-SIZE:  9pt"  onclick="pushBtm('YD')">年↓</BUTTON>  
          <P><BUTTON  style="FONT-SIZE:  9pt"  
            onclick="pushBtm('MU')">月↑</BUTTON><BR><BUTTON  style="FONT-SIZE:  9pt"  
            onclick="pushBtm('MD')">月↓</BUTTON>  
          <P><BUTTON  style="FONT-SIZE:  9pt"  onclick="pushBtm('')">当月</BUTTON>    
          </P></TD></TR></TBODY></TABLE>
</FORM>
<p>&nbsp;</p>
</body>
</html>

Answer 3

就是一个常见的万年历代码。可惜字数限制，不能一下子发上来，所以就分段发了。参考下面的函数，如何将当天的节日传给festival,然后在页面上显示这个festival？
//显示详细日期资料 
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; 
} 
} 
} 

Answer 4

哈哈，硬是啃下来了。
以下就是添加的代码：function  showbirth()  {
var  i,sD,s,size;
cld  =  new  calendar(tY,tM);
i=34;
{sObj=eval('BID');sObj.className  =  '';sD  =  tD-1;if(sD>-1  &&  sD<cld.length)  {  //日期内
sObj.innerHTML  =  sD+1;if(cld[sD].isToday)  sObj.className  =  'blue';  //今日颜色sObj.style.color  =  cld[sD].color;  //国定假日颜色
s=cld[sD].lunarFestival;
if(s.length>0)  {  //农历节日
if(s.length>6)  s  =  s;
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;
s  =  s.fontcolor('red');
}
else  {  //廿四节气
s=cld[sD].solarTerms;
if(s.length>0)  s  =  s.fontcolor('red');
}
}
if(s.length>0)  
{
s='今天是<BR>'+s;
sObj.innerHTML  =  s;
}}
else  {  //非日期
sObj.innerHTML  =  '';
}
}
}
初始化程序里加入这个函数。