gzcmd 3.5

@echo off
set version_str=3.5
set build_date_str=1/28/2022
set gz_version_str=4.7.1
echo GZ-CMD Version is [%version_str% %build_date_str%] for GZDOOM Version [%gz_version_str%]
echo:
echo Initializing GZ-CMD Environment Variables...
echo Enabling Delayed Variable Expansion...
setlocal EnableDelayedExpansion
echo Initializing Gameplay Variables...
set iwad_str=Select an IWAD
set map_name_str=Select an IWAD
set skill_str=Select an IWAD
echo Initializing DMFlags...
set dmflags_int=0
set dmflags2_int=0
set timelimit_float=0
set fraglimit_int=0
set teamplay_bool=false
echo Initializing Network Variables...
echo:
for /f %%g in ('powershell Invoke-RestMethod api.ipify.org') do set host_str=%%g
echo Remote IP Address is [%host_str%]
set port_int=5029
set netmode_int=0
set players_int=1
set mode_name_str=Co-Operative
echo:
echo Initializing Player Variables...
echo:
set name_str=Player
set team_int=255
set team_str=None
set class_str=Select an IWAD
set color_int=0
set color_str=Select an IWAD
set gender_str=Male
set doom_complete_version_str=N/A
set doom2_version_str=N/A
set doom2f_version_str=N/A
set plutonia_version_str=N/A
set plutoniaunity_version_str=N/A
set tnt_version_str=N/A
set tntunity_version_str=N/A
set doomu_version_str=N/A
set doom_version_str=N/A
set doom1_version_str=N/A
set doom2bfg_version_str=N/A
set doom2xbox_version_str=N/A
set doom2unity_version_str=N/A
set doombfg_version_str=N/A
set doomxbox_version_str=N/A
set doomunity_version_str=N/A
set freedoom1_version_str=N/A
set freedoom2_version_str=N/A
set freedm_version_str=N/A
set heretic_version_str=N/A
set hereticsr_version_str=N/A
set heretic1_version_str=N/A
set hexen_version_str=N/A
set hexdd_version_str=N/A
set hexdemo_version_str=N/A
set strife_version_str=N/A
set sve_version_str=N/A
set strife0_version_str=N/A
set strife1_version_str=N/A
set blashpem_version_str=N/A
set chex_version_str=N/A
set chex3_version_str=N/A
set action2_version_str=N/A
set harm1_version_str=N/A
set hacx_version_str=N/A
set hacx2_version_str=N/A
set square1_version_str=N/A
set delaweare_version_str=N/A
set rotwb_version_str=N/A
if exist gzcmd_cache.bat (
    echo Found gzcmd_cache.bat. Loading IWAD Cache...
    echo:
    call gzcmd_cache.bat
    goto main_menu
    ) else (
    echo Could not find gzcmd_cache.bat. Creating new gzcmd_cache.bat file...
    echo:
    type nul>gzcmd_cache.bat
    call :scan_iwads
    )

:main_menu
call :show_banner
echo ---------
echo Main Menu
echo ---------
echo:
echo 1.) Start a Single Player Game
echo 2.) Host a Multiplayer Game
echo 3.) Join a Multiplayer Game
echo 4.) Play a Demo File
echo 5.) Rescan IWADs
echo:
echo Z.) Exit to Command Prompt
echo:
choice /c 12345z
if %errorlevel% equ 6 exit
if %errorlevel% equ 5 (
    cls
    call :scan_iwads
    call :main_menu
    )
if %errorlevel% equ 4 goto demo_menu
if %errorlevel% equ 3 goto join_menu
if %errorlevel% equ 2 goto host_menu
if %errorlevel% equ 1 goto single_menu

:single_menu
set top_menu_str=single_menu
call :show_banner
echo -------------
echo Single Player
echo -------------
echo:
echo 1.) Configure Game Options
echo 2.) Configure Player Options
if defined demo_mode_str (echo 3.^) Record a Demo File:     [%demo_file%.lmp]) else (echo 3.^) Record a Demo File:      [Off])
echo:
echo 4.) Launch GZDoom
echo:
echo Z.) Return to Main Menu
echo:
choice /c 1234z
if %errorlevel% equ 5 goto main_menu
if %errorlevel% equ 4 (
    if not defined iwad_file (
        echo No IWAD selected.
        pause
        ) else (
        start gzdoom.exe -iwad %iwad_file% -file %pwad1_file% %pwad2_file% %pwad3_file% %pwad4_file% %pwad5_file% %pwad6_file% %pwad7_file% %pwad8_file% %pwad9_file% -skill %skill_int% -%demo_mode_str% %demo_file% +map %map_str% +name %name_str% +playerclass %class_str% +team %team_int% +colorset %color_int% +gender %gender_str% +dmflags %dmflags_int% +dmflags2 %dmflags2_int%
        exit
        )
    )
if %errorlevel% equ 3 call :record_query
if %errorlevel% equ 2 goto player_menu
if %errorlevel% equ 1 goto game_menu
goto single_menu

:game_menu
set menu_str=game_menu
call :show_banner
echo ------------
echo Game Options
echo ------------
echo:
echo 1.) Select an IWAD:        [%iwad_str%]
echo 2.) Select a Map:      [%map_name_str%]
echo 3.) Select a Difficulty:   [%skill_str%]
echo 4.) Select PWAD Files
echo 5.) Configure Advanced Options
echo:
echo Z.) Return to Previous Menu
echo:
choice /c 12345z
if %errorlevel% equ 6 goto %top_menu_str%
if %errorlevel% equ 5 goto advanced_menu
if %errorlevel% equ 4 goto pwad_menu
if %errorlevel% equ 3 goto skill_menu
if %errorlevel% equ 2 goto map_menu
if %errorlevel% equ 1 goto iwad_menu

:iwad_menu
call :show_banner
echo ---------------
echo Select a Series
echo ---------------
echo:
echo 1.) DOOM
echo 2.) Heretic/Hexen
echo 3.) Strife
echo 4.) Chex Quest
echo 5.) Hacx
echo 6.) FreeDOOM
echo 7.) Other Games
echo:
echo Z.) Return to Previous Menu
echo:
choice /c 1234567z
if %errorlevel% equ 8 goto %menu_str%
if %errorlevel% equ 7 goto other_iwad_menu
if %errorlevel% equ 6 goto freedoom_iwad_menu
if %errorlevel% equ 5 goto hacx_iwad_menu
if %errorlevel% equ 4 goto chex_iwad_menu
if %errorlevel% equ 3 goto strife_iwad_menu
if %errorlevel% equ 2 goto heretic_iwad_menu
if %errorlevel% equ 1 goto doom_iwad_menu

:doom_iwad_menu
set iwad_menu_str=doom_iwad_menu
call :show_banner
echo -------------
echo Select a Game
echo -------------
echo:
echo 1.) DOOM Shareware     [%doom1_version_str%]       9.) DOOM 2: XBox Edition                [%doom2xbox_version_str%]
echo 2.) DOOM Registered        [%doom_version_str%]        0.) DOOM 2: Unity Edition               [%doom2unity_version_str%]
echo 3.) The Ultimate DOOM      [%doomu_version_str%]       A.) DOOM 2: L'Enfer sur Terre               [%doom2f_version_str%]
echo 4.) DOOM: BFG Edition      [%doombfg_version_str%]     B.) Final DOOM: TNT - Evilution             [%tnt_version_str%]
echo 5.) DOOM: XBox Edition     [%doomxbox_version_str%]        C.) Final DOOM: TNT - Evilution: Unity Edition      [%tntunity_version_str%]
echo 6.) DOOM: Unity Edition        [%doomunity_version_str%]       D.) Final DOOM: Plutonia Experiment         [%plutonia_version_str%]
echo 7.) DOOM 2: Hell on Earth  [%doom2_version_str%]       E.) Final DOOM: Plutonia Experiment: Unity Edition  [%plutoniaunity_version_str%]
echo 8.) DOOM 2: BFG Edition        [%doom2bfg_version_str%]        F.) DOOM: Complete: WadSmoosh               [%doom_complete_version_str%]
echo:
echo Z.) Return to Select a Series
echo:
choice /c 1234567890ABCDEFz
if %errorlevel% equ 17 goto iwad_menu
if %errorlevel% equ 16 call :setup_iwad doom_complete %doom_complete_file% "DOOM: Complete: WadSmoosh" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 15 call :setup_iwad plutoniaunity %plutoniaunity_file% "Final DOOM: Plutonia Experiment: Unity Edition" map01 "MAP01: Congo" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 14 call :setup_iwad plutonia %plutonia_file% "Final DOOM: Plutonia Experiment" map01 "MAP01: Congo" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 13 call :setup_iwad tntunity %tntunity_file% "Final DOOM: TNT - Evilution: Unity Edition" map01 "MAP01: System Control" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 12 call :setup_iwad tnt %tnt_file% "Final DOOM: TNT - Evilution" map01 "MAP01: System Control" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 11 call :setup_iwad doom2f %doom2f_file% "DOOM 2: L'Enfer sur Terre" map01 "MAP01: Entryway" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 10 call :setup_iwad doom2unity %doom2unity_file% "DOOM 2: Unity Edition" map01 "MAP01: Entryway" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 9 call :setup_iwad doom2xbox %doom2xbox_file% "DOOM 2: XBox Edition" map01 "MAP01: Entryway" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 8 call :setup_iwad doom2bfg %doom2bfg_file% "DOOM 2: BFG Edition" map01 "MAP01: Entryway" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 7 call :setup_iwad doom2 %doom2_file% "DOOM 2: Hell on Earth" map01 "MAP01: Entryway" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 6 call :setup_iwad doomunity %doomunity_file% "DOOM: Unity Edition" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 5 call :setup_iwad doomxbox %doomxbox_file% "DOOM: XBox Edition" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 4 call :setup_iwad doombfg %doombfg_file% "DOOM: BFG Edition" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 3 call :setup_iwad doomu %doomu_file% "The Ultimate DOOM" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 2 call :setup_iwad doom %doom_file% "DOOM Registered" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
if %errorlevel% equ 1 call :setup_iwad doom1 %doom1_file% "DOOM Shareware" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
goto %menu_str%

:heretic_iwad_menu
set iwad_menu_str=heretic_iwad_menu
call :show_banner
echo -------------
echo Select a Game
echo -------------
echo:
echo 1.) Heretic Shareware              [%heretic1_version_str%]
echo 2.) Heretic                    [%heretic_version_str%]
echo 3.) Heretic: Shadow of the Serpent Riders  [%hereticsr_version_str%]
echo 4.) Hexen: Demo Version                [%hexdemo_version_str%]
echo 5.) Hexen: Beyond Heretic          [%hexen_version_str%]
echo 6.) Hexen: Deathkings of the Dark Citadel  [%hexdd_version_str%]
echo:
echo Z.) Return to Select a Series
echo:
choice /c 123456z
if %errorlevel% equ 7 goto iwad_menu
if %errorlevel% equ 6 call :setup_iwad hexdd %hexdd_file% "Hexen: Deathkings of the Dark Citadel" map01 "MAP41: Ruined Village" Fighter Squire Gold Male
if %errorlevel% equ 5 call :setup_iwad hexen %hexen_file% "Hexen: Beyond Heretic" map01 "MAP01: Winnowing Hall" Fighter Squire Gold Male
if %errorlevel% equ 4 call :setup_iwad hexdemo %hexdemo_file% "Hexen: Demo Version" map01 "MAP01: Winnowing Hall" Fighter Squire Gold Male
if %errorlevel% equ 3 call :setup_iwad hereticsr %hereticsr_file% "Heretic: Shadow of the Serpent Riders" e1m1 "E1M1: The Docks" Corvus "Thou Needeth a Wet-Nurse" Green Male
if %errorlevel% equ 2 call :setup_iwad heretic %heretic_file% "Heretic" e1m1 "E1M1: The Docks" Corvus "Thou Needeth a Wet-Nurse" Green Male
if %errorlevel% equ 1 call :setup_iwad heretic1 %heretic1_file% "Heretic Shareware" e1m1 "E1M1: The Docks" Corvus "Thou Needeth a Wet-Nurse" Green Male
goto %menu_str%

:strife_iwad_menu
set iwad_menu_str=strife_iwad_menu
call :show_banner
echo -------------
echo Select a Game
echo -------------
echo:
echo 1.) Strife: Teaser (Old Version)   [%strife0_version_str%]
echo 2.) Strife: Teaser (New Version)   [%strife1_version_str%]
echo 3.) Strife: Quest for the Sigil        [%strife_version_str%]
echo 4.) Strife: Veteran Edition        [%sve_version_str%]
echo:
echo Z.) Return to Select a Series
echo:
choice /c 1234z
if %errorlevel% equ 5 goto iwad_menu
if %errorlevel% equ 4 call :setup_iwad sve %sve_file% "Strife: Veteran Edition" map02 "MAP02: Town" Rebel Training Brown Male
if %errorlevel% equ 3 call :setup_iwad strife %strife_file% "Strife: Quest for the Sigil" map02 "MAP02: Town" Rebel Training Brown Male
if %errorlevel% equ 2 call :setup_iwad strife1 %strife1_file% "Strife: Teaser (New Version)" map33 "MAP33: Area 2: Town" Rebel Training Brown Male
if %errorlevel% equ 1 call :setup_iwad strife0 %strife0_file% "Strife: Teaser (Old Version)" map33 "MAP33: Area 2: Town" Rebel Training Brown Male
goto %menu_str%

:chex_iwad_menu
set iwad_menu_str=chex_iwad_menu
call :show_banner
echo -------------
echo Select a Game
echo -------------
echo:
echo 1.) Chex Quest     [%chex_version_str%]
echo 2.) Chex Quest 3   [%chex3_version_str%]
echo:
echo Z.) Return to Select a Series
echo:
choice /c 12z
if %errorlevel% equ 3 goto iwad_menu
if %errorlevel% equ 2 call :setup_iwad chex3 %chex3_file% "Chex Quest 3" e1m1 "E1M1: Landing Zone" "Chex Warrior" "Easy Does It" "Light Blue" Male
if %errorlevel% equ 1 call :setup_iwad chex %chex_file% "Chex Quest" e1m1 "E1M1: Landing Zone" "Chex Warrior" "Easy Does It" "Light Blue" Male
goto %menu_str%

:hacx_iwad_menu
set iwad_menu_str=hacx_iwad_menu
call :show_banner
echo -------------
echo Select a Game
echo -------------
echo:
echo 1.) Hacx: Twitch N' Kill   [%hacx_version_str%]
echo 2.) Hacx 2.0           [%hacx2_version_str%]
echo:
echo Z.) Return to Select a Series
echo:
choice /c 12z
if %errorlevel% equ 3 goto iwad_menu
if %errorlevel% equ 2 call :setup_iwad hacx2 %hacx2_file% "Hacx 2.0" map01 "MAP01: GenEmp Corp" Hacker "Please Don't Shoot!" Unknown Male
if %errorlevel% equ 1 call :setup_iwad hacx %hacx_file% "Hacx: Twitch N' Kill" map01 "MAP01: GenEmp Corp" Hacker "Please Don't Shoot!" Unknown Male
goto %menu_str%

:freedoom_iwad_menu
set iwad_menu_str=freedoom_iwad_menu
call :show_banner
echo -------------
echo Select a Game
echo -------------
echo:
echo 1.) FreeDOOM: Phase 1  [%freedoom1_version_str%]
echo 2.) FreeDOOM: Phase 2  [%freedoom2_version_str%]
echo 3.) FreeDM     [%freedm_version_str%]
echo:
echo Z.) Return to Select a Series
echo:
choice /c 123z
if %errorlevel% equ 4 goto iwad_menu
if %errorlevel% equ 3 call :setup_iwad freedm %freedm_file% FreeDM map01 "MAP01: Tech Test" Marine "Please Don't Kill Me!" Green Male
if %errorlevel% equ 2 call :setup_iwad freedoom2 %freedoom2_file% "FreeDOOM: Phase 2" map01 "MAP01: Hydroelectric Plant" Marine "Please Don't Kill Me!" Green Male
if %errorlevel% equ 1 call :setup_iwad freedoom1 %freedoom1_file% "FreeDOOM: Phase 1" e1m1 "C1M1: Outer Prison" Marine "Please Don't Kill Me!" Green Male
goto %menu_str%

:other_iwad_menu
set iwad_menu_str=other_iwad_menu
call :show_banner
echo -------------
echo Select a Game
echo -------------
echo:
echo 1.) Blasphemer         [%blasphem_version_str%]
echo 2.) Action DOOM 2: Urban Brawl [%action2_version_str%]
echo 3.) Harmony            [%harm1_version_str%]
echo 4.) The Adventures of Square   [%square1_version_str%]
echo 5.) Delaweare          [%delaweare_version_str%]
echo 6.) Rise of the Wool Ball  [%rotwb_version_str%]
echo:
echo Z.) Return to Select a Series
echo:
choice /c 123456z
if %errorlevel% equ 7 goto iwad_menu
if %errorlevel% equ 6 call :setup_iwad rotwb %rotwb_file% "Rise of the Wool Ball" e1m1 "E1M1: Into the Woods" Marine Easy Green Female
if %errorlevel% equ 5 call :setup_iwad delaweare %delaweare_file% "Delaweare" map01 "MAP01: Delaweare" Marine "Very Easy" Green Male
if %errorlevel% equ 4 call :setup_iwad square1 %square1_file% "The Adventures of Square" e1a1 "E1A1: Welcome to Squaresville" Square "Totally Square" Purple Male
if %errorlevel% equ 3 call :setup_iwad harm1 %harm1_file% "Harmony" map01 "MAP01: Abduction" Harmony "Very Easy" Unknown Female
if %errorlevel% equ 2 call :setup_iwad action2 %action2_file% "Action DOOM 2: " map01 "MAP01: Streets of Rage: It's time for Action" Marine "Punkass Bitch" Green Male
if %errorlevel% equ 1 call :setup_iwad blasphem %blasphem_file% Blasphemer e1m1 "E1M1: noname" Corvus "Whimpering Craven" Green Male
goto %menu_str%

:map_menu
if not defined iwad_file (
    echo No IWAD selected.
    pause
    goto %menu_str%
    )
call :show_banner
echo -----------------
echo Select an Episode
echo -----------------
echo:
if %iwad_type_str%==doom1 (
    echo 1.^) Knee Deep in the Dead
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto doom_e1_menu
    )
if %iwad_type_str%==doom (
    echo 1.^) Knee Deep in the Dead
    echo 2.^) The Shores of Hell
    echo 3.^) Inferno
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123z
    if !errorlevel! equ 4 goto %menu_str%
    if !errorlevel! equ 3 goto doom_e3_menu
    if !errorlevel! equ 2 goto doom_e2_menu
    if !errorlevel! equ 1 goto doom_e1_menu
    )
if %iwad_type_str%==doomu (
    echo 1.^) Knee Deep in the Dead
    echo 2.^) The Shores of Hell
    echo 3.^) Inferno
    echo 4.^) Thy Flesh Consumed
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234z
    if !errorlevel! equ 5 goto %menu_str%
    if !errorlevel! equ 4 goto doom_e4_menu
    if !errorlevel! equ 3 goto doom_e3_menu
    if !errorlevel! equ 2 goto doom_e2_menu
    if !errorlevel! equ 1 goto doom_e1_menu
    )
if %iwad_type_str%==doombfg (
    echo 1.^) Knee Deep in the Dead
    echo 2.^) The Shores of Hell
    echo 3.^) Inferno
    echo 4.^) Thy Flesh Consumed
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234z
    if !errorlevel! equ 5 goto %menu_str%
    if !errorlevel! equ 4 goto doom_e4_menu
    if !errorlevel! equ 3 goto doom_e3_menu
    if !errorlevel! equ 2 goto doom_e2_menu
    if !errorlevel! equ 1 goto doom_e1_menu
    )
if %iwad_type_str%==doomxbox (
    echo 1.^) Knee Deep in the Dead
    echo 2.^) The Shores of Hell
    echo 3.^) Inferno
    echo 4.^) Thy Flesh Consumed
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234z
    if !errorlevel! equ 5 goto %menu_str%
    if !errorlevel! equ 4 goto doom_e4_menu
    if !errorlevel! equ 3 goto doom_e3_menu
    if !errorlevel! equ 2 goto doom_e2_menu
    if !errorlevel! equ 1 goto doom_e1xbox_menu
    )
if %iwad_type_str%==doomunity (
    echo 1.^) Knee Deep in the Dead
    echo 2.^) The Shores of Hell
    echo 3.^) Inferno
    echo 4.^) Thy Flesh Consumed
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234z
    if !errorlevel! equ 5 goto %menu_str%
    if !errorlevel! equ 4 goto doom_e4_menu
    if !errorlevel! equ 3 goto doom_e3_menu
    if !errorlevel! equ 2 goto doom_e2_menu
    if !errorlevel! equ 1 goto doom_e1_menu
    )
if %iwad_type_str%==doom2 (
    echo 1.^) Hell on Earth
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto doom_e6_menu
    )
if %iwad_type_str%==doom2f (
    echo 1.^) L'Enfer sur Terre
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto doom_e6_menu
    )
if %iwad_type_str%==doom2bfg (
    echo 1.^) Hell on Earth
    echo 2.^) No Rest for the Living
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 12z
    if !errorlevel! equ 3 goto %menu_str%
    if !errorlevel! equ 2 goto doom_e7_menu
    if !errorlevel! equ 1 goto doom_e6a_menu
    )
if %iwad_type_str%==doom2xbox (
    echo 1.^) Hell on Earth
    echo 2.^) No Rest for the Living
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 12z
    if !errorlevel! equ 3 goto %menu_str%
    if !errorlevel! equ 2 goto doom_e7_menu
    if !errorlevel! equ 1 goto doom_e6b_menu
    )
if %iwad_type_str%==doom2unity (
    echo 1.^) Hell on Earth
    echo 2.^) No Rest for the Living
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 12z
    if !errorlevel! equ 3 goto %menu_str%
    if !errorlevel! equ 2 goto doom_e7_menu
    if !errorlevel! equ 1 goto doom_e6a_menu
    )
if %iwad_type_str%==tnt (
    echo 1.^) TNT: Evolution
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto doom_e9_menu
    )
if %iwad_type_str%==tntunity (
    echo 1.^) TNT: Evolution
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto doom_e9_menu
    )
if %iwad_type_str%==plutonia (
    echo 1.^) The Plutonia Experiment
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto doom_e10_menu
    )
if %iwad_type_str%==plutoniaunity (
    echo 1.^) The Plutonia Experiment
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto doom_e10_menu
    )
if %iwad_type_str%==doom_complete (
    echo 1.^) Knee Deep in the Dead 6.^) Hell on Earth
    echo 2.^) The Shores of Hell        7.^) No Rest for the Living
    echo 3.^) Inferno           8.^) The Master Levels
    echo 4.^) Thy Flesh Consumed        9.^) TNT: Evilution
    echo 5.^) Sigil         0.^) The Plutonia Experiment
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234567890z
    if !errorlevel! equ 11 goto %menu_str%
    if !errorlevel! equ 10 goto doom_e10_menu
    if !errorlevel! equ 9 goto doom_e9_menu
    if !errorlevel! equ 8 goto doom_e8_menu
    if !errorlevel! equ 7 goto doom_e7_menu
    if !errorlevel! equ 6 goto doom_e6b_menu
    if !errorlevel! equ 5 goto doom_e5_menu
    if !errorlevel! equ 4 goto doom_e4_menu
    if !errorlevel! equ 3 goto doom_e3_menu
    if !errorlevel! equ 2 goto doom_e2_menu
    if !errorlevel! equ 1 goto doom_e1xbox_menu
    )
