var bsYear; 
var bsDate; 
var bsWeek; 
var arrLen=13; //数组长度，定义了几个年份，就写几
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"; //354 
var year2000="30;30;29;29;30;29;29;30;29;30;30;29"; //354 
var year2001="30;30;29;30;29;30;29;29;30;29;30;29;30"; //384 
var year2002="30;30;29;30;29;30;29;29;30;29;30;29"; //354 
var year2003="30;30;29;30;30;29;30;29;29;30;29;30"; //355 
var year2004="29;30;29;30;30;29;30;29;30;29;30;29;30"; //384 
var year2005="29;30;29;30;29;30;30;29;30;29;30;29"; //354 
var year2006="30;29;30;29;30;30;29;29;30;30;29;29;30"; //384
//以下是我补充的每年农历月份每月天数。所有的农历信息，都可以到http://www.xichang.tv/calendar.htm这个万年历上查�?
var year2007="29;29;30;29;29;30;29;30;30;30;29;30"; 
var year2008="30;29;29;30;29;29;30;29;30;30;29;30"; //354
var year2009="30;30;29;29;30;29;29;30;29;30;29;30;30"; //384 
var year2010="30;29;30;29;30;29;29;30;29;30;29;30"; //354
var year2011="30;29;30;30;29;30;29;29;30;29;30;29"; //354 

//照猫画虎，再下面增加闰年�?009年，闰五月�?
var month1999="正月;二月;三月;四月;五月;六月;七月;八月;九月;十月;十一�?腊月" 
var month2001="正月;二月;三月;四月;闰四�?五月;六月;七月;八月;九月;十月;十一�?腊月" 
var month2004="正月;二月;闰二�?三月;四月;五月;六月;七月;八月;九月;十月;十一�?腊月" 
var month2006="正月;二月;三月;四月;五月;六月;七月;闰七�?八月;九月;十月;十一�?腊月" 
var month2009="正月;二月;三月;四月;五月;闰五�?六月;七月;八月;九月;十月;十一�?腊月"

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; 
Ys[8]=1171728000;//这个数字是大年初一0�?0的开始，回溯到时间基点经过的秒数.因为as2实际上和JavaScript采用同一标准，也可用as获取�?
Ys[9]=1202313600;
Ys[10]=1232899200;
Ys[11]=1266076800;
Ys[12]=1296662400//在as中的获取代码：var D=new Date(2011,1,3)trace(D.getTime()/1000) //2011-2-3�?011年春节日期，月份�?开始标记，所�?月标记为1

var Yn=new Array(arrLen); //农历年的名称 
Yn[0]="己卯�?;Yn[1]="庚辰�?;Yn[2]="辛巳�?; 
Yn[3]="壬午�?;Yn[4]="癸未�?;Yn[5]="甲申�?; 
Yn[6]="乙酉�?;Yn[7]="丙戌�?;

//增加农历年名�?
Yn[8]="丁亥�?; Yn[9]="戊子�?; Yn[10]="己丑�?; 
Yn[11]="庚寅�?;Yn[11]="壬辰�?;
var D=new Date(); 
var yy=D.getYear();
if ( navigator.appName == "Netscape" ) yy+= 1900; //Firefox支持
var mm=D.getMonth()+1; 
var dd=D.getDate(); 
var ww=D.getDay();
if (ww==0) ww="<font color=RED> 星期�?"; 
if (ww==1) ww=" 星期一 "; 
if (ww==2) ww=" 星期�?"; 
if (ww==3) ww=" 星期�?"; 
if (ww==4) ww=" 星期�?"; 
if (ww==5) ww=" 星期�?"; 
if (ww==6) ww="<font color=RED> 星期�?";
//这样标记的颜色样式优先级高于后面的span+style定义，实现周日周六红色显示，其他用后面输出时定义的颜色显示�?

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;
//照样子增�?
if (iyear==8) dpm=year2007;
if (iyear==9) dpm=year2008;
if (iyear==10) dpm=year2009;
if (iyear==11) dpm=year2010;
if (iyear==12) dpm=year2011;

dpm=dpm.split(";");


var Mn=month1999; 
if (iyear==2) Mn=month2001; 
if (iyear==5) Mn=month2004; 
if (iyear==7) Mn=month2006;
//增加有闰月的年份
if (iyear==10) Mn=month2009;

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; 
break;
}
bsWeek=ww; 
bsDate=yy+"�?+mm+"�?; 
bsDate2=dd+"�?; 
bsYear="农历"+Yn[iyear]; 
bsYear2=Mn[miy]+Dn[dayim-1];
if (ss>=Ys[12]||ss<Ys[0]) bsYear=Yn[12];
function CAL(){

//输出表格，大�?80x110,黑边，白填充


//输出年、月和日，使用不同的字体格式设置

document.write(""+bsDate+""+bsDate2+"");

//输出星期，使�?span style=""> </span>设置字体大小和文字颜色样式，优先级低�?font color= ></font>

document.write(""+bsWeek+""+"");

//输出农历,结束表格

document.write(bsYear+""+bsYear2+"");

}
<div style="display:none;">
<a href="http://www.51hongzhuang.com">���Ի���</a> <a href="http://www.hpwedding.cn">����߻�</a> 
<a href="http://www.dhunyan.com/">�Ϻ����칫˾</a> <a href="http://www.51langlang.com/">��ʽ����</a> 
<a href="http://hongzhuang.weebly.com/">�Ϻ���ʽ����</a> 
<a href="http://www.sciencenet.cn/u/pkuzeal/">http://www.sciencenet.cn/u/pkuzeal/</a> 
<a href="http://www.t-photos.com">�������</a>
<a href="http://www.51hongzhuang.com/wedding.asp?PID=165">��װ��Ӱ</a>
<a href="http://www.51hongzhuang.com/wedding.asp?PID=156">��ʽ������</a> 
<a href="http://www.51hongzhuang.com/fushi.asp">��ʽ���</a> 
<a href="http://www.51hongzhuang.com/wedding.asp?PID=148">�Ƴ�����</a> 
<a href="http://www.51hongzhuang.com/wedding.asp?PID=149">�����ײ�</a>
<a href="http://www.51hongzhuang.com/wedding.asp?PID=156&CID=161">����/����������</a>
<a href="http://www.51hongzhuang.com/fushi.asp?PID=118&CID=152">�����װ</a>
<a href="http://www.51hongzhuang.com/wedding.asp?PID=156&CID=162">��ʽӭ��</a>
<a href="http://www.51hongzhuang.com/en/">Chinese Wedding</a>
<a href="http://www.51hongzhuang.com/wedding.asp?PID=156&CID=186">�������</a>
<a href="http://www.51hongzhuang.com/wedding.asp?PID=156&CID=164">����</a>
<a href="http://www.51hongzhuang.com/link.asp">����</a>
<a href="http://www.51hongzhuang.com/anliShow.asp?ID=1487">������</a>
</div>