[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
还是有些问题啊。比如说今天是2011年10月12日,农历应该是9月16日,但上面显示的是15日。
还有,如果能判断电脑上日期的格式就更好了。比如我电脑上是美国日期格式,即月日年那种,就会出错。

TOP

回复 96# Fantasys


你可以自己去定制化一个,参考:

批处理标准化获取当前系统日期
http://bbs.bathome.net/thread-3328-1-1.html
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

我级别低能发上吗
因为我曾应别人要求用批处理应网友所求为算命系统写过一部分,,之后感觉"规则"复杂,且与他交流也困难没再继续
附件: 您需要登录才可以下载或查看附件。没有帐号?注册

TOP

看到此贴标题我很高兴,原以为很难会有人肯用批处理干这事,先看看是如何算法再慢慢向大家学习。我介绍一下我这个的大致“算法”,至于代码,相信各位都比我强。
我当初也是企图找找出阴历纯计算方法,结果放弃了,最终从网上整理出从1900-2030年每年阴历各月大小的数据表,还要找出若干年24节气时间,尤其是立春时间要求很精确,弄一个24节气的模拟计算式
农历的年号并不是大年初一开始新的一年,而是以立春为界,之前我一直以为是正月初一
24节气间隔天数是不等的,农历的闰月是以该月里是否无节仅有气(比如清明是节,而谷雨是气)来确定的
我这种的精度经与网上万年历校验,(我猜那也不会是用的计算式,比我这更偏于查数据表)误差一般在几分钟到几十分钟(误差大了那生辰八字就变了哦),但显然可能有某些时点的偏差会更大些,不可能一一验到。据说现代用天文科学观测计算的结果证明,古代年历也有误差一天以上的,但仍维持历史不变以免造成混乱,即便这样,我真感慨古人是如何定出这农历的,“夜观天象、掐指一算”有如此之高精度。

TOP

本帖最后由 hnfeng 于 2012-4-28 13:43 编辑

在我的电脑上(Win7中文版)显示有问题,日期全挤在一起,农历日期也显示不了:
附件: 您需要登录才可以下载或查看附件。没有帐号?注册

TOP

回复 99# yyykkkyyyy


    阴历本来就不是计算出来的,所以找不到算法

TOP

如果能加上节日提示就好了,但我是菜鸟,看不懂,只做了个简单的
  1. @echo off
  2. mode con cols=50 lines=5
  3. title 节日提示器
  4. :ks
  5. cls
  6. set yy=%date:~0,4%
  7. set mm=%date:~5,2%
  8. set nn=%date:~8,2%
  9. set zg=%yy%年%mm%月%nn%日
  10. set hh=%time:~0,2%点%time:~3,2%分%time:~6,2%秒
  11. echo.
  12. echo     现在时间:%zg% %hh%
  13. if /i '%zg%'=='%yy%年01月01日' echo 今天是元旦&ping /n 2 127.1>nul&goto ks
  14. if /i '%zg%'=='%yy%年01月06日' echo 今天是中国13亿人口日&ping /n 2 127.1>nul&goto ks
  15. if /i '%zg%'=='%yy%年01月10日' echo 今天是中国110宣传日&ping /n 2 127.1>nul&goto ks
  16. if /i '%zg%'=='%yy%年02月02日' echo 今天是世界湿地日&ping /n 2 127.1>nul&goto ks
  17. if /i '%zg%'=='%yy%年02月04日' echo 今天是世界抗癌症日&ping /n 2 127.1>nul&goto ks
  18. if /i '%zg%'=='%yy%年02月10日' echo 今天是世界气象日&ping /n 2 127.1>nul&goto ks
  19. if /i '%zg%'=='%yy%年02月14日' echo 今天是情人节&ping /n 2 127.1>nul&goto ks
  20. if /i '%zg%'=='%yy%年02月21日' echo 今天是国际母语日&ping /n 2 127.1>nul&goto ks
  21. if /i '%zg%'=='%yy%年02月07日' echo 今天是国际声援南非日&ping /n 2 127.1>nul&goto ks
  22. if /i '%zg%'=='%yy%年02月29日' echo 今天是国际罕见病日&ping /n 2 127.1>nul&goto ks
  23. ::我太懒了,写到这就不想写了,请大家帮帮忙
  24. ping /n 2 127.1>nul
  25. goto ks
  26. ::资料
  27. ::世 界 节 日 大 全
  28. :: 1月 January
  29. :: 新年元旦[01/01] 黑人节[1月第一个星期天] 中国13亿人口日[01/06]
  30. ::  日本**节[1月第二个星期一] 中国110宣传日[01/10] 国际麻风节[1月最后一个星期日]
  31. :: 2月 February
  32. :: 世界湿地日[02/02] 世界抗癌症日[02/4] 世界气象日[02/10]
  33. ::  情人节[02/14] 国际母语日[02/21] 国际声援南非日[02/7]
  34. ::  国际罕见病日[02/29]   
  35. :: 3月 March
  36. :: 全国爱耳日[03/03] 妇女节[03/08] 植树节[03/12]
  37. ::  国际消费日[03/15] *世界森林日 [03.21] 世界水日[03/22]
  38. ::  *世界气象日 [03.23] *世界防治结核病日 [03.24]   
  39. :: 4月 April
  40. :: 愚人节[04/01] *清明节 [04.05] *世界卫生日 [04.07]
  41. ::   世界地球日[04/22]   
  42. :: 5月 May
  43. :: 国际劳动节[05/01] 中国青年节[05/04] *全国碘缺乏病日 [05.05]
  44. ::  世界红十字日[05/08] 国际护士节[05/12] 国际家庭日[05/15]
  45. ::  世界电信日[05/17] 国际博物馆日[05/18] 全国助残日[每年五月第三个星期日]
  46. ::  中国汶川地震哀挨哀悼日[05/19]  全国学生营养日[05/20] 国际生物多样性日[05/22]
  47. ::  国际牛奶日[每年5月的第三个星期二] 世界无烟日[05/31] 母亲节[5月第二个星期日]
  48. :: 6月 June
  49. :: 国际儿童节 [06.01] 世界环境日[06/05] *全国爱眼日 [06.06]
  50. ::  *端午节 [06.15] 父亲节[6月第三个星期日] *防治荒漠化和干旱日 [06.17]
  51. ::  国际奥林匹克日[06/23] *全国土地日 [06.25] *国际反毒品日 [06.26]
  52. :: 7月 July
  53. :: 香港回归日[07/01] 建党节[07/01] *抗日战争纪念日 [07.07]
  54. ::  世界过敏性疾病日[07/8] 世界人口日[07/11]   
  55. :: 8月 August
  56. :: 八一建军节[08/01] 七夕情人节 [农历七月初七]   
  57. :: 9月 September
  58. :: *劳动节 [09.01] 国际扫盲日[09/08] 教师节[09/10]
  59. ::世界预防自杀日[09/10]
  60. ::  国际臭氧层保护日[09/16] 国际和平日[09/17] *国际爱牙日 [09.20]
  61. ::  中秋节 [农历八月十五] 国际聋人节[9月第四个星期日] *世界旅游日 [09.27]
  62. ::  *重阳节 [农历九月初九]     
  63. :: 10月 October
  64. :: 国庆节[10/01] *国际音乐节 [10.01] *国际减轻自然灾害日 [10.02]
  65. ::  世界动物日[10/04] 国际住房日[10/07] *全国高血压日 [10.08]
  66. ::  世界视觉日[10/08] 世界邮政日[10/09] *世界精神卫生日 [10.10]
  67. ::  国际盲人节[10/15] 世界粮食节[10/16] *世界消除贫困日 [10.17]
  68. ::  中国(揭阳)国际玉器节[10/21] 世界传统医药日[10/22] 联合国日[10/24]
  69. ::  人类天花绝迹日[10/25] 足球诞生日[10/26] 万圣节[10/31]
  70. :: 11月 November
  71. :: 中国记者日[11/08] *消防宣传日 [11.09] *世界糖尿病日 [11.14]
  72. ::  *国际大学生节 [11.17] 感恩节[11月第四个星期四]   
  73. :: 12月 December
  74. :: 世界艾滋病日[12/1] *世界残疾人日 [12.03] *世界足球日 [12.09]
  75. ::  澳门回归纪念日[12/20] 国际篮球日[12/21] *冬至节 [农历十二月二十二日]
  76. ::  平安夜[12/24] 圣诞节 [12.25] 世界强化免疫日[12/25]
  77. ::  **诞辰[12/26]
复制代码

TOP

挺厉害的,继续学习。

TOP

强人,研究研究。

TOP

功能很好了 至少看得明白就行

TOP

在win7x64的dos shell下操作出错:
'日期提取、格式化与校验' 不是内部或外部
命令,也不是可运行的程序
或批处理文件。
此时不应有 f。

TOP

谢谢楼主,努力学习中.....

TOP

那个规律还真是头一次听说,赞一个

TOP

小代码,大作用,加油

TOP


挤到一块了,怎么办?
Windows Server 2012 R2 Datacenter 64BIT
附件: 您需要登录才可以下载或查看附件。没有帐号?注册

TOP

返回列表