if %iwad_type_str%==heretic1 (
    echo 1.^) City of the Damned
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto heretic_e1_menu
    )
if %iwad_type_str%==heretic (
    echo 1.^) City of the Damned
    echo 2.^) Hell's Maw
    echo 3.^) The Dome of D'Sparil
    echo 4.^) The Ossuary
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234z
    if !errorlevel! equ 5 goto %menu_str%
    if !errorlevel! equ 4 goto heretic_e4a_menu
    if !errorlevel! equ 3 goto heretic_e3_menu
    if !errorlevel! equ 2 goto heretic_e2_menu
    if !errorlevel! equ 1 goto heretic_e1_menu
    )
if %iwad_type_str%==hereticsr (
    echo 1.^) City of the Damned
    echo 2.^) Hell's Maw
    echo 3.^) The Dome of D'Sparil
    echo 4.^) The Ossuary
    echo 5.^) The Stagnant Demesne
    echo 6.^) Fate's Path
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123456z
    if !errorlevel! equ 7 goto %menu_str%
    if !errorlevel! equ 6 goto heretic_e6_menu
    if !errorlevel! equ 5 goto heretic_e5_menu
    if !errorlevel! equ 4 goto heretic_e4_menu
    if !errorlevel! equ 3 goto heretic_e3_menu
    if !errorlevel! equ 2 goto heretic_e2_menu
    if !errorlevel! equ 1 goto heretic_e1_menu
    )
if %iwad_type_str%==hexdemo (
    echo 1.^) Hexen: Demo
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto hexen_e0_menu
    )
if %iwad_type_str%==hexen (
    echo 1.^) Hexen: Beyond Heretic
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto hexen_e1_menu
    )
if %iwad_type_str%==hexdd (
    echo 1.^) Hexen: Beyond Heretic
    echo 2.^) Deathkings of the Dark Citadel
    echo 3.^) Transit
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123z
    if !errorlevel! equ 4 goto %menu_str%
    if !errorlevel! equ 3 goto hexen_e3_menu
    if !errorlevel! equ 2 goto hexen_e2_menu
    if !errorlevel! equ 1 goto hexen_e1_menu
    )
if %iwad_type_str%==strife0 (
    echo 1.^) Strife: Teaser
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto strife_e0a_menu
    )
if %iwad_type_str%==strife1 (
    echo 1.^) Strife: Teaser
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto strife_e0_menu
    )
if %iwad_type_str%==strife (
    echo 1.^) Strife: Teaser
    echo 2.^) Strife: Quest for the Sigil
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12z
    if !errorlevel! equ 3 goto %menu_str%
    if !errorlevel! equ 2 goto strife_e1_menu
    if !errorlevel! equ 1 goto strife_e0_menu
    )
if %iwad_type_str%==sve (
    echo 1.^) Strife: Teaser
    echo 2.^) Strife: Quest for the Sigil
    echo 3.^) Capture the Chalice
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123z
    if !errorlevel! equ 4 goto %menu_str%
    if !errorlevel! equ 3 goto strife_e2_menu
    if !errorlevel! equ 2 goto strife_e1a_menu
    if !errorlevel! equ 1 goto strife_e0_menu
    )
if %iwad_type_str%==chex (
    echo 1.^) Rescue on Bazoik
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto chex_e1_menu
    )
if %iwad_type_str%==chex3 (
    echo 1.^) Rescue on Bazoik
    echo 2.^) Terror in Chex City
    echo 3.^) Invasion!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123z
    if !errorlevel! equ 4 goto %menu_str%
    if !errorlevel! equ 3 goto chex_e3_menu
    if !errorlevel! equ 2 goto chex_e2_menu
    if !errorlevel! equ 1 goto chex_e1_menu
    )
if %iwad_type_str%==hacx (
    echo 1.^) Hacx: Twitch N' Kill
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto hacx_e1_menu
    )
if %iwad_type_str%==hacx2 (
    echo 1.^) Hacx 2.0
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto hacx_e1a_menu
    )
if %iwad_type_str%==freedoom1 (
    echo 1.^) Outpost Outbreak
    echo 2.^) Military Labs
    echo 3.^) Event Horizon
    echo 4.^) Double Impact
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234z
    if !errorlevel! equ 5 goto %menu_str%
    if !errorlevel! equ 4 goto freedoom_e4_menu
    if !errorlevel! equ 3 goto freedoom_e3_menu
    if !errorlevel! equ 2 goto freedoom_e2_menu
    if !errorlevel! equ 1 goto freedoom_e1_menu
    )
if %iwad_type_str%==freedoom2 (
    echo 1.^) FreeDOOM: Phase 2
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto freedoom_e5_menu
    )
if %iwad_type_str%==freedm (
    echo 1.^) FreeDM
    echo:
    echo:Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto freedoom_e6_menu
    )
if %iwad_type_str%==blasphem (
    echo 1.^) City of the Damned
    echo 2.^) Hell's Maw
    echo 3.^) The Dome of D'Sparil
    echo 4.^) The Ossuary
    echo 5.^) The Stagnant Demesne
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 goto heretic_e5_menu
    if !errorlevel! equ 4 goto blasphem_e4_menu
    if !errorlevel! equ 3 goto heretic_e3_menu
    if !errorlevel! equ 2 goto blasphem_e2_menu
    if !errorlevel! equ 1 goto blasphem_e1_menu
    )
if %iwad_type_str%==square1 (
    echo 1.^) Cornered By Circles
    echo 2.^) Galactic Lunacy
    echo 3.^) Square-Off Play
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123z
    if !errorlevel! equ 4 goto %menu_str%
    if !errorlevel! equ 3 goto square_e3_menu
    if !errorlevel! equ 2 goto square_e2_menu
    if !errorlevel! equ 1 goto square_e1_menu
    )
if %iwad_type_str%==delaweare (
    echo 1.^) Delaweare
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto delaweare_e1_menu
    )
if %iwad_type_str%==harm1 (
    echo 1.^) Harmony
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto harm_e1_menu
    )
if %iwad_type_str%==action2 (
    echo 1.^) Action DOOM 2: Urban Brawl
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1z
    if !errorlevel! equ 2 goto %menu_str%
    if !errorlevel! equ 1 goto action2_e1_menu
    )
if %iwad_type_str%==rotwb (
    echo 1.^) Through the Bushes
    echo 2.^) Mountaintop Madness
    echo 3.^) Furry Fragfest
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123z
    if !errorlevel! equ 4 goto %menu_str%
    if !errorlevel! equ 3 goto rotwb_e3_menu
    if !errorlevel! equ 2 goto rotwb_e2_menu
    if !errorlevel! equ 1 goto rotwb_e1_menu
    )

:doom_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Hangar
echo 2.) Nuclear Plant
echo 3.) Toxin Refinery
echo 4.) Command Control
echo 5.) Phobos Lab
echo 6.) Central Processing
echo 7.) Computer Station
echo 8.) Phobos Anomaly
echo 9.) Military Base
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e1m9
    set map_name_str=E1M9: Military Base
    )
if %errorlevel% equ 8 (
    set map_str=e1m8
    set map_name_str=E1M8: Phobos Anomaly
    )
if %errorlevel% equ 7 (
    set map_str=e1m7
    set map_name_str=E1M7: Computer Station
    )
if %errorlevel% equ 6 (
    set map_str=e1m6
    set map_name_str=E1M6: Central Processing
    )
if %errorlevel% equ 5 (
    set map_str=e1m5
    set map_name_str=E1M5: Phobos Lab
    )
if %errorlevel% equ 4 (
    set map_str=e1m4
    set map_name_str=E1M4: Command Control
    )
if %errorlevel% equ 3 (
    set map_str=e1m3
    set map_name_str=E1M3: Toxin Refinery
    )
if %errorlevel% equ 2 (
    set map_str=e1m2
    set map_name_str=E1M2: Nuclear Plant
    )
if %errorlevel% equ 1 (
    set map_str=e1m1
    set map_name_str=E1M1: Hangar
    )
goto %menu_str%

:doom_e1xbox_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Hangar         6.) Central Processing
echo 2.) Nuclear Plant      7.) Computer Station
echo 3.) Toxin Refinery     8.) Phobos Anomaly
echo 4.) Command Control        9.) Military Base
echo 5.) Phobos Lab         0.) Sewers
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890z
if %errorlevel% equ 11 goto map_menu
if %errorlevel% equ 10 (
    set map_str=e1m10
    set map_name_str=E1M10: Sewers
    )
if %errorlevel% equ 9 (
    set map_str=e1m9
    set map_name_str=E1M9: Military Base
    )
if %errorlevel% equ 8 (
    set map_str=e1m8
    set map_name_str=E1M8: Phobos Anomaly
    )
if %errorlevel% equ 7 (
    set map_str=e1m7
    set map_name_str=E1M7: Computer Station
    )
if %errorlevel% equ 6 (
    set map_str=e1m6
    set map_name_str=E1M6: Central Processing
    )
if %errorlevel% equ 5 (
    set map_str=e1m5
    set map_name_str=E1M5: Phobos Lab
    )
if %errorlevel% equ 4 (
    set map_str=e1m4
    set map_name_str=E1M4: Command Control
    )
if %errorlevel% equ 3 (
    set map_str=e1m3
    set map_name_str=E1M3: Toxin Refinery
    )
if %errorlevel% equ 2 (
    set map_str=e1m2
    set map_name_str=E1M2: Nuclear Plant
    )
if %errorlevel% equ 1 (
    set map_str=e1m1
    set map_name_str=E1M1: Hangar
    )
goto %menu_str%

:doom_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Deimos Anomaly
echo 2.) Containment Area
echo 3.) Refinery
echo 4.) Deimos Lab
echo 5.) Command Center
echo 6.) Halls of the Damned
echo 7.) Spawning Vats
echo 8.) Tower of Babel
echo 9.) Fortress of Mystery
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e2m9
    set map_name_str=E2M9: Fortress of Mystery
    )
if %errorlevel% equ 8 (
    set map_str=e2m8
    set map_name_str=E2M8: Tower of Babel
    )
if %errorlevel% equ 7 (
    set map_str=e2m7
    set map_name_str=E2M7: Spawning Vats
    )
if %errorlevel% equ 6 (
    set map_str=e2m6
    set map_name_str=E2M6: Halls of the Damned
    )
if %errorlevel% equ 5 (
    set map_str=e2m5
    set map_name_str=E2M5: Command Center
    )
if %errorlevel% equ 4 (
    set map_str=e2m4
    set map_name_str=E2M4: Deimos Lab
    )
if %errorlevel% equ 3 (
    set map_str=e2m3
    set map_name_str=E2M3: Refinery
    )
if %errorlevel% equ 2 (
    set map_str=e2m2
    set map_name_str=E2M2: Containment Area
    )
if %errorlevel% equ 1 (
    set map_str=e2m1
    set map_name_str=E2M1: Deimos Anomaly
    )
goto %menu_str%

:doom_e3_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Hell Keep
echo 2.) Slough of Despair
echo 3.) Pandemonium
echo 4.) House of Pain
echo 5.) Unholy Cathedral
echo 6.) Mt. Erebus
echo 7.) Limbo
echo 8.) Dis
echo 9.) Warrens
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e3m9
    set map_name_str=E3M9: Warrens
    )
if %errorlevel% equ 8 (
    set map_str=e3m8
    set map_name_str=E3M8: Dis
    )
if %errorlevel% equ 7 (
    set map_str=e3m7
    set map_name_str=E3M7: Limbo
    )
if %errorlevel% equ 6 (
    set map_str=e3m6
    set map_name_str=E3M6: Mt. Erebus
    )
if %errorlevel% equ 5 (
    set map_str=e3m5
    set map_name_str=E3M5: Unholy Cathedral
    )
if %errorlevel% equ 4 (
    set map_str=e3m4
    set map_name_str=E3M4: House of Pain
    )
if %errorlevel% equ 3 (
    set map_str=e3m3
    set map_name_str=E3M3: Pandemonium
    )
if %errorlevel% equ 2 (
    set map_str=e3m2
    set map_name_str=E3M2: Slough of Despair
    )
if %errorlevel% equ 1 (
    set map_str=e3m1
    set map_name_str=E3M1: Hell Keep
    )
goto %menu_str%

:doom_e4_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Hell Beneath
echo 2.) Perfect Hatred
echo 3.) Sever The Wicked
echo 4.) Unruly Evil
echo 5.) They Will Repent
echo 6.) Against Thee Wickedly
echo 7.) And Hell Followed
echo 8.) Unto The Cruel
echo 9.) Fear
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e4m9
    set map_name_str=E4M9: Fear
    )
if %errorlevel% equ 8 (
    set map_str=e4m8
    set map_name_str=E4M8: Unto The Cruel
    )
if %errorlevel% equ 7 (
    set map_str=e4m7
    set map_name_str=E4M7: And Hell Followed
    )
if %errorlevel% equ 6 (
    set map_str=e4m6
    set map_name_str=E4M6: Against Thee Wickedly
    )
if %errorlevel% equ 5 (
    set map_str=e4m5
    set map_name_str=E4M5: They Will Repent
    )
if %errorlevel% equ 4 (
    set map_str=e4m4
    set map_name_str=E4M4: Unruly Evil
    )
if %errorlevel% equ 3 (
    set map_str=e4m3
    set map_name_str=E4M3: Sever The Wicked
    )
if %errorlevel% equ 2 (
    set map_str=e4m2
    set map_name_str=E4M2: Perfect Hatred
    )
if %errorlevel% equ 1 (
    set map_str=e4m1
    set map_name_str=E4M1: Hell Beneath
    )
goto %menu_str%

:doom_e5_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Baphomet's Demesne
echo 2.) Sheol
echo 3.) Cages of the Damned
echo 4.) Paths of Wretchedness
echo 5.) Abaddon's Void
echo 6.) Unspeakable Persecution
echo 7.) Nightmare Underworld
echo 8.) Halls of Perdition
echo 9.) Realm of Iblis
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e5m9
    set map_name_str=E5M9: Realm of Iblis
    )
if %errorlevel% equ 8 (
    set map_str=e5m8
    set map_name_str=E5M8: Halls of Perdition
    )
if %errorlevel% equ 7 (
    set map_str=e5m7
    set map_name_str=E5M7: Nightmare Underworld
    )
if %errorlevel% equ 6 (
    set map_str=e5m6
    set map_name_str=E5M6: Unspeakable Persecution
    )
if %errorlevel% equ 5 (
    set map_str=e5m5
    set map_name_str=E5M5: Abaddon's Void
    )
if %errorlevel% equ 4 (
    set map_str=e5m4
    set map_name_str=E5M4: Paths of Wretchedness
    )
if %errorlevel% equ 3 (
    set map_str=e5m3
    set map_name_str=E5M3: Cages of the Damned
    )
if %errorlevel% equ 2 (
    set map_str=e5m2
    set map_name_str=E5M2: Sheol
    )
if %errorlevel% equ 1 (
    set map_str=e5m1
    set map_name_str=E5M1: Baphomet's Demesne
    )
goto %menu_str%

:doom_e6_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Entryway       9.) The Pit     G.) Tenements       O.) Bloodfalls
echo 2.) Underhalls     0.) Refueling Base  H.) The Courtyard   P.) The Abandoned Mines
echo 3.) The Gantlet        A.) 'O' of Destruction  I.) The Citadel     Q.) Monster Condo
echo 4.) The Focus      B.) The Factory     J.) Gotcha      R.) The Spirit World
echo 5.) The Waste Tunnels  C.) Downtown        K.) Nirvana     S.) The Living End
echo 6.) The Crusher        D.) The Inmost Dens L.) The Catacombs   T.) Icon of Sin
echo 7.) Dead Simple        E.) Industrial Zone M.) Barrels O' Fun  U.) Wolfenstein
echo 8.) Tricks and Traps   F.) Suburbs     N.) The Chasm       V.) Grosse
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvz
if %errorlevel% equ 33 goto map_menu
if %errorlevel% equ 32 (
    set map_str=map32
    set map_name_str=MAP32: Grosse
    )
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: Wolfenstein
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Icon of Sin
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: The Living End
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: The Spirit World
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: Monster Condo
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: The Abandoned Mines
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Bloodfalls
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: The Chasm
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Barrels O' Fun
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: The Catacombs
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: Nirvana
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Gotcha
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: The Citadel
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: The Courtyard
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: Tenements
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Suburbs
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Industrial Zone
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: The Inmost Dens
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Downtown
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: The Factory
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: 'O' of Destruction
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: Refueling Base
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: The Pit
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Tricks and Traps
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: Dead Simple
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: The Crusher
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: The Waste Tunnels
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: The Focus
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: The Gantlet
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Underhalls
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Entryway
    )
goto %menu_str%

:doom_e6a_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Entryway       0.) Refueling Base  I.) The Citadel     R.) The Spirit World
echo 2.) Underhalls     A.) 'O' of Destruction  J.) Gotcha      S.) The Living End
echo 3.) The Gantlet            B.) The Factory     K.) Nirvana     T.) Icon of Sin
echo 4.) The Focus      C.) Downtown        L.) The Catacombs   U.) IDKFA
echo 5.) The Waste Tunnels  D.) The Inmost Dens M.) Barrels O' Fun  V.) Keen
echo 6.) The Crusher        E.) Industrial Zone N.) The Chasm       W.) Betray
echo 7.) Dead Simple        F.) Suburbs     O.) Bloodfalls
echo 8.) Tricks and Traps   G.) Tenements       P.) The Abandoned Mines
echo 9.) The Pit        H.) The Courtyard   Q.) Monster Condo
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvwz
if %errorlevel% equ 34 goto map_menu
if %errorlevel% equ 33 (
    set map_str=map33
    set map_name_str=MAP33: Betray
    )
if %errorlevel% equ 32 (
    set map_str=map32
    set map_name_str=MAP32: Keen
    )
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: IDKFA
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Icon of Sin
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: The Living End
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: The Spirit World
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: Monster Condo
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: The Abandoned Mines
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Bloodfalls
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: The Chasm
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Barrels O' Fun
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: The Catacombs
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: Nirvana
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Gotcha
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: The Citadel
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: The Courtyard
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: Tenements
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Suburbs
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Industrial Zone
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: The Inmost Dens
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Downtown
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: The Factory
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: 'O' of Destruction
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: Refueling Base
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: The Pit
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Tricks and Traps
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: Dead Simple
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: The Crusher
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: The Waste Tunnels
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: The Focus
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: The Gantlet
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Underhalls
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Entryway
    )
goto %menu_str%


:doom_e6b_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Entryway       0.) Refueling Base  I.) The Citadel     R.) The Spirit World
echo 2.) Underhalls     A.) 'O' of Destruction  J.) Gotcha      S.) The Living End
echo 3.) The Gantlet            B.) The Factory     K.) Nirvana     T.) Icon of Sin
echo 4.) The Focus      C.) Downtown        L.) The Catacombs   U.) Wolfenstein
echo 5.) The Waste Tunnels  D.) The Inmost Dens M.) Barrels O' Fun  V.) Grosse
echo 6.) The Crusher        E.) Industrial Zone N.) The Chasm       W.) Betray
echo 7.) Dead Simple        F.) Suburbs     O.) Bloodfalls
echo 8.) Tricks and Traps   G.) Tenements       P.) The Abandoned Mines
echo 9.) The Pit        H.) The Courtyard   Q.) Monster Condo
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvwz
if %errorlevel% equ 34 goto map_menu
if %errorlevel% equ 33 (
    set map_str=map33
    set map_name_str=MAP33: Betray
    )
if %errorlevel% equ 32 (
    set map_str=map32
    set map_name_str=MAP32: Grosse
    )
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: Wolfenstein
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Icon of Sin
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: The Living End
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: The Spirit World
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: Monster Condo
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: The Abandoned Mines
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Bloodfalls
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: The Chasm
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Barrels O' Fun
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: The Catacombs
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: Nirvana
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Gotcha
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: The Citadel
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: The Courtyard
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: Tenements
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Suburbs
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Industrial Zone
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: The Inmost Dens
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Downtown
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: The Factory
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: 'O' of Destruction
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: Refueling Base
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: The Pit
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Tricks and Traps
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: Dead Simple
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: The Crusher
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: The Waste Tunnels
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: The Focus
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: The Gantlet
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Underhalls
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Entryway
    )
goto %menu_str%

:doom_e7_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) The Earth Base
echo 2.) The Pain Labs
echo 3.) Canyon of the Dead
echo 4.) Hell Mountain
echo 5.) Vivisection
echo 6.) Inferno of Blood
echo 7.) Baron's Banquet
echo 8.) Tomb of Malevolence
echo 9.) March of the Demons
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map09
        set map_name_str=NV_MAP09: March of the Demons
        ) else (
        set map_str=level09
        set map_name_str=LEVEL09: March of the Demons
        )
    )
if %errorlevel% equ 8 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map08
        set map_name_str=NV_MAP08: Tomb of Malevolence
        ) else (
        set map_str=level08
        set map_name_str=LEVEL08: Tomb of Malevolence
        )
    )
if %errorlevel% equ 7 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map07
        set map_name_str=NV_MAP07: Baron's Banquet
        ) else (
        set map_str=level07
        set map_name_str=LEVEL07: Baron's Banquet
        )
    )
if %errorlevel% equ 6 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map06
        set map_name_str=NV_MAP06: Inferno of Blood
        ) else (
        set map_str=level06
        set map_name_str=LEVEL06: Inferno of Blood
        )
    )
if %errorlevel% equ 5 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map05
        set map_name_str=NV_MAP05: Vivisection
        ) else (
        set map_str=level05
        set map_name_str=LEVEL05: Vivisection
        )
    )
if %errorlevel% equ 4 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map04
        set map_name_str=NV_MAP04: Hell Mountain
        ) else (
        set map_str=level04
        set map_name_str=LEVEL04: Hell Mountain
        )
    )
if %errorlevel% equ 3 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map03
        set map_name_str=NV_MAP03: Canyon of the Dead
        ) else (
        set map_str=level03
        set map_name_str=LEVEL03: Canyon of the Dead
        )
    )
if %errorlevel% equ 2 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map02
        set map_name_str=NV_MAP02: The Pain Labs
        ) else (
        set map_str=level02
        set map_name_str=LEVEL02: The Pain Labs
        )
    )
if %errorlevel% equ 1 (
    if %iwad_type_str%==doom_complete (
        set map_str=nv_map01
        set map_name_str=NV_MAP01: The Earth Base
        ) else (
        set map_str=level01
        set map_name_str=LEVEL01: The Earth Base
        )
    )
goto %menu_str%

