中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 这个日期转化为天数的算法怎么理解
作者:
标题: 这个日期转化为天数的算法怎么理解 上一主题 | 下一主题
Eblis
中级用户




积分 251
发帖 108
注册 2007-1-7
来自 湖南==>广州
状态 离线
『楼 主』:  这个日期转化为天数的算法怎么理解

是以前一位版主的批处理
@echo off
title 日期查询
color 1f
if [%1]==[] 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 ]



DOS新人.多多指導
2007-6-21 02:13
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
youxi01
高级用户




积分 846
发帖 247
注册 2006-10-27
来自 湖南==》广东
状态 离线
『第 2 楼』:  

没错,核心算法 Day2Date 、Date2Day 是willsort斑竹写的,至今不明白那么长一段算法是怎么得来的,原创者也应该是“天才”级人物吧/

2007-6-21 11:24
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
Eblis
中级用户




积分 251
发帖 108
注册 2007-1-7
来自 湖南==>广州
状态 离线
『第 3 楼』:  

呵呵..就是想知道``怎么来的``



DOS新人.多多指導
2007-6-21 13:59
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 4 楼』:  

楼主把标题修改一下吧。

2007-6-21 14:26
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
Eblis
中级用户




积分 251
发帖 108
注册 2007-1-7
来自 湖南==>广州
状态 离线
『第 5 楼』:  

改啦..說下咯```



DOS新人.多多指導
2007-6-21 14:32
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 6 楼』:  

不好意思,这个计算日期的算法我也不是很懂。

没有记错的,上面的批处理应该是willsort写的,原帖里面已经注明了“核心算法 Ritchie Lawrence”,你可以以“Ritchie Lawrence 算法”为关键字Google一下。

2007-6-21 16:54
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
Eblis
中级用户




积分 251
发帖 108
注册 2007-1-7
来自 湖南==>广州
状态 离线
『第 7 楼』:  

是willsort写的...上网找了一下..没有找到与ritchie lawrence这个算法的解释``呵呵..这个算法..没解释就是一个算法就好了``



DOS新人.多多指導
2007-6-22 19:52
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
6622186
高级用户





积分 894
发帖 411
注册 2007-2-17
状态 离线
『第 8 楼』:  

不太懂



@set c=     不知则觉多,知则觉少,越知越多,便觉越来越少.        --- 知多少.
@for,/l,%%i,in,(1,1,55)do,@call,set/p=%%c:~%%i,1%%<nul&ping/n 1 127.1>nul


2007-6-22 22:37
查看资料  发短消息 网志   编辑帖子  回复  引用回复
mtiankong
初级用户





积分 70
发帖 38
注册 2007-3-24
状态 离线
『第 9 楼』:  

先算出儒略日,再转换为公历.

[ Last edited by mtiankong on 2008-10-14 at 21:51 ]

2008-10-14 21:18
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: