|
scriptor
银牌会员
积分 1187
发帖 555
注册 2006-12-21
状态 离线
|
『楼 主』:
[分享][原创]发一个计算时间的
基本没有什么算法可言
纯粹代数
也是弥补
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
|
|
2007-9-16 15:03 |
|
|
lookjcq
新手上路
积分 4
发帖 2
注册 2007-9-16
状态 离线
|
|
2007-9-16 17:12 |
|
|
danlanse8025
新手上路
积分 9
发帖 5
注册 2007-9-17
状态 离线
|
|
2007-9-17 02:16 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
4 楼』:
小弟愚笨,如何输入以秒为单位的数字,输出只要精确到秒就可以了。并且代码在一个批处理里。
[ Last edited by uiopuiop on 2007-10-5 at 12:52 PM ]
|
|
2007-10-5 12:35 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
5 楼』:
call :clc !h! 什么意思?
|
|
2007-10-5 12:57 |
|
|
knoppix7
银牌会员
积分 1287
发帖 634
注册 2007-5-2 来自 cmd.exe
状态 离线
|
『第
6 楼』:
自己看call /?
和setlocal /?
|
|
2007-10-5 13:26 |
|
|
Nickey
初级用户
积分 132
发帖 59
注册 2007-8-23 来自 GuangZhou
状态 离线
|
『第
7 楼』:
@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
超过年份将会溢出
|
|
2007-10-5 16:31 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
8 楼』:
多谢!
@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 ]
|
|
2007-10-6 21:44 |
|
|
gne
初级用户
积分 77
发帖 45
注册 2007-8-3
状态 离线
|
『第
9 楼』:
不好使啊
|
因为喜欢,所以无悔! |
|
2007-12-31 20:15 |
|
|
knoppix7
银牌会员
积分 1287
发帖 634
注册 2007-5-2 来自 cmd.exe
状态 离线
|
『第
10 楼』:
:: 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
|
|
2007-12-31 21:20 |
|
|
plp626
银牌会员
钻石会员
积分 2278
发帖 1020
注册 2007-11-19
状态 离线
|
|
2008-3-3 21:44 |
|