:doom_e8_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Attack     8.) Subterra        E.) Vesperas
echo 2.) Canyon     9.) The Garrison    F.) Titan Manor
echo 3.) The Catwalk        0.) Black Tower     G.) Trapped on Titan
echo 4.) The Fistula        A.) Virgil's Lead   H.) The Express Elevator to Hell
echo 5.) The Combine        B.) Minos' Judgement    I.) Bloodsea Keep
echo 6.) Subspace       C.) Nessus      J.) Mephisto's Maosoleum
echo 7.) Paradox        D.) Geryon      K.) Bad Dream
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijkz
if %errorlevel% equ 22 goto map_menu
if %errorlevel% equ 21 (
    set map_str=ml_map21
    set map_name_str=ML_MAP21: Bad Dream
    )
if %errorlevel% equ 20 (
    set map_str=ml_map20
    set map_name_str=ML_MAP20: Mephisto's Maosoleum
    )
if %errorlevel% equ 19 (
    set map_str=ml_map19
    set map_name_str=ML_MAP19: Bloodsea Keep
    )
if %errorlevel% equ 18 (
    set map_str=ml_map18
    set map_name_str=ML_MAP18: The Express Elevator to Hell
    )
if %errorlevel% equ 17 (
    set map_str=ml_map17
    set map_name_str=ML_MAP17: Trapped on Titan
    )
if %errorlevel% equ 16 (
    set map_str=ml_map16
    set map_name_str=ML_MAP16: Titan Manor
    )
if %errorlevel% equ 15 (
    set map_str=ml_map15
    set map_name_str=ML_MAP15: Vesperas
    )
if %errorlevel% equ 14 (
    set map_str=ml_map14
    set map_name_str=ML_MAP14: Geryon
    )
if %errorlevel% equ 13 (
    set map_str=ml_map13
    set map_name_str=ML_MAP13: Nessus
    )
if %errorlevel% equ 12 (
    set map_str=ml_map12
    set map_name_str=ML_MAP12: Minos' Judgement
    )
if %errorlevel% equ 11 (
    set map_str=ml_map11
    set map_name_str=ML_MAP11: Virgil's Lead
    )
if %errorlevel% equ 10 (
    set map_str=ml_map10
    set map_name_str=ML_MAP10: Black Tower
    )
if %errorlevel% equ 9 (
    set map_str=ml_map09
    set map_name_str=ML_MAP09: The Garrison
    )
if %errorlevel% equ 8 (
    set map_str=ml_map08
    set map_name_str=ML_MAP08: Subterra
    )
if %errorlevel% equ 7 (
    set map_str=ml_map07
    set map_name_str=ML_MAP07: Paradox
    )
if %errorlevel% equ 6 (
    set map_str=ml_map06
    set map_name_str=ML_MAP06: Subspace
    )
if %errorlevel% equ 5 (
    set map_str=ml_map05
    set map_name_str=ML_MAP05: The Combine
    )
if %errorlevel% equ 4 (
    set map_str=ml_map04
    set map_name_str=ML_MAP04: The Fistula
    )
if %errorlevel% equ 3 (
    set map_str=ml_map03
    set map_name_str=ML_MAP03: The Catwalk
    )
if %errorlevel% equ 2 (
    set map_str=ml_map02
    set map_name_str=ML_MAP02: Canyon
    )
if %errorlevel% equ 1 (
    set map_str=ml_map01
    set map_name_str=ML_MAP01: Attack
    )
goto %menu_str%

:doom_e9_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) System Control 9.) Stronghold      G.) Processing Area     O.) Baron's Den
echo 2.) Human BBQ      0.) Redemption      H.) Mill            P.) Ballistyx
echo 3.) Power Control      A.) Storage Facility    I.) Shipping/respawning     Q.) Mount Pain
echo 4.) Wormhole       B.) Crater      J.) Central Processing      R.) Heck
echo 5.) Hanger     C.) Nukage Processing   K.) Administration Center   S.) River Styx
echo 6.) Open Season        D.) Steel Works     L.) Habitat         T.) Last Call
echo 7.) Prison     E.) Dead Zone       M.) Lunar Mining Project    U.) Pharaoh
echo 8.) Metal      F.) Deepest Reaches N.) Quarry          V.) Caribbean
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvz
if %errorlevel% equ 33 goto map_menu
if %errorlevel% equ 32 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map32
        set map_name_str=TN_MAP32: Carribean
        ) else (
        set map_str=map32
        set map_name_str=MAP32: Carribean
        )
    )
if %errorlevel% equ 31 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map31
        set map_name_str=TN_MAP31: Pharaoh
        ) else (
        set map_str=map31
        set map_name_str=MAP31: Pharaoh
        )
    )
if %errorlevel% equ 30 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map30
        set map_name_str=TN_MAP30: Last Call
        ) else (
        set map_str=map30
        set map_name_str=MAP30: Last Call
        )
    )
if %errorlevel% equ 29 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map29
        set map_name_str=TN_MAP29: River Styx
        ) else (
        set map_str=map29
        set map_name_str=MAP29: River Styx
        )
    )
if %errorlevel% equ 28 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map28
        set map_name_str=TN_MAP28: Heck
        ) else (
        set map_str=map28
        set map_name_str=MAP28: Heck
        )
    )
if %errorlevel% equ 27 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map27
        set map_name_str=TN_MAP27: Mount Pain
        ) else (
        set map_str=map27
        set map_name_str=MAP27: Mount Pain
        )
    )
if %errorlevel% equ 26 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map26
        set map_name_str=TN_MAP26: Ballistyx
        ) else (
        set map_str=map26
        set map_name_str=MAP26: Ballistyx
        )
    )
if %errorlevel% equ 25 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map25
        set map_name_str=TN_MAP25: Baron's Den
        ) else (
        set map_str=map25
        set map_name_str=MAP25: Baron's Den
        )
    )
if %errorlevel% equ 24 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map24
        set map_name_str=TN_MAP24: Quarry
        ) else (
        set map_str=map24
        set map_name_str=MAP24: Quarry
        )
    )
if %errorlevel% equ 23 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map23
        set map_name_str=TN_MAP23: Lunar Mining Project
        ) else (
        set map_str=map23
        set map_name_str=MAP23: Lunar Mining Project
        )
    )
if %errorlevel% equ 22 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map22
        set map_name_str=TN_MAP22: Habitat
        ) else (
        set map_str=map22
        set map_name_str=MAP22: Habitat
        )
    )
if %errorlevel% equ 21 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map21
        set map_name_str=TN_MAP21: Administration Center
        ) else (
        set map_str=map21
        set map_name_str=MAP21: Administration Center
        )
    )
if %errorlevel% equ 20 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map20
        set map_name_str=TN_MAP20: Central Processing
        ) else (
        set map_str=map20
        set map_name_str=MAP20: Central Processing
        )
    )
if %errorlevel% equ 19 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map19
        set map_name_str=TN_MAP19: Shipping/respawning
        ) else (
        set map_str=map19
        set map_name_str=MAP19: Shipping/respawning
        )
    )
if %errorlevel% equ 18 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map18
        set map_name_str=TN_MAP18: Mill
        ) else (
        set map_str=map18
        set map_name_str=MAP18: Mill
        )
    )
if %errorlevel% equ 17 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map17
        set map_name_str=TN_MAP17: Processing Area
        ) else (
        set map_str=map17
        set map_name_str=MAP17: Processing Area
        )
    )
if %errorlevel% equ 16 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map16
        set map_name_str=TN_MAP16: Deepest Reaches
        ) else (
        set map_str=map16
        set map_name_str=MAP16: Deepest Reaches
        )
    )
if %errorlevel% equ 15 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map15
        set map_name_str=TN_MAP15: Dead Zone
        ) else (
        set map_str=map15
        set map_name_str=MAP15: Dead Zone
        )
    )
if %errorlevel% equ 14 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map14
        set map_name_str=TN_MAP14: Steel Works
        ) else (
        set map_str=map14
        set map_name_str=MAP14: Steel Works
        )
    )
if %errorlevel% equ 13 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map13
        set map_name_str=TN_MAP13: Nukage Processing
        ) else (
        set map_str=map13
        set map_name_str=MAP13: Nukage Processing
        )
    )
if %errorlevel% equ 12 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map12
        set map_name_str=TN_MAP12: Crater
        ) else (
        set map_str=map12
        set map_name_str=MAP12: Crater
        )
    )
if %errorlevel% equ 11 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map11
        set map_name_str=TN_MAP11: Storage Facility
        ) else (
        set map_str=map11
        set map_name_str=MAP11: Storage Facility
        )
    )
if %errorlevel% equ 10 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map10
        set map_name_str=TN_MAP10: Redemption
        ) else (
        set map_str=map10
        set map_name_str=MAP10: Redemption
        )
    )
if %errorlevel% equ 9 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map09
        set map_name_str=TN_MAP09: Stronghold
        ) else (
        set map_str=map09
        set map_name_str=MAP09: Stronghold
        )
    )
if %errorlevel% equ 8 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map08
        set map_name_str=TN_MAP08: Metal
        ) else (
        set map_str=map08
        set map_name_str=MAP08: Metal
        )
    )
if %errorlevel% equ 7 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map07
        set map_name_str=TN_MAP07: Prison
        ) else (
        set map_str=map07
        set map_name_str=MAP07: Prison
        )
    )
if %errorlevel% equ 6 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map06
        set map_name_str=TN_MAP06: Open Season
        ) else (
        set map_str=map06
        set map_name_str=MAP06: Open Season
        )
    )
if %errorlevel% equ 5 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map05
        set map_name_str=TN_MAP05: Hanger
        ) else (
        set map_str=map05
        set map_name_str=MAP05: Hanger
        )
    )
if %errorlevel% equ 4 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map04
        set map_name_str=TN_MAP04: Wormhole
        ) else (
        set map_str=map04
        set map_name_str=MAP04: Wormhole
        )
    )
if %errorlevel% equ 3 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map03
        set map_name_str=TN_MAP03: Power Control
        ) else (
        set map_str=map03
        set map_name_str=MAP03: Power Control
        )
    )
if %errorlevel% equ 2 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map02
        set map_name_str=TN_MAP02: Human BBQ
        ) else (
        set map_str=map02
        set map_name_str=MAP02: Human BBQ
        )
    )
if %errorlevel% equ 1 (
    if %iwad_type_str%==doom_complete (
        set map_str=tn_map01
        set map_name_str=TN_MAP01: System Control
        ) else (
        set map_str=map01
        set map_name_str=MAP01: System Control
        )
    )
goto %menu_str%

:doom_e10_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Congo      9.) Abattoire       G.) Compound        O.) The Temple of Darkness
echo 2.) Well of Souls  0.) Onslaught       H.) Neurosphere     P.) Bunker
echo 3.) Aztec          A.) Hunted      I.) NME         Q.) Anti-christ
echo 4.) Caged      B.) Speed       J.) The Death Domain    R.) The Sewers
echo 5.) Ghost Town     C.) The Crypt       K.) Slayer      S.) Odyssey of Noises
echo 6.) Baron's Lair   D.) Genesis     L.) Impossible Mission  T.) The Gateway of Hell
echo 7.) Caughtyard     E.) The Twilight    M.) Tombstone       U.) Cyberden
echo 8.) Realm      F.) The Omen        N.) The Final Frontier  V.) Go 2 It
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvz
if %errorlevel% equ 33 goto map_menu
if %errorlevel% equ 32 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map32
        set map_name_str=PL_MAP32: Go 2 It
        ) else (
        set map_str=map32
        set map_name_str=MAP32: Go 2 It
        )
    )
if %errorlevel% equ 31 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map31
        set map_name_str=PL_MAP31: Cyberden
        ) else (
        set map_str=map31
        set map_name_str=MAP31: Cyberden
        )
    )
if %errorlevel% equ 30 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map30
        set map_name_str=PL_MAP30: The Gateway of Hell
        ) else (
        set map_str=map30
        set map_name_str=MAP30: The Gateway of Hell
        )
    )
if %errorlevel% equ 29 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map29
        set map_name_str=PL_MAP29: Odyssey of Noises
        ) else (
        set map_str=map29
        set map_name_str=MAP29: Odyssey of Noises
        )
    )
if %errorlevel% equ 28 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map28
        set map_name_str=PL_MAP28: The Sewers
        ) else (
        set map_str=map28
        set map_name_str=MAP28: The Sewers
        )
    )
if %errorlevel% equ 27 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map27
        set map_name_str=PL_MAP27: Anti-christ
        ) else (
        set map_str=map27
        set map_name_str=MAP27: Anti-christ
        )
    )
if %errorlevel% equ 26 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map26
        set map_name_str=PL_MAP26: Bunker
        ) else (
        set map_str=map26
        set map_name_str=MAP26: Bunker
        )
    )
if %errorlevel% equ 25 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map25
        set map_name_str=PL_MAP25: The Temple of Darkness
        ) else (
        set map_str=map25
        set map_name_str=MAP25: The Temple of Darkness
        )
    )
if %errorlevel% equ 24 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map24
        set map_name_str=PL_MAP24: The Final Frontier
        ) else (
        set map_str=map24
        set map_name_str=MAP24: The Final Frontier
        )
    )
if %errorlevel% equ 23 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map23
        set map_name_str=PL_MAP23: Tombstone
        ) else (
        set map_str=map23
        set map_name_str=MAP23: Tombstone
        )
    )
if %errorlevel% equ 22 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map22
        set map_name_str=PL_MAP22: Impossible Mission
        ) else (
        set map_str=map22
        set map_name_str=MAP22: Impossible Mission
        )
    )
if %errorlevel% equ 21 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map21
        set map_name_str=PL_MAP21: Slayer
        ) else (
        set map_str=map21
        set map_name_str=MAP21: Slayer
        )
    )
if %errorlevel% equ 20 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map20
        set map_name_str=PL_MAP20: The Death Domain
        ) else (
        set map_str=map20
        set map_name_str=MAP20: The Death Domain
        )
    )
if %errorlevel% equ 19 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map19
        set map_name_str=PL_MAP19: NME
        ) else (
        set map_str=map19
        set map_name_str=MAP19: NME
        )
    )
if %errorlevel% equ 18 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map18
        set map_name_str=PL_MAP18: Neurosphere
        ) else (
        set map_str=map18
        set map_name_str=MAP18: Neurosphere
        )
    )
if %errorlevel% equ 17 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map17
        set map_name_str=PL_MAP17: Compound
        ) else (
        set map_str=map17
        set map_name_str=MAP17: Compound
        )
    )
if %errorlevel% equ 16 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map16
        set map_name_str=PL_MAP16: The Omen
        ) else (
        set map_str=map16
        set map_name_str=MAP16: The Omen
        )
    )
if %errorlevel% equ 15 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map15
        set map_name_str=PL_MAP15: The Twilight
        ) else (
        set map_str=map15
        set map_name_str=MAP15: The Twilight
        )
    )
if %errorlevel% equ 14 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map14
        set map_name_str=PL_MAP14: Genesis
        ) else (
        set map_str=map14
        set map_name_str=MAP14: Genesis
        )
    )
if %errorlevel% equ 13 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map13
        set map_name_str=PL_MAP13: The Crypt
        ) else (
        set map_str=map13
        set map_name_str=MAP13: The Crypt
        )
    )
if %errorlevel% equ 12 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map12
        set map_name_str=PL_MAP12: Speed
        ) else (
        set map_str=map12
        set map_name_str=MAP12: Speed
        )
    )
if %errorlevel% equ 11 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map11
        set map_name_str=PL_MAP11: Hunted
        ) else (
        set map_str=map11
        set map_name_str=MAP11: Hunted
        )
    )
if %errorlevel% equ 10 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map10
        set map_name_str=PL_MAP10: Onslaught
        ) else (
        set map_str=map10
        set map_name_str=MAP10: Onslaught
        )
    )
if %errorlevel% equ 9 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map09
        set map_name_str=PL_MAP09: Abattoire
        ) else (
        set map_str=map09
        set map_name_str=MAP09: Abattoire
        )
    )
if %errorlevel% equ 8 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map08
        set map_name_str=PL_MAP08: Realm
        ) else (
        set map_str=map08
        set map_name_str=MAP08: Realm
        )
    )
if %errorlevel% equ 7 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map07
        set map_name_str=PL_MAP07: Caughtyard
        ) else (
        set map_str=map07
        set map_name_str=MAP07: Caughtyard
        )
    )
if %errorlevel% equ 6 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map06
        set map_name_str=PL_MAP06: Baron's Lair
        ) else (
        set map_str=map06
        set map_name_str=MAP06: Baron's Lair
        )
    )
if %errorlevel% equ 5 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map05
        set map_name_str=PL_MAP05: Ghost Town
        ) else (
        set map_str=map05
        set map_name_str=MAP05: Ghost Town
        )
    )
if %errorlevel% equ 4 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map04
        set map_name_str=PL_MAP04: Caged
        ) else (
        set map_str=map04
        set map_name_str=MAP04: Caged
        )
    )
if %errorlevel% equ 3 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map03
        set map_name_str=PL_MAP03: Aztec
        ) else (
        set map_str=map03
        set map_name_str=MAP03: Aztec
        )
    )
if %errorlevel% equ 2 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map02
        set map_name_str=PL_MAP02: Well of Souls
        ) else (
        set map_str=map02
        set map_name_str=MAP02: Well of Souls
        )
    )
if %errorlevel% equ 1 (
    if %iwad_type_str%==doom_complete (
        set map_str=pl_map01
        set map_name_str=PL_MAP01: Congo
        ) else (
        set map_str=map01
        set map_name_str=MAP01: Congo
        )
    )
goto %menu_str%

:heretic_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) The Docks
echo 2.) The Dungeons
echo 3.) The Gatehouse
echo 4.) The Guard Tower
echo 5.) The Citadel
echo 6.) The Cathedral
echo 7.) The Crypts
echo 8.) Hell's Maw
echo 9.) The Graveyard
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e1m9
    set map_name_str=E1M9: The Graveyard
    )
if %errorlevel% equ 8 (
    set map_str=e1m8
    set map_name_str=E1M8: Hell's Maw
    )
if %errorlevel% equ 7 (
    set map_str=e1m7
    set map_name_str=E1M7: The Crypts
    )
if %errorlevel% equ 6 (
    set map_str=e1m6
    set map_name_str=E1M6: The Cathedral
    )
if %errorlevel% equ 5 (
    set map_str=e1m5
    set map_name_str=E1M5: The Citadel
    )
if %errorlevel% equ 4 (
    set map_str=e1m4
    set map_name_str=E1M4: The Guard Tower
    )
if %errorlevel% equ 3 (
    set map_str=e1m3
    set map_name_str=E1M3: The Gatehouse
    )
if %errorlevel% equ 2 (
    set map_str=e1m2
    set map_name_str=E1M2: The Dungeons
    )
if %errorlevel% equ 1 (
    set map_str=e1m1
    set map_name_str=E1M1: The Docks
    )
goto %menu_str%

:heretic_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) The Crater
echo 2.) The Lava Pits
echo 3.) The River of Fire
echo 4.) The Ice Grotto
echo 5.) The Catacombs
echo 6.) The Labyrinth
echo 7.) The Great Hall
echo 8.) The Portals of Chaos
echo 9.) The Glacier
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e2m9
    set map_name_str=E2M9: The Glacier
    )
if %errorlevel% equ 8 (
    set map_str=e2m8
    set map_name_str=E2M8: The Portals of Chaos
    )
if %errorlevel% equ 7 (
    set map_str=e2m7
    set map_name_str=E2M7: The Great Hall
    )
if %errorlevel% equ 6 (
    set map_str=e2m6
    set map_name_str=E2M6: The Labyrinth
    )
if %errorlevel% equ 5 (
    set map_str=e2m5
    set map_name_str=E2M5: The Catacombs
    )
if %errorlevel% equ 4 (
    set map_str=e2m4
    set map_name_str=E2M4: The Ice Grotto
    )
if %errorlevel% equ 3 (
    set map_str=e2m3
    set map_name_str=E2M3: The River of Fire
    )
if %errorlevel% equ 2 (
    set map_str=e2m2
    set map_name_str=E2M2: The Lava Pits
    )
if %errorlevel% equ 1 (
    set map_str=e2m1
    set map_name_str=E2M1: The Crater
    )
goto %menu_str%

:heretic_e3_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) The Storehouse
echo 2.) The Cesspool
echo 3.) The Confluence
echo 4.) The Azure Fortress
echo 5.) The Ophidian Lair
echo 6.) The Halls of Fear
echo 7.) The Chasm
echo 8.) D'Sparil's Keep
echo 9.) The Aquifer
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e3m9
    set map_name_str=E3M9: The Aquifer
    )
if %errorlevel% equ 8 (
    set map_str=e3m8
    set map_name_str=E3M8: D'Sparil's Keep
    )
if %errorlevel% equ 7 (
    set map_str=e3m7
    set map_name_str=E3M7: The Chasm
    )
if %errorlevel% equ 6 (
    set map_str=e3m6
    set map_name_str=E3M6: The Halls of Fear
    )
if %errorlevel% equ 5 (
    set map_str=e3m5
    set map_name_str=E3M5: The Ophidian Lair
    )
if %errorlevel% equ 4 (
    set map_str=e3m4
    set map_name_str=E3M4: The Azure Fortress
    )
if %errorlevel% equ 3 (
    set map_str=e3m3
    set map_name_str=E3M3: The Confluence
    )
if %errorlevel% equ 2 (
    set map_str=e3m2
    set map_name_str=E3M2: The Cesspool
    )
if %errorlevel% equ 1 (
    set map_str=e3m1
    set map_name_str=E3M1: The Storehouse
    )
goto %menu_str%

:heretic_e4_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Catafalque
echo 2.) Blockhouse
echo 3.) Ambulatory
echo 4.) Sepulcher
echo 5.) Great Stair
echo 6.) Halls of the Apostate
echo 7.) Ramparts of Perdition
echo 8.) Shattered Bridge
echo 9.) Mausoleum
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e4m9
    set map_name_str=E4M9: Mausoleum
    )
if %errorlevel% equ 8 (
    set map_str=e4m8
    set map_name_str=E4M8: Shattered Bridge
    )
if %errorlevel% equ 7 (
    set map_str=e4m7
    set map_name_str=E4M7: Ramparts of Perdition
    )
if %errorlevel% equ 6 (
    set map_str=e4m6
    set map_name_str=E4M6: Halls of the Apostate
    )
if %errorlevel% equ 5 (
    set map_str=e4m5
    set map_name_str=E4M5: Great Stair
    )
if %errorlevel% equ 4 (
    set map_str=e4m4
    set map_name_str=E4M4: Sepulcher
    )
if %errorlevel% equ 3 (
    set map_str=e4m3
    set map_name_str=E4M3: Ambulatory
    )
if %errorlevel% equ 2 (
    set map_str=e4m2
    set map_name_str=E4M2: Blockhouse
    )
if %errorlevel% equ 1 (
    set map_str=e4m1
    set map_name_str=E4M1: Catafalque
    )
goto %menu_str%

:heretic_e4a_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Catafalque
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1z
if %errorlevel% equ 2 goto map_menu
if %errorlevel% equ 1 (
    set map_str=e4m1
    set map_name_str=E4M1: Catafalque
    )
goto %menu_str%

:heretic_e5_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Ochre Cliffs
echo 2.) Rapids
echo 3.) Quay
echo 4.) Courtyard
echo 5.) Hydratyr
echo 6.) Colonnade
echo 7.) Foetid Manse
echo 8.) Field of Judgement
echo 9.) Skein of D'Sparil
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e5m9
    set map_name_str=E5M9: Skein of D'Sparil
    )
