Doom2 ModMenu

@echo off
mode con cols=26 lines=10
color 02
title DOOM 2
cls

set musicpatch=true
set hdoomenable=false

REM -Values-
cd bin\mods

set menulenght=10
if %musicpatch%==true (
set music=music2.wad CustomMusic.wad
)

set gfx=%music% BASE_UDV_v1.43a_BD_v19_GZDoom.pk3 UDV_bdpv24_add_in.pk3 UDV_Vanilla_add_in.pk3 UDV_Sperglord_add_in.pk3 UDV_Quaker540_add_in.pk3 UDV_PA1NKI113R_add_in.pk3 UDV_Derp_add_in.pk3 UDV_LowRes_add_in.pk3 UDV_PersistentInvRadLight_add_in.pk3 brightmaps.pk3 lights.pk3 zdoom.wad

set russianoverkill=RO_pb_2.4.pk3 DoomHDv03.pk3 %gfx%

set hdoom=m12-hdoom-techdemo5.pk3 %gfx%

set projectbrutality=Project Brutality.pk3 BDoom_Monsters.wad BDoom_Objects.wad BDoom_Weapons.wad HXRTCHUD-PBBD_V3.0.PK3 UDV_v1.62_A_BASE.pk3 WOSHUD.pk3 Allow_SV_Cheats.pk3 %music%

set reelism=reelism_x3.1.pk3 DoomHDv03.pk3 %gfx%

set projectmsx=projectmsx_v0.2a.pk3 DoomHDv03.pk3 %music%

set prodoomer=PRODOOMERV2.wad %music%

set guncaster=Guncaster.pk3 DoomHDv03.pk3 %gfx% %music%

set gbdoom=gbdoom2.wad %music%

REM -END-

:pos1
set /a pos=1
set txt=Vanilla
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%pos%
goto pos%pos%

:pos2
set /a pos=2
set txt=GFX-patch-version
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos3
set /a pos=3
set txt=Russian Overkill
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos4
set /a pos=4
set txt=H-Doom
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt% enabled:%hdoomenable%
echo.
echo position: %pos%/%menulenght%
choice /c WSAETM /n
if %errorlevel%==6 goto optm
if %errorlevel%==5 goto hde
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos5
set /a pos=5
set txt=Project Brutality
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos6
set /a pos=6
set txt=Reelism
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos7
set /a pos=7
set txt=ProjectMSX
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos8
set /a pos=8
set txt=ProDoomer
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos9
set /a pos=9
set txt=Guncaster
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%next%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:pos10
set /a pos=10
set txt=Ghostbusters
set /a next=%pos%+1
set /a prev=%pos%-1
cls
echo W = Previous    A = Accept
echo S = Next        E = Exit
echo Musicpatch=%musicpatch%
echo M=Toggle Musicpatch
echo.
echo %txt%
echo.
echo position: %pos%/%menulenght%
choice /c WSAEM /n
if %errorlevel%==5 goto optm
if %errorlevel%==4 goto opte
if %errorlevel%==3 goto opt%pos%
if %errorlevel%==2 goto pos%pos%
if %errorlevel%==1 goto pos%prev%
goto pos%pos%

:opt1
set execute=
goto execute

:opt2
set execute=%gfx%
goto execute

:opt3
set execute=%russianoverkill%
goto execute

:opt4
if %hdoomenable%==false (
cls
echo H-Doom is disabled...
echo any key to proceed
pause>nul
goto pos%pos%
) ELSE (
set execute=%hdoom%
goto execute
)

:opt5
set execute=%projectbrutality%
goto execute

:opt6
set execute=%reelism%
goto execute

:opt7
set execute=%projectmsx%
goto execute

:opt8
set execute=%prodoomer%
goto execute

:opt9
set execute=%guncaster%
goto execute

:opt10
set execute=%gbdoom%
goto execute

:execute
..\gzdoom.exe -iwad doom2.wad -file %execute%
goto pos%pos%

:hde
if %hdoomenable%==false (set hdoomenable=true) ELSE (set hdoomenable=false)
goto pos%pos%

:optm
if %musicpatch%==true (set musicpatch=false) ELSE (set musicpatch=true)
goto pos%pos%

:opte
exit