倒计时批处理 - 中国DOS联盟论坛 - 中国DOS联盟之联合DOS论坛

@echo %dbg% off
title 批处理正在倒计时...
mode con cols=51 lines=11
@echo off & SetLocal EnableDelayedExpansion
echo.

set /p= 程序将在<nul
for /l %%i in (60,-1,1) do (
if %%i LSS 10 set /p= %%i 秒后关闭！<nul
if %%i GEQ 10 set /p= %%i 秒后关闭！<nul
call :ProcDelay 60
set /p=<nul
)

::::::::::::::延时子程序:::::::::::::::::::::
:ProcDelay _Delay_
for /f "tokens=1-4 delims=:. " %%i in ("%time%") do set start=%%i%%j%%k%%l
:_TimeReturn_
for /f "tokens=1-4 delims=:. " %%i in ("%time%") do set end=%%i%%j%%k%%l
set /a s=%end%-%start%
if %s% LSS %1 goto _TimeReturn_
ENDLOCAL & GOTO :EOF

第1楼　heijueshi	发表于 2007-11-11 14:35
新手上路　发帖 1　积分 5
倒计时批处理 @echo %dbg% off title 批处理正在倒计时... mode con cols=51 lines=11 @echo off & SetLocal EnableDelayedExpansion echo. set /p= 程序将在<nul for /l %%i in (60,-1,1) do ( if %%i LSS 10 set /p= %%i 秒后关闭！<nul if %%i GEQ 10 set /p= %%i 秒后关闭！<nul call :ProcDelay 60 set /p=<nul ) ::::::::::::::延时子程序::::::::::::::::::::: :ProcDelay _Delay_ for /f "tokens=1-4 delims=:. " %%i in ("%time%") do set start=%%i%%j%%k%%l :_TimeReturn_ for /f "tokens=1-4 delims=:. " %%i in ("%time%") do set end=%%i%%j%%k%%l set /a s=%end%-%start% if %s% LSS %1 goto _TimeReturn_ ENDLOCAL & GOTO :EOF

第2楼　puzzlefocus	发表于 2007-11-13 20:02
新手上路　发帖 4　积分 8
HAO

第3楼　lkfeiyu	发表于 2007-11-17 16:00
新手上路　发帖 4　积分 10
正好用得上

第4楼　chujiafu	发表于 2007-11-17 16:07
银牌会员　发帖 595　积分 1,339　来自安徽　宿州
经实验，可用。