if %errorlevel% equ 8 (
    set map_str=e5m8
    set map_name_str=E5M8: Field of Judgement
    )
if %errorlevel% equ 7 (
    set map_str=e5m7
    set map_name_str=E5M7: Foetid Manse
    )
if %errorlevel% equ 6 (
    set map_str=e5m6
    set map_name_str=E5M6: Colonnade
    )
if %errorlevel% equ 5 (
    set map_str=e5m5
    set map_name_str=E5M5: Hydratyr
    )
if %errorlevel% equ 4 (
    set map_str=e5m4
    set map_name_str=E5M4: Courtyard
    )
if %errorlevel% equ 3 (
    set map_str=e5m3
    set map_name_str=E5M3: Quay
    )
if %errorlevel% equ 2 (
    set map_str=e5m2
    set map_name_str=E5M2: Rapids
    )
if %errorlevel% equ 1 (
    set map_str=e5m1
    set map_name_str=E5M1: Ochre Cliffs
    )
goto %menu_str%

:heretic_e6_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Untitled
echo 2.) Untitled
echo 3.) Untitled
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123z
if %errorlevel% equ 4 goto map_menu
if %errorlevel% equ 3 (
    set map_str=e6m3
    set map_name_str=E6M3: Untitled
    )
if %errorlevel% equ 2 (
    set map_str=e6m2
    set map_name_str=E6M2: Untitled
    )
if %errorlevel% equ 1 (
    set map_str=e6m1
    set map_name_str=E6M1: Untitled
    )
goto %menu_str%

:hexen_e0_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Winnowing Hall
echo 2.) Seven Portals
echo 3.) Guardian of Ice
echo 4.) Guardian of Fire
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234z
if %errorlevel% equ 5 goto map_menu
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Guardian of Fire
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Guardian of Ice
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Seven Portals
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Winnowing Hall
    )
goto %menu_str%

:hexen_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Winnowing Hall     9.) Wastelands      G.) Dungeons            O.) Wolf Chapel
echo 2.) Seven Portals      0.) Sacred Grove    H.) Desolate Garden     P.) Necropolis
echo 3.) Guardian of Ice        A.) Hypostyle       I.) Heresiarch's Seminary   Q.) Zedek's Tomb
echo 4.) Guardian of Fire       B.) Shadow Wood     J.) Dragon Chapel       R.) Menelkir's Tomb
echo 5.) Guardian of Steel      C.) Forsaken Outpost    K.) Griffin Chapel      S.) Traductus' Tomb
echo 6.) Bright Crucible        D.) Castle of Grief L.) Deathwind Chapel        T.) Vivarium
echo 7.) Darkmere           E.) Gibbet      M.) Orchard of Lamentations U.) Dark Crucible
echo 8.) Caves of Circe     F.) Effluvium       N.) Silent Refectory
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuz
if %errorlevel% equ 32 goto map_menu
if %errorlevel% equ 31 (
    set map_str=map40
    set map_name_str=MAP40: Dark Crucible
    )
if %errorlevel% equ 30 (
    set map_str=map39
    set map_name_str=MAP39: Vivarium
    )
if %errorlevel% equ 29 (
    set map_str=map38
    set map_name_str=MAP38: Traductus' Tomb
    )
if %errorlevel% equ 28 (
    set map_str=map37
    set map_name_str=MAP37: Menelkir's Tomb
    )
if %errorlevel% equ 27 (
    set map_str=map36
    set map_name_str=MAP36: Zedek's Tomb
    )
if %errorlevel% equ 26 (
    set map_str=map35
    set map_name_str=MAP35: Necropolis
    )
if %errorlevel% equ 25 (
    set map_str=map34
    set map_name_str=MAP34: Wolf Chapel
    )
if %errorlevel% equ 24 (
    set map_str=map33
    set map_name_str=MAP33: Silent Refectory
    )
if %errorlevel% equ 23 (
    set map_str=map32
    set map_name_str=MAP32: Orchard of Lamentations
    )
if %errorlevel% equ 22 (
    set map_str=map31
    set map_name_str=MAP31: Deathwind Chapel
    )
if %errorlevel% equ 21 (
    set map_str=map30
    set map_name_str=MAP30: Griffin Chapel
    )
if %errorlevel% equ 20 (
    set map_str=map28
    set map_name_str=MAP28: Dragon Chapel
    )
if %errorlevel% equ 19 (
    set map_str=map27
    set map_name_str=MAP27: Heresiarch's Seminary
    )
if %errorlevel% equ 18 (
    set map_str=map26
    set map_name_str=MAP26: Desolate Garden
    )
if %errorlevel% equ 17 (
    set map_str=map25
    set map_name_str=MAP25: Dungeons
    )
if %errorlevel% equ 16 (
    set map_str=map24
    set map_name_str=MAP24: Effluvium
    )
if %errorlevel% equ 15 (
    set map_str=map23
    set map_name_str=MAP23: Gibbet
    )
if %errorlevel% equ 14 (
    set map_str=map22
    set map_name_str=MAP22: Castle of Grief
    )
if %errorlevel% equ 13 (
    set map_str=map21
    set map_name_str=MAP21: Forsaken Outpost
    )
if %errorlevel% equ 12 (
    set map_str=map13
    set map_name_str=MAP13: Shadow Wood
    )
if %errorlevel% equ 11 (
    set map_str=map12
    set map_name_str=MAP12: Hypostyle
    )
if %errorlevel% equ 10 (
    set map_str=map11
    set map_name_str=MAP11: Sacred Grove
    )
if %errorlevel% equ 9 (
    set map_str=map10
    set map_name_str=MAP10: Wastelands
    )
if %errorlevel% equ 8 (
    set map_str=map09
    set map_name_str=MAP09: Caves of Circe
    )
if %errorlevel% equ 7 (
    set map_str=map08
    set map_name_str=MAP08: Darkmere
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: Bright Crucible
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: Guardian of Steel
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Guardian of Fire
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Guardian of Ice
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Seven Portals
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Winnowing Hall
    )
goto %menu_str%

:hexen_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Ruined Village 6.) Brackenwood     A.) Locus Requiescat    F.) Abattoir
echo 2.) Blight     7.) Pyre        B.) Ordeal      G.) Dark Watch
echo 3.) Sump       8.) Constable's Gate    C.) Armory      H.) Cloaca
echo 4.) Catacomb       9.) Treasury        D.) Nave        I.) Ice Hold
echo 5.) Badlands       0.) Market Place    E.) Chantry     J.) Dark Citadel
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijz
if %errorlevel% equ 21 goto map_menu
if %errorlevel% equ 20 (
    set map_str=map60
    set map_name_str=MAP60: Dark Citadel
    )
if %errorlevel% equ 19 (
    set map_str=map59
    set map_name_str=MAP59: Ice Hold
    )
if %errorlevel% equ 18 (
    set map_str=map58
    set map_name_str=MAP58: Cloaca
    )
if %errorlevel% equ 17 (
    set map_str=map57
    set map_name_str=MAP57: Dark Watch
    )
if %errorlevel% equ 16 (
    set map_str=map56
    set map_name_str=MAP56: Abattoir
    )
if %errorlevel% equ 15 (
    set map_str=map55
    set map_name_str=MAP55: Chantry
    )
if %errorlevel% equ 14 (
    set map_str=map54
    set map_name_str=MAP54: Nave
    )
if %errorlevel% equ 13 (
    set map_str=map53
    set map_name_str=MAP53: Armory
    )
if %errorlevel% equ 12 (
    set map_str=map52
    set map_name_str=MAP52: Ordeal
    )
if %errorlevel% equ 11 (
    set map_str=map51
    set map_name_str=MAP51: Locus Requiescat
    )
if %errorlevel% equ 10 (
    set map_str=map50
    set map_name_str=MAP50: Market Place
    )
if %errorlevel% equ 9 (
    set map_str=map49
    set map_name_str=MAP49: Treasury
    )
if %errorlevel% equ 8 (
    set map_str=map48
    set map_name_str=MAP48: Constable's Gate
    )
if %errorlevel% equ 7 (
    set map_str=map47
    set map_name_str=MAP47: Pyre
    )
if %errorlevel% equ 6 (
    set map_str=map46
    set map_name_str=MAP46: Brackenwood
    )
if %errorlevel% equ 5 (
    set map_str=map45
    set map_name_str=MAP45: Badlands
    )
if %errorlevel% equ 4 (
    set map_str=map44
    set map_name_str=MAP44: Catacomb
    )
if %errorlevel% equ 3 (
    set map_str=map43
    set map_name_str=MAP43: Sump
    )
if %errorlevel% equ 2 (
    set map_str=map42
    set map_name_str=MAP42: Blight
    )
if %errorlevel% equ 1 (
    set map_str=map41
    set map_name_str=MAP41: Ruined Village
    )
goto %menu_str%

:hexen_e3_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Transit
echo 2.) Over N' Under
echo 3.) Deathfog
echo 4.) Castle of Pain
echo 5.) Sewer Pit
echo 6.) The Rose
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456z
if %errorlevel% equ 7 goto map_menu
if %errorlevel% equ 6 (
    set map_str=map38
    set map_name_str=MAP38: The Rose
    )
if %errorlevel% equ 5 (
    set map_str=map37
    set map_name_str=MAP37: Sewer Pit
    )
if %errorlevel% equ 4 (
    set map_str=map36
    set map_name_str=MAP36: Castle of Pain
    )
if %errorlevel% equ 3 (
    set map_str=map35
    set map_name_str=MAP35: Deathfog
    )
if %errorlevel% equ 2 (
    set map_str=map34
    set map_name_str=MAP34: Over N' Under
    )
if %errorlevel% equ 1 (
    set map_str=map33
    set map_name_str=MAP33: Transit
    )
goto %menu_str%

:strife_e0_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Area 1: Sanctuary
echo 2.) Area 2: Town
echo 3.) Area 3: Movement Base
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123z
if %errorlevel% equ 4 goto map_menu
if %errorlevel% equ 3 (
    set map_str=map34
    set map_name_str=MAP34: Area 3: Movement Base
    )
if %errorlevel% equ 2 (
    set map_str=map33
    set map_name_str=MAP33: Area 2: Town
    )
if %errorlevel% equ 1 (
    set map_str=map32
    set map_name_str=MAP32: Area 1: Sanctuary
    )
goto %menu_str%

:strife_e0a_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Area 1: Sanctuary
echo 2.) Area 2: Town
echo 3.) Area 3: Movement Base
echo 4.) Factory: Production
echo 5.) Castle Clash
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 12345z
if %errorlevel% equ 6 goto map_menu
if %errorlevel% equ 5 (
    set map_str=map36
    set map_name_str=MAP36: Castle Clash
    )
if %errorlevel% equ 4 (
    set map_str=map35
    set map_name_str=MAP35: Factory: Production
    )
if %errorlevel% equ 3 (
    set map_str=map34
    set map_name_str=MAP34: Area 3: Movement Base
    )
if %errorlevel% equ 2 (
    set map_str=map33
    set map_name_str=MAP33: Area 2: Town
    )
if %errorlevel% equ 1 (
    set map_str=map32
    set map_name_str=MAP32: Area 1: Sanctuary
    )
goto %menu_str%

:strife_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Sanctuary      9.) Castle: Programmer's Keep   G.) Fortress: The Bailey    O.) Catacombs: Ruined Temple
echo 2.) Town       0.) New Front Base      H.) Fortress: Stores        P.) Proving Grounds
echo 3.) Front Base         A.) Borderlands         I.) Fortress: Security Complex  Q.) The Lab
echo 4.) Power Station  B.) The Temple of the Oracle    J.) Factory: Receiving      R.) Alien Ship
echo 5.) Prison     C.) Catacombs           K.) Factory: Manufacturing  S.) Entity's Lair
echo 6.) Sewers     D.) Mines           L.) Factory: Forge      T.) Abandoned Front Base
echo 7.) Castle     E.) Fortress: Administration    M.) Order Commons       U.) Training Facility
echo 8.) Audience Chamber   F.) Fortress: Bishop's Tower    N.) Factory: Conversion Chapel
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuz
if %errorlevel% equ 32 goto map_menu
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: Training Facility
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Abandoned Front Base
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: Entity's Lair
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: Alien Ship
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: The Lab
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: Proving Grounds
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Catacombs: Ruined Temple
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: Factory: Conversion Chapel
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Order Commons
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: Factory: Forge
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: Factory: Manufacturing
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Factory: Receiving
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: Fortress: Security Complex
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: Fortress: Stores
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: Fortress: The Bailey
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Fortress: Bishop's Tower
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Fortress: Administration
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: Mines
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Catacombs
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: The Temple of the Oracle
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: Borderlands
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: New Front Base
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: Castle: Programmer's Keep
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Audience Chamber
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: Castle
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: Sewers
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: Prison
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Power Station
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Front Base
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Town
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Sanctuary
    )
goto %menu_str%

:strife_e1a_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Sanctuary      9.) Castle: Programmer's Keep   G.) Fortress: The Bailey    O.) Catacombs: Ruined Temple
echo 2.) Town       0.) New Front Base      H.) Fortress: Stores        P.) Proving Grounds
echo 3.) Front Base         A.) Borderlands         I.) Fortress: Security Complex  Q.) The Lab
echo 4.) Power Station  B.) The Temple of the Oracle    J.) Factory: Receiving      R.) Alien Ship
echo 5.) Prison     C.) Catacombs           K.) Factory: Manufacturing  S.) Entity's Lair
echo 6.) Sewers     D.) Mines           L.) Factory: Forge      T.) Abandoned Front Base
echo 7.) Castle     E.) Fortress: Administration    M.) Order Commons       U.) Training Facility
echo 8.) Audience Chamber   F.) Fortress: Bishop's Tower    N.) Factory: Conversion Chapel  V.) Factory: Production
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvz
if %errorlevel% equ 33 goto map_menu
if %errorlevel% equ 32 (
    set map_str=map35
    set map_name_str=MAP35: Factory: Production
    )
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: Training Facility
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Abandoned Front Base
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: Entity's Lair
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: Alien Ship
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: The Lab
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: Proving Grounds
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Catacombs: Ruined Temple
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: Factory: Conversion Chapel
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Order Commons
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: Factory: Forge
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: Factory: Manufacturing
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Factory: Receiving
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: Fortress: Security Complex
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: Fortress: Stores
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: Fortress: The Bailey
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Fortress: Bishop's Tower
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Fortress: Administration
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: Mines
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Catacombs
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: The Temple of the Oracle
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: Borderlands
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: New Front Base
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: Castle: Programmer's Keep
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Audience Chamber
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: Castle
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: Sewers
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: Prison
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Power Station
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Front Base
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Town
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Sanctuary
    )
goto %menu_str%

:strife_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Castle Clash
echo 2.) Killing Grounds
echo 3.) Ordered Chaos
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123z
if %errorlevel% equ 4 goto map_menu
if %errorlevel% equ 3 (
    set map_str=map38
    set map_name_str=MAP38: Ordered Chaos
    )
if %errorlevel% equ 2 (
    set map_str=map37
    set map_name_str=MAP37: Killing Grounds
    )
if %errorlevel% equ 1 (
    set map_str=map36
    set map_name_str=MAP36: Castle Clash
    )
goto %menu_str%

:chex_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Landing Zone
echo 2.) Storage Facility
echo 3.) Experimental Lab
echo 4.) Arboretum
echo 5.) Caverns of Bazoik
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 12345z
if %errorlevel% equ 6 goto map_menu
if %errorlevel% equ 5 (
    set map_str=e1m5
    set map_name_str=E1M5: Caverns of Bazoik
    )
if %errorlevel% equ 4 (
    set map_str=e1m4
    set map_name_str=E1M4: Arboretum
    )
if %errorlevel% equ 3 (
    set map_str=e1m3
    set map_name_str=E1M3: Laboratory
    )
if %errorlevel% equ 2 (
    set map_str=e1m2
    set map_name_str=E1M2: Storage Facility
    )
if %errorlevel% equ 1 (
    set map_str=e1m1
    set map_name_str=E1M1: Landing Zone
    )
goto %menu_str%

:chex_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Spaceport
echo 2.) Cinema
echo 3.) Chex Museum
echo 4.) City Streets
echo 5.) Sewer System
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 12345z
if %errorlevel% equ 6 goto map_menu
if %errorlevel% equ 5 (
    set map_str=e2m5
    set map_name_str=E2M5: Sewer System
    )
if %errorlevel% equ 4 (
    set map_str=e2m4
    set map_name_str=E2M4: City Streets
    )
if %errorlevel% equ 3 (
    set map_str=e2m3
    set map_name_str=E2M3: Chex Museum
    )
if %errorlevel% equ 2 (
    set map_str=e2m2
    set map_name_str=E2M2: Cinema
    )
if %errorlevel% equ 1 (
    set map_str=e2m1
    set map_name_str=E2M1: Spaceport
    )
goto %menu_str%

:chex_e3_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Central Command
echo 2.) United Cereals
echo 3.) Villa Chex
echo 4.) Provinical Park
echo 5.) Meteor Spaceship
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 12345z
if %errorlevel% equ 6 goto map_menu
if %errorlevel% equ 5 (
    set map_str=e3m5
    set map_name_str=E2M5: Meteor Spaceship
    )
if %errorlevel% equ 4 (
    set map_str=e3m4
    set map_name_str=E2M4: Provincial Park
    )
if %errorlevel% equ 3 (
    set map_str=e3m3
    set map_name_str=E2M3: Villa Chex
    )
if %errorlevel% equ 2 (
    set map_str=e3m2
    set map_name_str=E2M2: United Cereals
    )
if %errorlevel% equ 1 (
    set map_str=e3m1
    set map_name_str=E2M1: Central Command
    )
goto %menu_str%

:hacx_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) GenEmp Corp        8.) Garden of Delights  E.) Twilight of Enk's
echo 2.) Tunnel Town        9.) Hidden Fortress F.) Protean Cybex
echo 3.) Lava Annex         0.) Anarchist Dream G.) River of Blood
echo 4.) Alcatraz       A.) Notus Us!       H.) Bizarro
echo 5.) Cyber Circus   B.) Gothik Gauntlet I.) The War Rooms
echo 6.) Digi-Ota       C.) The Sewers      J.) Intruder Alert!
echo 7.) The Great Wall D.) Trode Wars      K.) Dessicant Room
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijkz
if %errorlevel% equ 22 goto map_menu
if %errorlevel% equ 21 (
    set map_str=map31
    set map_name_str=MAP31: Dessicant Room
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Intruder Alert!
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: The War Rooms
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: Bizarro
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: River of Blood
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Protean Cybex
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Twilight of Enk's
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: Trode Wars
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: The Sewers
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: Gothik Gauntlet
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: Notus Us!
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: Anarchist Dream
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: Hidden Fortress
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Garden of Delights
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: The Great Wall
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: Digi-Ota
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: Cyber Circus
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Alcatraz
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Lava Annex
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Tunnel Town
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: GenEmp Corp
    )
goto %menu_str%

:hacx_e1a_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) GenEmp Corp        0.) Anarchist Dream I.) Valley of the Dead      R.) Bizarro
echo 2.) Tunnel Town        A.) Notus Us!       J.) Artificial Annihiliation    S.) Reality Bytes
echo 3.) Lava Annex         B.) Gothik Gauntlet     K.) CryoZine            T.) Twitch N' Kill
echo 4.) Alcatraz       C.) Catacombs       L.) Pentagon Syndrome       U.) Subspace Arcadum
echo 5.) Cyber Circus   D.) Notre Damned    M.) Capitol Punishment      V.) Dessicant Room
echo 6.) Digi-Ota       E.) Twilight of Enk's   N.) The War Rooms       W.) Future Perfect
echo 7.) The Great Wall F.) Protean Cybex   O.) Intruder Alert!     X.) GenEmp Lobby
echo 8.) Garden of Delights G.) Dune City       P.) The Darkness        Y.) Cybernetic Junction
echo 9.) Hidden Fortress    H.) River of Blood  Q.) 'Trode Wars
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvwxyz
if %errorlevel% equ 36 goto map_menu
if %errorlevel% equ 35 (
    set map_str=map35
    set map_name_str=MAP35: Cybernetic Junction
    )
if %errorlevel% equ 34 (
    set map_str=map34
    set map_name_str=MAP34: GenEmp Lobby
    )
if %errorlevel% equ 33 (
    set map_str=map33
    set map_name_str=MAP33: Future Perfect
    )
if %errorlevel% equ 32 (
    set map_str=map32
    set map_name_str=MAP32: Dessicant Room
    )
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: Subspace Arcadum
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Twitch N' Kill
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: Reality Bytes
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: Bizarro
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: 'Trode Wars
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: The Darkness
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Intruder Alert!
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: The War Rooms
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Capitol Punishment
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: Pentagon Syndrome
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: CryoZine
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Artificial Annihiliation
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: Valley of the Dead
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: River of Blood
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: Dune City
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Protean Cybex
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Twilight of Enk's
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: Notre Damned
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Catacombs
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: Gothik Gauntlet
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: Notus Us!
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: Anarchist Dream
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: Hidden Fortress
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Garden of Delights
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: The Great Wall
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: Digi-Ota
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: Cyber Circus
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Alcatraz
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Lava Annex
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Tunnel Town
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: GenEmp Corp
    )
goto %menu_str%

:freedoom_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Outer Prison
echo 2.) Communications Center
echo 3.) Waste Disposal
echo 4.) Supply Depot
echo 5.) Main Control
echo 6.) Training Facility
echo 7.) Transportation Bay
echo 8.) Outpost Quarry
echo 9.) Armory
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e1m9
    set map_name_str=C1M9: Armory
    )
if %errorlevel% equ 8 (
    set map_str=e1m8
    set map_name_str=C1M8: Outpost Quarry
    )
if %errorlevel% equ 7 (
    set map_str=e1m7
    set map_name_str=C1M7: Transportation Bay
    )
if %errorlevel% equ 6 (
    set map_str=e1m6
    set map_name_str=C1M6: Training Facility
    )
if %errorlevel% equ 5 (
    set map_str=e1m5
    set map_name_str=C1M5: Main Control
    )
if %errorlevel% equ 4 (
    set map_str=e1m4
    set map_name_str=C1M4: Supply Depot
    )
if %errorlevel% equ 3 (
    set map_str=e1m3
    set map_name_str=C1M3: Waste Disposal
    )
if %errorlevel% equ 2 (
    set map_str=e1m2
    set map_name_str=C1M2: Communications Center
    )
if %errorlevel% equ 1 (
    set map_str=e1m1
    set map_name_str=C1M1: Outer Prison
    )
goto %menu_str%

:freedoom_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Ruins
echo 2.) Power Plant
echo 3.) Archaelogy Site
echo 4.) Sample Holding Site
echo 5.) Fortress 31
echo 6.) Trepidation Site
echo 7.) Quarantine Vessel
echo 8.) Containment Cell
echo 9.) Corruption of Man
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e2m9
    set map_name_str=C2M9: Corruption of Man
    )
if %errorlevel% equ 8 (
    set map_str=e2m8
    set map_name_str=C2M8: Containment Cell
    )
if %errorlevel% equ 7 (
    set map_str=e2m7
    set map_name_str=C2M7: Quarantine Vessel
    )
