大寒节气流行
& lt！-保存自URL =(0060)t = 0；
var dStyle
document.onmousemove = mEvn
//显示详细的日期信息
函数mOvr(v) {
var s，节日；
var sObj = eval(' SD '+v)；
var d = sobj . innerhtml-1；
//年，月，日，周，
//lYear，lMonth，lDay，isLeap，
//cYear，cMonth，cDay
if(sObj.innerHTML！='') {
sobj . style . cursor = ' s-resize '；
if(cld[d]。solarTerms = = ' ' & amp& ampcld[d]。solarFestival = = ' ' & amp& ampcld[d]。lunarFestival == ' ')
festival =“”；
其他
festival = ' & lt表格宽度= 100% BORDER = 0 cell padding = 2 cell spacing = 0 BGCOLOR = " # CCFFCC " & gt；& ltTR & gt& lt“TD & gt”+
& ltFONT COLOR = " # 000000 " STYLE = " FONT-size:9pt；"& gt+cld[d]。solarTerms + ' ' + cld[d]。solarFestival + ' ' + cld[d]。lunar festival+' & lt；/FONT & gt；& lt/TD & gt；+
& lt/TR & gt；& lt/TABLE & gt；'；
s = ' & ltTABLE WIDTH = " 130 " BORDER = 0 cell padding = " 2 " cell spacing = 0 BGCOLOR = " # 000066 " >& ltTR & gt& lt“TD & gt”+
& lt表格宽度=100% BORDER=0单元格填充=0单元格间距= 0 & gt& ltTR & gt& ltTD ALIGN="right " >& ltFONT COLOR = " # ffffff " STYLE = " FONT-size:9pt；"& gt+
Cld[d]。sYear+' year' +cld[d]。sMonth+' month' +cld[d]。sDay+'日< br & gt周'+CLD [d]。星期+'
& ltfont color="violet " >农历'+(CLD [d]。islap？Leap':'') +cld[d]。lMonth+' month' +cld[d]。lDay+' day
& ltfont color="yellow " >+cld[d]。cYear+' Year' +cld[d]。cMonth+' Month' +cld[d]。cDay+'天
& lt/FONT & gt；& lt/TD & gt；& lt/TR & gt；& lt/TABLE & gt；'+festival+' & lt；/TD & gt；& lt/TR & gt；& lt/TABLE & gt；'；
document.all["detail"]。innerHTML = s；
if (snow == 0) {
dStyle.left = x+offsetx-(宽度/2)；
d style . top = y+offsety；
dStyle.visibility = " visible
雪= 1；
}
}
}
//清除详细日期数据
函数mOut() {
if(CNT & gt；= 1 ) { sw = 0 }
if(SW = = 0){ snow = 0；dStyle.visibility = " hidden}
else cnt++；
}
//获取位置
函数mEvn() {
x = event.x
y = event.y
if (document.body.scrollLeft)
{ x = event . x+document . body . scroll left；y = event . y+document . body . scroll top；}
如果(雪){
dStyle.left = x+offsetx-(宽度/2)
dStyle.top = y+offsety
}
}
///////////////////////////////////////////////////////////////////////////
函数changeTZ() {
CITY.innerHTML = CLD。TZ.value.substr(6)
塞特库奇(“TZ”，CLD。TZ.selectedIndex)
}
函数tick() {
今日var
今天=新日期()
时钟。innerhtml =今天。tolocalstring()。替换(/(年|月)/g，“/”。替换(/ day/，" ")；
clock . innerhtml = time add(today . togmtstring()，CLD。TZ.value)
window.setTimeout("tick()"，1000)；
}
函数setCookie(名称，值){
var today =新日期()
var expires =新日期()
expires . settime(today . gettime()+1000 * 60 * 60 * 24 * 365)
document . cookie = name+" = "+escape(value)+"；expires=" + expires.toGMTString()
}
函数getCookie(Name) {
var search = Name + "= "
if(document . cookie . length & gt；0) {
offset = document . cookie . index of(search)
如果(offset！= -1) {
偏移量+=搜索长度
end = document . cookie . index of("；"偏移)
if(end = =-1)end = document . cookie . length
返回unescape(document . cookie . substring(offset，end))
}
否则返回""
}
}
/////////////////////////////////////////////////////////
函数initial() {
dStyle = detail.style
CLD。sy . selectedindex = tY-1900；
CLD。SM.selectedIndex = tM
drawCld(tY，tM)；
CLD。tz . selectedindex = get cookie(" TZ ")；
changeTZ()；
tick()；
}
//-& gt；
& lt/SCRIPT & gt；
& lt脚本语言= VBScript & gt
& lt！-
= = = =计算世界时间
函数TimeAdd(UTC，T)
Dim PlusMinus，DST，y
如果Left(T，1)="-"那么PlusMinus = -1否则PlusMinus = 1
UTC=Right(UTC，Len(UTC)-5)
UTC=Left(UTC，Len(UTC)-4)
y =年份(UTC)
TimeAdd=DateAdd("n "，，(Cint(Mid(T，2，2))*60 + Cint(Mid(T，4，2))) * PlusMinus，UTC)
美国夏令时:4月第一个星日00:00至6月最后一个周日00:00 10。
If Mid(T，6，1)="* "和DateSerial(y，4，(9 - Weekday(DateSerial(y，4，1))mod 7))& lt；= TimeAdd和DateSerial(y，10，31 -工作日(DateSerial(y，10，31)))>；= TimeAdd然后添加
TimeAdd=CStr(DateAdd("h "，1，TimeAdd))
tSave.innerHTML = "R "
其他
tSave.innerHTML = " "
如果…就会结束
TimeAdd = CStr(TimeAdd)
结束功能
-& gt；
& lt/SCRIPT & gt；
& ltSTYLE & gt。todyaColor {
背景色:浅绿色
}
& lt/STYLE & gt；
& ltMETA content = " MSHTML 6 . 00 . 2600 . 0 " name = GENERATOR & gt；& lt/HEAD & gt；
& ltBODY background = zuiku . files/BG . jpg onload = initial()& gt；
& lt表格单元格间距=0单元格填充=0 width="100%" height="50 " >
& ltTBODY & gt
& ltTR align = middle & gt
& ltTD height = 68 valign = " top " align = " left " >& ltimg src= "../../main pic/2 . jpg " width = " 143 " height = " 36 " border = " 0 " >& lt字体
color = # 000000 & gt看看有没有变化(如果没有，请刷新。当前时间来自您的电脑设置，如有不一致请调整)。& lt/font & gt；& lt/TD & gt；
& lt/TR & gt；
& lt/TBODY & gt；
& lt/TABLE & gt；
& ltDIV align = center & gt
& lt中心& gt
& lt表格单元格间距=0单元格填充=8 width="88%" height="525 " >
& ltTBODY & gt
& ltTR align = middle & gt
& ltTD height="476 " >
& ltDIV align = center & gt& lt/DIV & gt；
& ltDIV align = center & gt
& lt表格单元格间距=0单元格填充=0宽度= " 100% " & gt；
& ltTBODY & gt
& ltTR vAlign = center align = middle & gt；