15

我想用微调器向用户展示一些事情是在后台完成的，但不知道这在批处理文件中是如何工作的。

有人有线索吗？

4

12 回答 12

25

这实际上可以使用纯本机命令很容易地完成，您只需要知道如何使用其中更棘手的命令即可。不需要使用 VBScript 等外部工具或清除屏幕等讨厌的副作用。

您正在寻找的是 bash " echo -n" 命令的等效项，它输出没有换行符的行。在 XP 批处理中，这是通过使用set /p带有空输入的“”（要求用户提供提示响应）来实现的，如下所示：

<nul (set /p junk=Hello)
echo. again.

将输出字符串“Hello again”。没有干预换行符。

这个技巧（以及 CTRL-H 的使用，退格字符可以在以下测试脚本中看到，该脚本开始（一个接一个）10 秒的子任务，20 秒的超时和 15 秒的子任务10 秒超时的任务。

有效负载脚本由实际运行的脚本创建，它唯一的要求是它完成它必须做的工作，然后在完成时删除一个标志文件，以便监控功能能够检测到它。

请记住，此脚本中的 ^H 字符串实际上是 CTRL-H 字符，^| 是用于转义管道符号的两个单独字符。

@echo off

:: Localise environment.
setlocal enableextensions enabledelayedexpansion

:: Specify directories. Your current working directory is used
:: to create temporary files tmp_*.*
set wkdir=%~dp0%
set wkdir=%wkdir:~0,-1%

:: First pass, 10-second task with 20-second timeout.
del "%wkdir%\tmp_*.*" 2>nul
echo >>"%wkdir%\tmp_payload.cmd" ping 127.0.0.1 -n 11 ^>nul
echo >>"%wkdir%\tmp_payload.cmd" del "%wkdir%\tmp_payload.flg"
call :monitor "%wkdir%\tmp_payload.cmd" "%wkdir%\tmp_payload.flg" 20

:: Second pass, 15-second task with 10-second timeout.
del "%wkdir%\tmp_*.*" 2>nul:
echo >>"%wkdir%\tmp_payload.cmd" ping 127.0.0.1 -n 16 ^>nul
echo >>"%wkdir%\tmp_payload.cmd" del "%wkdir%\tmp_payload.flg"
call :monitor "%wkdir%\tmp_payload.cmd" "%wkdir%\tmp_payload.flg" 10

goto :final

:monitor
    :: Create flag file and start the payload minimized.
    echo >>%2 dummy
    start /min cmd.exe /c "%1"

    :: Start monitoring.
    ::    i is the indicator (0=|,1=/,2=-,3=\).
    ::    m is the number of seconds left before timeout.
    set i=0
    set m=%3
    <nul (set /p z=Waiting for child to finish: ^|)

    :: Loop here awaiting completion.
    :loop
        :: Wait one second.
        ping 127.0.0.1 -n 2 >nul

        :: Update counters and output progress indicator.
        set /a "i = i + 1"
        set /a "m = m - 1"
        if %i% equ 4 set i=0
        if %i% equ 0 <nul (set /p z=^H^|)
        if %i% equ 1 <nul (set /p z=^H/)
        if %i% equ 2 <nul (set /p z=^H-)
        if %i% equ 3 <nul (set /p z=^H\)

        :: End conditions, complete or timeout.
        if not exist %2 (
            echo.
            echo.   Complete.
            goto :final
        )
        if %m% leq 0 (
            echo.
            echo.   *** ERROR: Timed-out waiting for child.
            goto :final
        )
        goto :loop
:final
endlocal
于 2008-12-16T13:19:04.067 回答
5

试试这个：

@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION
CALL :BACKSPACE $BS
SET /A FULL_COUNT=60
SET /A MAX_COUNT=160
SET /A Spin_Delay=50
SET "_MSG=Process running..."
SET /A CTR=0
SET /A TCT=0
IF NOT [%1]==[] SET _MSG=%~1
IF NOT [%2]==[] SET /A FULL_COUNT=%2
IF NOT [%3]==[] SET /A SPIN_DELAY=%3
IF %FULL_COUNT% GTR %MAX_COUNT% SET FULL_COUNT=%MAX_COUNT%
(SET/P=%_MSG%*)<nul
FOR /L %%A IN (1,1,%FULL_COUNT%) DO (
  CALL :DELAY %SPIN_DELAY%
  IF !CTR! EQU 0 (set/p=%$BS%³)<nul
  IF !CTR! EQU 1 (set/p=%$BS%/)<nul
  IF !CTR! EQU 2 (set/p=%$BS%Ä)<nul
  IF !CTR! EQU 3 (set/p=%$BS%\)<nul
  SET /A CTR=%%A %% 4
)
(SET/P=%$BS%*)<nul
ENDLOCAL & EXIT /B %CTR%