if %errorlevel% equ 6 (
    set map_str=e2m6
    set map_name_str=C2M6: Trepidation Site
    )
if %errorlevel% equ 5 (
    set map_str=e2m5
    set map_name_str=C2M5: Fortress 31
    )
if %errorlevel% equ 4 (
    set map_str=e2m4
    set map_name_str=C2M4: Sample Holding Site
    )
if %errorlevel% equ 3 (
    set map_str=e2m3
    set map_name_str=C2M3: Archaeology Site
    )
if %errorlevel% equ 2 (
    set map_str=e2m2
    set map_name_str=C2M2: Power Plant
    )
if %errorlevel% equ 1 (
    set map_str=e2m1
    set map_name_str=C2M1: Ruins
    )
goto %menu_str%

:freedoom_e3_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Land of the Lost
echo 2.) Infernal Caverns
echo 3.) Derelict Temple
echo 4.) Sacrificial Bastion
echo 5.) Oblation Temple
echo 6.) Igneous Intrusion
echo 7.) No Regrets
echo 8.) Ancient Lair
echo 9.) Acquainted With Grief
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e3m9
    set map_name_str=C3M9: Acquainted With Grief
    )
if %errorlevel% equ 8 (
    set map_str=e3m8
    set map_name_str=C3M8: Ancient Lair
    )
if %errorlevel% equ 7 (
    set map_str=e3m7
    set map_name_str=C3M7: No Regrets
    )
if %errorlevel% equ 6 (
    set map_str=e3m6
    set map_name_str=C3M6: Igneous Intrusion
    )
if %errorlevel% equ 5 (
    set map_str=e3m5
    set map_name_str=C3M5: Oblation Temple
    )
if %errorlevel% equ 4 (
    set map_str=e3m4
    set map_name_str=C3M4: Sacrificial Bastion
    )
if %errorlevel% equ 3 (
    set map_str=e3m3
    set map_name_str=C3M3: Derelict Temple
    )
if %errorlevel% equ 2 (
    set map_str=e3m2
    set map_name_str=C3M2: Infernal Caverns
    )
if %errorlevel% equ 1 (
    set map_str=e3m1
    set map_name_str=C3M1: Land of the Lost
    )
goto %menu_str%

:freedoom_e4_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Maintenance Area
echo 2.) Research Complex
echo 3.) Central Computing
echo 4.) Hydroponic Facility
echo 5.) Engineering Station
echo 6.) Command Center
echo 7.) Waste Treatment
echo 8.) Launch Bay
echo 9.) Operations
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e4m9
    set map_name_str=C4M9: Operations
    )
if %errorlevel% equ 8 (
    set map_str=e4m8
    set map_name_str=C4M8: Launch Bay
    )
if %errorlevel% equ 7 (
    set map_str=e4m7
    set map_name_str=C4M7: Waste Treatment
    )
if %errorlevel% equ 6 (
    set map_str=e4m6
    set map_name_str=C4M6: Command Center
    )
if %errorlevel% equ 5 (
    set map_str=e4m5
    set map_name_str=C4M5: Engineering Station
    )
if %errorlevel% equ 4 (
    set map_str=e4m4
    set map_name_str=C4M4: Hydroponic Facility
    )
if %errorlevel% equ 3 (
    set map_str=e4m3
    set map_name_str=C4M3: Central Computing
    )
if %errorlevel% equ 2 (
    set map_str=e4m2
    set map_name_str=C4M2: Research Complex
    )
if %errorlevel% equ 1 (
    set map_str=e4m1
    set map_name_str=C4M1: Maintenance Area
    )
goto %menu_str%

:freedoom_e5_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Hydroelectric Plant        9.) Datacenter      G.) City Capitol        O.) Red Works
echo 2.) Filtration Tunnels     0.) Deadly Outlands H.) Aquatics Lab        P.) Dark Depths
echo 3.) Crude Processing Center    A.) Infinite Plain  I.) Sewage Control      Q.) Warped Elementality
echo 4.) Containment Bay        B.) Railroads       J.) Blood Ember Fortress    R.) Grim Redoubt
echo 5.) Sludge Burrow      C.) Station Earth   K.) Under Realm         S.) Last Stand
echo 6.) Gamma Labs         D.) Nuclear Zone    L.) Remanasu            T.) Jaws of Defeat
echo 7.) Outer Storage Warehouse    E.) Hostile Takeover    M.) Underground Facility    U.) Be Quiet
echo 8.) Astronomy Complex      F.) Urban Jungle    N.) Tertiary Loading Bay    V.) Not Sure
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvz
if %errorlevel% equ 33 goto map_menu
if %errorlevel% equ 32 (
    set map_str=map32
    set map_name_str=MAP32: Not Sure
    )
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: Be Quiet
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Jaws of Defeat
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: Last Stand
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: Grim Redoubt
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: Warped Elementality
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: Dark Depths
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Red Works
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: Tertiary Loading Bay
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Underground Facility
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: Remanasu
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: Under Realm
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Blood Ember Fortress
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: Sewage Control
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: Aquatics Lab
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: City Capitol
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Urban Jungle
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Hostile Takeover
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: Nuclear Zone
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Station Earth
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: Railroads
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: Infinite Plain
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: Deadly Outlands
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: Datacenter
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Astronomy Complex
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: Outer Storage Warehouse
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: Gamma Labs
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: Sludge Burrow
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Containment Bay
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Crude Processing Center
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Filtration Tunnels
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Hydroelectric Plant
    )
goto %menu_str%

:freedoom_e6_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Tech Test      9.) Industrial Outland  G.) Underwoods      O.) Mansion Yard
echo 2.) Natural Station    0.) Detached Grounds    H.) Deserted Courtyard  P.) Acidic Crypt
echo 3.) Issues of Claveria A.) Isolated Facility   I.) Tech Isle       Q.) The Exile
echo 4.) Steel      B.) Up 'n Down Canyon   J.) Warehouse       R.) Weapons Factory
echo 5.) Dense Fields   C.) Unholy Blood    K.) Refinary        S.) Unusual Territory
echo 6.) Temple of Ammon    D.) Technical Assault   L.) Fourplay        T.) Last Man Standing
echo 7.) Main Stronghold    E.) Shallow Complex M.) Confrontation   U.) Desolated Fort
echo 8.) Artifact Base  F.) Barren Alleys   N.) Flooded Base    V.) Chocolate
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abcdefghijklmnopqrstuvz
if %errorlevel% equ 33 goto map_menu
if %errorlevel% equ 32 (
    set map_str=map32
    set map_name_str=MAP32: Chocolate
    )
if %errorlevel% equ 31 (
    set map_str=map31
    set map_name_str=MAP31: Desolated Fort
    )
if %errorlevel% equ 30 (
    set map_str=map30
    set map_name_str=MAP30: Last Man Standing
    )
if %errorlevel% equ 29 (
    set map_str=map29
    set map_name_str=MAP29: Unusual Territory
    )
if %errorlevel% equ 28 (
    set map_str=map28
    set map_name_str=MAP28: Weapons Factory
    )
if %errorlevel% equ 27 (
    set map_str=map27
    set map_name_str=MAP27: The Exile
    )
if %errorlevel% equ 26 (
    set map_str=map26
    set map_name_str=MAP26: Acidic Crypt
    )
if %errorlevel% equ 25 (
    set map_str=map25
    set map_name_str=MAP25: Mansion Yard
    )
if %errorlevel% equ 24 (
    set map_str=map24
    set map_name_str=MAP24: Flooded Base
    )
if %errorlevel% equ 23 (
    set map_str=map23
    set map_name_str=MAP23: Confrontation
    )
if %errorlevel% equ 22 (
    set map_str=map22
    set map_name_str=MAP22: Fourplay
    )
if %errorlevel% equ 21 (
    set map_str=map21
    set map_name_str=MAP21: Refinary
    )
if %errorlevel% equ 20 (
    set map_str=map20
    set map_name_str=MAP20: Warehouse
    )
if %errorlevel% equ 19 (
    set map_str=map19
    set map_name_str=MAP19: Tech Isle
    )
if %errorlevel% equ 18 (
    set map_str=map18
    set map_name_str=MAP18: Deserted Courtyard
    )
if %errorlevel% equ 17 (
    set map_str=map17
    set map_name_str=MAP17: Underwoods
    )
if %errorlevel% equ 16 (
    set map_str=map16
    set map_name_str=MAP16: Barren Alleys
    )
if %errorlevel% equ 15 (
    set map_str=map15
    set map_name_str=MAP15: Shallow Complex
    )
if %errorlevel% equ 14 (
    set map_str=map14
    set map_name_str=MAP14: Technical Assault
    )
if %errorlevel% equ 13 (
    set map_str=map13
    set map_name_str=MAP13: Unholy Blood
    )
if %errorlevel% equ 12 (
    set map_str=map12
    set map_name_str=MAP12: Up 'n Down Canyon
    )
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: Isolated Facility
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: Detached Grounds
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: Industrial Outland
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Artifact Base
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: Main Stronghold
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: Temple of Ammon
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: Dense Fields
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Steel
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Issues of Claveria
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Natural Station
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Tech Test
    )
goto %menu_str%

:blasphem_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) noname
echo 2.) noname
echo 3.) Forgotten Stronghold
echo 4.) The Guard Tower
echo 5.) The Citadel
echo 6.) The Cathedral
echo 7.) The White Citadel
echo 8.) Hell's Maw
echo 9.) The Graveyard
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e1m9
    set map_name_str=E1M9: The Graveyard
    )
if %errorlevel% equ 8 (
    set map_str=e1m8
    set map_name_str=E1M8: Hell's Maw
    )
if %errorlevel% equ 7 (
    set map_str=e1m7
    set map_name_str=E1M7: The White Citadel
    )
if %errorlevel% equ 6 (
    set map_str=e1m6
    set map_name_str=E1M6: The Cathedral
    )
if %errorlevel% equ 5 (
    set map_str=e1m5
    set map_name_str=E1M5: The Citadel
    )
if %errorlevel% equ 4 (
    set map_str=e1m4
    set map_name_str=E1M4: The Guard Tower
    )
if %errorlevel% equ 3 (
    set map_str=e1m3
    set map_name_str=E1M3: Forgotten Stronghold
    )
if %errorlevel% equ 2 (
    set map_str=e1m2
    set map_name_str=E1M2: noname
    )
if %errorlevel% equ 1 (
    set map_str=e1m1
    set map_name_str=E1M1: noname
    )
goto %menu_str%

:blasphem_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) The Remote Outpost
echo 2.) The Lava Pits
echo 3.) The River of Fire
echo 4.) The Ice Grotto
echo 5.) The Catacombs
echo 6.) The Labyrinth
echo 7.) The Great Hall
echo 8.) The Portals of Chaos
echo 9.) The Glacier
echo:
echo Z.) Return to Select an Episode
echo:

:: Process menu command
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e2m9
    set map_name_str=E2M9: The Glacier
    )
if %errorlevel% equ 8 (
    set map_str=e2m8
    set map_name_str=E2M8: The Portals of Chaos
    )
if %errorlevel% equ 7 (
    set map_str=e2m7
    set map_name_str=E2M7: The Great Hall
    )
if %errorlevel% equ 6 (
    set map_str=e2m6
    set map_name_str=E2M6: The Labyrinth
    )
if %errorlevel% equ 5 (
    set map_str=e2m5
    set map_name_str=E2M5: The Catacombs
    )
if %errorlevel% equ 4 (
    set map_str=e2m4
    set map_name_str=E2M4: The Ice Grotto
    )
if %errorlevel% equ 3 (
    set map_str=e2m3
    set map_name_str=E2M3: The River of Fire
    )
if %errorlevel% equ 2 (
    set map_str=e2m2
    set map_name_str=E2M2: The Lava Pits
    )
if %errorlevel% equ 1 (
    set map_str=e2m1
    set map_name_str=E2M1: The Remote Outpost
    )
goto %menu_str%

:blasphem_e4_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Black Thrones
echo 2.) Desolate Ways
echo 3.) Spilling Holy Blood
echo 4.) Megaliths
echo 5.) noname
echo 6.) noname
echo 7.) noname
echo 8.) noname
echo 9.) noname
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=e4m9
    set map_name_str=E4M9: noname
    )
if %errorlevel% equ 8 (
    set map_str=e4m8
    set map_name_str=E4M8: noname
    )
if %errorlevel% equ 7 (
    set map_str=e4m7
    set map_name_str=E4M7: noname
    )
if %errorlevel% equ 6 (
    set map_str=e4m6
    set map_name_str=E4M6: noname
    )
if %errorlevel% equ 5 (
    set map_str=e4m5
    set map_name_str=E4M5: noname
    )
if %errorlevel% equ 4 (
    set map_str=e4m4
    set map_name_str=E4M4: Megaliths
    )
if %errorlevel% equ 3 (
    set map_str=e4m3
    set map_name_str=E4M3: Spilling Holy Blood
    )
if %errorlevel% equ 2 (
    set map_str=e4m2
    set map_name_str=E4M2: Desolate Ways
    )
if %errorlevel% equ 1 (
    set map_str=e4m1
    set map_name_str=E4M1: Black Thrones
    )
goto %menu_str%

:delaweare_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Delaweare
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1z
if %errorlevel% equ 2 goto map_menu
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Delaweare
    )
goto %menu_str%

:harm_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Abduction      7.) The Underwater Lab
echo 2.) Harm's Way     8.) Airstrip One
echo 3.) Owt Mood           9.) The Launch Base
echo 4.) Megalapolis        0.) The Radioactive Zone
echo 5.) The Hospital   A.) Echidna
echo 6.) The Weapons Factory
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890az
if %errorlevel% equ 12 goto map_menu
if %errorlevel% equ 11 (
    set map_str=map11
    set map_name_str=MAP11: Echidna
    )
if %errorlevel% equ 10 (
    set map_str=map10
    set map_name_str=MAP10: The Radioactive Zone
    )
if %errorlevel% equ 9 (
    set map_str=map09
    set map_name_str=MAP09: The Launch Base
    )
if %errorlevel% equ 8 (
    set map_str=map08
    set map_name_str=MAP08: Airstrip One
    )
if %errorlevel% equ 7 (
    set map_str=map07
    set map_name_str=MAP07: The Underwater Lab
    )
if %errorlevel% equ 6 (
    set map_str=map06
    set map_name_str=MAP06: The Weapons Factory
    )
if %errorlevel% equ 5 (
    set map_str=map05
    set map_name_str=MAP05: The Hospital
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Megalapolis
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Owt Mood
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Harm's Way
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Abduction
    )
goto %menu_str%

:action2_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Streets of Rage: It's time for Action
echo 2.) Action Bridge: The Manhattan Project
echo 3.) Segue: Say, That's a Nice Car
echo 4.) Action Subway: Follow the Bad Dudes
echo 5.) Phylex: Rising to the Challenge
echo 6.) Phylex: Top Floor
echo 7.) Backwoods: Over the River and Through the Woods...
echo 8.) Abandoned Places: The Splatterhouse
echo 9.) Crisp's Office: Final Fight
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto map_menu
if %errorlevel% equ 9 (
    set map_str=map10
    set map_name_str=MAP10: Crisp's Office: Final Fight
    )
if %errorlevel% equ 8 (
    set map_str=map09
    set map_name_str=MAP09: Abandoned Places: The Splatterhouse
    )
if %errorlevel% equ 7 (
    set map_str=map08
    set map_name_str=MAP08: Backwoods: Over the River and Through the Woods...
    )
if %errorlevel% equ 6 (
    set map_str=map07
    set map_name_str=MAP07: Phylex: Top Floor
    )
if %errorlevel% equ 5 (
    set map_str=map06
    set map_name_str=MAP06: Phylex: Rising to the Challenge
    )
if %errorlevel% equ 4 (
    set map_str=map04
    set map_name_str=MAP04: Action Subway: Follow the Bad Dudes
    )
if %errorlevel% equ 3 (
    set map_str=map03
    set map_name_str=MAP03: Segue: Say, That's a Nice Car
    )
if %errorlevel% equ 2 (
    set map_str=map02
    set map_name_str=MAP02: Action Bridge: The Manhattan Project
    )
if %errorlevel% equ 1 (
    set map_str=map01
    set map_name_str=MAP01: Streets of Rage: It's time for Action
    )
goto %menu_str%

:square_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Welcome to Squaresville    6.) The Spillway
echo 2.) Sewerside          7.) Geometropolis
echo 3.) Up Shape Creek     8.) Fizz-O Pop Factory
echo 4.) Paint Plant            9.) Launch Base
echo 5.) A Miner Inconvenience  0.) Arctic Lab
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890z
if %errorlevel% equ 11 goto map_menu
if %errorlevel% equ 10 (
    set map_str=e1a10
    set map_name_str=E1A10: Arctic Lab
    )
if %errorlevel% equ 9 (
    set map_str=e1a9
    set map_name_str=E1A9: Launch Base
    )
if %errorlevel% equ 8 (
    set map_str=e1a8
    set map_name_str=E1A8: Fizz-O Pop Factory
    )
if %errorlevel% equ 7 (
    set map_str=e1a7
    set map_name_str=E1A7: Geometropolis
    )
if %errorlevel% equ 6 (
    set map_str=e1a6
    set map_name_str=E1A6: The Spillway
    )
if %errorlevel% equ 5 (
    set map_str=e1a5
    set map_name_str=E1A5: A Miner Inconvenience
    )
if %errorlevel% equ 4 (
    set map_str=e1a4
    set map_name_str=E1A4: Paint Plant
    )
if %errorlevel% equ 3 (
    set map_str=e1a3
    set map_name_str=E1A3: Up Shape Creek
    )
if %errorlevel% equ 2 (
    set map_str=e1a2
    set map_name_str=E1A2: Sewerside
    )
if %errorlevel% equ 1 (
    set map_str=e1a1
    set map_name_str=E1A1: Welcome to Squaresville
    )
goto %menu_str%

:square_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Port Jarlsburger       7.) The Cheddarcombs
echo 2.) The Butterforge        8.) A Giant Leap for Shapekind
echo 3.) Cheese Crater      9.) Queso Chasm
echo 4.) In a Milky Way     0.) Arcanum
echo 5.) Wild Bleu Yonder       A.) Heart o' Hexas
echo 6.) Geometric Engineering  B.) Great Pyramid of Gouda
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 1234567890abz
if %errorlevel% equ 13 goto map_menu
if %errorlevel% equ 12 (
    set map_str=e2a11
    set map_name_str=E2A12: Great Pyramid of Gouda
    )
if %errorlevel% equ 11 (
    set map_str=e2a11
    set map_name_str=E2A11: Heart o' Hexas
    )
if %errorlevel% equ 10 (
    set map_str=e2a10
    set map_name_str=E2A10: Arcanum
    )
if %errorlevel% equ 9 (
    set map_str=e2a9
    set map_name_str=E2A9: Queso Chasm
    )
if %errorlevel% equ 8 (
    set map_str=e2a8
    set map_name_str=E2A8: A Giant Leap for Shapekind
    )
if %errorlevel% equ 7 (
    set map_str=e2a7
    set map_name_str=E2A7: The Cheddarcombs
    )
if %errorlevel% equ 6 (
    set map_str=e2a6
    set map_name_str=E2A6: Geometric Engineering
    )
if %errorlevel% equ 5 (
    set map_str=e2a5
    set map_name_str=E2A5: Wild Bleu Yonder
    )
if %errorlevel% equ 4 (
    set map_str=e2a4
    set map_name_str=E2A4: In a Milky Way
    )
if %errorlevel% equ 3 (
    set map_str=e2a3
    set map_name_str=E2A3: Cheese Crater
    )
if %errorlevel% equ 2 (
    set map_str=e2a2
    set map_name_str=E2A2: The Butterforge
    )
if %errorlevel% equ 1 (
    set map_str=e2a1
    set map_name_str=E2A1: Port Jarlsburger
    )
goto %menu_str%

:square_e3_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Squaresville Outskirts
echo 2.) Panic Station
echo 3.) Port Manteau
echo 4.) The Dark Place
echo 5.) Treading Caerphilly
echo 6.) Fromage Hommage
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456z
if %errorlevel% equ 7 goto map_menu
if %errorlevel% equ 6 (
    set map_str=dm06
    set map_name_str=DM06: Fromage Hommage
    )
if %errorlevel% equ 5 (
    set map_str=dm05
    set map_name_str=DM05: Treading Caerphilly
    )
if %errorlevel% equ 4 (
    set map_str=dm04
    set map_name_str=DM04: The Dark Place
    )
if %errorlevel% equ 3 (
    set map_str=dm03
    set map_name_str=DM03: Port Manteau
    )
if %errorlevel% equ 2 (
    set map_str=dm02
    set map_name_str=DM02: Panic Station
    )
if %errorlevel% equ 1 (
    set map_str=dm01
    set map_name_str=DM01: Squaresville Outskirts
    )
goto %menu_str%

:rotwb_e1_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Into the Woods
echo 2.) Muddy Waters
echo 3.) The Gym
echo 4.) The Infested Clearing
echo 5.) Meowzekis Home
echo 6.) Sk8 or Die
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456z
if %errorlevel% equ 7 goto map_menu
if %errorlevel% equ 6 (
    set map_str=e1m6
    set map_name_str=E1M6: Sk8 or Die
    )
if %errorlevel% equ 5 (
    set map_str=e1m5
    set map_name_str=E1M5: Meowzekis Home
    )
if %errorlevel% equ 4 (
    set map_str=e1m4
    set map_name_str=E1M4: The Infested Clearning
    )
if %errorlevel% equ 3 (
    set map_str=e1m3
    set map_name_str=E1M3: The Gym
    )
if %errorlevel% equ 2 (
    set map_str=e1m2
    set map_name_str=E1M2: Muddy Waters
    )
if %errorlevel% equ 1 (
    set map_str=e1m1
    set map_name_str=E1M1: Into the Woods
    )
goto %menu_str%

:rotwb_e2_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) Stranded in the Cold
echo 2.) Cozy Castle Kittenstein
echo 3.) A View From Above
echo 4.) Lava Caverns
echo 5.) Hunting Grounds
echo 6.) Super Speedy Swashbuckler
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456z
if %errorlevel% equ 7 goto map_menu
if %errorlevel% equ 6 (
    set map_str=e2m6
    set map_name_str=E2M6: Super Speedy Swashbuckler
    )
if %errorlevel% equ 5 (
    set map_str=e2m5
    set map_name_str=E2M5: Hunting Grounds
    )
if %errorlevel% equ 4 (
    set map_str=e2m4
    set map_name_str=E2M4: Lava Caverns
    )
if %errorlevel% equ 3 (
    set map_str=e2m3
    set map_name_str=E2M3: A View From Above
    )
if %errorlevel% equ 2 (
    set map_str=e2m2
    set map_name_str=E2M2: Cozy Castle Kittenstein
    )
if %errorlevel% equ 1 (
    set map_str=e2m1
    set map_name_str=E2M1: Stranded in the Cold
    )
goto %menu_str%

