Board logo

标题: 倒计时批处理 [打印本页]

作者: heijueshi     时间: 2007-11-11 14:35    标题: 倒计时批处理

@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
作者: puzzlefocus     时间: 2007-11-13 20:02
HAO
作者: lkfeiyu     时间: 2007-11-17 16:00
正好用得上
作者: chujiafu     时间: 2007-11-17 16:07
经实验,可用。