|
zouzhxi
中级用户
蝴蝶之吻
积分 430
发帖 177
注册 2006-9-20
来自 广东深圳
状态 离线
|
『第
16 楼』:
如果我输入字母,它还是会出现:
| Quote: | 请输入秒数:dddd
0 天 0 小时 0 分 0 秒
请按任意键继续. . . |
|
我是不是来捣乱,,,的...嘻嘻...;)
[ Last edited by zouzhxi on 2007-1-17 at 09:54 AM ]
|
Butterfly Kiss Blog
计算机DIY联盟论坛 |
|
 2007-1-17 09:52 |
|
|
PPdos
高级用户
积分 783
发帖 268
注册 2006-12-26
状态 离线
|
『第
17 楼』:
将以上代码理解为（非毫秒）：
set /a D=%t%/86400
set /a H=%t%%%86400/3600
set /a M=%t%%%86400%%3600/60
set /a S=%t%%%86400%%3600%%60
ECHO %D%日%H%时%M%分%S%秒
感悟即：取值为t 除86400秒（等于1日）商为天数 余数除3600秒（等于1小时）商为小时数 余数再循环 以次类推可推广至周月年 但因为32位精确限制将达不到最大预期效果
|
|
|
2007-1-17 11:02 |
|
|
hxuan999
中级用户
DOS之日
积分 337
发帖 161
注册 2006-11-4
状态 离线
|
『第
18 楼』:
| Quote: | Originally posted by namejm at 2007-1-16 16:15:
12楼的代码有如下缺陷：
1、截取小数部分用替换语句是容易出错的，比如：整数部分是小数部分的某一个字符串的时候，如 23.1234。建议不 ... |
|
谢谢指出,呵呵.写的草率了.已经修正了.
|
for /f %%h in (`echo hxuan`) do for /f %%x in (`echo hxuan`) do if %%h==%%x nul |
|
|
2007-1-18 01:55 |
|
|
everest79
金牌会员
一叶枝头，万树皆春
积分 2564
发帖 1127
注册 2006-12-25
状态 离线
|
『第
19 楼』:
| Quote: | Originally posted by PPdos at 2007-1-16 08:39 PM:
各位厉害。。竟然连毫秒都准确到了 。。看来可以修改成春节倒计时了^^ |
|
@ECHO OFF&MODE CON COLS=40 LINES=3&TITLE=新年倒计时
SETLOCAL ENABLEDELAYEDEXPANSION
SET /A YEAR=%DATE:~0,4%,MONTH=%DATE:~5,2%,DAY=%DATE:~8,2%
CALL :ALG MONTH %MONTH%&&CALL :ALG DAY %DAY%
IF NOT "%1" == "" SET NB=%1&&GOTO :TOPY
SET /A NX=%RANDOM%%%12+1,NZ=%RANDOM%%%28+1
SET NYY=%NX%.%NZ%
:TOPX
CLS&ECHO.&SET /P NB=%NYY%过年?
IF "%NB%" == "" SET NB=%NYY%&&GOTO TOPZ
IF /I "%NB:~0,1%" == "n" SET NYY=那是什么时候&&GOTO TOPX
IF /I "%NB:~0,1%" == "y" SET NB=%NYY%&&GOTO TOPY
IF NOT "%NB%" == "" SET NYY=%NB%&&GOTO TOPX
:TOPY
ECHO %NB%|FINDSTR /R "^[0-9]*[.:;/][0-9]*">nul||GOTO TOPX
FOR /F "tokens=1,2 delims=.:;-/" %%i IN ("%NB%") DO CALL :ALG BM %%i&CALL :ALG BD %%j
IF NOT %BM% GTR 0 (GOTO TOP) ELSE IF %BM% GTR 12 GOTO TOPX
IF NOT %BD% GTR 0 (GOTO TOP) ELSE IF %BD% GTR 31 GOTO TOPX
FOR /L %%i IN (1,1,12) DO (
if %%i geq 8 (set d1=30&&set d2=31) else set d1=31&&set d2=30
set /a st=%%i%%2
if !st! equ 0 (set M%%i=!d2!) else set M%%i=!d1!)
CALL :LM %YEAR%
IF %BM% GTR %MONTH% SET GO=GTR
IF %BM% EQU %MONTH% SET GO=EQU
IF %BM% LSS %MONTH% SET /A NEWYEAR=%YEAR%+1&&SET GO=LSS
GOTO %GO%
:GTR
FOR /L %%i IN (%MONTH%,1,%BM%) DO SET /A DALL=!DALL!+M%%i
SET /A DALL=%DALL%+!M%MONTH%!-%DAY%+%BD%-M%MONTH%-M%BM%
GOTO TIME
:EQU
IF %BD% GTR %DAY% SET /A DALL=%BD%-%DAY%&&GOTO TIME
IF %BD% EQU %DAY% SET DALL=0&&GOTO TIME
IF %BD% LSS %DAY% SET /A NERA=%DAY%-%BD%&&GOTO LSS
:LSS
FOR /L %%i IN (%MONTH%,1,12) DO SET /A OALL+=M%%i
SET /A OALL=%OALL%+!M%MONTH%!-%DAY%-M%MONTH%
CALL :LM %NEWYEAR%
FOR /L %%i IN (1,1,%BM%) DO SET /A NALL+=M%%i
SET /A NALL+=%BD%-M%BM%
SET /A DALL=%OALL%+%NALL%
:TIME
FOR /F "tokens=1-4 delims=:." %%a IN ("%TIME%") DO (
CALL :ALG TT %%b&&CALL :ALG TS %%c&&CALL :ALG TM %%d
SET /A TH=24-%%a-1,TT=60-!TT!-1,TS=60-!TS!-1,TM=1000-!TM!*10
CLS&ECHO/&ECHO 距新年还有%DALL%天!TH!小时!TT!分!TS!秒!TM!毫秒)
IF "%DAY%" == "%DATE:~8,2%" (GOTO TIME) ELSE GOTO END
:END
START /I "" %0 "NB"
GOTO :EOF
:LM
SET /A LM=(%1-2000)%%4
IF NOT %LM% EQU 0 (SET M2=28) ELSE SET M2=29
GOTO :EOF
:ALG
SET CHKALG=%2
IF "%CHKALG:~1,1%" == "" SET %1=%CHKALG%&GOTO :EOF
SET /A %1=%CHKALG:~0,1%*10+%CHKALG:~-1%
GOTO :EOF 我刚写的嘿嘿:D
|
|
|
2007-1-18 07:15 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
20 楼』:
有办法突破11天的限制吗？如果数字太大会溢出啊，多谢！
请输入秒数(退出请直接按回车)：4321432531252
Invalid number. Numbers are limited to 32-bits of precision.
Invalid number. Numbers are limited to 32-bits of precision.
Invalid number. Numbers are limited to 32-bits of precision.
Invalid number. Numbers are limited to 32-bits of precision.
11 天 32 小时 19 分 47 秒
|
|
|
2007-10-5 10:21 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
21 楼』:
这个方法好点
这个论坛果然不错！！！ 强烈支持！
@echo off
:begin
cls
echo.
set input=
set /p input= 请输入秒数(退出请直接按回车)：
if not defined input exit
set /a SS=%input%%%60
set /a MM=%input%/60%%60
set /a HH=%input%/3600%%60
if %HH% GEQ 24 set /a HH=HH%%24
set /a DD=%input%/86400
if %DD% GEQ 7 set /a DD=DD%%7
set /a WW=%input%/604800%%60
echo.
if %DD% GEQ 1 (echo %WW% 周 %DD% 天 %HH% 小时 %MM% 分 %SS% 秒
) else (
echo %DD% 天 %HH% 小时 %MM% 分 %SS% 秒
)
echo.
pause
goto begin
[ Last edited by uiopuiop on 2007-10-5 at 11:28 AM ]
|
|
|
2007-10-5 10:27 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
22 楼』:
不过。。。。。
请输入秒数(退出请直接按回车)：65356534654
Invalid number. Numbers are limited to 32-bits of precision.
Invalid number. Numbers are limited to 32-bits of precision.
Invalid number. Numbers are limited to 32-bits of precision.
Invalid number. Numbers are limited to 32-bits of precision.
Invalid number. Numbers are limited to 32-bits of precision.
29 周 25 天 10 小时 33 分 20 秒
|
|
|
2007-10-5 10:33 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
23 楼』:
算法有误
请输入秒数(退出请直接按回车)：3431253
5 周 4 天 5 小时 7 分 33 秒
好像因该时17小时，不是5小时。。。。
[ Last edited by uiopuiop on 2007-10-5 at 12:04 PM ]
|
|
|
2007-10-5 11:53 |
|
|
scriptor
银牌会员
积分 1187
发帖 555
注册 2006-12-21
状态 离线
|
|
|
2007-10-5 12:25 |
|
|
uiopuiop
中级用户
积分 400
发帖 211
注册 2007-9-30
状态 离线
|
『第
25 楼』:
你的算法很好，小弟愚笨，如何输入以秒为单位的数字，输出只要精确到秒就可以了。并且代码在一个批处理里。
能不能写出来，万分感激！
[ Last edited by uiopuiop on 2007-10-5 at 12:54 PM ]
|
|
|
2007-10-5 12:29 |
|