:rotwb_e3_menu
call :show_banner
echo ------------
echo Select a Map
echo ------------
echo:
echo 1.) No Way Back
echo 2.) Massive Molten Magma Mess
echo 3.) Puzzling Punishment
echo 4.) Purrfect Dark
echo 5.) Top of the Tower
echo 6.) Wonders of Technology
echo:
echo Z.) Return to Select an Episode
echo:
choice /c 123456z
if %errorlevel% equ 7 goto map_menu
if %errorlevel% equ 6 (
    set map_str=e3m5
    set map_name_str=E2M6: Wonders of Technology
    )
if %errorlevel% equ 5 (
    set map_str=e3m5
    set map_name_str=E2M5: Top of the Tower
    )
if %errorlevel% equ 4 (
    set map_str=e3m4
    set map_name_str=E2M4: Purrfect Dark
    )
if %errorlevel% equ 3 (
    set map_str=e3m3
    set map_name_str=E2M3: Puzzling Punishment
    )
if %errorlevel% equ 2 (
    set map_str=e3m2
    set map_name_str=E2M2: Massive Molten Magma Mess
    )
if %errorlevel% equ 1 (
    set map_str=e3m1
    set map_name_str=E2M1: No Way Back
    )
goto %menu_str%

:skill_menu
if not defined iwad_file (
    echo No IWAD selected.
    pause
    goto %menu_str%
    )
call :show_banner
echo -------------------
echo Select a Difficulty
echo -------------------
echo:
if %iwad_type_str%==doom1 (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doom (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doomu (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doombfg (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doomxbox (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doomunity (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doom2 (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doom2bfg (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doom2xbox (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doom2unity (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==tnt (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==tntunity (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==plutonia (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==plutoniaunity (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==doom_complete (
    echo 1.^) I'm Too Young to Die
    echo 2.^) Hey, Not Too Rough
    echo 3.^) Hurt Me Plenty
    echo 4.^) Ultra-Violence
    echo 5.^) Nightmare!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Nightmare!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Ultra-Violence
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hurt Me Plenty
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Hey, Not Too Rough
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=I'm Too Young to Die
        )
    )
if %iwad_type_str%==heretic1 (
    echo 1.^) Thou Needeth a Wet-Nurse
    echo 2.^) Yellowbellies-R-Us
    echo 3.^) Bringest Them Oneth
    echo 4.^) Thou Are a Smite-Meister
    echo 5.^) Black Plague Possesses Thee
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Black Plague Possesses Thee
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Thou Are a Smite-Meister
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Bringest Them Oneth
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Yellowbellies-R-Us
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Thou Needeth a Wet-Nurse
        )
    )
if %iwad_type_str%==heretic (
    echo 1.^) Thou Needeth a Wet-Nurse
    echo 2.^) Yellowbellies-R-Us
    echo 3.^) Bringest Them Oneth
    echo 4.^) Thou Are a Smite-Meister
    echo 5.^) Black Plague Possesses Thee
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Black Plague Possesses Thee
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Thou Are a Smite-Meister
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Bringest Them Oneth
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Yellowbellies-R-Us
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Thou Needeth a Wet-Nurse
        )
    )
if %iwad_type_str%==hereticsr (
    echo 1.^) Thou Needeth a Wet-Nurse
    echo 2.^) Yellowbellies-R-Us
    echo 3.^) Bringest Them Oneth
    echo 4.^) Thou Are a Smite-Meister
    echo 5.^) Black Plague Possesses Thee
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Black Plague Possesses Thee
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Thou Are a Smite-Meister
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Bringest Them Oneth
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Yellowbellies-R-Us
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Thou Needeth a Wet-Nurse
        )
    )
if %iwad_type_str%==hexdemo (
    if %class_str%==Fighter (
        echo 1.^) Squire
        echo 2.^) Knight
        echo 3.^) Warrior
        echo 4.^) Berserker
        echo 5.^) Titan
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Titan
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Berserker
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Warrior
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Knight
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Squire
            )
        )
    if %class_str%==Cleric (
        echo 1.^) Altar Boy
        echo 2.^) Acolyte
        echo 3.^) Priest
        echo 4.^) Cardinal
        echo 5.^) Pope
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Pope
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Cardinal
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Priest
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Acolyte
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Altar Boy
            )
        )
    if %class_str%==Mage (
        echo 1.^) Apprentice
        echo 2.^) Enchanter
        echo 3.^) Sorcerer
        echo 4.^) Warlock
        echo 5.^) Archmage
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Archmage
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Warlock
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Sorcerer
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Enchanter
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Apprentice
            )
        )
    )
if %iwad_type_str%==hexen (
    if %class_str%==Fighter (
        echo 1.^) Squire
        echo 2.^) Knight
        echo 3.^) Warrior
        echo 4.^) Berserker
        echo 5.^) Titan
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Titan
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Berserker
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Warrior
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Knight
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Squire
            )
        )
    if %class_str%==Cleric (
        echo 1.^) Altar Boy
        echo 2.^) Acolyte
        echo 3.^) Priest
        echo 4.^) Cardinal
        echo 5.^) Pope
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Pope
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Cardinal
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Priest
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Acolyte
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Altar Boy
            )
        )
    if %class_str%==Mage (
        echo 1.^) Apprentice
        echo 2.^) Enchanter
        echo 3.^) Sorcerer
        echo 4.^) Warlock
        echo 5.^) Archmage
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Archmage
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Warlock
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Sorcerer
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Enchanter
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Apprentice
            )
        )
    )
if %iwad_type_str%==hexdd (
    if %class_str%==Fighter (
        echo 1.^) Squire
        echo 2.^) Knight
        echo 3.^) Warrior
        echo 4.^) Berserker
        echo 5.^) Titan
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Titan
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Berserker
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Warrior
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Knight
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Squire
            )
        )
    if %class_str%==Cleric (
        echo 1.^) Altar Boy
        echo 2.^) Acolyte
        echo 3.^) Priest
        echo 4.^) Cardinal
        echo 5.^) Pope
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Pope
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Cardinal
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Priest
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Acolyte
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Altar Boy
            )
        )
    if %class_str%==Mage (
        echo 1.^) Apprentice
        echo 2.^) Enchanter
        echo 3.^) Sorcerer
        echo 4.^) Warlock
        echo 5.^) Archmage
        echo:
        echo Z.^) Return to Game Options
        echo:
        choice /c 12345z
        if !errorlevel! equ 6 goto %menu_str%
        if !errorlevel! equ 5 (
            set skill_int=5
            set skill_str=Archmage
            )
        if !errorlevel! equ 4 (
            set skill_int=4
            set skill_str=Warlock
            )
        if !errorlevel! equ 3 (
            set skill_int=3
            set skill_str=Sorcerer
            )
        if !errorlevel! equ 2 (
            set skill_int=2
            set skill_str=Enchanter
            )
        if !errorlevel! equ 1 (
            set skill_int=1
            set skill_str=Apprentice
            )
        )
    )
if %iwad_type_str%==strife0 (
    echo 1.^) Training
    echo 2.^) Rookie
    echo 3.^) Veteran
    echo 4.^) Elite
    echo 5.^) Bloodbath
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Bloodbath
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Elite
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Veteran
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Rookie
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Training
        )
    )
if %iwad_type_str%==strife1 (
    echo 1.^) Training
    echo 2.^) Rookie
    echo 3.^) Veteran
    echo 4.^) Elite
    echo 5.^) Bloodbath
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Bloodbath
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Elite
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Veteran
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Rookie
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Training
        )
    )
if %iwad_type_str%==strife (
    echo 1.^) Training
    echo 2.^) Rookie
    echo 3.^) Veteran
    echo 4.^) Elite
    echo 5.^) Bloodbath
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Bloodbath
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Elite
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Veteran
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Rookie
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Training
        )
    )
if %iwad_type_str%==sve (
    echo 1.^) Training
    echo 2.^) Rookie
    echo 3.^) Veteran
    echo 4.^) Elite
    echo 5.^) Bloodbath
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Bloodbath
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Elite
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Veteran
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Rookie
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Training
        )
    )
if %iwad_type_str%==chex (
    echo 1.^) Easy Does It
    echo 2.^) Not So Sticky
    echo 3.^) Gobs of Goo
    echo 4.^) Extreme Ooze
    echo 5.^) Super Slimey
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Super Slimey
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Extreme Ooze
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Gobs of Goo
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Not So Sticky
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Easy Does It
        )
    )
if %iwad_type_str%==chex3 (
    echo 1.^) Easy Does It
    echo 2.^) Not So Sticky
    echo 3.^) Gobs of Goo
    echo 4.^) Extreme Ooze
    echo 5.^) Super Slimey
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Super Slimey
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Extreme Ooze
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Gobs of Goo
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Not So Sticky
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Easy Does It
        )
    )
if %iwad_type_str%==hacx (
    echo 1.^) Please Don't Shoot!
    echo 2.^) Arrgh, I Need Health!
    echo 3.^) Let's Rip Them Apart!
    echo 4.^) I Am Immortal
    echo 5.^) Insanity!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Insanity!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=I Am Immortal
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Let's Rip Them Apart!
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Arrgh, I Need Health!
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Please Don't Shoot!
        )
    )
if %iwad_type_str%==hacx2 (
    echo 1.^) Please Don't Shoot!
    echo 2.^) Arrgh, I Need Health!
    echo 3.^) Let's Rip Them Apart!
    echo 4.^) I Am Immortal
    echo 5.^) Insanity!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Insanity!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=I Am Immortal
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Let's Rip Them Apart!
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Arrgh, I Need Health!
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Please Don't Shoot!
        )
    )
if %iwad_type_str%==freedoom1 (
    echo 1.^) Please Don't Kill Me!
    echo 2.^) Will This Hurt?
    echo 3.^) Bring on the Pain
    echo 4.^) Extreme Carnage
    echo 5.^) Mayhem!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Mayhem!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Extreme Carnage
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Bring on the Pain
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Will This Hurt?
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Please Don't Kill Me!
        )
    )
if %iwad_type_str%==freedoom2 (
    echo 1.^) Please Don't Kill Me!
    echo 2.^) Will This Hurt?
    echo 3.^) Bring on the Pain
    echo 4.^) Extreme Carnage
    echo 5.^) Mayhem!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Mayhem!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Extreme Carnage
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Bring on the Pain
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Will This Hurt?
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Please Don't Kill Me!
        )
    )
if %iwad_type_str%==freedm (
    echo 1.^) Please Don't Kill Me!
    echo 2.^) Will This Hurt?
    echo 3.^) Bring on the Pain
    echo 4.^) Extreme Carnage
    echo 5.^) Mayhem!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Mayhem!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Extreme Carnage
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Bring on the Pain
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Will This Hurt?
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Please Don't Kill Me!
        )
    )
if %iwad_type_str%==blasphem (
    echo 1.^) Whimpering Craven
    echo 2.^) Still a Novice
    echo 3.^) Experienced Warrior
    echo 4.^) Grim and Morbid
    echo 5.^) Death's Right Hand
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Death's Right Hand
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Grim and Morbid
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Experienced Warrior
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Still a Novice
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Whimpering Craven
        )
    )
if %iwad_type_str%==square1 (
    echo 1.^) Totally Square
    echo 2.^) Let's Rocktangle
    echo 3.^) Ready to Rhombus
    echo 4.^) Quadrilateral Damage
    echo 5.^) Cubular!
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Cubular!
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Quadrilateral Damage
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Ready to Rhombus
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Let's Rocktangle
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Totally Square
        )
    )
if %iwad_type_str%==delaweare (
    echo 1.^) Very Easy
    echo 2.^) Easy
    echo 3.^) Medium
    echo 4.^) Hard
    echo 5.^) Very Hard
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Very Hard
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Hard
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Medium
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Easy
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Very Easy
        )
    )
if %iwad_type_str%==harm1 (
    echo 1.^) Very Easy
    echo 2.^) Easy
    echo 3.^) Medium
    echo 4.^) Hard
    echo 5.^) Very Hard
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 12345z
    if !errorlevel! equ 6 goto %menu_str%
    if !errorlevel! equ 5 (
        set skill_int=5
        set skill_str=Very Hard
        )
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Hard
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Medium
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Easy
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Very Easy
        )
    )
if %iwad_type_str%==action2 (
    echo 1.^) Punkass Bitch
    echo 2.^) Petty Thug
    echo 3.^) Hot Shit
    echo 4.^) Badass Motherfucker
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 1234z
    if !errorlevel! equ 5 goto %menu_str%
    if !errorlevel! equ 4 (
        set skill_int=4
        set skill_str=Badass Motherfucker
        )
    if !errorlevel! equ 3 (
        set skill_int=3
        set skill_str=Hot Shit
        )
    if !errorlevel! equ 2 (
        set skill_int=2
        set skill_str=Petty Thug
        )
    if !errorlevel! equ 1 (
        set skill_int=1
        set skill_str=Punkass Bitch
        )
    )
if %iwad_type_str%==rotwb (
    echo 1.^) Easy
    echo 2.^) Medium
    echo 3.^) Hard
    echo:
    echo Z.^) Return to Game Options
    echo:
    choice /c 123z
    if !errorlevel! equ 4 goto %menu_str%
    if !errorlevel! equ 3 (
        set skill_int=4
        set skill_str=Hard
        )
    if !errorlevel! equ 2 (
        set skill_int=3
        set skill_str=Medium
        )
    if !errorlevel! equ 1 (
        set skill_int=2
        set skill_str=Easy
        )
    )
goto %menu_str%

:pwad_menu
call :show_banner
echo -----------------
echo Select PWAD Files
echo -----------------
echo:
if defined pwad1_file (echo 1.^) [%pwad1_file%]) else (echo 1.^) [Select a PWAD])
if defined pwad2_file (echo 2.^) [%pwad2_file%]) else (echo 2.^) [Select a PWAD])
if defined pwad3_file (echo 3.^) [%pwad3_file%]) else (echo 3.^) [Select a PWAD])
if defined pwad4_file (echo 4.^) [%pwad4_file%]) else (echo 4.^) [Select a PWAD])
if defined pwad5_file (echo 5.^) [%pwad5_file%]) else (echo 5.^) [Select a PWAD])
if defined pwad6_file (echo 6.^) [%pwad6_file%]) else (echo 6.^) [Select a PWAD])
if defined pwad7_file (echo 7.^) [%pwad7_file%]) else (echo 7.^) [Select a PWAD])
if defined pwad8_file (echo 8.^) [%pwad8_file%]) else (echo 8.^) [Select a PWAD])
if defined pwad9_file (echo 9.^) [%pwad9_file%]) else (echo 9.^) [Select a PWAD])
echo:
echo Z.) Return to Previous Menu
echo:
choice /c 123456789z
if %errorlevel% equ 10 goto %menu_str%
if %errorlevel% equ 9 call :pwad_query pwad9_file
if %errorlevel% equ 8 call :pwad_query pwad8_file
if %errorlevel% equ 7 call :pwad_query pwad7_file
if %errorlevel% equ 6 call :pwad_query pwad6_file
if %errorlevel% equ 5 call :pwad_query pwad5_file
if %errorlevel% equ 4 call :pwad_query pwad4_file
if %errorlevel% equ 3 call :pwad_query pwad3_file
if %errorlevel% equ 2 call :pwad_query pwad2_file
if %errorlevel% equ 1 call :pwad_query pwad1_file
goto pwad_menu

:advanced_menu
call :decode_dmflags
call :show_banner
echo ----------------
echo Advanced Options   DMFlags:    [%dmflags_int%]     DMFlags2:   [%dmflags2_int%]
echo ----------------
echo:
if %dmflags_4_int% equ 0 (
    if %dmflags_5_int% equ 0 (set _command_1_str=1.^) Falling Damage:   [Off]   ) else (set _command_1_str=1.^) Falling Damage:     [Hexen] )
    ) else (
    if %dmflags_5_int% equ 0 (set _command_1_str=1.^) Falling Damage:   [Old]   ) else (set _command_1_str=1.^) Falling Damage:     [Strife])
    )
if %dmflags_15_int% equ 0 (set _command_2_str=0.^) Items Respawn:    [Off]) else (set _command_2_str=0.^) Items Respawn:     [On])
if %dmflags_21_int% equ 0 (set _command_3_str=  I.^) Allow FOV:         [On]) else (set _command_3_str= I.^) Allow FOV:         [Off])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags2_2_int% equ 0 (set _command_1_str=2.^) Drop Weapon: [Off]   ) else (set _command_1_str=2.^) Drop Weapon:    [On]    )
if %dmflags2_28_int% equ 0 (set _command_2_str=A.^) Big Powerups Respawn:[Off]) else (set _command_2_str=A.^) Big Powerups Respawn:[On])
if %dmflags2_9_int% equ 0 (set _command_3_str=  J.^) Allow BFG Aiming:      [On]) else (set _command_3_str= J.^) Allow BFG Aiming:      [Off])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags2_7_int% equ 0 (set _command_1_str=3.^) Double Ammo:     [Off]   ) else (set _command_1_str=3.^) Double Ammo:    [On]    )
if %dmflags_16_int% equ 0 (set _command_2_str=B.^) Fast Monsters:    [Off]) else (set _command_2_str=B.^) Fast Monsters:     [On])
if %dmflags2_19_int% equ 0 (set _command_3_str= K.^) Allow Automap:     [On]) else (set _command_3_str= K.^) Allow Automap:     [Off])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags_12_int% equ 0 (set _command_1_str=4.^) Infinite Ammo:   [Off]   ) else (set _command_1_str=4.^) Infinite Ammo:  [On]    )
if %dmflags2_8_int% equ 0 (set _command_2_str=C.^) Degeneration:     [Off]) else (set _command_2_str=C.^) Degeneration:      [On])
if %dmflags2_20_int% equ 0 (set _command_3_str= L.^) Automap Allies:        [On]) else (set _command_3_str= L.^) Automap Allies:        [Off])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags2_17_int% equ 0 (set _command_1_str=5.^) Infinite Inventory: [Off]   ) else (set _command_1_str=5.^) Infinite Inventory: [On]    )
if %dmflags2_24_int% equ 0 (set _command_2_str=D.^) Allow Autoaim:   [On]) else (set _command_2_str=D.^) Allow Autoaim:  [Off])
if %dmflags2_21_int% equ 0 (set _command_3_str= M.^) Allow Spying:      [On]) else (set _command_3_str= M.^) Allow Spying:      [Off])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags_13_int% equ 0 (set _command_1_str=6.^) No Monsters:     [Off]   ) else (set _command_1_str=6.^) No Monsters:    [On]    )
if %dmflags2_23_int% equ 0 (set _command_2_str=E.^) Allow Suicide:   [On]) else (set _command_2_str=E.^) Allow Suicide:  [Off])
if %dmflags2_22_int% equ 0 (set _command_3_str= N.^) Chasecam Cheat:        [Off]) else (set _command_3_str=    N.^) Chasecam Cheat:        [On])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags2_18_int% equ 0 (set _command_1_str=7.^) No Monsters to Exit:[Off]   ) else (set _command_1_str=7.^) No Monsters to Exit:[On]    )
if %dmflags_17_int% equ 0 (set _command_2_str=F.^) Allow Jump:       [Default]) else (set _command_2_str=F.^) Allow Jump:        [Off]  )
if %dmflags_18_int% equ 1 set _command_2_str=F.) Allow Jump:         [On]
if %dmflags2_25_int% equ 0 (set _command_3_str=O.^) Check Ammo on Weapon Switch:[On]) else (set _command_3_str=O.^) Check Ammo on Weapon Switch:[Off])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags_14_int% equ 0 (set _command_1_str=8.^) Monsters Respawn:    [Off]   ) else (set _command_1_str=8.^) Monsters Respawn:   [On]    )
if %dmflags_23_int% equ 0 (set _command_2_str=G.^) Allow Crouch:     [Default]) else (set _command_2_str=G.^) Allow Crouch:  [Off]  )
if %dmflags_24_int% equ 1 set _command_2_str=G.) Allow Crouch:   [On]
if %dmflags2_26_int% equ 0 (set _command_3_str=P.^) Icon Death Kills Its Spawns:[Off]) else (set _command_3_str=P.^) Icon Death Kills Its Spawns:[On])
echo %_command_1_str%   %_command_2_str%    %_command_3_str%
if %dmflags2_15_int% equ 0 (set _command_1_str=9.^) Monsters Don't Rspn:[Off]       ) else (set _command_1_str=9.^) Monsters Don't Rspn:[On]        )
if %dmflags_19_int% equ 0 (set _command_2_str=H.^) Allow Freelook:   [Default]) else (set _command_2_str=H.^) Allow Freelook:    [Off]  )
if %dmflags_20_int% equ 1 set _command_2_str=H.) Allow Freelook:     [On]
if %dmflags2_27_int% equ 0 (set _command_3_str=Q.^) End Sector Counts for Kill%%:[On]) else (set _command_3_str=Q.^) End Sector Counts for Kill%%:[Off])
echo %_command_1_str%%_command_2_str%   %_command_3_str%
if %dmflags2_30_int% equ 0 (set _command_3_str=R.^) Always Spawn Multi. Objects:[Off]) else (set _command_3_str=R.^) Always Spawn Multi. Objects:[On])
echo                                        %_command_3_str%
echo Z.) Return to Game Options
echo:
choice /c 1234567890abcdefghijklmnopqrz
if %errorlevel% equ 29 goto %menu_str%
if %errorlevel% equ 28 set /a dmflags2_30_int+=1
if %errorlevel% equ 27 set /a dmflags2_27_int+=1
if %errorlevel% equ 26 set /a dmflags2_26_int+=1
if %errorlevel% equ 25 set /a dmflags2_25_int+=1
if %errorlevel% equ 24 set /a dmflags2_22_int+=1
if %errorlevel% equ 23 set /a dmflags2_21_int+=1
if %errorlevel% equ 22 set /a dmflags2_20_int+=1
if %errorlevel% equ 21 set /a dmflags2_19_int+=1
if %errorlevel% equ 20 set /a dmflags2_9_int+=1
if %errorlevel% equ 19 set /a dmflags_21_int+=1
if %errorlevel% equ 18 (
    if %dmflags_20_int% equ 0 (set /a dmflags_19_int+=1) else (set /a dmflags_20_int+=1)
    if %dmflags_19_int% equ 1 (set /a dmflags_20_int+=1)
    )
if %errorlevel% equ 17 (
    if %dmflags_24_int% equ 0 (set /a dmflags_23_int+=1) else (set /a dmflags_24_int+=1)
    if %dmflags_23_int% equ 1 (set /a dmflags_24_int+=1)
    )
if %errorlevel% equ 16 (
    if %dmflags_18_int% equ 0 (set /a dmflags_17_int+=1) else (set /a dmflags_18_int+=1)
    if %dmflags_17_int% equ 1 (set /a dmflags_18_int+=1)
    )
if %errorlevel% equ 15 set /a dmflags2_23_int+=1
if %errorlevel% equ 14 set /a dmflags2_24_int+=1
if %errorlevel% equ 13 set /a dmflags2_8_int+=1
if %errorlevel% equ 12 set /a dmflags_16_int+=1
if %errorlevel% equ 11 set /a dmflags2_28_int+=1
if %errorlevel% equ 10 set /a dmflags_15_int+=1
if %errorlevel% equ 9 set /a dmflags2_15_int+=1
if %errorlevel% equ 8 set /a dmflags_14_int+=1
if %errorlevel% equ 7 set /a dmflags2_18_int+=1
if %errorlevel% equ 6 set /a dmflags_13_int+=1
if %errorlevel% equ 5 set /a dmflags2_17_int+=1
if %errorlevel% equ 4 set /a dmflags_12_int+=1
if %errorlevel% equ 3 set /a dmflags2_7_int+=1
if %errorlevel% equ 2 set /a dmflags2_2_int+=1
if %errorlevel% equ 1 (
    if %dmflags_4_int% equ 1 set /a dmflags_5_int+=1
    set /a dmflags_4_int+=1
    )
