Synapses, множественный выбор возможностей
Код:
@Echo Off
Call :Blank
:Begin
Cls
Set "Sel="
FOR /F "usebackq tokens=2 delims==" %%i In (`2^>nul Set "@P1"`) DO Call Set "Sel=%%Sel%%%%i,"
If Not "%Sel%"=="" Echo === Выбрано %Sel:~0,-1% &Echo.
Echo +++ Выбирайте: &Echo.
Echo 1 - возможность 1
Echo 2 - возможность 2
Echo 3 - возможность 3
Echo 4 - возможность 4
Echo 5 - возможность 5 k
Echo 6 - возможность 6
Echo.
CHOICE /C YXZ123456 /N /M "Y-завершить выбор, X-анулировать выбор, Z-завершить работу, 1,2,3,4,5,6"
Set /A Out=%Errorlevel%
Echo.
If %Out%==3 Exit /B
If %Out%==1 GoTo :Continue
If %Out%==2 Call :Blank &GoTo :Begin
Set /A Out=%Out%+97
Set /A @P%Out%=%Out%-100
GoTo :Begin
:Continue
FOR /F "usebackq tokens=2 delims==" %%i In (`2^>nul Set "@P1"`) DO Call :Sub%%i
Echo.
pause
Exit /B
:Blank
For /L %%i In (101,1,150) Do Set "@P%%i="
Exit /B 1
:Sub1
Echo Сделали возможность 1
Exit /B
:Sub2
Echo Сделали возможность 2
Exit /B
:Sub3
Echo Сделали возможность 3
Exit /B
:Sub4
Echo Сделали возможность 4
Exit /B
:Sub5
Echo Сделали возможность 5
Exit /B
:Sub6
Echo Сделали возможность 6
Exit /B
Возможностей выбора может быть больше или именьше, например: 1,2,3,4,5,6,7,8,9,0,A,B,C,D,E,F,G итд
