显示农历星期 – 筚路蓝缕

<script type="text/javascript">
 var bsYear;
 var bsDate;
 var bsWeek;
 var arrLen = 8;
 var sValue = 0;
 var dayiy = 0;
 var miy = 0;
 var iyear = 0;
 var dayim = 0;
 var spd = 86400;
 var year1999 = "30;29; 29; 30; 29; 29; 30; 29; 30; 30; 30; 29";
 var year2000 = "30; 30; 29; 29; 30; 29; 29; 30; 29; 30; 30; 29";
 var year2001 = "30;30; 29; 30; 29; 30; 29; 29; 30; 29; 30; 29; 30";
 var year2002 = "30; 30; 29; 30; 29; 30; 29; 29; 30; 29; 30; 29";
 var year2003 = "30;30; 29; 30; 30; 29; 30; 29; 29; 30; 29; 30";
 var year2004 = "29; 30; 29; 30; 30; 29; 30; 29; 30; 29; 30; 29; 30";
 var year2005 = "29; 30; 29; 30; 29; 30; 30; 29; 30; 29; 30; 29";
 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 = "星期日";
 if (ww == 1) ww = "星期一";
 if (ww == 2) ww = "星期二";
 if (ww == 3) ww = "星期三";
 if (ww == 4) ww = "星期四";
 if (ww == 5) ww = "星期五";
 if (ww == 6) ww = "星期六";
 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 = ""+"<b><span class='v8'>"+yy+"</span></b>"+"年"+"<b><span class='v8'>"+mm+"</span></b>"+"月"; 
 bsDate2="<b><span class='v8'>"+dd+"</span></b>"+"日"; 
 bsYear="农历 "+Yn[iyear]; 
 bsYear2=Mn[miy]+Dn[dayim-1]; 
 if (ss>=Ys[7]||ss<ys[0]) bsYear=Yn[7]; 
 function CAL(){ document.write(bsDate+bsDate2+" "+bsWeek+" "+bsYear+" "+bsYear2); }
</script>
<body onload="CAL();">
2025 年 7 月
一	二	三	四	五	六	日
	1	2	3	4	5	6
7	8	9	10	11	12	13
14	15	16	17	18	19	20
21	22	23	24	25	26	27
28	29	30	31
发表回复 取消回复

相关文章

发表回复取消回复