call :encode_dmflags
goto advanced_menu

:player_menu
call :show_banner
echo --------------
echo Player Options
echo --------------
echo:
echo 1.) Name:      [%name_str%]
echo 2.) Team Color:    [%team_str%]
echo 3.) Player Color:  [%color_str%]
echo 4.) Class:         [%class_str%]
echo 5.) Gender:        [%gender_str%]
echo:
echo Z.) Return to Previous Menu
echo:
choice /c 12345z
if %errorlevel% equ 6 goto %top_menu_str%
if %errorlevel% equ 5 (
    if %gender_str%==Male set gender_str=Female
    if %gender_str%==Female set gender_str=Neutral
    if %gender_str%==Neutral set gender_str=Object
    if %gender_str%==Object set gender_str=Male
    )
if %errorlevel% equ 4 (
    if not defined iwad_file (
        echo No IWAD selected.
        pause
        goto player_menu
        )
    if "%class_str%"=="Fighter" (
        set class_str=Cleric
        set color_int=0
        set color_str=Blue
        set skill_int=0
        set skill_str=Altar Boy
        )
    if "%class_str%"=="Cleric" (
        set class_str=Mage
        set color_int=0
        set color_str=Blue
        set skill_int=0
        set skill_str=Apprentice
        )
    if "%class_str%"=="Mage" (
        set class_str=Random
        set color_int=0
        set color_str=Blue/Gold
        set skill_int=0
        set skill_str=Squire/Altar Boy/Apprentice
        )
    if "%class_str%"=="Random" (
        set class_str=Fighter
        set color_int=0
        set color_str=Gold
        set skill_int=0
        set skill_str=Squire
        )
    )
if %errorlevel% equ 3 (
    if not defined iwad_file (
        echo No IWAD selected.
        pause
        goto player_menu
        )
    set /a color_int+=1
    if "%class_str%"=="Marine" (
        if !color_int! equ 8 set color_int=0
        if !color_int! equ 0 set color_str=Green
        if !color_int! equ 1 set color_str=Gray
            if !color_int! equ 2 set color_str=Brown
        if !color_int! equ 3 set color_str=Red
        if !color_int! equ 4 set color_str=Light Gray
        if !color_int! equ 5 set color_str=Light Brown
        if !color_int! equ 6 set color_str=Light Red
        if !color_int! equ 7 set color_str=Light Blue
        )
    if "%class_str%"=="Corvus" (
        if !color_int! equ 10 set color_int=0
        if !color_int! equ 0 set color_str=Green
        if !color_int! equ 1 set color_str=Yellow
        if !color_int! equ 2 set color_str=Red
        if !color_int! equ 3 set color_str=Blue
        if !color_int! equ 4 set color_str=Brown
        if !color_int! equ 5 set color_str=Light Gray
        if !color_int! equ 6 set color_str=Light Brown
        if !color_int! equ 7 set color_str=Light Red
        if !color_int! equ 8 set color_str=Light Blue
        if !color_int! equ 9 set color_str=Beige
        )
    if "%class_str%"=="Fighter" (
        if !color_int! equ 8 set color_int=0
        if !color_int! equ 0 set color_str=Gold
        if !color_int! equ 1 set color_str=Red
        if !color_int! equ 2 set color_str=Blue
        if !color_int! equ 3 set color_str=Dull Green
        if !color_int! equ 4 set color_str=Green
        if !color_int! equ 5 set color_str=Gray
        if !color_int! equ 6 set color_str=Brown
        if !color_int! equ 7 set color_str=Purple
        )
    if "%class_str%"=="Cleric" (
        if !color_int! equ 8 set color_int=0
        if !color_int! equ 0 set color_str=Blue
        if !color_int! equ 1 set color_str=Red
        if !color_int! equ 2 set color_str=Gold
        if !color_int! equ 3 set color_str=Dull Green
        if !color_int! equ 4 set color_str=Green
        if !color_int! equ 5 set color_str=Gray
        if !color_int! equ 6 set color_str=Brown
        if !color_int! equ 7 set color_str=Purple
        )
    if "%class_str%"=="Mage" (
        if !color_int! equ 8 set color_int=0
        if !color_int! equ 0 set color_str=Blue
        if !color_int! equ 1 set color_str=Red
        if !color_int! equ 2 set color_str=Gold
        if !color_int! equ 3 set color_str=Dull Green
        if !color_int! equ 4 set color_str=Green
        if !color_int! equ 5 set color_str=Gray
        if !color_int! equ 6 set color_str=Brown
        if !color_int! equ 7 set color_str=Purple
        )
    if "%class_str%"=="Random" (
        if !color_int! equ 8 set color_int=0
        if !color_int! equ 0 set color_str=Blue/Gold
        if !color_int! equ 1 set color_str=Red
        if !color_int! equ 2 set color_str=Blue/Gold
        if !color_int! equ 3 set color_str=Dull Green
        if !color_int! equ 4 set color_str=Green
        if !color_int! equ 5 set color_str=Gray
        if !color_int! equ 6 set color_str=Brown
        if !color_int! equ 7 set color_str=Purple
        )
    if "%class_str%"=="Rebel" (
        if !color_int! equ 8 set color_int=0
        if !color_int! equ 0 set color_str=Brown
        if !color_int! equ 1 set color_str=Red
        if !color_int! equ 2 set color_str=Rust
        if !color_int! equ 3 set color_str=Gray
        if !color_int! equ 4 set color_str=Dark Green
        if !color_int! equ 5 set color_str=Gold
        if !color_int! equ 6 set color_str=Bright Green
        if !color_int! equ 7 set color_str=Blue
        )
    if "%class_str%"=="Chex Warrior" (
        if !color_int! equ 8 set color_int=0
        if !color_int! equ 0 set color_str=Light Blue
        if !color_int! equ 1 set color_str=Green
        if !color_int! equ 2 set color_str=Gray
        if !color_int! equ 3 set color_str=Brown
        if !color_int! equ 4 set color_str=Red
        if !color_int! equ 5 set color_str=Light Gray
        if !color_int! equ 6 set color_str=Light Brown
        if !color_int! equ 7 set color_str=Light Red
        )
    if "%class_str%"=="Square" (
        if !color_int! equ 15 set color_int=0
        if !color_int! equ 0 set color_str=Purple
        if !color_int! equ 1 set color_str=Blue
        if !color_int! equ 2 set color_str=Yellow
        if !color_int! equ 3 set color_str=Red
        if !color_int! equ 4 set color_str=Green
        if !color_int! equ 5 set color_str=Pink
        if !color_int! equ 6 set color_str=Cyan
        if !color_int! equ 7 set color_str=Brown
        if !color_int! equ 8 set color_str=Tan
        if !color_int! equ 9 set color_str=Olive
        if !color_int! equ 10 set color_str=Gray
        if !color_int! equ 11 set color_str=Black
        if !color_int! equ 12 set color_str=Maroon
        if !color_int! equ 13 set color_str=Beige
        if !color_int! equ 14 set color_str=Orange
        )
    if "%class_str%"=="Hacker" (
        if !color_int! equ 1 set color_int=0
        if !color_int! equ 0 set color_str=Unknown
        )
    if "%class_str%"=="Harmony" (
        if !color_int! equ 1 set color_int=0
        if !color_int! equ 0 set color_str=Unknown
        )
    )
if %errorlevel% equ 2 (
    set /a team_int+=1
    if !team_int! equ 256 set team_int=0
    if !team_int! equ 0 set team_str=Blue
    if !team_int! equ 1 set team_str=Red
    if !team_int! equ 2 set team_str=Green
    if !team_int! equ 3 set team_str=Gold
    if !team_int! equ 4 set team_str=Black
    if !team_int! equ 5 set team_str=White
    if !team_int! equ 6 set team_str=Orange
    if !team_int! equ 7 set team_str=Purple
    if !team_int! equ 8 set team_int=255
    if !team_int! equ 255 set team_str=None
    )
if %errorlevel% equ 1 (
    call :show_banner
    set /p name_str=What name would you like to go by?
    )
goto player_menu

:host_menu
set top_menu_str=host_menu
for /f %%a in ('powershell Invoke-RestMethod api.ipify.org') do set hostaddress=%%a
call :show_banner
echo -----------
echo Host a Game
echo -----------
echo:
echo Your Remote IP Address is [%hostaddress%]
echo:
echo 1.) Configure Multiplayer Options
echo 2.) Configure Game Options
echo 3.) Configure Player Options
if defined demo_mode_str (echo 4.^) Record a Demo File:         [%demo_file%.lmp]) else (echo 4.^) Record a Demo File:          [Off])
echo:
echo 5.) Launch GZDoom
echo:
echo Z.) Return to Main Menu
echo:
choice /c 12345z
if %errorlevel% equ 6 goto main_menu
if %errorlevel% equ 5 (
    if not defined iwad_file (
        echo No IWAD selected.
        pause
        ) else (
        start gzdoom.exe -host %players_int% -port %port_int% -netmode %netmode_int% -%mode_str% -iwad %iwad_file% -file %pwad1_file% %pwad2_file% %pwad3_file% %pwad4_file% %pwad5_file% %pwad6_file% %pwad7_file% %pwad8_file% %pwad9_file% -skill %skill_int% -%demo_mode_str% %demo_file% +map %map_str% +name %name_str% +playerclass %class_str% +colorset %color_int% +team %team_int% +gender %gender_str% +dmflags %dmflags_int% +dmflags2 %dmflags2_int% +teamplay %teamplay_bool% +timelimit %timelimit_float% +fraglimit %fraglimit_int%
        exit
        )
    )
if %errorlevel% equ 4 call :record_query
if %errorlevel% equ 3 goto player_menu
if %errorlevel% equ 2 goto game_menu
if %errorlevel% equ 1 goto multi_menu
goto host_menu

:multi_menu
set menu_str=multi_menu
call :show_banner
echo -------------------
echo Multiplayer Options
echo -------------------
echo:
echo Your Remote IP Address is [%hostaddress%]
echo:
echo 1.) Host Port:                 [%port_int%]
if %netmode_int% equ 0 (echo 2.^) Network Mode:             [Peer-To-Peer]) else (echo 2.^) Network Mode:               [Packet Server])
echo 3.) Number of Players:                 [%players_int%]
echo 4.) Game Mode:                     [%mode_name_str%]
if defined mode_str (echo 5.^) Configure Deathmatch Specific Options) else (echo 5.^) Configure Co-Operative Specific Options)
echo:
echo Z.) Return to Host a Game
echo:
choice /c 12345z
if %errorlevel% equ 6 goto host_menu
if %errorlevel% equ 5 (
    if defined mode_str (goto deathmatch_menu) else (goto coop_menu)
    )
if %errorlevel% equ 4 (
    if defined mode_str (
        set mode_str=
        set mode_name_str=Co-Operative
        set dmflags_int=0
        set dmflags2_int=0
        ) else (
        set mode_str=altdeath
        set mode_name_str=Deathmatch
        set dmflags_int=16388
        set dmflags2_int=0
        )
    )
if %errorlevel% equ 3 call :players_query
if %errorlevel% equ 2 (
    if %netmode_int% equ 0 (set netmode_int=1) else (set netmode_int=0)
    )
if %errorlevel% equ 1 call :port_query
goto multi_menu

:coop_menu
call :decode_dmflags
call :show_banner
echo --------------------
echo Co-Operative Options       DMFlags:    [%dmflags_int%]     DMFlags2:   [%dmflags2_int%]
echo --------------------
echo:
if %dmflags2_29_int% equ 0 (set _command_1_str=1.^) Spawn Multiplayer Things:   [Off]) else (set _command_1_str=1.^) Spawn Multiplayer Things:  [On])
if %dmflags_28_int% equ 0 (set _command_2_str=6.^) Keep Armor:          [On]) else (set _command_2_str=6.^) Keep Armor:         [Off])
echo %_command_1_str%   %_command_2_str%
if %dmflags_22_int% equ 0 (set _command_1_str=2.^) Spawn Multi. Weapons:    [On]) else (set _command_1_str=2.^) Spawn Multi. Weapons:   [Off])
if %dmflags_29_int% equ 0 (set _command_2_str=7.^) Keep Powerups:       [On]) else (set _command_2_str=7.^) Keep Powerups:      [Off])
echo %_command_1_str%   %_command_2_str%
if %dmflags_25_int% equ 0 (set _command_1_str=3.^) Lose Entire Inventory:   [Off]) else (set _command_1_str=3.^) Lose Entire Inventory: [On])
if %dmflags_30_int% equ 0 (set _command_2_str=8.^) Keep Ammo:           [On]) else (set _command_2_str=8.^) Keep Ammo:          [Off])
echo %_command_1_str%   %_command_2_str%
if %dmflags_26_int% equ 0 (set _command_1_str=4.^) Keep Keys:           [On]) else (set _command_1_str=4.^) Keep Keys:          [Off])
if %dmflags_31_int% equ 0 (set _command_2_str=9.^) Lose Half Ammo:      [Off]) else (set _command_2_str=9.^) Lose Half Ammo:        [On])
echo %_command_1_str%   %_command_2_str%
if %dmflags_27_int% equ 0 (set _command_1_str=5.^) Keep Weapons:        [On]) else (set _command_1_str=5.^) Keep Weapons:       [Off])
if %dmflags2_13_int% equ 0 (set _command_2_str=0.^) Spawn Where Died:       [Off]) else (set _command_2_str=0.^) Spawn Where Died:      [On])
echo %_command_1_str%   %_command_2_str%
echo:
echo Z.) Return to Game Options
echo:
choice /c 1234567890z
if %errorlevel% equ 11 goto multi_menu
if %errorlevel% equ 10 set /a dmflags2_13_int+=1
if %errorlevel% equ 9 set /a dmflags_31_int+=1
if %errorlevel% equ 8 set /a dmflags_30_int+=1
if %errorlevel% equ 7 set /a dmflags_29_int+=1
if %errorlevel% equ 6 set /a dmflags_28_int+=1
if %errorlevel% equ 5 set /a dmflags_27_int+=1
if %errorlevel% equ 4 set /a dmflags_26_int+=1
if %errorlevel% equ 3 set /a dmflags_25_int+=1
if %errorlevel% equ 2 set /a dmflags_22_int+=1
if %errorlevel% equ 1 set /a dmflags2_29_int+=1
call :encode_dmflags
goto coop_menu

:deathmatch_menu
call :decode_dmflags
call :show_banner
echo ------------------
echo Deathmatch Options     DMFlags:    [%dmflags_int%]     DMFlags2:   [%dmflags2_int%]
echo ------------------
echo:
if %dmflags_3_int% equ 0 (set _command_1_str=1.^) Weapons Stay:         [Off]) else (set _command_1_str=1.^) Weapons Stay:      [On])
if %dmflags2_10_int% equ 0 (set _command_2_str=9.^) Barrels Respawn:        [Off]) else (set _command_2_str=9.^) Barrels Respawn:       [On])
echo %_command_1_str%   %_command_2_str%
if %dmflags_2_int% equ 0 (set _command_1_str=2.^) Allow Powerups:       [On]) else (set _command_1_str=2.^) Allow Powerups:         [Off])
if %dmflags2_11_int% equ 0 (set _command_2_str=0.^) Respawn Protection:     [Off]) else (set _command_2_str=0.^) Respawn Protection:        [On])
echo %_command_1_str%   %_command_2_str%
if %dmflags_1_int% equ 0 (set _command_1_str=3.^) Allow Health:     [On]) else (set _command_1_str=3.^) Allow Health:       [Off])
if %dmflags2_16_int% equ 0 (set _command_2_str=A.^) Lose Frag if Fragged:   [Off]) else (set _command_2_str=A.^) Lose Frag if Fragged:  [On])
echo %_command_1_str%   %_command_2_str%
if %dmflags_10_int% equ 0 (set _command_1_str=4.^) Allow Armor:     [On]) else (set _command_1_str=4.^) Allow Armor:        [Off])
if %dmflags2_14_int% equ 0 (set _command_2_str=B.^) Keep Frags Gained:      [Off]) else (set _command_2_str=B.^) Keep Frags Gained:     [On])
echo %_command_1_str%   %_command_2_str%
if %dmflags_8_int% equ 0 (set _command_1_str=5.^) Spawn Farthest:       [Off]) else (set _command_1_str=5.^) Spawn Farthest:        [On])
if %dmflags2_5_int% equ 0 (set _command_2_str=C.^) No Team Switching:       [Off]) else (set _command_2_str=C.^) No Team Switching:     [On])
echo %_command_1_str%   %_command_2_str%
if %dmflags_7_int% equ 0 (set _command_1_str=6.^) Same Map:         [Off]) else (set _command_1_str=6.^) Same Maps:         [On])
if %teamplay_bool%==false (set _command_2_str=D.^) Team Deathmatch:     [Off]) else (set _command_2_str=D.^) Team Deathmatch:       [On])
echo %_command_1_str%   %_command_2_str%
if %dmflags_9_int% equ 0 (set _command_1_str=7.^) Force Respawn:        [Off]) else (set _command_1_str=7.^) Force Respawn:     [On])
if %timelimit_float% equ 0 (set _command_2_str=E.^) Time Limit:         [Off]) else (set _command_2_str=E.^) Time Limit:            [%timelimit_float% Minutes])
echo %_command_1_str%   %_command_2_str%
if %dmflags_11_int% equ 0 (set _command_1_str=8.^) Allow Exit:          [On]) else (set _command_1_str=8.^) Allow Exit:         [Off])
if %fraglimit_int% equ 0 (set _command_2_str=F.^) Frag Limit:           [Off]) else (set _command_2_str=F.^) Frag Limit:            [%fraglimit_int% Frags])
echo %_command_1_str%   %_command_2_str%
echo:
echo Z.) Return to Game Options
echo:
choice /c 1234567890abcdefz
if %errorlevel% equ 17 goto multi_menu
if %errorlevel% equ 16 (
    call :show_banner
    set /p fraglimit_int=How many frags are needed to win ^(0 for No Limit^)?
    set /a fraglimit_float/=1
    )
if %errorlevel% equ 15 (
    call :show_banner
    set /p timelimit_float=How many minutes should a match last ^(0 for No Limit^)?
    set /a timelimit_float/=1
    )
if %errorlevel% equ 14 if %teamplay_bool%==false (set teamplay_bool=true) else (set teamplay_bool=false)
if %errorlevel% equ 13 set /a dmflags2_5_int+=1
if %errorlevel% equ 12 set /a dmflags2_14_int+=1
if %errorlevel% equ 11 set /a dmflags2_16_int+=1
if %errorlevel% equ 10 set /a dmflags2_11_int+=1
if %errorlevel% equ 9 set /a dmflags2_10_int+=1
if %errorlevel% equ 8 set /a dmflags_11_int+=1
if %errorlevel% equ 7 set /a dmflags_9_int+=1
if %errorlevel% equ 6 set /a dmflags_7_int+=1
if %errorlevel% equ 5 set /a dmflags_8_int+=1
if %errorlevel% equ 4 set /a dmflags_10_int+=1
if %errorlevel% equ 3 set /a dmflags_1_int+=1
if %errorlevel% equ 2 set /a dmflags_2_int+=1
if %errorlevel% equ 1 set /a dmflags_3_int+=1
call :encode_dmflags
goto deathmatch_menu

:join_menu
set top_menu_str=join_menu
set menu_str=join_menu
call :show_banner
echo -----------
echo Join a Game
echo -----------
echo:
echo 1.) Host IP Address:       [%host_str%]
echo 2.) Host Port:         [%port_int%]
echo 3.) IWAD:          [%iwad_str%]
echo 4.) Select PWAD Files
echo 5.) Configure Player Options
if defined demo_mode_str (echo 6.^) Record a Demo File:     [%demo_file%.lmp]) else (echo 6.^) Record a Demo File:      [Off])
echo:
echo 7.) Launch GZDoom
echo:
echo Z.) Return to Main Menu
echo:
choice /c 1234567z
if %errorlevel% equ 8 goto main_menu
if %errorlevel% equ 7 (
    if not defined iwad_file (
        echo No IWAD selected.
        pause
        ) else (
        start gzdoom.exe -join %host_str%:%port_int% -iwad %iwad_file% -file %pwad1_file% %pwad2_file% %pwad3_file% %pwad4_file% %pwad5_file% %pwad6_file% %pwad7_file% %pwad8_file% %pwad9_file% -%demo_mode_str% %demo_file% +name %name_str% +playerclass %class_str% +colorset %color_int% +team %team_int% +gender %gender_str%
        exit
        )
    )
if %errorlevel% equ 6 call :record_query
if %errorlevel% equ 5 goto player_menu
if %errorlevel% equ 4 goto pwad_menu
if %errorlevel% equ 3 goto iwad_menu
if %errorlevel% equ 2 call :port_query
if %errorlevel% equ 1 (
    call :show_banner
    set /p host_str=What is the IP Address of the Host?
    )
goto join_menu

:demo_menu
set menu_str=demo_menu
call :show_banner
echo ------------
echo Demo Options
echo ------------
echo:
echo 1.) IWAD:      [%iwad_str%]
if defined demo_file (echo 2.^) Demo File:      [%demo_file%]) else (echo 2.^) Demo File:       [Select a Demo File])
echo 3.) Select PWAD Files
echo:
echo 4.) Launch GZDoom
echo:
echo Z.) Return to Main Menu
echo:
choice /c 1234z
if %errorlevel% equ 5 goto main_menu
if %errorlevel% equ 4 (
    if not defined iwad_file (
        echo No IWAD selected.
        pause
        goto demo_menu
        )
    if not defined demo_file (
        echo No demo selected.
        pause
        goto demo_menu
        )
    start gzdoom.exe -iwad %iwad_file% -file %pwad1_file% %pwad2_file% %pwad3_file% %pwad4_file% %pwad5_file% %pwad6_file% %pwad7_file% %pwad8_file% %pwad9_file% -playdemo %demo_file%
    exit
    )
if %errorlevel% equ 3 goto pwad_menu
if %errorlevel% equ 2 (
    call :show_banner
    set /p demo_file=What demo file would you like to load?
    set demo_file=!demo_file!.lmp
    if not exist !demo_file! (
        set demo_file=
        echo File Not Found!
        pause
        )
    )
if %errorlevel% equ 1 goto iwad_menu
goto demo_menu

