[共享空间] HotWC3(V1.02)网上在线工具升级支持多种星期算法

[复制链接]
3547|8
 楼主| hotpower 发表于 2011-7-18 23:56 | 显示全部楼层 |阅读模式
本帖最后由 hotpower 于 2011-7-19 00:00 编辑

菜农为增加对各种星期算法及公式的验证,特意升级HotWC3。

点击直接网上运行http://www.hotpower.org/HotAjax/HotPower_HotAjax.html

菜农有关星期网文:

菜农星期公式揭秘及蔡勒公式推想


菜农与蔡勒和基姆拉尔森三个星期公式之揭秘与推想

菜农与蔡勒和基姆拉尔森三个星期公式的继续繁衍

HotWC3有关算法程序片段:

  1. function getweek(century, year, month, day)
  2. {
  3. var week, dateval, table;
  4. if (month <= 2)//1,2月变为去年的13,14月
  5. {
  6. year --;
  7. if (year < 0)
  8. {
  9. year = 99;
  10. century --;
  11. if (century < 0)
  12. {
  13. century = 99;
  14. }
  15. }
  16. month |= 4;//1,2月查5,6月表
  17. // month += 12;//去年的13,14月
  18. }
  19. switch(weeksele.selectedIndex)
  20. {
  21. case 0:
  22. /*
  23. 菜农星期算法
  24. 星期=(百年%4*5+年+年/4+(13*月+8)/5+日)%7
  25. */
  26. week = ((century & 3) * 5 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;
  27. break;
  28. case 1:
  29. /*
  30. 蔡勒星期算法
  31. 星期=百年/4+203-2*百年+年+年/4+(13*月+8)/5+日)%7
  32. */
  33. week = (Math.floor(century / 4) + 203 - 2 * century + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;
  34. break;
  35. case 2:
  36. /*
  37. 基姆星期算法
  38. 星期=(百年/4+百年*5+年+年/4+(13*月+8)/5+日)%7
  39. */
  40. week = (Math.floor(century / 4) + century * 5 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;
  41. break;
  42. case 3:
  43. /*
  44. 菜农第二星期算法
  45. 星期=((百年*5)%20+年+年/4+(13*月+8)/5+日)%7
  46. */
  47. week = ((century * 5) % 20 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;
  48. break;
  49. case 4:
  50. /*
  51. 菜农第二星期算法
  52. 星期=(((日期/100)*5)%20+日期%100+(日期%100)4+(13*月+8)/5+日)%7
  53. */
  54. dateval = century * 100 + year;
  55. week = ((Math.floor(dateval / 100) * 5) % 20 + year + (year >> 2) + Math.floor((13 * month + 8) / 5) + day) % 7;
  56. break;
  57. case 5:
  58. /*
  59. 星期算法月表
  60. 星期=(百年%4*5+年+年/4+星期月表+日)%7
  61. */
  62. table = "2503514620";//3月为基月,3~12月,1,2月查5,6月表
  63. week = ((century & 3) * 5 + year + (year >> 2) + parseInt(table.substr(month-3, 1), 10) + day) % 7;
  64. break;
  65. }
  66. return week;
  67. }



HotWC3网页运行贴图:
plc_avr 发表于 2011-7-19 06:12 | 显示全部楼层
哈哈,抢到沙发了。菜农玩具的功能又变的强大了。
 楼主| hotpower 发表于 2011-7-19 07:57 | 显示全部楼层
不识货者太多,知音太少。等俺离开地球后可能会增值吧。
delong_z 发表于 2011-7-19 09:57 | 显示全部楼层
老师的互联卫士是用什么软件写的啊?
 楼主| hotpower 发表于 2011-7-19 10:58 | 显示全部楼层
随便任何文本编辑
plc_avr 发表于 2011-7-20 05:55 | 显示全部楼层
菜农要出书,把你的思想全部写进去。时间长了可能自已搞的东西都会忘的,嘿嘿........
 楼主| hotpower 发表于 2011-7-20 08:17 | 显示全部楼层
菜农要出书,把你的思想全部写进去。时间长了可能自已搞的东西都会忘的,嘿嘿........
plc_avr 发表于 2011-7-20 05:55


现在还没脑残,基本都可以重新推导~~~
 楼主| hotpower 发表于 2011-7-20 19:02 | 显示全部楼层
HotWC3很暴力的~~~
缥缈九哥 发表于 2013-7-28 02:41 | 显示全部楼层
顶起菜农的专业帖子。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

个人签名:[url=http://www.21ic.com/tools/HotWC3_V1.23.html]

1460

主题

21617

帖子

508

粉丝
快速回复 在线客服 返回列表 返回顶部