中国DOS联盟

基本没有什么算法可言 纯粹代数 也是弥补 http://www.cn-dos.net/forum/viewthread.php?tid=33561&fpage=3 那个帖子的不足

@echo off
::Convert any possitive real number N to YY-DD-HH-MM-SS-Ms
::N is not larger than 214748364799.
::Author:   Scriptor@GUCAS
::Finished at: 13:07  09-16-2007 

setlocal enabledelayedexpansion
set/p in=::
set /a y=0,d=0,h=0,m=0,s=0,ms=0 rem predefine the time. 2>nul
set/a ms=in%%100  rem cacl the ms_part 2>nul
if %in% gtr 100 set ms=%in:~-2%&set h=%in:~0,-2%
if %h% equ 0 goto :out rem only millisecond
call :clc !h!

:out
::: output the time
echo time %in% (ms) equals:
echo      %y% Years %d% Days %h% Hours %m% Mins %s% Secs %ms% ms.
endlocal
pause&exit/b

:clc
if %1 gtr 0 (
   set/a h=%1/3600
   set/a m=%1%%3600/60
   set/a s=%1%%3600%%60
)
if %h% geq 24 (
   set/a y=%h%/24/365
   set/a d=%h%/24%%365
   set/a h%%=24
)

rem max is 214748364799 ms

?

很不错.

小弟愚笨，如何输入以秒为单位的数字，输出只要精确到秒就可以了。并且代码在一个批处理里。 [ Last edited by uiopuiop on 2007-10-5 at 12:52 PM ]

call :clc !h! 什么意思？

自己看call /? 和setlocal /?

@echo off setlocal enabledelayedexpansion set /p Input=输入秒: if %Input% GTR 0 set /a Y=%Input%/31536000&set /a D=(Input%%31536000)/86400&set /a H=(Input%%86400)/3600&set /a M=(Input%%3600)/60&set /a S=Input%%60 echo 折合: %Y% 年 %D% 日 %H% 时 %M% 分 %S% 秒. pause>nul 超过年份将会溢出

@echo off setlocal enabledelayedexpansion set /p Input=输入秒: if %Input% GTR 0 set /a Y=%Input%/604800&set /a D=(Input%%604800)/86400&set /a H=(Input%%86400)/3600&set /a M= (Input%%3600)/60&set /a S=Input%%60 echo 折合: %Y% 周 %D% 日 %H% 时 %M% 分 %S% 秒. pause>nul [ Last edited by uiopuiop on 2007-10-6 at 11:29 PM ]

不好使啊

因为喜欢，所以无悔！

:: Func: Returns a calendar date and time of day from the number of :: elapsed seconds since 1st January 1970 00:00:00. For :: NT4/2000/XP/2003. :: :: Args: %1 seconds used to create calendar date and time of day :: %2 var to receive year, 4 digits for all typical dates :: %3 var to receive month, 2 digits, 01 to 12 :: %4 var to receive day of month, 2 digits, 01 to 31 :: %5 var to receive hours, 2 digits, 00 to 23 :: %6 var to receive minutes, 2 digits, 00 to 59 :: %7 var to receive seconds, 2 digits, 00 to 59 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: @echo off set /a i=%1,ss=i%%60,i/=60,nn=i%%60,i/=60,hh=i%%24,dd=i/24,i/=24 set /a 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%) (if %hh% LSS 10 set hh=0%hh%)&(if %nn% LSS 10 set nn=0%nn%) if %ss% LSS 10 set ss=0%ss% endlocal&set %7=%ss%&set %6=%nn%&set %5=%hh%&^ set %4=%dd%&set %3=%mm%&set %2=%yy%&goto :EOF

一起学习: www.cn-dos.net/forum ... --------------->15楼