:show_banner
cls
echo =========================================================================
echo  ________  ________                ________  _____ ______   ________
echo ^|\   ____\^|\_____  \              ^|\   ____\^|\   _ \  _   \^|\   ___ \
echo \ \  \___^| \^|___/  /^| ____________\ \  \___^|\ \  \\\__\ \  \ \  \_^|\ \
echo  \ \  \  ___   /  / /^|\____________\ \  \    \ \  \\^|__^| \  \ \  \ \\ \
echo   \ \  \^|\  \ /  /_/_\^|____________^|\ \  \____\ \  \    \ \  \ \  \_\\ \
echo    \ \_______\\________\             \ \_______\ \__\    \ \__\ \_______\
echo     \^|_______^|\^|_______^|              \^|_______^|\^|__^|     \^|__^|\^|_______^|
echo:
echo           -=[Ludwig's Command Line Helper %version_str% for GZDoom %gz_version_str%]=-
echo:
echo =========================================================================
echo:
exit /b

:scan_iwads
echo Locating IWADs...
echo:
set doom_complete_version_str=N/A
set doom2_version_str=N/A
set doom2f_version_str=N/A
set plutonia_version_str=N/A
set plutoniaunity_version_str=N/A
set tnt_version_str=N/A
set tntunity_version_str=N/A
set doomu_version_str=N/A
set doom_version_str=N/A
set doom1_version_str=N/A
set doom2bfg_version_str=N/A
set doom2xbox_version_str=N/A
set doom2unity_version_str=N/A
set doombfg_version_str=N/A
set doomxbox_version_str=N/A
set doomunity_version_str=N/A
set freedoom1_version_str=N/A
set freedoom2_version_str=N/A
set freedm_version_str=N/A
set heretic_version_str=N/A
set hereticsr_version_str=N/A
set heretic1_version_str=N/A
set hexen_version_str=N/A
set hexdd_version_str=N/A
set hexdemo_version_str=N/A
set strife_version_str=N/A
set sve_version_str=N/A
set strife0_version_str=N/A
set strife1_version_str=N/A
set blashpem_version_str=N/A
set chex_version_str=N/A
set chex3_version_str=N/A
set action2_version_str=N/A
set harm1_version_str=N/A
set hacx_version_str=N/A
set hacx2_version_str=N/A
set square1_version_str=N/A
set delaweare_version_str=N/A
set rotwb_version_str=N/A
for %%g in (*.wad,*.pk3) do (
    for /f "tokens=* skip=1" %%h in ('certutil -hashfile %%g MD5 ^|find /v "CertUtil:"') do (
        set _md5_str=%%h
        set _md5_str=!_md5_str: =!
        call :hash_file %%g !_md5_str! f0cefca49926d00903cf57551d901abe doom1 1.9 "DOOM Shareware"
        call :hash_file %%g !_md5_str! 5f4eb849b1af12887dec04a2a12e5e62 doom1 1.8 "DOOM Shareware"
        call :hash_file %%g !_md5_str! c428ea394dc52835f2580d5bfd50d76f doom1 1.666 "DOOM Shareware"
        call :hash_file %%g !_md5_str! 762fd6d4b960d4b759730f01387a50a1 doom1 1.6 "DOOM Shareware"
        call :hash_file %%g !_md5_str! e280233d533dcc28c1acd6ccdc7742d4 doom1 1.5 "DOOM Shareware"
        call :hash_file %%g !_md5_str! a21ae40c388cb6f2c3cc1b95589ee693 doom1 1.4 "DOOM Shareware"
        call :hash_file %%g !_md5_str! 17aebd6b5f2ed8ce07aa526a32af8d99 doom1 1.25 "DOOM Shareware"
        call :hash_file %%g !_md5_str! 30aa5beb9e5ebfbbe1e1765561c08f38 doom1 1.2 "DOOM Shareware"
        call :hash_file %%g !_md5_str! 52cbc8882f445573ce421fa5453513c1 doom1 1.1a "DOOM Shareware"
        call :hash_file %%g !_md5_str! cea4989df52b65f4d481b706234a3dca doom1 1.1 "DOOM Shareware"
        call :hash_file %%g !_md5_str! 90facab21eede7981be10790e3f82da2 doom1 1.0 "DOOM Shareware"
        call :hash_file %%g !_md5_str! 1cd63c5ddff1bf8ce844237f580e9cf3 doom 1.9 "DOOM Registered"
        call :hash_file %%g !_md5_str! 11e1cd216801ea2657723abc86ecb01f doom 1.8 "DOOM Registered"
        call :hash_file %%g !_md5_str! 54978d12de87f162b9bcc011676cb3c0 doom 1.666 "DOOM Registered"
        call :hash_file %%g !_md5_str! 792fd1fea023d61210857089a7c1e351 doom 1.2 "DOOM Registered"
        call :hash_file %%g !_md5_str! 981b03e6d1dc033301aa3095acc437ce doom 1.1 "DOOM Registered"
        call :hash_file %%g !_md5_str! 981b03e6d1dc033301aa3095acc437ce doom Beta "DOOM Registered"
        call :hash_file %%g !_md5_str! 9c877480b8ef33b7074f1f0c07ed6487 doom 0.5 "DOOM Registered"
        call :hash_file %%g !_md5_str! b6afa12a8b22e2726a8ff5bd249223de doom 0.4 "DOOM Registered"
        call :hash_file %%g !_md5_str! dae9b1eea1a8e090fdfa5707187f4a43 doom 0.3 "DOOM Registered"
        call :hash_file %%g !_md5_str! 740901119ba2953e3c7f3764eca6e128 doom 0.2 "DOOM Registered"
        call :hash_file %%g !_md5_str! c4fe9fd920207691a9f493668e0a2083 doomu 1.9 "The Ultimate DOOM"
        call :hash_file %%g !_md5_str! fb35c4a5a9fd49ec29ab6e900572c524 doombfg 1.9 "DOOM: BFG Edition"
        call :hash_file %%g !_md5_str! 0c8758f102ccafe26a3040bee8ba5021 doomxbox 1.9 "DOOM: XBox Edition"
        call :hash_file %%g !_md5_str! 8517c4e8f0eef90b82852667d345eb86 doomunity 1.3 "DOOM: Unity Edition"
        call :hash_file %%g !_md5_str! 21b200688d0fa7c1b6f63703d2bdd455 doomunity 1.1 "DOOM: Unity Edition"
        call :hash_file %%g !_md5_str! 232a79f7121b22d7401905ee0ee1e487 doomunity 1.0 "DOOM: Unity Edition"
        call :hash_file %%g !_md5_str! 25e1459ca71d321525f84628f45ca8cd doom2 1.9 "DOOM 2: Hell on Earth"
        call :hash_file %%g !_md5_str! c236745bb01d89bbb866c8fed81b6f8c doom2 1.8 "DOOM 2: Hell on Earth"
        call :hash_file %%g !_md5_str! d7a07e5d3f4625074312bc299d7ed33f doom2 1.7a "DOOM 2: Hell on Earth"
        call :hash_file %%g !_md5_str! ea74a47a791fdef2e9f2ea8b8a9da13b doom2 1.7 "DOOM 2: Hell on Earth"
        call :hash_file %%g !_md5_str! 30e3c2d0350b67bfbf47271970b74b2f doom2 1.666 "DOOM 2: Hell on Earth"
        call :hash_file %%g !_md5_str! d9153ced9fd5b898b36cc5844e35b520 doom2 1.666g "DOOM 2: Hell on Earth"
        call :hash_file %%g !_md5_str! 3cb02349b3df649c86290907eed64e7b doom2f 1.8 "DOOM 2: L'Enfer sur Terre"
        call :hash_file %%g !_md5_str! c3bea40570c23e511a7ed3ebcd9865f7 doom2bfg 1.9 "DOOM 2: BFG Edition"
        call :hash_file %%g !_md5_str! a793ebcdd790afad4a1f39cc39a893bd doom2xbox 1.9 "DOOM: XBox Edition"
        call :hash_file %%g !_md5_str! 8ab6d0527a29efdc1ef200e5687b5cae doom2unity 1.3 "DOOM 2: Unity Edition"
        call :hash_file %%g !_md5_str! 7895d10c281305c45a7e5f01b3f7b1d8 doom2unity 1.1 "DOOM 2: Unity Edition"
        call :hash_file %%g !_md5_str! e7395bd5e838d58627bd028871efbc14 doom2unity 1.0 "DOOM 2: Unity Edition"
        call :hash_file %%g !_md5_str! 1d39e405bf6ee3df69a8d2646c8d5c49 tnt 1.9a "Final DOOM: TNT - Evilution"
        call :hash_file %%g !_md5_str! 4e158d9953c79ccf97bd0663244cc6b6 tnt 1.9 "Final DOOM: TNT - Evilution"
        call :hash_file %%g !_md5_str! f5528f6fd55cf9629141d79eda169630 tntunity 1.3 "Final DOOM: TNT - Evilution: Unity Edition"
        call :hash_file %%g !_md5_str! a6685de59ddf2c07f45deeec95296d98 tntunity 1.1 "Final DOOM: TNT - Evilution: Unity Edition"
        call :hash_file %%g !_md5_str! 3493be7e1e2588bc9c8b31eab2587a04 plutonia 1.9a "Final DOOM: The Plutonia Experiment"
        call :hash_file %%g !_md5_str! 75c8cf89566741fa9d22447604053bd7 plutonia 1.9 "Final DOOM: The Plutonia Experiment"
        call :hash_file %%g !_md5_str! ae76c20366ff685d3bb9fab11b148b84 plutoniaunity 1.3 "Final DOOM: The Plutonia Experiment: Unity Edition"
        call :hash_file %%g !_md5_str! 0b381ff7bae93bde6496f9547463619d plutoniaunity 1.0 "Final DOOM: The Plutonia Experiment: Unity Edition"
        call :hash_file %%g !_md5_str! ae779722390ec32fa37b0d361f7d82f8 heretic1 1.2 "Heretic Shareware"
        call :hash_file %%g !_md5_str! 023b52175d2f260c3bdc5528df5d0a8c heretic1 1.0 "Heretic Shareware"
        call :hash_file %%g !_md5_str! 1e4cb4ef075ad344dd63971637307e04 heretic 1.2 "Heretic"
        call :hash_file %%g !_md5_str! 3117e399cdb4298eaa3941625f4b2923 heretic 1.0 "Heretic"
        call :hash_file %%g !_md5_str! 66d686b1ed6d35ff103f15dbd30e0341 hereticsr 1.3 "Heretic: Shadow of the Serpent Riders"
        call :hash_file %%g !_md5_str! 876a5a44c7b68f04b3bb9bc7a5bd69d6 hexdemo 1.0 "Hexen: Demo Version"
        call :hash_file %%g !_md5_str! 9178a32a496ff5befebfe6c47dac106c hexdemo Beta "Hexen: Demo Version"
        call :hash_file %%g !_md5_str! abb033caf81e26f12a2103e1fa25453f hexen 1.1 "Hexen: Beyond Heretic"
        call :hash_file %%g !_md5_str! b2543a03521365261d0a0f74d5dd90f0 hexen 1.0 "Hexen: Beyond Heretic"
        call :hash_file %%g !_md5_str! c88a2bb3d783e2ad7b599a8e301e099e hexen Beta "Hexen: Beyond Heretic"
        call :hash_file %%g !_md5_str! 78d5898e99e220e4de64edaa0e479593 hexdd 1.1 "Hexen: Deathkings of the Dark Citadel"
        call :hash_file %%g !_md5_str! 1077432e2690d390c256ac908b5f4efa hexdd 1.0 "Hexen: Deathkings of the Dark Citadel"
        call :hash_file %%g !_md5_str! bb545b9c4eca0ff92c14d466b3294023 strife1 1.1 "Strife: Teaser: New Version"
        call :hash_file %%g !_md5_str! de2c8dcad7cca206292294bdab524292 strife0 1.0 "Strife: Teaser: Old Version"
        call :hash_file %%g !_md5_str! 2fed2031a5b03892106e0f117f17901f strife 1.2 "Strife: Quest for the Sigil"
        call :hash_file %%g !_md5_str! 8f2d3a6a289f5d2f2f9c1eec02b47299 strife 1.1 "Strife: Quest for the Sigil"
        call :hash_file %%g !_md5_str! 47958a4fea8a54116e4b51fc155799c0 sve 1.2 "Strife: Veteran Edition"
        call :hash_file %%g !_md5_str! 2c0a712d3e39b010519c879f734d79ae sve 1.1 "Strife: Veteran Edition"
        call :hash_file %%g !_md5_str! 06a8f99b9b756ac908917c3868b8e3bc sve 1.0 "Strife: Veteran Edition"
        call :hash_file %%g !_md5_str! 25485721882b050afa96a56e5758dd52 chex 1.0 "Chex Quest"
        call :hash_file %%g !_md5_str! bce163d06521f9d15f9686786e64df13 chex3 1.4 "Chex Quest 3"
        call :hash_file %%g !_md5_str! 59c985995db55cd2623c1893550d82b3 chex3 1.0 "Chex Quest 3"
        call :hash_file %%g !_md5_str! 65ed74d522bdf6649c2831b13b9e02b4 hacx 1.2 "Hacx: Twitch N' Kill"
        call :hash_file %%g !_md5_str! b7fd2f43f3382cf012dc6b097a3cb182 hacx 1.1 "Hacx: Twitch N' Kill"
        call :hash_file %%g !_md5_str! 402ca45bb90520bfef0dec6baac5889e hacx 1.0 "Hacx: Twitch N' Kill"
        call :hash_file %%g !_md5_str! 793f07ebadb3d7353ee5b6b6429d9afa hacx2 2.0r61 "Hacx 2.0"
        call :hash_file %%g !_md5_str! ad8db94ef3bdb8522f57d4c5b3b92bd7 hacx2 2.0r58 "Hacx 2.0"
        call :hash_file %%g !_md5_str! b36aa44a23045e503c19af4b4c438a78 freedoom1 0.12.1 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 0c5f8ff45cc3538d368a0f8d8fc11ce3 freedoom1 0.12 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! ea471a3d38fcee0fb3a69bcd3221e335 freedoom1 0.11.3 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 6d00c49520be26f08a6bd001814a32ab freedoom1 0.11.2 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 35312e99d2473297aabe0602700bee8a freedoom1 0.11.1 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 21a4707fc25d29edf4b098bd400c5c42 freedoom1 0.11 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 91de79621a393a08c39a9ab2c034b766 freedoom1 0.10.1 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 9b8d72b59fd93b2b3e116149baa1b142 freedoom1 0.10 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! aca90cf5ac36e996edc58bd0329b979a freedoom1 0.9 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 30095b256dd3a1566bbc30286f72bc47 freedoom1 0.8 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 2a24722c068d3a74cd16f770797ff198 freedoom1 0.8b1 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 7b7720fc9c1a20fb8ebb3e9532c089af freedoom1 0.7 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 10a5ea771980c135be1e9585f2a05e53 freedoom1 0.7rc1 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! 2e1af223cad142e3487c4327cf0ac8bd freedoom1 0.6.4 "FreeDOOM: Phase 1"
        call :hash_file %%g !_md5_str! ca9a4159a7833544a89144c7f5053412 freedoom2 0.12.1 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! 83560b2963424fa4a2eb971194428bf8 freedoom2 0.12 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! 984f99af08f085e38070f51095ab7c31 freedoom2 0.11.3 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! 90832a872b5bb0aca4ca0b20419aad5d freedoom2 0.11.2 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! ec5b38b30ba2b70e278205776af3fbb5 freedoom2 0.11.1 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! b1018017c61b06e33c11102d8bafaad0 freedoom2 0.11 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! dd9c9e73f5f50d3778c85573cd08d9a4 freedoom2 0.10.1 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! c5a4f2d38d78b251d8557cb2d93e40ee freedoom2 0.10 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! 8fa57dbc7687f84528eba39dde3a20e0 freedoom2 0.9 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! e3668912fc37c479b2840516c887018b freedoom2 0.8 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! 0597b0937e9615a9667b98077332597d freedoom2 0.8b1 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! 21ea277fa5612267eb7985493b33150e freedoom2 0.7 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! e2db4f21fbcfd0d69e39ae16b0594168 freedoom2 0.7rc1 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! 5292a1275340798acf9cee07081718e8 freedoom2 0.6.4 "FreeDOOM: Phase 2"
        call :hash_file %%g !_md5_str! d40c932a9183ded919afa89f4a729668 freedm 0.12.1 "FreeDM"
        call :hash_file %%g !_md5_str! 3250aad8b1d40fb7b25b7df6573eb29f freedm 0.12 "FreeDM"
        call :hash_file %%g !_md5_str! 87ee2494d921633420ce9bdb418127c4 freedm 0.11.3 "FreeDM"
        call :hash_file %%g !_md5_str! 9352b09ae878dc52c6c18aa38acda6eb freedm 0.11.2 "FreeDM"
        call :hash_file %%g !_md5_str! 77ba9c0f75c32e4a729490688bb99241 freedm 0.11.1 "FreeDM"
        call :hash_file %%g !_md5_str! d76d3973c075b069ecb4e16dc9eacbb4 freedm 0.11 "FreeDM"
        call :hash_file %%g !_md5_str! bd4f359f1963e388beda014c5548b420 freedm 0.10.1 "FreeDM"
        call :hash_file %%g !_md5_str! f37b8b70e1394289a7ec404f67cdec1a freedm 0.10 "FreeDM"
        call :hash_file %%g !_md5_str! cbb27c5f3c2c44d34843cf63daa627f6 freedm 0.9 "FreeDM"
        call :hash_file %%g !_md5_str! 05859098bf191899903ef343afba369d freedm 0.8 "FreeDM"
        call :hash_file %%g !_md5_str! 5142cbf6a3f862b293d649225737381b freedm 0.8b1 "FreeDM"
        call :hash_file %%g !_md5_str! da6ca1bab43edf9fe6a4f14ad060a8d8 freedm 0.7 "FreeDM"
        call :hash_file %%g !_md5_str! ee1090f12aa2b4a06e33f640a039f00e freedm 0.7rc1 "FreeDM"
        call :hash_file %%g !_md5_str! 6f49b8557b39c3a863341cadfc3a420f freedm 0.6.4 "FreeDM"
        call :hash_file %%g !_md5_str! c98a0eca0187edef40a06cab38949210 blasphem 0.1.5 "Blasphemer"
        call :hash_file %%g !_md5_str! fbe921f6770a3c836aba6a6a92a9e945 blasphem 0.1.4 "Blasphemer"
        call :hash_file %%g !_md5_str! 83b074d955e88e19a563d593b064c78c blasphem 0.1.3b "Blasphemer"
        call :hash_file %%g !_md5_str! 9039312b393c144bfd6bc04028bc1ddd blasphem 0.1.3 "Blasphemer"
        call :hash_file %%g !_md5_str! c106a4e0a96f299954b073d5f97240be action2 1.1 "Action DOOM 2: Urban Brawl"
        call :hash_file %%g !_md5_str! 1914b280b0a4b517214523bc2270e758 action2 1.0 "Action DOOM 2: Urban Brawl"
        call :hash_file %%g !_md5_str! 48ebb49b52f6a3020d174dbcc1b9aeaf harm1 1.1 "Harmony"
        call :hash_file %%g !_md5_str! fe2cce6713ddcf6c6d6f0e8154b0cb38 harm1 1.0 "Harmony"
        call :hash_file %%g !_md5_str! 582cbe67ebd506dd55786552482099f8 square1 2.1 "The Adventures of Square"
        call :hash_file %%g !_md5_str! 9691100ff85b0902be3851890ec5aca9 delaweare 1.0 "Delaweare"
        call :hash_file %%g !_md5_str! 9176043468e10eaa471ae556e8e55745 rotwb 1.3 "Rise of the Wool Ball"
        call :hash_file %%g !_md5_str! fb0226e3fed7a3c1e7ea4cd4da905950 rotwb 1.2 "Rise of the Wool Ball"
        call :hash_file %%g !_md5_str! 38cb10aee135ccb92a96c0184d244ed3 rotwb 1.1 "Rise of the Wool Ball"
        if %%g==doom_complete.pk3 (
            set doom_complete_version_str=!_md5_str:~0,8!
            set doom_complete_file=doom_complete
            echo Found doom_complete.pk3 [Doom: Complete: WadSmoosh] [Version: !doom_complete_version_str!] [Hash: !_md5_str!]
            echo set doom_complete_version_str=!doom_complete_version_str!>>gzcmd_cache.bat
            echo set doom_complete_file=doom_complete.pk3>>gzcmd_cache.bat
            )
        )
    )
exit /b

:hash_file
if %2==%3 (
    set %4_version_str=%5
    set %4_file=%1
    echo Found %1 [%~6] [Version: %5] [Hash: %3]
    echo set %4_version_str=%5>>gzcmd_cache.bat
    echo set %4_file=%1>>gzcmd_cache.bat
    )
exit /b

:setup_iwad
if defined %1_file (
    set iwad_type_str=%1
    set iwad_file=%2
    set iwad_str=%~3
    set map_str=%4
    set map_name_str=%~5
    set class_str=%~6
    set skill_str=%~7
    set color_str=%~8
    set gender_str=%9
    set skill_int=1
    set color_int=0
    exit /b
    ) else (
    echo File Not Found!
    pause
    goto %iwad_menu_str%
    )
)

:decode_dmflags
set _dmflags_int=%dmflags_int%
set _dmflags2_int=%dmflags2_int%
set _floor_int=1073741824
for /l %%g in (31,-1,1) do (
    if !_dmflags_int! geq !_floor_int! (
        set dmflags_%%g_int=1
        set /a _dmflags_int-=!_floor_int!
        ) else (
        set dmflags_%%g_int=0
        )
    if !_dmflags2_int! geq !_floor_int! (
        set dmflags2_%%g_int=1
        set /a _dmflags2_int-=!_floor_int!
        ) else (
        set dmflags2_%%g_int=0
        )
    set /a _floor_int/=2
    )
exit /b

:encode_dmflags
set dmflags_int=0
set dmflags2_int=0
set _floor_int=1073741824
for /l %%g in (31,-1,1) do (
    if !dmflags_%%g_int! equ 1 set /a dmflags_int+=!_floor_int!
    if !dmflags2_%%g_int! equ 1 set /a dmflags2_int+=!_floor_int!
    set /a _floor_int/=2
    )
exit /b

:record_query
call :show_banner
set /p demo_file=What filename would you like to use for this demo (0 to disable recording)?
if %demo_file%==0 (
    set demo_mode_str=
    ) else (
    set demo_mode_str=record
    )
exit /b

:pwad_query
call :show_banner
set /p _pwad_file=What PWAD file would you like to load?
set _pwad_file_ext=%_pwad_file%.wad
set _pwad_file_ext2=%_pwad_file%.pk3
if exist %_pwad_file_ext% (
    set %1=%_pwad_file_ext%
    exit /b
    )
if exist %_pwad_file_ext2% (
    set %1=%_pwad_file_ext2%
    exit /b
    )
set %1=
echo File Not Found!
pause
exit /b

:port_query
call :show_banner
set /p port_int=What IP Port will you be using (1-65535 Default: 5029)?
set /a port_int/=1
if %port_int% lss 1 (
    echo Value is Out of Range ^(1-65535^)
    pause
    goto port_query
    )
if %port_int% gtr 65535 (
    echo Value is Out of Range ^(1-65535^)
    pause
    goto port_query
    )
exit /b

:players_query
call :show_banner
set /p players_int=How many players will be in this game (1-32)?
set /a players_int/=1
if %players_int% lss 1 (
    echo Value is Out of Range ^(1-65535^)
    pause
    goto players_query
    )
if %players_int% gtr 32 (
    echo Value is Out of Range ^(1-65535^)
    pause
    goto players_query
    )
exit /b