Создание bat файла

@ECHO OFF
cls
TITLE "START SERVER COUNTER-STRIKE"

rem Settings
rem Port server
set sum_port=27015
rem Port HLTV PROXY
set sum_hltv_port=27020
rem  ip connect HLTV PROXY from server
set connect=127.0.0.1
rem settings start from server
set server=/high hlds.exe -game cstrike +map de_dust2 +maxplayers 24 -nopix -console
rem settings start from  HLTV Proxy
set hltv=/MIN/HIGH hltv.exe +record hltv_  -nomaster
rem dirrectory of file playing from server on
set sound_on=F:\games\Counter-Strike\cstrike\sound\hostage\hos1.wav
rem dirrectory of file playing from server off
set sound_off=F:\games\Counter-Strike\cstrike\sound\hostage\hos2.wav
rem dirrectory of file playing from hltv on
set sound_hltv_on=F:\games\Counter-Strike\cstrike\sound\hostage\hos3.wav
rem dirrectory of file playing from hltv off
set sound_hltv_off=F:\games\Counter-Strike\cstrike\sound\hostage\hos4.wav
rem file basic of playing sound
set basic=basic.vbs
set result_server=0
set result_hltv=0
rem end

rem Function Menu
:MENU
cls
set k=0
set n=0
set answer=9
ECHO.
ECHO 1. Включить сервер
IF NOT %result_server%==%result_hltv% (
Echo 2. Включить HLTV Proxy
)
if exist hlds.txt (
Echo 3. Выключить сервер
)
if exist hltv.txt (
Echo 4. Выключить HLTV Proxy
)
ECHO 0. Выйти
ECHO.
ECHO.
set /p answer=Сделайте ваш выбор:

rem start server
if "%answer%" == "1" (
cls
if not exist hlds.txt (
    set /a result_server+=1
    start %server% +port %sum_port%
    for /f "tokens=2" %%i in (' tasklist ^| findstr "hlds.exe" ') do 1>hlds.txt echo 1 %sum_port% %%i
) else goto:start_serv
)


rem start hltv
if "%answer%" == "2" (
IF %result_server%==%result_hltv% (
  ECHO не должно запустится
) else (
if not exist hltv.txt (
     set /a result_hltv+=1
     set /a serv_hltv+=1
    start %hltv% -port %sum_hltv_port% +connect %connect%:%serv_hltv%
    for /f "tokens=2" %%i in (' tasklist ^| findstr "hltv.exe" ') do 1>hltv.txt echo 1 %sum_hltv_port% %%i
    ) else goto:start_hltv
)
)

rem off server
if "%answer%" == "3" (
cls
ECHO.
ECHO Выберите порт для отключения
setlocal enabledelayedexpansion
for /f "tokens=1,2" %%i in (hlds.txt) do (
    set /a n+=1
    echo %%i %%j
)
Echo 0. Выход
set /p answer_off_serv=Сделайте ваш выбор:
GOTO kill_serv
)

rem off hltv
if "%answer%" == "4" (
cls
ECHO.
ECHO Выберите порт для отключения
setlocal enabledelayedexpansion
for /f "tokens=1,2" %%i in (hltv.txt) do (
    set /a n+=1
    echo %%i %%j
)
Echo 0. Выход
set /p answer_off_hltv=Сделайте ваш выбор:
GOTO kill_hltv
)

rem not answer
if NOT "%answer%" == "0" (
GOTO MENU
)
if NOT "%answer%" == "1" (
GOTO MENU
)
if NOT "%answer%" == "2" (
GOTO MENU
)
if NOT "%answer%" == "3" (
GOTO MENU
)
if NOT "%answer%" == "4" (
GOTO MENU
)
if NOT "%answer%" == "5" (
GOTO MENU
)
if NOT "%answer%" == "6" (
GOTO MENU
)
if NOT "%answer%" == "9" (
GOTO MENU
)

REM Function create basic
:BEEP
ECHO Set Obj = CreateObject("WScript.Shell") >>%basic%
if "%answer%" == "1" (
set sound=%sound_on%
)
if "%answer%" == "2" (
set sound=%sound_hltv_on%
)
if "%answer%" == "3" (
set sound=%sound_off%
)
if "%answer%" == "4" (
set sound=%sound_hltv_off%
)
if "%answer%" == "5" (
set sound=%sound_off%
)
if "%answer%" == "6" (
set sound=%sound_hltv_off%
)
ECHO.Obj.Run """C:\Program Files\Windows Media Player\wmplayer.exe"" ""%sound%""", 0 >>%basic%
start %basic%
@ping 127.0.0.1 -n 2 2> nul > nul
del %basic%
GOTO :MENU

rem Start server and write Pid and Port server
:start_serv
set /a result_server+=1
for /f "tokens=2" %%i in (hlds.txt) do set /a port=%%i+1
start %server% -port %port%
for /f "tokens=1,3" %%i in (hlds.txt) do (
    
    set /a num=%%i+1
    for /f "tokens=2" %%k in (' tasklist ^| findstr "hlds.exe" ') do (
        
        if "%%j"=="%%k" (set "pid=") else (set "pid=%%k")
    
    )
    
)
1>>hlds.txt echo %num% %port% %pid%
GOTO BEEP
GOTO MENU


:: Kill proccess of file hlds.txt
:kill_serv
1>nul findstr /b "\<2\>" hlds.txt || (
    
    1>nul taskkill /im hlds.exe
    del hlds.txt
    GOTO BEEP
GOTO MENU
)
for /f "tokens=3" %%i in (' findstr /b "%answer_off_serv%" hlds.txt ') do (
    1>nul taskkill /pid %%i
    for /f "tokens=2,3" %%j in (' findstr /v "%%i" hlds.txt ') do (
        set /a cnt+=1
        1>>hlds.tmp echo !cnt! %%j %%k
))
move hlds.tmp hlds.txt
GOTO BEEP
GOTO MENU

rem Start hltv and write Pid and Port hltv
:start_hltv
set /a result_hltv+=1
set /a serv_hltv+=1
for /f "tokens=2" %%i in (hltv.txt) do set /a port_hl=%%i+1
start %hltv% -port %port_hl% +connect %connect%:%serv_hltv%
for /f "tokens=1,3" %%i in (hltv.txt) do (
    
    set /a num_hl=%%i+1
    for /f "tokens=2" %%k in (' tasklist ^| findstr "hltv.exe" ') do (
        
        if "%%j"=="%%k" (set "pid=") else (set "pid_hl=%%k")
    
    )
    
)
1>>hltv.txt echo %num_hl% %port_hl% %pid_hl%
GOTO BEEP
GOTO MENU

:: Kill process of file hltv.txt
:kill_hltv
set /a result_hltv=result_hltv-1
1>nul findstr /b "\<2\>" hltv.txt || (
    1>nul taskkill /im hltv.exe
    del hltv.txt
    GOTO BEEP
GOTO MENU
)
for /f "tokens=3" %%i in (' findstr /b "%answer_off_hltv%" hltv.txt ') do (
    1>nul taskkill /pid %%i
    for /f "tokens=2,3" %%j in (' findstr /v "%%i" hltv.txt ') do (
        set /a cnt+=1
        1>>hltv.tmp echo !cnt! %%j %%k
))
move hltv.tmp hltv.txt
GOTO BEEP
GOTO MENU