复制代码代码如下:
<html>
<head>
<meta http-equiv = "content-type" content = "text/html; charset = gb2312">
<meta content = "Microsoft Frontpage 4.0">
<meta content = "FrontPage.editor.document">
<style type = "text/css">
<!-td {font-size: 9pt; Fonte-família: 宋体}
-> </style>
<Title> </title>
<script type = "text/javascript">
var lunarinfo = nova matriz (
0x04bd8,0x04e0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,
0x04e0,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,0x0x0ea50,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,0x06a0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0a65,0x0d530,
0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,
0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0)
var animais = nova matriz ("鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", " "猪");
var gan = nova matriz ("甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸");
var zhi = nova matriz ("子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", " "亥");
var agora = nulo;
var sy = null;
var sm = null;
var sd = nulo;
função getDatelist (yy, mm, dd) {
se (yy) {
agora = nova data (yy, mm, dd);
}outro{
agora = new Date ();
}
Sy = agora.getlyear ();
Sm = agora.getMonth ();
Sd = agora.getDate ();
retornar setCalendar ();
}
// ==== 传入 Offset 传回干支, 0 = 甲子
função cíclica (num) {return (gan [num%10]+zhi [num%12])}
// ==== 传回农历 y 年的总天数
função lyeardays (y) {
var i, soma = 348
for (i = 0x8000; i> 0x8; i >> = 1) soma += (lunarinfo [y-1900] e i)? 1: 0
Retorno (soma+saltos (y))
}
// ==== 传回农历 y 年闰月的天数
Função saltos (y) {
if (leapmonth (y)) retornar ((lunarinfo [y-1900] e 0x10000)? 30: 29)
caso contrário, retornar (0)
}
// ==== 传回农历 y 年闰哪个月 1-12, 没闰传回 0
Função Leapmonth (y) {return (lunarinfo [y-1900] & 0xf)}
// ====================================== 传回农历 Y 年 M 月的总天数
Função Mês (Y, M) {return ((Lunarinfo [Y-1900] & (0x10000 >> m))? 30: 29)}
// ==== 算出农历, 传入日期物件, 传回农历日期物件
// s.
função lunar (objdate) {
var i, salto = 0, temp = 0
var com base = nova data (1900,0,31)
var offset = (objdate - baseado)/86400000
this.daycyl = deslocamento + 40
this.oncyl = 14
for (i = 1900; i <2050 && offset> 0; i ++) {
temp = lyeardays (i)
deslocamento -= temp
this.moncyl += 12
}
if (deslocamento <0) {
deslocamento += temp;
eu--;
this.moncyl -= 12
}
this.year = i
this.yearcyl = i-1864
salto = salto (i) // 闰哪个月
this.isisheap = false
for (i = 1; i <13 && offset> 0; i ++) {
// 闰月
if (salto> 0 && i == (Leap+1) && this.isisheap == false)
{ --eu; this.isLeap = true; temp = saltos (this.year); }
outro
{temp = mensais (this.year, i); }
// 解除闰月
if (this.isisheap == true && i == (salto+1)) this.isisheap = false
deslocamento -= temp
if (this.isisheap == false) this.moncyl ++
}
if (offset == 0 && Leap> 0 && i == Leap+1)
if (this.isleap)
{this.isisheap = false; }
outro
{this.isisheap = true; --eu; --This.Oncyl;}
if (deslocamento <0) {deslocamento += temp; --eu; --This.Oncyl; }
this.month = i
this.day = offset + 1
}
função yymmdd () {
var cl = '<font color = "#0000df" style = "font-size: 9pt;">';
if (agora.getday () == 0) cl = '<font color = "#c00000" style = "font-size: 9pt;">';
if (agora.getday () == 6) cl = '<font color = "#00c000" style = "font-size: 9pt;">';
return (cl+sy+'年'+(sm+1)+'月'+sd+'日 </font>');
}
function weekday () {
var dia = nova matriz ("星期日", "星期一", "星期二", "星期三", "星期四", "星期五", "星期六");
var cl = '<font color = "#ff0000" style = "font-size: 9pt;">';
if (agora.getday () == 0) cl = '<font color = "#c00000" style = "font-size: 9pt;">';
if (agora.getday () == 6) cl = '<font color = "#00c000" style = "font-size: 9pt;">';
return (cl+ dia [agora.getday ()]+ '</font>');
}
// ==== 中文日期
função cday (m, d) {
var nstr1 = new Array ('' ',' '', '' ',' '', '' ',' '', '' '', '' ',' '', '' ',' '' ') ;
var nstr2 = novo array ('' ',' '', '' ',' ',' '');
var s;
if (m> 10) {s = '十' +nsTr1 [m-10]} else {s = nstr1 [m]} s += '' ''
Switch (d) {
caso 10: s += '' '; quebrar;
Caso 20: S += '' '; quebrar;
caso 30: s += '' '; quebrar;
padrão: s += nstr2 [math.floor (d/10)]; S += NSTR1 [D%10];
}
retorno (s);
}
função solarday1 () {
var sdobj = nova data (SY, SM, SD);
var ldobj = novo lunar (sdobj);
var cl = '<font color = "violeta" style = "font-size: 9pt;">';
var tt = '【'+animais [(sy-4)%12]+'' ''+cyclical (ldobj.moncyl)+'' ''+cíclico (ldobj.daycyl ++)+'' ';
return (cl+tt+'</font>');
}
função solarday2 () {
var sdobj = nova data (SY, SM, SD);
var ldobj = novo lunar (sdobj);
var cl = '<font color = "#000066" style = "font-size: 9pt;">';
// 农历 bb '+(cld [d] .isleap?' '': '')+Cld [d] .lmonth+'月'+cLd [d] .lday+'日
var tt = cíclico (sy-1900+36)+'年'+cday (ldobj.month, ldobj.day);
return (cl+tt+'</font>');
}
função solarday3 () {
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 energia solar = nova matriz ("小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", " "夏至", "小暑", "大暑", "立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至")
var lftv = nova matriz ("0101*春节", "0115 元宵节", "0505 端午节", "0707 七夕情人节", "0715 中元节", "0815 中秋节", "0909 重阳节", "1208 腊八节", "1224 小年", "0100*除夕")
var sftv = novo array ("0101*元旦", "0214 情人节", "0308 妇女节", "0312 植树节", "0315 消费者权益日",
"0401 愚人节", "0501 劳动节", "0504 青年节", "0512 护士节", "0601 儿童节", "0701 建党节 香港回归纪念",
"0801 建军节", "0808 父亲节", "0908 茂生日", "0909 毛泽东逝世纪念", "0910 教师节", "0928 孔子诞辰", "1001*国庆节",
"1006 老人节", "1001 ListenWind 生日", "1024 联合国日", "1112 孙中山诞辰", "1220 澳门回归纪念", "1225 圣诞节", "1226 毛泽东诞辰")
var sdobj = nova data (SY, SM, SD);
var ldobj = novo lunar (sdobj);
var ldpos = nova matriz (3)
var festival = '', solarterms = '', solarfestival = '', lunarfestival = '', tmp1, tmp2;
// 农历节日
para (i no LFTV)
if (lftv [i] .match (/^(/d {2}) (. {2}) ([/s /* ])(.+)$/)) {
tmp1 = número (regexp. $ 1) -lDobj.month
tmp2 = número (regexp. $ 2) -lDobj.day
if (tmp1 == 0 && tmp2 == 0) lunarfestival = regexp. $ 4
}
// 国历节日
para (i no SFTV)
if (sftv [i] .match (/^(/d {2}) (/d {2}) ([/s/*]) (.+) $/)) {
tmp1 = número (regexp. $ 1)-(sm+1)
tmp2 = número (regexp. $ 2) -sd
if (tmp1 == 0 && tmp2 == 0) solarfestival = regexp. $ 4
}
// 节气
tmp1 = nova data ((31556925974.7*(sy-1900)+sterminfo [sm*2+1]*60000)+date.utc (1900,0,6,2,5)))
tmp2 = tmp1.getutcdate ()
if (tmp2 == sd) solarterms = solarterm [sm*2+1]
tmp1 = nova data ((31556925974.7*(sy-1900)+sterminfo [sm*2]*60000)+date.utc (1900,0,6,2,5)))
tmp2 = tmp1.getutcdate ()
if (tmp2 == sd) solarterms = solarterm [sm*2]
if (solarterms == '' && Solarfestival == '' && lunarfestival == '')
festival = '';
outro
festival = '<tabela largura = 100% borda = 0 CellPadding = 2 Cellspacing = 0 bgcolor = "#ccffcc"> <tr> <td>'+
'<Font color = "#000000" style = "font-size: 9pt;">' + solarterms + '' + solarfestival + '' ' + lunarfestival +' </font> </td> ' +
'</tr> </ table>';
var cl = '<font color = "#000066" style = "font-size: 9pt;">';
retornar (CL+Festival+'</font>');
}
função setCalendar () {
var html = '';
html+= '<tabela align = CellPadding da direita = 2 CellSpacacing = 0 borda = 0> <tr> <td bgcolor =#fefeef> <tabela borda = 0 CellPadding = 0 CellSpacing = 0> <tr> <td align = Center>' ;
html+= yymmdd ()+''+weekday ();
html+= '</td>';
html+= '<td align = Center>';
html+= solarday1 ();
html+= '</td> <td align = Center>';
html+= solarday2 ();
html+= '</td> <td align = Center>';
html+= solarday3 ();
html+= '</td> </tr> </ table> </td> </tr> </ table>';
retornar html;
}
</script>
<script type = "text/javascript" src = "js/jQuery-1.4.2.min.js"> </script>
<script type = "text/javascript">
var temdate = new Date ();
var m = parseint (temdate.getdate ());
var xxx = getDatelist (temdate.getlyear (), (m <31? temdate.getmonth (): temdate.getmonth ()+1), m <31? m: 0);
$ (document) .ready (function () {
$ ("#sss"). html (xxx);
})
</script>
</head>
<corpo topmargin = "0" leftMargin = "0">
<div align = "Center"> <Center>
<tabela CellPadding = "0" CellSpacing = "0" Bgcolor = "#fffff" BGCOLOR = "#C0C0C0">
<tr>
<td align = "direita"> <div id = "sss"> </div> </td>
</tr>
</tabela>
</central> </div>
</body>
</html>