请专家帮忙!将下面的js改为农历提醒

Question

<style type="text/css">
<!--
body {  font-family: "宋体"; font-size: 9pt; margin-top: 0px; margin-left: 0px; margin-right: 0px}
A { COLOR: black; FONT-SIZE: 9pt; FONT-WEIGHT: 400; TEXT-DECORATION: none }
 A:hover { COLOR: red; FONT-SIZE: 9pt; FONT-WEIGHT: 400; TEXT-DECORATION: underline }
a:active     { font: 9pt "宋体"; cursor: hand; color: #FF0033 }
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<SCRIPT LANGUAGE="JavaScript"><!-- '=====   里面的生日都是农历 
  function birthday(year,month,date,person) {
    this.year=year
    this.month=month
    this.date=date
    this.person=person
  }  function birthdaylist() {
  }  blist=new birthdaylist()
  blist[0]= new birthday(1963,1,1,"汪文武")
  blist[1]= new birthday(1962,12,29,"汪佑宝")
  blist[2]= new birthday(1962,1,7,"汪家国")
  blist[3]= new birthday(1965,11,5,"诗清")
  blist[4]= new birthday(1956,11,1,"淯阳")
  blist[5]= new birthday(1964,10,4,"汪岳乾")
  blist[6]= new birthday(1961,2,2,"秋水天长")
  blist[7]= new birthday(1981,10,10,"汪涛")
  blist[8]= new birthday(1972,10,20,"宣城汪晓武")
  blist[9]= new birthday(1972,12,23,"汪长泽")
  blist[10]= new birthday(1979,10,12,"汪秋仪")
  blist[11]= new birthday(1972,9,22,"汪波涛")
  blist[12]= new birthday(1979,10,7,"汪丽萍")
  blist[13]= new birthday(1963,12,29,"汪立新")
  blist[14]= new birthday(1981,10,24,"汪侦兵")
  blist[15]= new birthday(1986,12,10,"汪延庆")
  blist[16]= new birthday(1964,4,9,"汪家仁")
  blist[17]= new birthday(1989,10,7,"wangyaping")
  blist[18]= new birthday(1949,11,1,"wangyunen")
  blist[19]= new birthday(1984,10,25,"汪礼全")
  blist[20]= new birthday(1975,6,17,"汪安平")
  blist[21]= new birthday(1980,9,26,"汪新珠")
  blist[22]= new birthday(1963,11,28,"汪礼苗")
  blist[23]= new birthday(1980,8,8,"汪庆磁")
  blist[24]= new birthday(1986,10,24,"汪晔晔")
  blist[25]= new birthday(1990,7,14,"一代汪奎")
  blist[26]= new birthday(1980,1,13,"汪东")
  blist[27]= new birthday(1978,8,28,"汪少青")
  blist[28]= new birthday(1979,3,3,"汪礼才")
  blist[29]= new birthday(1974,8,1,"汪斌")
  blist[30]= new birthday(1989,12,23,"wangliyun")
  blist[31]= new birthday(1980,3,21,"ahwls")
  blist[32]= new birthday(1978,10,12,"汪飞夏雨")
  blist[33]= new birthday(1975,2,4,"汪诗亮")  
  blist[33]= new birthday(1968,8,2,"汪诗新")  
  blist[34]= new birthday(1964,1,8,"汪孝雄")
  blist[35]= new birthday(1963,6,11,"miguel")
  blist[36]= new birthday(1966,2,5,"汪宗环")
  blist[37]= new birthday(1975,2,9,"汪国林")  
  blist[38]= new birthday(1989,8,8,"chenmo5168") 
  blist[39]= new birthday(1987,7,9,"汪佑森")  
  blist[40]= new birthday(1966,8,14,"豫获汪洋")
  blist[41]= new birthday(1990,12,13,"汪振华")
  blist[42]= new birthday(1983,7,20,"汪义军")
  blist[43]= new birthday(1989,12,23,"汪礼云")
  blist[44]= new birthday(1977,12,20,"汪诗芬")
  blist[45]= new birthday(1974,1,1,"汪衡甫")
  blist[46]= new birthday(1954,2,12,"WGX")
   
  var now=new Date()
  today=new Date(now.getYear(),now.getMonth(),now.getDate())   // today 0:00:00
  function daysFromToday(sdate) {
    return Math.round((sdate.getTime()-today.getTime())/(24*60*60*1000))
  }  function writeNextBirthday(list) {
    var daysToClosest=888
    var closest
    for (var i in list) {
      thisDate=new Date(today.getYear(),list[i].month,list[i].date-1)
      if (daysFromToday(thisDate)<0)
        thisDate.setYear(today.getYear()+1)
      if (daysFromToday(thisDate)<daysToClosest) {
        daysToClosest=daysFromToday(thisDate)
        closest=i
      }
    }
    if (daysToClosest==0)
      document.write("<B>今天是 "+list[closest].person+" "+(today.getYear()-list[closest].year)+"岁生日,大家共同祝您生日快乐!健康长寿!</B><P>")
    else if (daysToClosest==1)
      document.write("明天是 "+list[closest].person+""+(today.getYear()-list[closest].year)+" 岁生日了!论坛准备了最衷心的祝福。<P>")
    else
      document.write("生日提醒：再过"+daysToClosest+"天，就是"+list[closest].person+"的生日了，大家可要准备好礼物哦!<P>")
  }    
// end hiding --></SCRIPT>
<div align="center">
<table class=css width="<%=tbw%>" border="1"  bordercolor="<%=c1%>" cellspacing="0" cellspacing='0' style='border-collapse: collapse; text-align:center'>
<tr>
<td class=td1 bgcolor="<%=c1%>" background="<%=tbg%>" height="27" style="text-align: left"><img src="pic/gl.gif" border="0">☆会员生日☆</td>
</tr>
<td bgcolor="<%=c2%>">
<table border="0" width="100%" id="table1" cellspacing="0" cellpadding="0">
<tr>
<td align=center><b><font color="#800080"><br>
<SCRIPT LANGUAGE="JavaScript">
<!--  
  write Next Birthday(blist)
// -->
</SCRIPT>
</font></b>
</td>
</tr>
</table>
</td></tr>
</table></div>
<br>