基于JavaScript(网页脚本语言)编写的万年历(含源文件)

淮北师范大学08网络工程cc1《软件系列课程设计——基于JavaScript（网页脚本语言）编写的万年历》班级学号姓名指导教师成绩______________________________2010年06月18日淮北师范大学08网络工程cc2目录摘要………………………………………………………………………一、引言…………………………………………………………………1．应用背景………………………………………………………2．可行性分析……………………………………………………3．研究路线及内容………………………………………………二、系统开发工具………………………………………………………三、系统设计（详细设计）………………………………………………四、结束语1.总结…………………………………………………………………2.参考文献……………………………………………………………摘要极品万年历，带有带有电子时钟，可看不同时区时间，阳历、农历同步显示，鼠标指出，淮北师范大学08网络工程cc3天干地支计时即出。一、引言1,、应用背景随着科技的发展，人们渴望着把现实生活中的林林总总都搬到电脑上，大到工程设计，小到极品万年历。2、可行性分析方便查看农历重要的日子，方便外出办公校正不同区时……3、研究路线及内容通过用JavaScript语言编写代码，并利用文本保存为HTTP或HTML格式。并试图实现一下内容：1、可看阳历；2、可看农历；3、可看时间；4、可看天干地支计时；5、可划分区时。二、系统开发工具JavaScript网页脚本语言，IE、360安全浏览器或其他浏览器。三、系统设计1、程序源码titlecc万年历/titleBODYonload=initial()SCRIPTlanguage=JavaScript!--/*****************************************************************************日期资料*****************************************************************************/varlunarInfo=newArray(0x04bd8,0x04ae0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,0x04ae0,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,0x0ea50,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,淮北师范大学08网络工程cc40x07954,0x06aa0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0ea65,0x0d530,0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0)varsolarMonth=newArray(31,28,31,30,31,30,31,31,30,31,30,31);varGan=newArray(甲,乙,丙,丁,戊,己,庚,辛,壬,癸);varZhi=newArray(子,丑,寅,卯,辰,巳,午,未,申,酉,戌,亥);varAnimals=newArray(鼠,牛,虎,兔,龙,蛇,马,羊,猴,鸡,狗,猪);varsolarTerm=newArray(小寒,大寒,立春,雨水,惊蛰,春分,清明,谷雨,立夏,小满,芒种,夏至,小暑,大暑,立秋,处暑,白露,秋分,寒露,霜降,立冬,小雪,大雪,冬至)varsTermInfo=newArray(0,21208,42467,63836,85337,107014,128867,150921,173149,195551,218072,240693,263343,285989,308563,331033,353350,375494,397447,419210,440795,462224,483532,504758)varnStr1=newArray('日','一','二','三','四','五','六','七','八','九','十')varnStr2=newArray('初','十','廿','卅','')varmonthName=newArray(1月,2月,3月,4月,5月,6月,7月,8月,9月,10月,11月,12月);//国历节日*表示放假日varsFtv=newArray(0101*元旦,0214情人节,0308妇女节,0312植树节,0315消费者权益日,0401愚人节,0501劳动节,0504青年节,0509郝维节,0512护士节,0601儿童节,0701建党节香港回归纪念,0801建军节,0808父亲节,0816燕衔泥节,0909毛泽东逝世纪念,0910教师节,0928孔子诞辰,1001*国庆节,1006老人节,1024联合国日,1112孙中山诞辰纪念,1220澳门回归纪念,1225圣诞节,1226毛泽东诞辰纪念)淮北师范大学08网络工程cc5//农历节日*表示放假日varlFtv=newArray(0101*春节、弥勒佛圣诞!,0106定光佛圣诞,0115元宵节,0208释迦牟尼佛出家,0215释迦牟尼佛涅槃,0209海空上师生日!,0219观世音菩萨圣诞,0221普贤菩萨圣诞,0316准提菩萨圣诞,0404文殊菩萨圣诞,0408释迦牟尼佛圣诞,0415佛吉祥日——释迦牟尼佛诞生、成道、涅槃三期同一庆(即南传佛教国家的卫塞节),0505端午节,0513伽蓝菩萨圣诞,0603护法韦驮尊天菩萨圣诞,0619观世音菩萨成道——此日放生、念佛，功德殊胜,0707七夕情人节,0713大势至菩萨圣诞,0715中元节,0724龙树菩萨圣诞,0730地藏菩萨圣诞,0815中秋节,0822燃灯佛圣诞,0909重阳节,0919观世音菩萨出家纪念日,0930药师琉璃光如来圣诞,1005达摩祖师圣诞,1107阿弥陀佛圣诞,1208释迦如来成道日,腊八节,1224小年,1229华严菩萨圣诞,0100*除夕)//某月的第几个星期几varwFtv=newArray(0520母亲节,0716合作节,0730被奴役国家周)/*****************************************************************************日期计算*****************************************************************************///======================================传回农历y年的总天数functionlYearDays(y){淮北师范大学08网络工程cc6vari,sum=348for(i=0x8000;i0x8;i=1)sum+=(lunarInfo[y-1900]&i)?1:0return(sum+leapDays(y))}//======================================传回农历y年闰月的天数functionleapDays(y){if(leapMonth(y))return((lunarInfo[y-1900]&0x10000)?30:29)elsereturn(0)}//======================================传回农历y年闰哪个月1-12,没闰传回0functionleapMonth(y){return(lunarInfo[y-1900]&0xf)}//======================================传回农历y年m月的总天数functionmonthDays(y,m){return((lunarInfo[y-1900]&(0x10000m))?30:29)}//======================================算出农历,传入日期物件,传回农历日期物件//该物件属性有.year.month.day.isLeap.yearCyl.dayCyl.monCylfunctionLunar(objDate){vari,leap=0,temp=0varbaseDate=newDate(1900,0,31)varoffset=(objDate-baseDate)/86400000this.dayCyl=offset+40this.monCyl=14for(i=1900;i2050&&offset0;i++){temp=lYearDays(i)offset-=tempthis.monCyl+=12}if(offset0){offset+=temp;i--;this.monCyl-=12}this.year=ithis.yearCyl=i-1864leap=leapMonth(i)//闰哪个月this.isLeap=falsefor(i=1;i13&&offset0;i++){//闰月淮北师范大学08网络工程cc7if(leap0&&i==(leap+1)&&this.isLeap==false){--i;this.isLeap=true;temp=leapDays(this.year);}else{temp=monthDays(this.year,i);}//解除闰月if(this.isLeap==true&&i==(leap+1))this.isLeap=falseoffset-=tempif(this.isLeap==false)this.monCyl++}if(offset==0&&leap0&&i==