:BackSpace
setlocal
for /f %%a in ('"prompt $H$S &echo on &for %%b in (1) do rem"') do set "Bs=%%a"
endlocal&call set %~1=%BS%&exit /b 0

:Delay msec
setlocal enableextensions
set/a correct=0
set/a msecs=%1+5
if /i %msecs% leq 20 set /a correct-=2
set time1=%time: =%
set/a tsecs=%1/1000 2>nul
set/a msecs=(%msecs% %% 1000)/10
for /f "tokens=1-4 delims=:." %%a in ("%time1%") do (
  set hour1=%%a&set min1=%%b&set sec1=%%c&set "mil1=%%d"
)
if /i %hour1:~0,1% equ 0 if /i "%hour1:~1%" neq "" set hour1=%hour1:~1% 
if /i %min1:~0,1% equ 0 set min1=%min1:~1% 
if /i %sec1:~0,1% equ 0 set sec1=%sec1:~1%
if /i %mil1:~0,1% equ 0 set mil1=%mil1:~1% 
set/a sec1+=(%hour1%*3600)+(%min1%*60)
set/a msecs+=%mil1%
set/a tsecs+=(%sec1%+%msecs%/100)
set/a msecs=%msecs% %% 100
::    check for midnight crossing
if /i %tsecs% geq 86400 set /a tsecs-=86400
set/a hour2=%tsecs% / 3600
set/a min2=(%tsecs%-(%hour2%*3600)) / 60
set/a sec2=(%tsecs%-(%hour2%*3600)) %% 60
set/a err=%msecs%
if /i %msecs% neq 0 set /a msecs+=%correct%
if /i 1%msecs% lss 20 set msecs=0%msecs%
if /i 1%min2% lss 20 set min2=0%min2%
if /i 1%sec2% lss 20 set sec2=0%sec2%
set time2=%hour2%:%min2%:%sec2%.%msecs%
:wait
  set timen=%time: =%
  if /i %timen% geq %time2% goto :end
goto :wait
:end
for /f "tokens=2 delims=." %%a in ("%timen%") do set num=%%a
if /i %num:~0,1% equ 0 set num=%num:~1%
set/a err=(%num%-%err%)*10
endlocal&exit /b %err%
于 2012-10-15T08:04:11.253 回答
4

如果您不介意屏幕清除...试试这个：

@ECHO OFF

SETLOCAL ENABLEDELAYEDEXPANSION
SET COUNT=1

START CALC

:BEGIN
  CLS
  IF !COUNT! EQU 1 ECHO \
  IF !COUNT! EQU 2 ECHO -
  IF !COUNT! EQU 3 ECHO /
  IF !COUNT! EQU 4 ECHO -
  IF !COUNT! EQU 4 (
    SET COUNT=1
  ) ELSE (
    SET /A COUNT+=1
  )
  PSLIST CALC >nul 2>&1
  IF %ERRORLEVEL% EQU 1 GOTO END
GOTO BEGIN

:END

编辑：此示例将启动计算器，然后显示“微调器”，直到您关闭计算器。我使用pslist检查 CALC.EXE 的存在。>nul 2>&1将STDOUT 和 STDERR 重定向到 nul，因此 PSLIST 中的任何内容都不会显示。

于 2008-12-15T16:20:30.550 回答
2

如果我理解您的问题，您想要一个微调器，因为您正在执行的某些操作需要时间，并且您想向用户展示正在发生的事情，对吗？

在这种情况下，据我所知，使用本机命令是不可能的。（如果您的程序在执行需要很长时间的操作时显示微调器，则有可能）

而且看起来 echo 不支持 ansi 转义序列（在过去你必须加载 ansi.sys，不知道它是否仍然存在）所以你不能使用 ansi 来控制光标。

于 2008-12-15T13:16:19.580 回答
1

