1. 程式人生 > >js實現的萬年曆顯示

js實現的萬年曆顯示

圖片預覽:(複製下面的原始碼即可出現效果)


js程式碼:

<%@ page language="java" import="java.util.*" pageEncoding="GBK"%>
<head>
<title>  極品萬年曆  </title>
</head>
<BODY  onload=initial()>
<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("1  月","2  月","3  月","4  月","5  月","6  月","7  月","8  月","9  月","10  月","11  月","12  月");


//國曆節日  *表示放假日
var  sFtv  =  new  Array(
"0101*元旦",
"0214  情人節",
"0308  婦女節",
"0312  植樹節",
"0315  消費者權益日",
"0401  愚人節",
"0501  勞動節",
"0504  青年節",
"0509  郝維節",
"0512  護士節",
"0601  兒童節",
"0701  建黨節  香港迴歸紀念",
"0801  建軍節",
"0808  父親節",
"0816  燕銜泥節",
"0909  毛澤東逝世紀念",
"0910  教師節",
"0928  孔子誕辰",
"1001*國慶節",
"1006  老人節",
"1024  聯合國日",
"1112  孫中山誕辰紀念",
"1220  澳門迴歸紀念",
"1225  聖誕節",
"1226  毛澤東誕辰紀念")


//農曆節日  *表示放假日
var  lFtv  =  new  Array(
"0101*春節、彌勒佛聖誕!",
"0106  定光佛聖誕",
"0115  元宵節",
"0208  釋迦牟尼佛出家",
"0215  釋迦牟尼佛涅槃",
"0209  海空上師生日!",
"0219  觀世音菩薩聖誕",
"0221  普賢菩薩聖誕",
"0316  準提菩薩聖誕",
"0404  文殊菩薩聖誕",
"0408  釋迦牟尼佛聖誕",
"0415  佛吉祥日——釋迦牟尼佛誕生、成道、涅槃三期同一慶(即南傳佛教國家的衛塞節)",
"0505  端午節",
"0513  伽藍菩薩聖誕",
"0603  護法韋馱尊天菩薩聖誕",
"0619  觀世音菩薩成道——此日放生、唸佛,功德殊勝",
"0707  七夕情人節",
"0713  大勢至菩薩聖誕",
"0715  中元節",
"0724  龍樹菩薩聖誕",
"0730  地藏菩薩聖誕",
"0815  中秋節",
"0822  燃燈佛聖誕",
"0909  重陽節",
"0919  觀世音菩薩出家紀念日",
"0930  藥師琉璃光如來聖誕",
"1005  達摩祖師聖誕",
"1107  阿彌陀佛聖誕",
"1208  釋迦如來成道日,臘八節",
"1224  小年",
"1229  華嚴菩薩聖誕",
"0100*除夕")


//某月的第幾個星期幾
var  wFtv  =  new  Array(
"0520  母親節",
"0716  合作節",
"0730  被奴役國家周")


/*****************************************************************************
日期計算
*****************************************************************************/


//======================================  傳回農曆  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]+'】';


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  =  '';
}
}
}




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,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  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>


<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>
<CENTER>
<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="+0800"  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:  Wingdings">?</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></CENTER>
</body>