网站名称：万年历查询 （优秀票7次，差评票3次，评论0篇，访出579次）
网站地址：http://www.51dh.net/haoserver/wnl.asp
网站类型：实用查询
网站简介：万年历查询
页面关键字：51导航网址之家hao123.com万年历查询p网站首页热站排行站点评论论坛贴吧杂志期刊电子小说软件下载教育考试宽带电影爱情交友文学小说网络电视实用查询收藏本站51导航网址之家www.51dh.net为您提供最好的查询服务if(navigator.appname=="netscape"||parseint(navigator.appversion)<4)document.write("你的浏览器无法执行此程序。m))?30:29);}//======================================算出农历,传入日期控件,返回农历日期控件//该控件属性有.year.month.day.isleapfunctionlunar(objdate)if(offset<0)if(offset<0)//==============================返回阴历控件(y年,m+1月)/*功能说明:返回整个月的日期资料控件使用方式:obj=newcalendar(年,零起算月);obj.length返回当月最大日obj.firstweek返回当月一日星期由obj[日期].属性名称即可取得各项值obj[日期].istoday返回是否为今日true或false其他obj[日期]属性参见calelement()中的注解*/functioncalendar(y,m){varsdobj,ldobj,ly,lm,ld=1,ll,lx=0,tmp1,tmp2,tmp3;varcy,cm,cd;//年柱,月柱,日柱varldpos=newarray(3);varn=0;varfirstlm=0;sdobj=newdate(y,m,1,0,0,0,0);//当月一日日期this.length=solardays(y,m);//公历当月天数this.firstweek=sdobj.getday();//公历当月1日星期几////////年柱1900年立春后为庚子年(60进制36)if(m<2)cy=cyclical(y-1900+36-1);elsecy=cyclical(y-1900+36);varterm2=sterm(y,2);//立春日期////////月柱1900年1月小寒以前为丙子月(60进制12)varfirstnode=sterm(y,m*2)//返回当月「节」为几日开始cm=cyclical((y-1900)*12+m+12);//当月一日与1900/1/1相差天数//1900/1/1与1970/1/1相差25567日,1900/1/1日柱为甲戌日(60进制10)vardaycyclical=date.utc(y,m,1,0,0,0,0)/86400000+25567+10;for(vari=0;ilx)//=======================================返回该年的复活节(春分后第一次满月周后的第一主日)functioneaster(y){varterm2=sterm(y,5);//取得春分日期vardayterm2=newdate(date.utc(y,2,term2,0,0,0,0));//取得春分的公历日期控件(春分一定出现在3月)varldayterm2=newlunar(dayterm2);//取得取得春分农历if(ldayterm2.day1874&&sy1908&&sy1911&&sy1948)ydisplay=建国+(((sy-1949)==1)?元:sy-1949);gz.innerhtml=ydisplay+年农历+cyclical(sy-1900+36)+年+animals[(sy-4)%12]+年;for(i=0;i-1&&sd
|