如果您的意思是在 Windows 批处理脚本中，您不能在本地执行此操作。用于打印到控制台的 echo 语句将始终打印换行符，并且您不能移动光标。

这有点小技巧，但您可以结合使用 VBScript 和批处理脚本来做到这一点。

这个 VBScript 将打印一个退格，然后是它的参数：

WScript.StdOut.Write(chr(8) & WScript.Arguments(0))

把它放在一个文件中vbsEcho.vbs，然后从你的批处理脚本中调用这个脚本。以下批处理脚本将一直显示微调器，直到您按下 CTRL-C：

@echo off

:LOOP
cscript //nologo vbsEcho.vbs "\"
cscript //nologo vbsEcho.vbs "|"
cscript //nologo vbsEcho.vbs "/"
cscript //nologo vbsEcho.vbs "-"
goto :LOOP

编辑：使用 aphoria 答案中的一些想法，此脚本将启动 Windows 计算器，并显示一个微调器，直到计算器关闭：

@ECHO OFF

SETLOCAL ENABLEDELAYEDEXPANSION
SET COUNT=1

START CALC

cscript //nologo vbsEcho.vbs "Calculating: \"
:LOOP
IF !COUNT! EQU 1 cscript //nologo vbsEcho.vbs "|"
IF !COUNT! EQU 2 cscript //nologo vbsEcho.vbs "/"
IF !COUNT! EQU 3 cscript //nologo vbsEcho.vbs "-"
IF !COUNT! EQU 4 (
    cscript //nologo vbsEcho.vbs "\"
    set COUNT=1
) else (
    set /a COUNT+=1
)

pslist CALC >nul 2>&1
if %ERRORLEVEL% EQU 1 goto :end

goto :LOOP

:END
cscript //nologo vbsEcho.vbs ". Done."
于 2008-12-15T15:55:37.137 回答
1

微调器可以在批处理脚本中完成，您只需要一些变量：

@echo off

:spinner
set mSpinner=%mSpinner%.
if %mSpinner%'==..............................' set mSpinner=.
cls
echo %mSpinner%

rem Check if the process has finished via WMIC and/or tasklist.

goto spinner


:exit

让 BAT 本身检测正在运行/退出的进程。您可以通过WMI 命令行界面或我所知有限的 tasklist 命令来执行此操作。

如果它回到 DOS 时代，你甚至可以在不清除屏幕的情况下做到这一点......没有使用一些转义字符的组合。我不知道它在 Vista/XP 上是否仍然可行。

于 2008-12-15T16:11:47.293 回答
0

您可以使用从给定集合中打印不同字符的计数器（例如“\|/-”），然后根据“counter modulo 4”之类的方式更改字符。无论如何，您没有说您正在使用哪种语言工作，因此更准确地说有点困难。

编辑：既然我们知道您在哪个环境中玩，我会说 BAT/CMD 语言并不能真正胜任这项任务……我会推荐任何脚本语言，Ruby 是我的最爱。

于 2008-12-15T11:12:16.570 回答
0

我发现最简单的方法是更新标题——这样你就不必一直做 CLS。

使用两行 ping -n 的原因是，每次 ping 执行 1 秒的双 ping 比执行 2 秒的单 ping 更快。

此外，对于那些不知道的人，a :: 与 REM 相同，只是在解析器的开头（我认为这是正确的词）而不是结尾处忽略了注释。简而言之，该行被忽略。

:: begin spin.cmd
@echo off
setlocal

set COUNT=0
set MAXCOUNT=10
set SECONDS=1

:LOOP
title "\"
call :WAIT
title "|"
call :WAIT
title "/"
call :WAIT
title "-"
if /i "%COUNT%" equ "%MAXCOUNT%" goto :EXIT
set /a count+=1
echo %COUNT%
goto :LOOP

:WAIT
ping -n %SECONDS% 127.0.0.1 > nul
ping -n %SECONDS% 127.0.0.1 > nul
goto :EOF

:EXIT
title FIN!
endlocal
:: end spin.cmd
于 2009-08-12T18:33:41.690 回答
0

paxdiablos 有一个惊人的答案，但是必须将您的命令回显到有效负载文件中是很烦人的。它很难阅读，也很难调试。我拿了他的代码并对其进行了一些修改以供自己使用：

@echo off

:: Localise environment.
setlocal enableextensions enabledelayedexpansion

