原创
HotWC3(V1.02)网上在线工具升级支持多种星期算法
菜农为增加对各种星期算法及公式的验证,特意升级HotWC3。
点击直接网上运行:http://www.hotpower.org/HotAjax/HotPower_HotAjax.html
菜农有关星期网文:
菜农星期公式揭秘及蔡勒公式推想
菜农与蔡勒和基姆拉尔森三个星期公式之揭秘与推想
菜农与蔡勒和基姆拉尔森三个星期公式的继续繁衍
HotWC3有关算法程序片段:
<br />function getweek(century, year, month, day)<br />{<br />var week, dateval, table;<br />if (month <= 2)//1,2月变为去年的13,14月<br />{<br />year --;<br />if (year < 0)<br />{<br />year = 99;<br />century --; <br />if (century < 0)<br />{<br />century = 99;<br />}<br />}<br />month |= 4;//1,2月查5,6月表<br />// month += 12;//去年的13,14月<br />}<br />switch(weeksele.selectedIndex)<br />{<br />case 0:<br />/*<br />菜农星期算法<br />星期=(百年%4*5+年+年/4+(13*月+8)/5+日)%7<br />*/<br />week = ((century & 3) * 5 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;<br />break;<br />case 1:<br />/*<br />蔡勒星期算法<br />星期=百年/4+203-2*百年+年+年/4+(13*月+8)/5+日)%7<br />*/<br />week = (Math.floor(century / 4) + 203 - 2 * century + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;<br />break;<br />case 2:<br />/*<br />基姆星期算法<br />星期=(百年/4+百年*5+年+年/4+(13*月+8)/5+日)%7<br />*/<br />week = (Math.floor(century / 4) + century * 5 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;<br />break;<br />case 3:<br />/*<br />菜农第二星期算法<br />星期=((百年*5)%20+年+年/4+(13*月+8)/5+日)%7<br />*/<br />week = ((century * 5) % 20 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;<br />break;<br />case 4:<br />/*<br />菜农第二星期算法<br />星期=(((日期/100)*5)%20+日期%100+(日期%100)4+(13*月+8)/5+日)%7<br />*/<br />dateval = century * 100 + year;<br />week = ((Math.floor(dateval / 100) * 5) % 20 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;<br />break;<br />case 5:<br />/*<br />星期算法月表<br />星期=(百年%4*5+年+年/4+星期月表+日)%7<br />*/<br />table = "2503514620";//3月为基月,3~12月,1,2月查5,6月表<br />week = ((century & 3) * 5 + year + (year >> 2) + parseInt(table.substr(month-3, 1), 10) + day) % 7;<br />break;<br />}<br />return week;<br />}<br /><br /><br /><br />
复制代码HotWC3网页运行贴图:
文章评论(0条评论)
登录后参与讨论