netbenton

bug

call :etime 19:13:11.10 19:15:11.11

结果:
1.21

netbenton

我也来一个：

@echo off
rem 计算两点的时间差：etime=time2-time1
rem 保持24小时时间格式: hh:mm:ss:vv
call :etime 23:21:03:09 01:30:23:01

goto :eof
::前面为演示用

:etime <begin_time> <end_time> [return]
setlocal enabledelayedexpansion
set a=%~1
set b=%~2
set c=24:60:60:00
set z=1&set e=
for /l %%a in (2,3,11)do (
        set/a v=2!b:~-%%a,2!-1!a:~-%%a,2!-1+z,k=!c:~-%%a,2!,j=k+v
        set z=!v:~-3,-2!
        set/a j=j-z*k
        set e=:!j:~-2!!e!
)
endlocal&(if %3.==. (echo %e:~1%) else set %3=%e:~1%)&exit/b
复制代码

[ 本帖最后由 netbenton 于 2009-10-6 22:16 编辑 ]

netbenton

小bug
call :etime 23:58:11.10 00:11:12.10

结果：
-85619.00

netbenton

re 12 楼 zhouyongjun
真够细心，我改。：

:etime <begin_time> <end_time> [return]  
setlocal enabledelayedexpansion
set a=0%~1
set b=0%~2
set c=24:60:60:00
set z=1
for /l %%a in (2,3,11)do (
        set/a v=2!b:~-%%a,2!-1!a:~-%%a,2!-1+z,k=!c:~-%%a,2!,j=k+v
        set z=!v:~-3,-2!
        set/a j=j-z*k
        set e=:!j:~-2!!e!
)
endlocal&(if %3.==. (echo %e:~1%) else set %3=%e:~1%)&exit/b
复制代码

[ 本帖最后由 netbenton 于 2009-10-7 21:39 编辑 ]