set wkdir=%~dp0%
set wkdir=%wkdir:~0,-1%
set done_flag="%wkdir%\tmp_payload.flg"
set timeout=7


:controller

IF (%1)==() (
    call :monitor step1 "Getting stuff from SourceSafe: "
    call :monitor step2 "Compiling some PHP stuff: "
    call :monitor step3 "Finishing up the rest: "
) ELSE ( goto %1 )

goto final


:step1
::ping for 5 seconds
    ping 127.0.0.1 -n 6 >nul
    del "%wkdir%\tmp_payload.flg"
goto final

:step2
::ping for 10 seconds
    ping 127.0.0.1 -n 11 >nul
    del "%wkdir%\tmp_payload.flg"
goto final

:step3
::ping for 5 seconds
    ping 127.0.0.1 -n 6 >nul
    del "%wkdir%\tmp_payload.flg"
goto final

:monitor
:: Create flag file and start the payload minimized.
:: echo the word "dummy" to the flag file (second parameter)
    echo >>%done_flag% dummy
:: start the command defined in the first parameter
    start /min cmd.exe /c "test2.bat %1"

:: Start monitoring.
::    i is the indicator (0=|,1=/,2=-,3=\).
::    m is the number of seconds left before timeout.
set i=0
set m=%timeout%
set str=%2
for /f "useback tokens=*" %%a in ('%str%') do set str=%%~a

<nul (set /p z=%str%^|)

:: Loop here awaiting completion.
:loop
    :: Wait one second.
    ping 127.0.0.1 -n 2 >nul

    :: Update counters and output progress indicator.
    set /a "i = i + 1"
    set /a "m = m - 1"
    if %i% equ 4 set i=0
    if %i% equ 0 <nul (set /p z=^|)
    if %i% equ 1 <nul (set /p z=/)
    if %i% equ 2 <nul (set /p z=-)
    if %i% equ 3 <nul (set /p z=\)

    :: End conditions, complete or timeout.
    if not exist %done_flag% (
        ::echo.
        echo Complete
        goto :final
    )
    if %m% leq 0 (
        echo.
        echo.   *** ERROR: Timed-out waiting for child.
        goto :final
    )
    goto :loop

:final
endlocal
于 2010-01-17T06:33:06.790 回答
0

此例程检查您从 cmd 启动的进程的任务列表的输出。
将 exe 的名称作为参数传递给它，例如
call :spinner calc.exe
它报告
Elapsed: 001 秒
并增加秒数，直到 exe 进程终止。
ECHO.exe -n \r 每秒都会覆盖 Elapsed 001 seconds 消息，
这会在没有换行的情况下回显 cr。
Echo.exe 位于 http://www.paulsadowski.com/wsh/cmdprogs.htm

 @echo off
 start calc
 call :spinner calc.exe
 pause

 :spinner       
 SET COUNT=1
 :BEGIN
 set "formattedValue=000000%count%"
 ECHO.exe -n Elapsed: %formattedValue:~-3% seconds
 ECHO.exe -n \r    %= -n (suppress crlf) \r output a cr =%

 SET /A COUNT+=1

 set EXE=%1    %= search output of tasklist for EXE =%
 set tl=tasklist /NH /FI "IMAGENAME eq %EXE%"
 FOR /F %%x IN ('%tl%') DO IF %%x == %EXE% goto FOUND
 set result=0
 goto FIN
 :FOUND
 set result=1
 :FIN
 IF %result% EQU 0 GOTO END

 PING -n 2 127.0.0.1 > nul    %= wait for about 1 second =%

 GOTO BEGIN
 :END
于 2015-03-12T01:02:50.677 回答
0

启动应用程序，等待加载

@echo off & setlocal enabledelayedexpansion
start application.exe
:1
for %%a in (^| ^/ ^- ^\ ^| ^/ ^- ^\) do (
for %%b in (^| ^/ ^- ^\ ^| ^/ ^- ^\) do (
for %%c in (^| ^/ ^- ^\ ^| ^/ ^- ^\) do (
cls &echo processing..%%c%%b%%a
sleep -m 20
IF EXIST "result file" (exit)
)))
goto 1
于 2017-08-02T21:02:18.907 回答
-1

:LOOP ECHOX -n "~r%Processing..." IF %CTR% EQU 4 SET /A CTR=0 IF %CTR%==0 (set /p DOT=³)

于 2009-05-26T04:58:23.993 回答