batch-file - 如何使用 Batch 在可滚动菜单中制作一系列切换开关？

Question

我花了好几个小时做这件事。

@echo off
set list = 0 0 1 1
:loop
cls
echo Program Select
echo --------------
set "el=0"
for %%a in (%list%) do ( 
    set /a "el+=1"
    if %%a equ 0 echo "[ ] Program %el%"
    if %%a equ 1 echo "[X] Program %el%"
)
echo ----------------------------------------------------
echo W = Up  /  S = Down  /  L  = Toggle  /  H  = Confirm
choice /C WSLH /N >nul
if %ERRORLEVEL% equ 1 set key=UP
if %ERRORLEVEL% equ 2 set key=DN
if %ERRORLEVEL% equ 3 set key=SL
if %ERRORLEVEL% equ 4 set key=CN
echo %key%
pause >nul
goto loop

现在 key 变量工作正常，我还没有实现滚动，因为我似乎无法让它甚至渲染文本。

目标是得到这样的输出

Program Select
--------------
[ ] Program 1
[ ] Program 2
[X] Program 3
[X] Program 4
----------------------------------------------------
W = Up  /  S = Down  /  L  = Toggle  /  H  = Confirm

但是，我只是得到程序选择和控件。我错过了什么？

Answer 1

这是您的代码的更“成熟”版本:

@echo off
SETLOCAL enabledelayedexpansion


:: Program names used

set "program[1]=Program one"
set "program[2]=Program two"
set "program[3]=Program three"
set "program[4]=Program four"
set /a maxprogs=4

:: symbols used for statuses

set "symbols= X"
set "symbolsc=-+"

:restart
:: Set original list status. 0=not selected, 1=selected;

set "list=0 0 1 1"
set /a cursor=1

:loop
cls
echo Program Select
echo --------------
set /a el=0
for %%a in (%list%) do ( 
    set /a el+=1
    if !el!==%cursor% (set "ds=!symbolsc:~%%a,1!") else (set "ds=!symbols:~%%a,1!")
    call set "progname=%%program[!el!]%%"
    echo [!ds!] !progname!
)
echo ----------------------------------------------------
choice /C WSLHQ /N /M "W = Up  /  S = Down  /  L  = Toggle  /  H  = Confirm / Q = Quit "
set /a key=%errorlevel%
if %key%==5 goto :eof
if %key%==4 goto confirm
if %key%==3 goto toggle
if %key%==2 if %cursor%==%maxprogs% (set /a cursor=1) else set /a cursor+=1
if %key%==1 if %cursor%==1 (set /a cursor=%maxprogs%) else set /a cursor-=1

goto loop

:confirm
echo Confirmed!
set "runany="
set /a el=0
for %%a in (%list%) do ( 
    set /a el+=1
    if %%a==1 (
     set /a runany+=1
     call set "progname=%%program[!el!]%%"
     echo Run !progname!
    )
)
if not defined runany echo None selected :(

timeout /t 5 /nobreak
goto restart

:toggle
set "newlist="
set /a el=0
for %%a in (%list%) do ( 
    set /a el+=1
    if !el!==%cursor% (
     if %%a==0 (set "newlist=!newlist! 1") else (set "newlist=!newlist! 0")
    ) else set "newlist=!newlist! %%a"
)
set "list=%newlist%"
goto loop

评论:

SETLOCAL enabledelayedexpansion 允许 !var! 在循环中访问 var 的更改值(%var% 在循环开始执行之前访问原始值。

我使用了 maxprogs 以便列表的扩展很直观 - 只需跟随弹跳球...

由于光标是静态的，我使用symbols 来表示未选中/选中状态，symbolsc 表示“光标”处于该状态时，所以 + 是 cursor-is-here-it's-selected 而 - 是 cursor-is-here-it's-not-selected

list 用法类似于您的版本 - cursor 用于当前光标行。

在 display-selections-and-prognames 部分，请注意 !el! 的使用，以访问 el 的修改值循环

这里的棘手之处在于 call set "progname=%%program[!el!]%%" 语句。这使用解析技巧来获取程序名称 el 的值。例如，假设 el 的当前值是 2，这将在子程序中执行命令 set "progname=%program[2]%" -shell 通过将 %% 解释为转义的 % 并替换为 el 的当前值。子 shell 继承其调用者的环境，因此目标变量是根据计算值分配的。

我已经修改了 choice 命令以使用图例进行提示，并添加了 Q 表示退出作为一个很好的措施。我自己会使用 UDTRQ，用于向上/向下/切换/运行/退出，但有些东西告诉我你可能不一定使用英语。

我将 errorlevel 设置为 key 以避免必须特别小心地维护它的值，然后测试 key 的仅有的 5 个值兴趣;在其他人只是哔哔声(来自 choice 和 present-again.

退出是显而易见的； cursor-move 只是增加或减少 cursor 并检查滚动的边界条件。

另外两个例程只是显示列表例程的简单修改； run 显示程序名称，因为我不知道您是要串行还是并行运行程序。

toggle 例程使用相同的技术重建 list，同时切换 cursor 的第一个元素。