plp626

回复 2# terse


没测试；但看上去确实是完美版的 短小精悍；
看了老半天没明白算法思想；
求解释；
计算1900-1-1到指定年份日期之间的天数是如何算的？什么公式？

xm=(m-14)/12               ;1-2月的月份映射为-1；3-12月的月份映射为0
JD=d-2479968               ;常数来历？
+
1461*(y+4800+xm)/4   ;1461来历？
+
367*(m-2-xm*12)/12    ; 367来历？
-
3*(y+4900+xm)/100/4  ;4900 来历？；貌似这里可以精简
复制代码

plp626

为这个代码，费神不少，彻底搞懂了；

@echo off&setlocal enabledelayedexpansion
set 这天=2012-4-13
set _0=打渔&set _1=晒网

for /f "tokens=1-3 delims=-" %%a in ("%这天%")do set/a y=%%a,m=%%b,d=%%c
set/a "m=(m+9)%%12,y-=m/10+1989,i=(y/4+(m*153+2)/5+d)%%5/3"

set _%i%!
pause
复制代码

算法见：
http://www.bathome.net/thread-16147-1-1.html