这个日期转化为天数的算法怎么理解 - 中国DOS联盟论坛

是以前一位版主的批处理


@echo off
title 日期查询
color 1f
if == call :Help
call :Date2Day %1 days
set/a days=%days%+%2
call :Day2Date %days% date
echo.
echo -----------结果---------------
echo.
echo 你查询的日期为：%date%
echo ------------------------------
cmd /k

:Date2Day
setlocal ENABLEEXTENSIONS 
for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do ( 
  set yy=%%a & set mm=%%b & set dd=%%c 
)
set /a dd=100%dd%%%100,mm=100%mm%%%100 
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2 
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %2=%j%&goto :EOF 

:Day2Date
setlocal ENABLEEXTENSIONS 
set /a i=%1,a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a 
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5 
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10 
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%) 
endlocal&set %2=%yy%-%mm%-%dd%&goto :EOF 

:Help
    cls
    echo ________________________________________________                       
    echo 使用方法：%~nx0   
    echo.                           
    echo 日期格式：2007-03-31                     
    echo 天数格式：+/-查询的天数                        
    echo 示例：%~nx0 2007-03-31 3 就是查询3天后的日期  
    echo ________________________________________________
    echo.
    cmd /k

我设置的时候是2007-06-11 5
在date2day的时候这一段..它算出来是13680..我想知道通过set /a这一段的算法怎么得出这个结果的..就是不太明白他算法..因为最近想写一段批处理要用到日期对比..从论坛找出这一批处理..想理解他的算法..谢谢

[ Last edited by bjsh on 2007-7-31 at 12:53 PM ]

第1楼　Eblis	发表于 2007-06-21 02:13
中级用户　发帖 108　积分 251　来自湖南==>广州
这个日期转化为天数的算法怎么理解是以前一位版主的批处理 @echo off title 日期查询 color 1f if == call :Help call :Date2Day %1 days set/a days=%days%+%2 call :Day2Date %days% date echo. echo -----------结果--------------- echo. echo 你查询的日期为：%date% echo ------------------------------ cmd /k :Date2Day setlocal ENABLEEXTENSIONS for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do ( set yy=%%a & set mm=%%b & set dd=%%c ) set /a dd=100%dd%%%100,mm=100%mm%%%100 set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12z-3,j=153m+2 set /a j=j/5+dd+y365+y/4-y/100+y/400-2472633 endlocal&set %2=%j%&goto :EOF :Day2Date setlocal ENABLEEXTENSIONS set /a i=%1,a=i+2472632,b=4a+3,b/=146097,c=-b146097,c/=4,c+=a set /a d=4c+3,d/=1461,e=-1461d,e/=4,e+=c,m=5e+2,m/=153,dd=153m+2,dd/=5 set /a dd=-dd+e+1,mm=-m/10,mm=12,mm+=m+3,yy=b100+d-4800+m/10 (if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%) endlocal&set %2=%yy%-%mm%-%dd%&goto :EOF :Help cls echo ________________________________________________ echo 使用方法：%~nx0 echo. echo 日期格式：2007-03-31 echo 天数格式：+/-查询的天数 echo 示例：%~nx0 2007-03-31 3 就是查询3天后的日期 echo ________________________________________________ echo. cmd /k 我设置的时候是2007-06-11 5 在date2day的时候这一段..它算出来是13680..我想知道通过set /a这一段的算法怎么得出这个结果的..就是不太明白他算法..因为最近想写一段批处理要用到日期对比..从论坛找出这一批处理..想理解他的算法..谢谢 [ Last edited by bjsh on 2007-7-31 at 12:53 PM* ]

第2楼　youxi01	发表于 2007-06-21 11:24
高级用户　发帖 247　积分 846　来自湖南==》广东
没错，核心算法 Day2Date 、Date2Day 是willsort斑竹写的，至今不明白那么长一段算法是怎么得来的，原创者也应该是“天才”级人物吧/

第3楼　Eblis	发表于 2007-06-21 13:59
中级用户　发帖 108　积分 251　来自湖南==>广州
呵呵..就是想知道``怎么来的``

第4楼　lxmxn	发表于 2007-06-21 14:26
版主　发帖 4,938　积分 11,386
楼主把标题修改一下吧。

第5楼　Eblis	发表于 2007-06-21 14:32
中级用户　发帖 108　积分 251　来自湖南==>广州
改啦..說下咯```

第6楼　lxmxn	发表于 2007-06-21 16:54
版主　发帖 4,938　积分 11,386
不好意思，这个计算日期的算法我也不是很懂。没有记错的，上面的批处理应该是willsort写的，原帖里面已经注明了“核心算法 Ritchie Lawrence”，你可以以“Ritchie Lawrence 算法”为关键字Google一下。

第7楼　Eblis	发表于 2007-06-22 19:52
中级用户　发帖 108　积分 251　来自湖南==>广州
是willsort写的...上网找了一下..没有找到与ritchie lawrence这个算法的解释``呵呵..这个算法..没解释就是一个算法就好了``

第8楼　6622186	发表于 2007-06-22 22:37
高级用户　发帖 411　积分 894
不太懂

第9楼　mtiankong	发表于 2008-10-14 21:18
初级用户　发帖 38　积分 70
先算出儒略日,再转换为公历. [ Last edited by mtiankong on 2008-10-14 at 21:51 ]