




版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、计算你的出生日在星期几。有时间有点意思2)nSwitch=1varnDayOfWeek=cala_weekday(nMonth,nDay,nYear)if(nSwitch)nDayOfWeek+nSwitch=0day_display(form,nDayOfWeek)functioncala_weekday(x_nMonth,x_nDay,x_nYear)if(x_nMonth=3)x_nMonth-=2elsex_nMonth+=10if(x_nMonth=11)|(x_nMonth=12)x_nYear-varnCentNum=parseInt(x_nYear/100)varnDYearN
2、um=x_nYear%100varnPart1=parseInt(2.6*x_nMonth-.2)varnZeller=(parseInt(nPart1+x_nDay+nDYearNum+(nDYearNum/4)+(nCentNum/4)-2*nCentNum)%7if(nZellerJavaFILEbodyBGCOLOR=#fffffflink=#CC0033vlink=#333399alink=#FF0000Everwonderwhatdayyouwerebornon?Well,youcanfindoutwiththisneatlittlescript.Simplytypeyourbit
3、hdateinthealgorithingiebelow,anditwilltellya.honest!Author:MichaelGudaitisDownloadtheScriptTousethisalgorithm,inputyourdateofbirth(MM/DD/YYYY),pressokandthenboomthedayoftheweekinwhichyouwerebornonappears.ZellersAlgorithmMonth:Day:Year:Example:11-1-1970SundayYourwerebornona多种地域的时间显示第一步:把如下代码加入到区域中24)
4、?(gmt+1)-24):(gmt+1);document.clock.rome.value=(IfZero(rome)+ending);varisr=check24(gmt+2)24)?(gmt+2)-24):(gmt+2);document.clock.Israel.value=(IfZero(isr)+ending);varmsw=check24(gmt+3)24)?(gmt+3)-24):(gmt+3);document.clock.msw.value=(IfZero(msw)+ending);varbaku=check24(gmt+4)24)?(gmt+4)-24):(gmt+4);
5、document.clock.baku.value=(IfZero(baku)+ending);vardel=check24(gmt+5)24)?(gmt+5)-24):(gmt+5);document.clock.del.value=(IfZero(del)+ending);vardh=check24(gmt+6)24)?(gmt+6)-24):(gmt+6);document.clock.dh.value=(IfZero(dh)+ending);varkok=check24(gmt+7)24)?(gmt+7)-24):(gmt+7);document.clock.kok.value=(If
6、Zero(kok)+ending);varho=check24(gmt+8)24)?(gmt+8)-24):(gmt+8);document.clock.ho.value=(IfZero(ho)+ending);vartky=check24(gmt+9)24)?(gmt+9)-24):(gmt+9);document.clock.tky.value=(IfZero(tky)+ending);varsdn=check24(gmt+10)24)?(gmt+10)-24):(gmt+10);document.clock.sdn.value=(IfZero(sdn)+ending);varmag=ch
7、eck24(gmt+11)24)?(gmt+11)-24):(gmt+11);document.clock.mag.value=(IfZero(mag)+ending);varwll=check24(gmt+12)24)?(gmt+12)-24):(gmt+12);document.clock.wll.value=(IfZero(wll)+ending);var_GMT=check24(gmt)24)?(gmt)-24):(gmt);document.clock._GMT.value=(IfZero(_GMT)+:+IfZero(dt.getMinutes()+:+IfZero(dt.getS
8、econds();vareniw=check24(gmt+(24-12)24)?(gmt+(24-12)-24):(gmt+(24-12);document.clock.eniw.value=(IfZero(eniw)+ending);varsam=check24(gmt+(24-11)24)?(gmt+(24-11)-24):(gmt+(24-11);document.clock.sam.value=(IfZero(sam)+ending);varhaw=check24(gmt+(24-10)24)?(gmt+(24-10)-24):(gmt+(24-10);document.clock.H
9、awaii.value=(IfZero(haw)+ending);varala=check24(gmt+(24-9)24)?(gmt+(24-9)-24):(gmt+(24-9);document.clock.alaska.value=(IfZero(ala)+ending);varpacif=check24(gmt+(24-8)=24)?(gmt+(24-8)-24):(gmt+(24-8);document.clock.pacif.value=(IfZero(pacif)+ending);varmount=check24(gmt+(24-7)24)?(gmt+(24-7)-24):(gmt
10、+(24-7);document.clock.mount.value=(IfZero(mount)+ending);varcenter=check24(gmt+(24-6)24)?(gmt+(24-6)-24):(gmt+(24-6);document.clock.center.value=(IfZero(center)+ending);vareast=check24(gmt+(24-5)24)?(gmt+(24-5)-24):(gmt+(24-5);document.clock.east.value=(IfZero(east)+ending);varatl=check24(gmt+(24-4
11、)24)?(gmt+(24-4)-24):(gmt+(24-4);document.clock.atl.value=(IfZero(atl)+ending);varbra=check24(gmt+(24-3)24)?(gmt+(24-3)-24):(gmt+(24-3);bra=(bra=24)?bra-24:bra;document.clock.bra.value=(IfZero(bra)+ending);varmid=check24(gmt+(24-2)24)?(gmt+(24-2)-24):(gmt+(24-2);mid=(mid=24)?mid-24:mid;document.cloc
12、k.mid.value=(IfZero(mid)+ending);varazo=check24(gmt+(24-1)24)?(gmt+(24-1)-24):(gmt+(24-1);azo=(azo=24)?azo-24:azo;document.clock.azo.value=(IfZero(azo)+ending);setTimeout(GetTime(),1000);functionIfZero(num)return(num=24)?hour-24:hour;/End-第二步:把如下代码加入到区域中本地时间Eniwetok(GMT-12)Samoa(GMT-11)Hawaii(GMT-10
13、)Alaska(GMT-9)PacificTime(GMT-8)MountainTime(GMT-7)CentralTime(GMT-6)EasternTime(GMT-5)AtlanticTime(GMT-4)Brazilia(GMT-3)Mid-Atlantic(GMT-2)Azores(GMT-1)GreenwichMeanTime(GMT)Rome(GMT+1)Israel(GMT+2)Moscow(GMT+3)Baku(GMT+4)NewDelhi(GMT+5)Dhakar(GMT+6)Bangkok(GMT+7)HongKong(GMT+8)Tokyo(GMT+9)Sydney(G
14、MT+10)Magadan(GMT+11)Wellington(GMT+12)第三步:把“onLoad=javascript:GetTime();”加在标记里例如:打雷喽 下雨收衣服呀 (请改图片路径)第一步:把如下代码加入到区域中.mainbodyposition:absolute;top:100px;left:260px;width:300px;font-family:Arial;font-size:12pt;color:FFFFFF;.soundpicposition:absolute;top:-400px;left:-400px;Acolor:FF0000;text-decoratio
15、n:underlineoverline;第二步:把如下代码加入到区域中0)document.all.soundgif1.style.posTop+=i*vorzeichendocument.all.soundgif1.style.posLeft+=i*vorzeichenvorzeichen=vorzeichen*(-1)i-vartimer=setTimeout(shakesound(),50)elsedocument.all.soundgif1.style.posTop=-400document.all.soundgif1.style.posLeft=-400i=shakestrength
16、clearTimeout(timer)if(document.layers)if(i0)document.soundgif1.top+=i*vorzeichendocument.soundgif1.left+=i*vorzeichenvorzeichen=vorzeichen*(-1)i-vartimer=setTimeout(shakesound(),50)elsedocument.soundgif1.top=-400document.soundgif1.left=-400i=shakestrengthclearTimeout(timer)functionmakesound(soundobj)showsoundpic()varthissound=eva
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 高精度3D打印技术突破-深度研究
- 农药使用对水体污染影响研究-深度研究
- 地标农产品品牌建设-深度研究
- 人工智能与学习分析-深度研究
- 跨文化协同问题解决策略-深度研究
- 2025年公积金个人住房贷款合同规范文本
- 2025年高端社区物业服务合同标准格式
- 个人汽车租赁合同协议书
- 医疗行业战略合同联盟协议
- 购销合同反担保规定
- 新媒体导论彭兰课件
- 2024统编版七年级上册历史期末复习知识清单
- 工程数学线性代数课后答案-同济第五版
- 四川政采评审专家入库考试基础题练习试题(一)
- 2024解析:第七章力-讲核心(解析版)
- 2024解析:第十三章内能-讲核心(解析版)
- 大学生心理健康(上海交通大学)知到智慧树章节答案
- 《呼吸囊的使用》课件
- 高三百天冲刺家长会
- 《文化遗产概论》课程教学大纲
- TD-T 1048-2016耕作层土壤剥离利用技术规范
评论
0/150
提交评论