Guest User

Untitled

a guest
Nov 15th, 2020
266
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. @echo off
  2. set version_str=3.4
  3. set build_date_str=11/15/2020
  4. set gz_version_str=4.5.0
  5. echo GZ-CMD Version is [%version_str% %build_date_str%] for GZDOOM Version [%gz_version_str%]
  6. echo:
  7. echo Initializing GZ-CMD Environment Variables...
  8. echo Enabling Delayed Variable Expansion...
  9. setlocal EnableDelayedExpansion
  10. echo Initializing Gameplay Variables...
  11. set iwad_str=Select an IWAD
  12. set map_name_str=Select an IWAD
  13. set skill_str=Select an IWAD
  14. echo Initializing DMFlags...
  15. set dmflags_int=0
  16. set dmflags2_int=0
  17. set timelimit_float=0
  18. set fraglimit_int=0
  19. set teamplay_bool=false
  20. echo Initializing Network Variables...
  21. echo:
  22. for /f %%g in ('powershell Invoke-RestMethod api.ipify.org') do set host_str=%%g
  23. echo Remote IP Address is [%host_str%]
  24. set port_int=5029
  25. set netmode_int=0
  26. set players_int=1
  27. set mode_name_str=Co-Operative
  28. echo:
  29. echo Initializing Player Variables...
  30. echo:
  31. set name_str=Player
  32. set team_int=255
  33. set team_str=None
  34. set class_str=Select an IWAD
  35. set color_int=0
  36. set color_str=Select an IWAD
  37. set gender_str=Male
  38. set doom_complete_version_str=N/A
  39. set doom2_version_str=N/A
  40. set doom2f_version_str=N/A
  41. set plutonia_version_str=N/A
  42. set plutoniaunity_version_str=N/A
  43. set tnt_version_str=N/A
  44. set tntunity_version_str=N/A
  45. set doomu_version_str=N/A
  46. set doom_version_str=N/A
  47. set doom1_version_str=N/A
  48. set doom2bfg_version_str=N/A
  49. set doom2xbox_version_str=N/A
  50. set doom2unity_version_str=N/A
  51. set doombfg_version_str=N/A
  52. set doomxbox_version_str=N/A
  53. set doomunity_version_str=N/A
  54. set freedoom1_version_str=N/A
  55. set freedoom2_version_str=N/A
  56. set freedm_version_str=N/A
  57. set heretic_version_str=N/A
  58. set hereticsr_version_str=N/A
  59. set heretic1_version_str=N/A
  60. set hexen_version_str=N/A
  61. set hexdd_version_str=N/A
  62. set hexdemo_version_str=N/A
  63. set strife_version_str=N/A
  64. set sve_version_str=N/A
  65. set strife0_version_str=N/A
  66. set strife1_version_str=N/A
  67. set blashpem_version_str=N/A
  68. set chex_version_str=N/A
  69. set chex3_version_str=N/A
  70. set action2_version_str=N/A
  71. set harm1_version_str=N/A
  72. set hacx_version_str=N/A
  73. set hacx2_version_str=N/A
  74. set square1_version_str=N/A
  75. set delaweare_version_str=N/A
  76. set rotwb_version_str=N/A
  77. if exist gzcmd_cache.bat (
  78.     echo Found gzcmd_cache.bat. Loading IWAD Cache...
  79.     echo:
  80.     call gzcmd_cache.bat
  81.     goto main_menu
  82.     ) else (
  83.     echo Could not find gzcmd_cache.bat. Creating new gzcmd_cache.bat file...
  84.     echo:
  85.     type nul>gzcmd_cache.bat
  86.     call :scan_iwads
  87.     )
  88.  
  89. :main_menu
  90. call :show_banner
  91. echo ---------
  92. echo Main Menu
  93. echo ---------
  94. echo:
  95. echo 1.) Start a Single Player Game
  96. echo 2.) Host a Multiplayer Game
  97. echo 3.) Join a Multiplayer Game
  98. echo 4.) Play a Demo File
  99. echo 5.) Rescan IWADs
  100. echo:
  101. echo Z.) Exit to Command Prompt
  102. echo:
  103. choice /c 12345z
  104. if %errorlevel% equ 6 exit
  105. if %errorlevel% equ 5 (
  106.     cls
  107.     call :scan_iwads
  108.     call :main_menu
  109.     )
  110. if %errorlevel% equ 4 goto demo_menu
  111. if %errorlevel% equ 3 goto join_menu
  112. if %errorlevel% equ 2 goto host_menu
  113. if %errorlevel% equ 1 goto single_menu
  114.  
  115. :single_menu
  116. set top_menu_str=single_menu
  117. call :show_banner
  118. echo -------------
  119. echo Single Player
  120. echo -------------
  121. echo:
  122. echo 1.) Configure Game Options
  123. echo 2.) Configure Player Options
  124. if defined demo_mode_str (echo 3.^) Record a Demo File:     [%demo_file%.lmp]) else (echo 3.^) Record a Demo File:      [Off])
  125. echo:
  126. echo 4.) Launch GZDoom
  127. echo:
  128. echo Z.) Return to Main Menu
  129. echo:
  130. choice /c 1234z
  131. if %errorlevel% equ 5 goto main_menu
  132. if %errorlevel% equ 4 (
  133.     if not defined iwad_file (
  134.         echo No IWAD selected.
  135.         pause
  136.         ) else (
  137.         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%
  138.         exit
  139.         )
  140.     )
  141. if %errorlevel% equ 3 call :record_query
  142. if %errorlevel% equ 2 goto player_menu
  143. if %errorlevel% equ 1 goto game_menu
  144. goto single_menu
  145.  
  146. :game_menu
  147. set menu_str=game_menu
  148. call :show_banner
  149. echo ------------
  150. echo Game Options
  151. echo ------------
  152. echo:
  153. echo 1.) Select an IWAD:        [%iwad_str%]
  154. echo 2.) Select a Map:      [%map_name_str%]
  155. echo 3.) Select a Difficulty:   [%skill_str%]
  156. echo 4.) Select PWAD Files
  157. echo 5.) Configure Advanced Options
  158. echo:
  159. echo Z.) Return to Previous Menu
  160. echo:
  161. choice /c 12345z
  162. if %errorlevel% equ 6 goto %top_menu_str%
  163. if %errorlevel% equ 5 goto advanced_menu
  164. if %errorlevel% equ 4 goto pwad_menu
  165. if %errorlevel% equ 3 goto skill_menu
  166. if %errorlevel% equ 2 goto map_menu
  167. if %errorlevel% equ 1 goto iwad_menu
  168.  
  169. :iwad_menu
  170. call :show_banner
  171. echo ---------------
  172. echo Select a Series
  173. echo ---------------
  174. echo:
  175. echo 1.) DOOM
  176. echo 2.) Heretic/Hexen
  177. echo 3.) Strife
  178. echo 4.) Chex Quest
  179. echo 5.) Hacx
  180. echo 6.) FreeDOOM
  181. echo 7.) Other Games
  182. echo:
  183. echo Z.) Return to Previous Menu
  184. echo:
  185. choice /c 1234567z
  186. if %errorlevel% equ 8 goto %menu_str%
  187. if %errorlevel% equ 7 goto other_iwad_menu
  188. if %errorlevel% equ 6 goto freedoom_iwad_menu
  189. if %errorlevel% equ 5 goto hacx_iwad_menu
  190. if %errorlevel% equ 4 goto chex_iwad_menu
  191. if %errorlevel% equ 3 goto strife_iwad_menu
  192. if %errorlevel% equ 2 goto heretic_iwad_menu
  193. if %errorlevel% equ 1 goto doom_iwad_menu
  194.  
  195. :doom_iwad_menu
  196. set iwad_menu_str=doom_iwad_menu
  197. call :show_banner
  198. echo -------------
  199. echo Select a Game
  200. echo -------------
  201. echo:
  202. echo 1.) DOOM Shareware     [%doom1_version_str%]       9.) DOOM 2: XBox Edition                [%doom2xbox_version_str%]
  203. echo 2.) DOOM Registered        [%doom_version_str%]        0.) DOOM 2: Unity Edition               [%doom2unity_version_str%]
  204. echo 3.) The Ultimate DOOM      [%doomu_version_str%]       A.) DOOM 2: L'Enfer sur Terre               [%doom2f_version_str%
  205. echo 4.) DOOM: BFG Edition      [%doombfg_version_str%]     B.) Final DOOM: TNT - Evilution             [%tnt_version_str%]
  206. echo 5.) DOOM: XBox Edition     [%doomxbox_version_str%]        C.) Final DOOM: TNT - Evilution: Unity Edition      [%tntunity_version_str%]
  207. echo 6.) DOOM: Unity Edition        [%doomunity_version_str%]       D.) Final DOOM: Plutonia Experiment         [%plutonia_version_str%]       
  208. echo 7.) DOOM 2: Hell on Earth  [%doom2_version_str%]       E.) Final DOOM: Plutonia Experiment: Unity Edition  [%plutoniaunity_version_str%]
  209. echo 8.) DOOM 2: BFG Edition        [%doom2bfg_version_str%]        F.) DOOM: Complete: WadSmoosh               [%doom_complete_version_str%]
  210. echo:
  211. echo Z.) Return to Select a Series
  212. echo:
  213. choice /c 1234567890ABCDEFz
  214. if %errorlevel% equ 17 goto iwad_menu
  215. 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
  216. 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
  217. 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
  218. 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
  219. 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
  220. 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
  221. 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
  222. 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
  223. 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
  224. 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
  225. 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
  226. 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
  227. 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
  228. 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
  229. if %errorlevel% equ 2 call :setup_iwad doom %doom_file% "DOOM Registered" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
  230. if %errorlevel% equ 1 call :setup_iwad doom1 %doom1_file% "DOOM Shareware" e1m1 "E1M1: Hangar" Marine "I'm Too Young to Die" Green Male
  231. goto %menu_str%
  232.  
  233. :heretic_iwad_menu
  234. set iwad_menu_str=heretic_iwad_menu
  235. call :show_banner
  236. echo -------------
  237. echo Select a Game
  238. echo -------------
  239. echo:
  240. echo 1.) Heretic Shareware              [%heretic1_version_str%]
  241. echo 2.) Heretic                    [%heretic_version_str%]
  242. echo 3.) Heretic: Shadow of the Serpent Riders  [%hereticsr_version_str%]
  243. echo 4.) Hexen: Demo Version                [%hexdemo_version_str%]
  244. echo 5.) Hexen: Beyond Heretic          [%hexen_version_str%]
  245. echo 6.) Hexen: Deathkings of the Dark Citadel  [%hexdd_version_str%]
  246. echo:
  247. echo Z.) Return to Select a Series
  248. echo:
  249. choice /c 123456z
  250. if %errorlevel% equ 7 goto iwad_menu
  251. if %errorlevel% equ 6 call :setup_iwad hexdd %hexdd_file% "Hexen: Deathkings of the Dark Citadel" map01 "MAP41: Ruined Village" Fighter Squire Gold Male
  252. if %errorlevel% equ 5 call :setup_iwad hexen %hexen_file% "Hexen: Beyond Heretic" map01 "MAP01: Winnowing Hall" Fighter Squire Gold Male
  253. if %errorlevel% equ 4 call :setup_iwad hexdemo %hexdemo_file% "Hexen: Demo Version" map01 "MAP01: Winnowing Hall" Fighter Squire Gold Male
  254. 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
  255. if %errorlevel% equ 2 call :setup_iwad heretic %heretic_file% "Heretic" e1m1 "E1M1: The Docks" Corvus "Thou Needeth a Wet-Nurse" Green Male
  256. if %errorlevel% equ 1 call :setup_iwad heretic1 %heretic1_file% "Heretic Shareware" e1m1 "E1M1: The Docks" Corvus "Thou Needeth a Wet-Nurse" Green Male
  257. goto %menu_str%
  258.  
  259. :strife_iwad_menu
  260. set iwad_menu_str=strife_iwad_menu
  261. call :show_banner
  262. echo -------------
  263. echo Select a Game
  264. echo -------------
  265. echo:
  266. echo 1.) Strife: Teaser (Old Version)   [%strife0_version_str%]
  267. echo 2.) Strife: Teaser (New Version)   [%strife1_version_str%]
  268. echo 3.) Strife: Quest for the Sigil        [%strife_version_str%]
  269. echo 4.) Strife: Veteran Edition        [%sve_version_str%]
  270. echo:
  271. echo Z.) Return to Select a Series
  272. echo:
  273. choice /c 1234z
  274. if %errorlevel% equ 5 goto iwad_menu
  275. if %errorlevel% equ 4 call :setup_iwad sve %sve_file% "Strife: Veteran Edition" map02 "MAP02: Town" Rebel Training Brown Male
  276. if %errorlevel% equ 3 call :setup_iwad strife %strife_file% "Strife: Quest for the Sigil" map02 "MAP02: Town" Rebel Training Brown Male
  277. if %errorlevel% equ 2 call :setup_iwad strife1 %strife1_file% "Strife: Teaser (New Version)" map33 "MAP33: Area 2: Town" Rebel Training Brown Male
  278. if %errorlevel% equ 1 call :setup_iwad strife0 %strife0_file% "Strife: Teaser (Old Version)" map33 "MAP33: Area 2: Town" Rebel Training Brown Male
  279. goto %menu_str%
  280.  
  281. :chex_iwad_menu
  282. set iwad_menu_str=chex_iwad_menu
  283. call :show_banner
  284. echo -------------
  285. echo Select a Game
  286. echo -------------
  287. echo:
  288. echo 1.) Chex Quest     [%chex_version_str%]
  289. echo 2.) Chex Quest 3   [%chex3_version_str%]
  290. echo:
  291. echo Z.) Return to Select a Series
  292. echo:
  293. choice /c 12z
  294. if %errorlevel% equ 3 goto iwad_menu
  295. 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
  296. if %errorlevel% equ 1 call :setup_iwad chex %chex_file% "Chex Quest" e1m1 "E1M1: Landing Zone" "Chex Warrior" "Easy Does It" "Light Blue" Male
  297. goto %menu_str%
  298.  
  299. :hacx_iwad_menu
  300. set iwad_menu_str=hacx_iwad_menu
  301. call :show_banner
  302. echo -------------
  303. echo Select a Game
  304. echo -------------
  305. echo:
  306. echo 1.) Hacx: Twitch N' Kill   [%hacx_version_str%]
  307. echo 2.) Hacx 2.0           [%hacx2_version_str%]
  308. echo:
  309. echo Z.) Return to Select a Series
  310. echo:
  311. choice /c 12z
  312. if %errorlevel% equ 3 goto iwad_menu
  313. if %errorlevel% equ 2 call :setup_iwad hacx2 %hacx2_file% "Hacx 2.0" map01 "MAP01: GenEmp Corp" Hacker "Please Don't Shoot!" Unknown Male
  314. 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
  315. goto %menu_str%
  316.  
  317. :freedoom_iwad_menu
  318. set iwad_menu_str=freedoom_iwad_menu
  319. call :show_banner
  320. echo -------------
  321. echo Select a Game
  322. echo -------------
  323. echo:
  324. echo 1.) FreeDOOM: Phase 1  [%freedoom1_version_str%]
  325. echo 2.) FreeDOOM: Phase 2  [%freedoom2_version_str%]
  326. echo 3.) FreeDM     [%freedm_version_str%]
  327. echo:
  328. echo Z.) Return to Select a Series
  329. echo:
  330. choice /c 123z
  331. if %errorlevel% equ 4 goto iwad_menu
  332. if %errorlevel% equ 3 call :setup_iwad freedm %freedm_file% FreeDM map01 "MAP01: Tech Test" Marine "Please Don't Kill Me!" Green Male
  333. 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
  334. 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
  335. goto %menu_str%
  336.  
  337. :other_iwad_menu
  338. set iwad_menu_str=other_iwad_menu
  339. call :show_banner
  340. echo -------------
  341. echo Select a Game
  342. echo -------------
  343. echo:
  344. echo 1.) Blasphemer         [%blasphem_version_str%]
  345. echo 2.) Action DOOM 2: Urban Brawl [%action2_version_str%]
  346. echo 3.) Harmony            [%harm1_version_str%]
  347. echo 4.) The Adventures of Square   [%square1_version_str%]
  348. echo 5.) Delaweare          [%delaweare_version_str%]
  349. echo 6.) Rise of the Wool Ball  [%rotwb_version_str%]
  350. echo:
  351. echo Z.) Return to Select a Series
  352. echo:
  353. choice /c 123456z
  354. if %errorlevel% equ 7 goto iwad_menu
  355. if %errorlevel% equ 6 call :setup_iwad rotwb %rotwb_file% "Rise of the Wool Ball" e1m1 "E1M1: Into the Woods" Marine Easy Green Female
  356. if %errorlevel% equ 5 call :setup_iwad delaweare %delaweare_file% "Delaweare" map01 "MAP01: Delaweare" Marine "Very Easy" Green Male
  357. if %errorlevel% equ 4 call :setup_iwad square1 %square1_file% "The Adventures of Square" e1a1 "E1A1: Welcome to Squaresville" Square "Totally Square" Purple Male
  358. if %errorlevel% equ 3 call :setup_iwad harm1 %harm1_file% "Harmony" map01 "MAP01: Abduction" Harmony "Very Easy" Unknown Female
  359. 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
  360. if %errorlevel% equ 1 call :setup_iwad blasphem %blasphem_file% Blasphemer e1m1 "E1M1: noname" Corvus "Whimpering Craven" Green Male
  361. goto %menu_str%
  362.  
  363. :map_menu
  364. if not defined iwad_file (
  365.     echo No IWAD selected.
  366.     pause
  367.     goto %menu_str%
  368.     )
  369. call :show_banner
  370. echo -----------------
  371. echo Select an Episode
  372. echo -----------------
  373. echo:
  374. if %iwad_type_str%==doom1 (
  375.     echo 1.^) Knee Deep in the Dead
  376.     echo:
  377.     echo Z.^) Return to Game Options
  378.     echo:
  379.     choice /c 1z
  380.     if !errorlevel! equ 2 goto %menu_str%
  381.     if !errorlevel! equ 1 goto doom_e1_menu
  382.     )
  383. if %iwad_type_str%==doom (
  384.     echo 1.^) Knee Deep in the Dead
  385.     echo 2.^) The Shores of Hell
  386.     echo 3.^) Inferno
  387.     echo:
  388.     echo Z.^) Return to Game Options
  389.     echo:
  390.     choice /c 123z
  391.     if !errorlevel! equ 4 goto %menu_str%
  392.     if !errorlevel! equ 3 goto doom_e3_menu
  393.     if !errorlevel! equ 2 goto doom_e2_menu
  394.     if !errorlevel! equ 1 goto doom_e1_menu
  395.     )
  396. if %iwad_type_str%==doomu (
  397.     echo 1.^) Knee Deep in the Dead
  398.     echo 2.^) The Shores of Hell
  399.     echo 3.^) Inferno
  400.     echo 4.^) Thy Flesh Consumed
  401.     echo:
  402.     echo Z.^) Return to Game Options
  403.     echo:
  404.     choice /c 1234z
  405.     if !errorlevel! equ 5 goto %menu_str%
  406.     if !errorlevel! equ 4 goto doom_e4_menu
  407.     if !errorlevel! equ 3 goto doom_e3_menu
  408.     if !errorlevel! equ 2 goto doom_e2_menu
  409.     if !errorlevel! equ 1 goto doom_e1_menu
  410.     )
  411. if %iwad_type_str%==doombfg (
  412.     echo 1.^) Knee Deep in the Dead
  413.     echo 2.^) The Shores of Hell
  414.     echo 3.^) Inferno
  415.     echo 4.^) Thy Flesh Consumed
  416.     echo:
  417.     echo Z.^) Return to Game Options
  418.     echo:
  419.     choice /c 1234z
  420.     if !errorlevel! equ 5 goto %menu_str%
  421.     if !errorlevel! equ 4 goto doom_e4_menu
  422.     if !errorlevel! equ 3 goto doom_e3_menu
  423.     if !errorlevel! equ 2 goto doom_e2_menu
  424.     if !errorlevel! equ 1 goto doom_e1_menu
  425.     )
  426. if %iwad_type_str%==doomxbox (
  427.     echo 1.^) Knee Deep in the Dead
  428.     echo 2.^) The Shores of Hell
  429.     echo 3.^) Inferno
  430.     echo 4.^) Thy Flesh Consumed
  431.     echo:
  432.     echo Z.^) Return to Game Options
  433.     echo:
  434.     choice /c 1234z
  435.     if !errorlevel! equ 5 goto %menu_str%
  436.     if !errorlevel! equ 4 goto doom_e4_menu
  437.     if !errorlevel! equ 3 goto doom_e3_menu
  438.     if !errorlevel! equ 2 goto doom_e2_menu
  439.     if !errorlevel! equ 1 goto doom_e1xbox_menu
  440.     )
  441. if %iwad_type_str%==doomunity (
  442.     echo 1.^) Knee Deep in the Dead
  443.     echo 2.^) The Shores of Hell
  444.     echo 3.^) Inferno
  445.     echo 4.^) Thy Flesh Consumed
  446.     echo:
  447.     echo Z.^) Return to Game Options
  448.     echo:
  449.     choice /c 1234z
  450.     if !errorlevel! equ 5 goto %menu_str%
  451.     if !errorlevel! equ 4 goto doom_e4_menu
  452.     if !errorlevel! equ 3 goto doom_e3_menu
  453.     if !errorlevel! equ 2 goto doom_e2_menu
  454.     if !errorlevel! equ 1 goto doom_e1_menu
  455.     )
  456. if %iwad_type_str%==doom2 (
  457.     echo 1.^) Hell on Earth
  458.     echo:
  459.     echo:Z.^) Return to Game Options
  460.     echo:
  461.     choice /c 1z
  462.     if !errorlevel! equ 2 goto %menu_str%
  463.     if !errorlevel! equ 1 goto doom_e6_menu
  464.     )
  465. if %iwad_type_str%==doom2f (
  466.     echo 1.^) L'Enfer sur Terre
  467.     echo:
  468.     echo:Z.^) Return to Game Options
  469.     echo:
  470.     choice /c 1z
  471.     if !errorlevel! equ 2 goto %menu_str%
  472.     if !errorlevel! equ 1 goto doom_e6_menu
  473.     )
  474. if %iwad_type_str%==doom2bfg (
  475.     echo 1.^) Hell on Earth
  476.     echo 2.^) No Rest for the Living
  477.     echo:
  478.     echo:Z.^) Return to Game Options
  479.     echo:
  480.     choice /c 12z
  481.     if !errorlevel! equ 3 goto %menu_str%
  482.     if !errorlevel! equ 2 goto doom_e7_menu
  483.     if !errorlevel! equ 1 goto doom_e6a_menu
  484.     )
  485. if %iwad_type_str%==doom2xbox (
  486.     echo 1.^) Hell on Earth
  487.     echo 2.^) No Rest for the Living
  488.     echo:
  489.     echo:Z.^) Return to Game Options
  490.     echo:
  491.     choice /c 12z
  492.     if !errorlevel! equ 3 goto %menu_str%
  493.     if !errorlevel! equ 2 goto doom_e7_menu
  494.     if !errorlevel! equ 1 goto doom_e6b_menu
  495.     )
  496. if %iwad_type_str%==doom2unity (
  497.     echo 1.^) Hell on Earth
  498.     echo 2.^) No Rest for the Living
  499.     echo:
  500.     echo:Z.^) Return to Game Options
  501.     echo:
  502.     choice /c 12z
  503.     if !errorlevel! equ 3 goto %menu_str%
  504.     if !errorlevel! equ 2 goto doom_e7_menu
  505.     if !errorlevel! equ 1 goto doom_e6a_menu
  506.     )
  507. if %iwad_type_str%==tnt (
  508.     echo 1.^) TNT: Evolution
  509.     echo:
  510.     echo:Z.^) Return to Game Options
  511.     echo:
  512.     choice /c 1z
  513.     if !errorlevel! equ 2 goto %menu_str%
  514.     if !errorlevel! equ 1 goto doom_e9_menu
  515.     )
  516. if %iwad_type_str%==plutonia (
  517.     echo 1.^) The Plutonia Experiment
  518.     echo:
  519.     echo:Z.^) Return to Game Options
  520.     echo:
  521.     choice /c 1z
  522.     if !errorlevel! equ 2 goto %menu_str%
  523.     if !errorlevel! equ 1 goto doom_e10_menu
  524.     )
  525. if %iwad_type_str%==doom_complete (
  526.     echo 1.^) Knee Deep in the Dead 6.^) Hell on Earth
  527.     echo 2.^) The Shores of Hell        7.^) No Rest for the Living
  528.     echo 3.^) Inferno           8.^) The Master Levels
  529.     echo 4.^) Thy Flesh Consumed        9.^) TNT: Evilution
  530.     echo 5.^) Sigil         10.^) The Plutonia Experiment
  531.     echo:
  532.     echo Z.^) Return to Game Options
  533.     echo:
  534.     choice /c 1234567890z
  535.     if !errorlevel! equ 11 goto %menu_str%
  536.     if !errorlevel! equ 10 goto doom_e10_menu
  537.     if !errorlevel! equ 9 goto doom_e9_menu
  538.     if !errorlevel! equ 8 goto doom_e8_menu
  539.     if !errorlevel! equ 7 goto doom_e7_menu
  540.     if !errorlevel! equ 6 goto doom_e6b_menu
  541.     if !errorlevel! equ 5 goto doom_e5_menu
  542.     if !errorlevel! equ 4 goto doom_e4_menu
  543.     if !errorlevel! equ 3 goto doom_e3_menu
  544.     if !errorlevel! equ 2 goto doom_e2_menu
  545.     if !errorlevel! equ 1 goto doom_e1xbox_menu
  546.     )
  547. if %iwad_type_str%==heretic1 (
  548.     echo 1.^) City of the Damned
  549.     echo:
  550.     echo Z.^) Return to Game Options
  551.     echo:
  552.     choice /c 1z
  553.     if !errorlevel! equ 2 goto %menu_str%
  554.     if !errorlevel! equ 1 goto heretic_e1_menu
  555.     )
  556. if %iwad_type_str%==heretic (
  557.     echo 1.^) City of the Damned
  558.     echo 2.^) Hell's Maw
  559.     echo 3.^) The Dome of D'Sparil
  560.     echo 4.^) The Ossuary
  561.     echo:
  562.     echo Z.^) Return to Game Options
  563.     echo:
  564.     choice /c 1234z
  565.     if !errorlevel! equ 5 goto %menu_str%
  566.     if !errorlevel! equ 4 goto heretic_e4a_menu
  567.     if !errorlevel! equ 3 goto heretic_e3_menu
  568.     if !errorlevel! equ 2 goto heretic_e2_menu
  569.     if !errorlevel! equ 1 goto heretic_e1_menu
  570.     )
  571. if %iwad_type_str%==hereticsr (
  572.     echo 1.^) City of the Damned
  573.     echo 2.^) Hell's Maw
  574.     echo 3.^) The Dome of D'Sparil
  575.     echo 4.^) The Ossuary
  576.     echo 5.^) The Stagnant Demesne
  577.     echo 6.^) Fate's Path
  578.     echo:
  579.     echo Z.^) Return to Game Options
  580.     echo:
  581.     choice /c 123456z
  582.     if !errorlevel! equ 7 goto %menu_str%
  583.     if !errorlevel! equ 6 goto heretic_e6_menu
  584.     if !errorlevel! equ 5 goto heretic_e5_menu
  585.     if !errorlevel! equ 4 goto heretic_e4_menu
  586.     if !errorlevel! equ 3 goto heretic_e3_menu
  587.     if !errorlevel! equ 2 goto heretic_e2_menu
  588.     if !errorlevel! equ 1 goto heretic_e1_menu
  589.     )
  590. if %iwad_type_str%==hexdemo (
  591.     echo 1.^) Hexen: Demo
  592.     echo:
  593.     echo Z.^) Return to Game Options
  594.     echo:
  595.     choice /c 1z
  596.     if !errorlevel! equ 2 goto %menu_str%
  597.     if !errorlevel! equ 1 goto hexen_e0_menu
  598.     )
  599. if %iwad_type_str%==hexen (
  600.     echo 1.^) Hexen: Beyond Heretic
  601.     echo:
  602.     echo Z.^) Return to Game Options
  603.     echo:
  604.     choice /c 1z
  605.     if !errorlevel! equ 2 goto %menu_str%
  606.     if !errorlevel! equ 1 goto hexen_e1_menu
  607.     )
  608. if %iwad_type_str%==hexdd (
  609.     echo 1.^) Hexen: Beyond Heretic
  610.     echo 2.^) Deathkings of the Dark Citadel
  611.     echo 3.^) Transit
  612.     echo:
  613.     echo Z.^) Return to Game Options
  614.     echo:
  615.     choice /c 123z
  616.     if !errorlevel! equ 4 goto %menu_str%
  617.     if !errorlevel! equ 3 goto hexen_e3_menu
  618.     if !errorlevel! equ 2 goto hexen_e2_menu
  619.     if !errorlevel! equ 1 goto hexen_e1_menu
  620.     )
  621. if %iwad_type_str%==strife0 (
  622.     echo 1.^) Strife: Teaser
  623.     echo:
  624.     echo Z.^) Return to Game Options
  625.     echo:
  626.     choice /c 1z
  627.     if !errorlevel! equ 2 goto %menu_str%
  628.     if !errorlevel! equ 1 goto strife_e0a_menu
  629.     )
  630. if %iwad_type_str%==strife1 (
  631.     echo 1.^) Strife: Teaser
  632.     echo:
  633.     echo Z.^) Return to Game Options
  634.     echo:
  635.     choice /c 1z
  636.     if !errorlevel! equ 2 goto %menu_str%
  637.     if !errorlevel! equ 1 goto strife_e0_menu
  638.     )
  639. if %iwad_type_str%==strife (
  640.     echo 1.^) Strife: Teaser
  641.     echo 2.^) Strife: Quest for the Sigil
  642.     echo:
  643.     echo Z.^) Return to Game Options
  644.     echo:
  645.     choice /c 12z
  646.     if !errorlevel! equ 3 goto %menu_str%
  647.     if !errorlevel! equ 2 goto strife_e1_menu
  648.     if !errorlevel! equ 1 goto strife_e0_menu
  649.     )
  650. if %iwad_type_str%==sve (
  651.     echo 1.^) Strife: Teaser
  652.     echo 2.^) Strife: Quest for the Sigil
  653.     echo 3.^) Capture the Chalice
  654.     echo:
  655.     echo Z.^) Return to Game Options
  656.     echo:
  657.     choice /c 123z
  658.     if !errorlevel! equ 4 goto %menu_str%
  659.     if !errorlevel! equ 3 goto strife_e2_menu
  660.     if !errorlevel! equ 2 goto strife_e1a_menu
  661.     if !errorlevel! equ 1 goto strife_e0_menu
  662.     )
  663. if %iwad_type_str%==chex (
  664.     echo 1.^) Rescue on Bazoik
  665.     echo:
  666.     echo Z.^) Return to Game Options
  667.     echo:
  668.     choice /c 1z
  669.     if !errorlevel! equ 2 goto %menu_str%
  670.     if !errorlevel! equ 1 goto chex_e1_menu
  671.     )
  672. if %iwad_type_str%==chex3 (
  673.     echo 1.^) Rescue on Bazoik
  674.     echo 2.^) Terror in Chex City
  675.     echo 3.^) Invasion!
  676.     echo:
  677.     echo Z.^) Return to Game Options
  678.     echo:
  679.     choice /c 123z
  680.     if !errorlevel! equ 4 goto %menu_str%
  681.     if !errorlevel! equ 3 goto chex_e3_menu
  682.     if !errorlevel! equ 2 goto chex_e2_menu
  683.     if !errorlevel! equ 1 goto chex_e1_menu
  684.     )
  685. if %iwad_type_str%==hacx (
  686.     echo 1.^) Hacx: Twitch N' Kill
  687.     echo:
  688.     echo Z.^) Return to Game Options
  689.     echo:
  690.     choice /c 1z
  691.     if !errorlevel! equ 2 goto %menu_str%
  692.     if !errorlevel! equ 1 goto hacx_e1_menu
  693.     )
  694. if %iwad_type_str%==hacx2 (
  695.     echo 1.^) Hacx 2.0
  696.     echo:
  697.     echo Z.^) Return to Game Options
  698.     echo:
  699.     choice /c 1z
  700.     if !errorlevel! equ 2 goto %menu_str%
  701.     if !errorlevel! equ 1 goto hacx_e1a_menu
  702.     )
  703. if %iwad_type_str%==freedoom1 (
  704.     echo 1.^) Outpost Outbreak
  705.     echo 2.^) Military Labs
  706.     echo 3.^) Event Horizon
  707.     echo 4.^) Double Impact
  708.     echo:
  709.     echo Z.^) Return to Game Options
  710.     echo:
  711.     choice /c 1234z
  712.     if !errorlevel! equ 5 goto %menu_str%
  713.     if !errorlevel! equ 4 goto freedoom_e4_menu
  714.     if !errorlevel! equ 3 goto freedoom_e3_menu
  715.     if !errorlevel! equ 2 goto freedoom_e2_menu
  716.     if !errorlevel! equ 1 goto freedoom_e1_menu
  717.     )
  718. if %iwad_type_str%==freedoom2 (
  719.     echo 1.^) FreeDOOM: Phase 2
  720.     echo:
  721.     echo:Z.^) Return to Game Options
  722.     echo:
  723.     choice /c 1z
  724.     if !errorlevel! equ 2 goto %menu_str%
  725.     if !errorlevel! equ 1 goto freedoom_e5_menu
  726.     )
  727. if %iwad_type_str%==freedm (
  728.     echo 1.^) FreeDM
  729.     echo:
  730.     echo:Z.^) Return to Game Options
  731.     echo:
  732.     choice /c 1z
  733.     if !errorlevel! equ 2 goto %menu_str%
  734.     if !errorlevel! equ 1 goto freedoom_e6_menu
  735.     )
  736. if %iwad_type_str%==blasphem (
  737.     echo 1.^) City of the Damned
  738.     echo 2.^) Hell's Maw
  739.     echo 3.^) The Dome of D'Sparil
  740.     echo 4.^) The Ossuary
  741.     echo 5.^) The Stagnant Demesne
  742.     echo:
  743.     echo Z.^) Return to Game Options
  744.     echo:
  745.     choice /c 12345z
  746.     if !errorlevel! equ 6 goto %menu_str%
  747.     if !errorlevel! equ 5 goto heretic_e5_menu
  748.     if !errorlevel! equ 4 goto blasphem_e4_menu
  749.     if !errorlevel! equ 3 goto heretic_e3_menu
  750.     if !errorlevel! equ 2 goto blasphem_e2_menu
  751.     if !errorlevel! equ 1 goto blasphem_e1_menu
  752.     )
  753. if %iwad_type_str%==square1 (
  754.     echo 1.^) Cornered By Circles
  755.     echo 2.^) Galactic Lunacy
  756.     echo 3.^) Square-Off Play
  757.     echo:
  758.     echo Z.^) Return to Game Options
  759.     echo:
  760.     choice /c 123z
  761.     if !errorlevel! equ 4 goto %menu_str%
  762.     if !errorlevel! equ 3 goto square_e3_menu
  763.     if !errorlevel! equ 2 goto square_e2_menu
  764.     if !errorlevel! equ 1 goto square_e1_menu
  765.     )
  766. if %iwad_type_str%==delaweare (
  767.     echo 1.^) Delaweare
  768.     echo:
  769.     echo Z.^) Return to Game Options
  770.     echo:
  771.     choice /c 1z
  772.     if !errorlevel! equ 2 goto %menu_str%
  773.     if !errorlevel! equ 1 goto delaweare_e1_menu
  774.     )
  775. if %iwad_type_str%==harm1 (
  776.     echo 1.^) Harmony
  777.     echo:
  778.     echo Z.^) Return to Game Options
  779.     echo:
  780.     choice /c 1z
  781.     if !errorlevel! equ 2 goto %menu_str%
  782.     if !errorlevel! equ 1 goto harm_e1_menu
  783.     )
  784. if %iwad_type_str%==action2 (
  785.     echo 1.^) Action DOOM 2: Urban Brawl
  786.     echo:
  787.     echo Z.^) Return to Game Options
  788.     echo:
  789.     choice /c 1z
  790.     if !errorlevel! equ 2 goto %menu_str%
  791.     if !errorlevel! equ 1 goto action2_e1_menu
  792.     )
  793. if %iwad_type_str%==rotwb (
  794.     echo 1.^) Through the Bushes
  795.     echo 2.^) Mountaintop Madness
  796.     echo 3.^) Furry Fragfest
  797.     echo:
  798.     echo Z.^) Return to Game Options
  799.     echo:
  800.     choice /c 123z
  801.     if !errorlevel! equ 4 goto %menu_str%
  802.     if !errorlevel! equ 3 goto rotwb_e3_menu
  803.     if !errorlevel! equ 2 goto rotwb_e2_menu
  804.     if !errorlevel! equ 1 goto rotwb_e1_menu
  805.     )
  806.  
  807. :doom_e1_menu
  808. call :show_banner
  809. echo ------------
  810. echo Select a Map
  811. echo ------------
  812. echo:
  813. echo 1.) Hangar
  814. echo 2.) Nuclear Plant
  815. echo 3.) Toxin Refinery
  816. echo 4.) Command Control
  817. echo 5.) Phobos Lab
  818. echo 6.) Central Processing
  819. echo 7.) Computer Station
  820. echo 8.) Phobos Anomaly
  821. echo 9.) Military Base
  822. echo:
  823. echo Z.) Return to Select an Episode
  824. echo:
  825. choice /c 123456789z
  826. if %errorlevel% equ 10 goto map_menu
  827. if %errorlevel% equ 9 (
  828.     set map_str=e1m9
  829.     set map_name_str=E1M9: Military Base
  830.     )
  831. if %errorlevel% equ 8 (
  832.     set map_str=e1m8
  833.     set map_name_str=E1M8: Phobos Anomaly
  834.     )
  835. if %errorlevel% equ 7 (
  836.     set map_str=e1m7
  837.     set map_name_str=E1M7: Computer Station
  838.     )
  839. if %errorlevel% equ 6 (
  840.     set map_str=e1m6
  841.     set map_name_str=E1M6: Central Processing
  842.     )
  843. if %errorlevel% equ 5 (
  844.     set map_str=e1m5
  845.     set map_name_str=E1M5: Phobos Lab
  846.     )
  847. if %errorlevel% equ 4 (
  848.     set map_str=e1m4
  849.     set map_name_str=E1M4: Command Control
  850.     )
  851. if %errorlevel% equ 3 (
  852.     set map_str=e1m3
  853.     set map_name_str=E1M3: Toxin Refinery
  854.     )
  855. if %errorlevel% equ 2 (
  856.     set map_str=e1m2
  857.     set map_name_str=E1M2: Nuclear Plant
  858.     )
  859. if %errorlevel% equ 1 (
  860.     set map_str=e1m1
  861.     set map_name_str=E1M1: Hangar
  862.     )
  863. goto %menu_str%
  864.  
  865. :doom_e1xbox_menu
  866. call :show_banner
  867. echo ------------
  868. echo Select a Map
  869. echo ------------
  870. echo:
  871. echo 1.) Hangar         6.) Central Processing
  872. echo 2.) Nuclear Plant      7.) Computer Station
  873. echo 3.) Toxin Refinery     8.) Phobos Anomaly
  874. echo 4.) Command Control        9.) Military Base
  875. echo 5.) Phobos Lab         0.) Sewers
  876. echo:
  877. echo Z.) Return to Select an Episode
  878. echo:
  879. choice /c 1234567890z
  880. if %errorlevel% equ 11 goto map_menu
  881. if %errorlevel% equ 10 (
  882.     set map_str=e1m10
  883.     set map_name_str=E1M10: Sewers
  884.     )
  885. if %errorlevel% equ 9 (
  886.     set map_str=e1m9
  887.     set map_name_str=E1M9: Military Base
  888.     )
  889. if %errorlevel% equ 8 (
  890.     set map_str=e1m8
  891.     set map_name_str=E1M8: Phobos Anomaly
  892.     )
  893. if %errorlevel% equ 7 (
  894.     set map_str=e1m7
  895.     set map_name_str=E1M7: Computer Station
  896.     )
  897. if %errorlevel% equ 6 (
  898.     set map_str=e1m6
  899.     set map_name_str=E1M6: Central Processing
  900.     )
  901. if %errorlevel% equ 5 (
  902.     set map_str=e1m5
  903.     set map_name_str=E1M5: Phobos Lab
  904.     )
  905. if %errorlevel% equ 4 (
  906.     set map_str=e1m4
  907.     set map_name_str=E1M4: Command Control
  908.     )
  909. if %errorlevel% equ 3 (
  910.     set map_str=e1m3
  911.     set map_name_str=E1M3: Toxin Refinery
  912.     )
  913. if %errorlevel% equ 2 (
  914.     set map_str=e1m2
  915.     set map_name_str=E1M2: Nuclear Plant
  916.     )
  917. if %errorlevel% equ 1 (
  918.     set map_str=e1m1
  919.     set map_name_str=E1M1: Hangar
  920.     )
  921. goto %menu_str%
  922.  
  923. :doom_e2_menu
  924. call :show_banner
  925. echo ------------
  926. echo Select a Map
  927. echo ------------
  928. echo:
  929. echo 1.) Deimos Anomaly
  930. echo 2.) Containment Area
  931. echo 3.) Refinery
  932. echo 4.) Deimos Lab
  933. echo 5.) Command Center
  934. echo 6.) Halls of the Damned
  935. echo 7.) Spawning Vats
  936. echo 8.) Tower of Babel
  937. echo 9.) Fortress of Mystery
  938. echo:
  939. echo Z.) Return to Select an Episode
  940. echo:
  941. choice /c 123456789z
  942. if %errorlevel% equ 10 goto map_menu
  943. if %errorlevel% equ 9 (
  944.     set map_str=e2m9
  945.     set map_name_str=E2M9: Fortress of Mystery
  946.     )
  947. if %errorlevel% equ 8 (
  948.     set map_str=e2m8
  949.     set map_name_str=E2M8: Tower of Babel
  950.     )
  951. if %errorlevel% equ 7 (
  952.     set map_str=e2m7
  953.     set map_name_str=E2M7: Spawning Vats
  954.     )
  955. if %errorlevel% equ 6 (
  956.     set map_str=e2m6
  957.     set map_name_str=E2M6: Halls of the Damned
  958.     )
  959. if %errorlevel% equ 5 (
  960.     set map_str=e2m5
  961.     set map_name_str=E2M5: Command Center
  962.     )
  963. if %errorlevel% equ 4 (
  964.     set map_str=e2m4
  965.     set map_name_str=E2M4: Deimos Lab
  966.     )
  967. if %errorlevel% equ 3 (
  968.     set map_str=e2m3
  969.     set map_name_str=E2M3: Refinery
  970.     )
  971. if %errorlevel% equ 2 (
  972.     set map_str=e2m2
  973.     set map_name_str=E2M2: Containment Area
  974.     )
  975. if %errorlevel% equ 1 (
  976.     set map_str=e2m1
  977.     set map_name_str=E2M1: Deimos Anomaly
  978.     )
  979. goto %menu_str%
  980.  
  981. :doom_e3_menu
  982. call :show_banner
  983. echo ------------
  984. echo Select a Map
  985. echo ------------
  986. echo:
  987. echo 1.) Hell Keep
  988. echo 2.) Slough of Despair
  989. echo 3.) Pandemonium
  990. echo 4.) House of Pain
  991. echo 5.) Unholy Cathedral
  992. echo 6.) Mt. Erebus
  993. echo 7.) Limbo
  994. echo 8.) Dis
  995. echo 9.) Warrens
  996. echo:
  997. echo Z.) Return to Select an Episode
  998. echo:
  999. choice /c 123456789z
  1000. if %errorlevel% equ 10 goto map_menu
  1001. if %errorlevel% equ 9 (
  1002.     set map_str=e3m9
  1003.     set map_name_str=E3M9: Warrens
  1004.     )
  1005. if %errorlevel% equ 8 (
  1006.     set map_str=e3m8
  1007.     set map_name_str=E3M8: Dis
  1008.     )
  1009. if %errorlevel% equ 7 (
  1010.     set map_str=e3m7
  1011.     set map_name_str=E3M7: Limbo
  1012.     )
  1013. if %errorlevel% equ 6 (
  1014.     set map_str=e3m6
  1015.     set map_name_str=E3M6: Mt. Erebus
  1016.     )
  1017. if %errorlevel% equ 5 (
  1018.     set map_str=e3m5
  1019.     set map_name_str=E3M5: Unholy Cathedral
  1020.     )
  1021. if %errorlevel% equ 4 (
  1022.     set map_str=e3m4
  1023.     set map_name_str=E3M4: House of Pain
  1024.     )
  1025. if %errorlevel% equ 3 (
  1026.     set map_str=e3m3
  1027.     set map_name_str=E3M3: Pandemonium
  1028.     )
  1029. if %errorlevel% equ 2 (
  1030.     set map_str=e3m2
  1031.     set map_name_str=E3M2: Slough of Despair
  1032.     )
  1033. if %errorlevel% equ 1 (
  1034.     set map_str=e3m1
  1035.     set map_name_str=E3M1: Hell Keep
  1036.     )
  1037. goto %menu_str%
  1038.  
  1039. :doom_e4_menu
  1040. call :show_banner
  1041. echo ------------
  1042. echo Select a Map
  1043. echo ------------
  1044. echo:
  1045. echo 1.) Hell Beneath
  1046. echo 2.) Perfect Hatred
  1047. echo 3.) Sever The Wicked
  1048. echo 4.) Unruly Evil
  1049. echo 5.) They Will Repent
  1050. echo 6.) Against Thee Wickedly
  1051. echo 7.) And Hell Followed
  1052. echo 8.) Unto The Cruel
  1053. echo 9.) Fear
  1054. echo:
  1055. echo Z.) Return to Select an Episode
  1056. echo:
  1057. choice /c 123456789z
  1058. if %errorlevel% equ 10 goto map_menu
  1059. if %errorlevel% equ 9 (
  1060.     set map_str=e4m9
  1061.     set map_name_str=E4M9: Fear
  1062.     )
  1063. if %errorlevel% equ 8 (
  1064.     set map_str=e4m8
  1065.     set map_name_str=E4M8: Unto The Cruel
  1066.     )
  1067. if %errorlevel% equ 7 (
  1068.     set map_str=e4m7
  1069.     set map_name_str=E4M7: And Hell Followed
  1070.     )
  1071. if %errorlevel% equ 6 (
  1072.     set map_str=e4m6
  1073.     set map_name_str=E4M6: Against Thee Wickedly
  1074.     )
  1075. if %errorlevel% equ 5 (
  1076.     set map_str=e4m5
  1077.     set map_name_str=E4M5: They Will Repent
  1078.     )
  1079. if %errorlevel% equ 4 (
  1080.     set map_str=e4m4
  1081.     set map_name_str=E4M4: Unruly Evil
  1082.     )
  1083. if %errorlevel% equ 3 (
  1084.     set map_str=e4m3
  1085.     set map_name_str=E4M3: Sever The Wicked
  1086.     )
  1087. if %errorlevel% equ 2 (
  1088.     set map_str=e4m2
  1089.     set map_name_str=E4M2: Perfect Hatred
  1090.     )
  1091. if %errorlevel% equ 1 (
  1092.     set map_str=e4m1
  1093.     set map_name_str=E4M1: Hell Beneath
  1094.     )
  1095. goto %menu_str%
  1096.  
  1097. :doom_e5_menu
  1098. call :show_banner
  1099. echo ------------
  1100. echo Select a Map
  1101. echo ------------
  1102. echo:
  1103. echo 1.) Baphomet's Demesne
  1104. echo 2.) Sheol
  1105. echo 3.) Cages of the Damned
  1106. echo 4.) Paths of Wretchedness
  1107. echo 5.) Abaddon's Void
  1108. echo 6.) Unspeakable Persecution
  1109. echo 7.) Nightmare Underworld
  1110. echo 8.) Halls of Perdition
  1111. echo 9.) Realm of Iblis
  1112. echo:
  1113. echo Z.) Return to Select an Episode
  1114. echo:
  1115. choice /c 123456789z
  1116. if %errorlevel% equ 10 goto map_menu
  1117. if %errorlevel% equ 9 (
  1118.     set map_str=e5m9
  1119.     set map_name_str=E5M9: Realm of Iblis
  1120.     )
  1121. if %errorlevel% equ 8 (
  1122.     set map_str=e5m8
  1123.     set map_name_str=E5M8: Halls of Perdition
  1124.     )
  1125. if %errorlevel% equ 7 (
  1126.     set map_str=e5m7
  1127.     set map_name_str=E5M7: Nightmare Underworld
  1128.     )
  1129. if %errorlevel% equ 6 (
  1130.     set map_str=e5m6
  1131.     set map_name_str=E5M6: Unspeakable Persecution
  1132.     )
  1133. if %errorlevel% equ 5 (
  1134.     set map_str=e5m5
  1135.     set map_name_str=E5M5: Abaddon's Void
  1136.     )
  1137. if %errorlevel% equ 4 (
  1138.     set map_str=e5m4
  1139.     set map_name_str=E5M4: Paths of Wretchedness
  1140.     )
  1141. if %errorlevel% equ 3 (
  1142.     set map_str=e5m3
  1143.     set map_name_str=E5M3: Cages of the Damned
  1144.     )
  1145. if %errorlevel% equ 2 (
  1146.     set map_str=e5m2
  1147.     set map_name_str=E5M2: Sheol
  1148.     )
  1149. if %errorlevel% equ 1 (
  1150.     set map_str=e5m1
  1151.     set map_name_str=E5M1: Baphomet's Demesne
  1152.     )
  1153. goto %menu_str%
  1154.  
  1155. :doom_e6_menu
  1156. call :show_banner
  1157. echo ------------
  1158. echo Select a Map
  1159. echo ------------
  1160. echo:
  1161. echo 1.) Entryway       9.) The Pit     G.) Tenements       O.) Bloodfalls
  1162. echo 2.) Underhalls     0.) Refueling Base  H.) The Courtyard   P.) The Abandoned Mines
  1163. echo 3.) The Gantlet        A.) 'O' of Destruction  I.) The Citadel     Q.) Monster Condo
  1164. echo 4.) The Focus      B.) The Factory     J.) Gotcha      R.) The Spirit World
  1165. echo 5.) The Waste Tunnels  C.) Downtown        K.) Nirvana     S.) The Living End
  1166. echo 6.) The Crusher        D.) The Inmost Dens L.) The Catacombs   T.) Icon of Sin
  1167. echo 7.) Dead Simple        E.) Industrial Zone M.) Barrels O' Fun  U.) Wolfenstein
  1168. echo 8.) Tricks and Traps   F.) Suburbs     N.) The Chasm       V.) Grosse
  1169. echo:
  1170. echo Z.) Return to Select an Episode
  1171. echo:
  1172. choice /c 1234567890abcdefghijklmnopqrstuvz
  1173. if %errorlevel% equ 33 goto map_menu
  1174. if %errorlevel% equ 32 (
  1175.     set map_str=map32
  1176.     set map_name_str=MAP32: Grosse
  1177.     )
  1178. if %errorlevel% equ 31 (
  1179.     set map_str=map31
  1180.     set map_name_str=MAP31: Wolfenstein
  1181.     )
  1182. if %errorlevel% equ 30 (
  1183.     set map_str=map30
  1184.     set map_name_str=MAP30: Icon of Sin
  1185.     )
  1186. if %errorlevel% equ 29 (
  1187.     set map_str=map29
  1188.     set map_name_str=MAP29: The Living End
  1189.     )
  1190. if %errorlevel% equ 28 (
  1191.     set map_str=map28
  1192.     set map_name_str=MAP28: The Spirit World
  1193.     )
  1194. if %errorlevel% equ 27 (
  1195.     set map_str=map27
  1196.     set map_name_str=MAP27: Monster Condo
  1197.     )
  1198. if %errorlevel% equ 26 (
  1199.     set map_str=map26
  1200.     set map_name_str=MAP26: The Abandoned Mines
  1201.     )
  1202. if %errorlevel% equ 25 (
  1203.     set map_str=map25
  1204.     set map_name_str=MAP25: Bloodfalls
  1205.     )
  1206. if %errorlevel% equ 24 (
  1207.     set map_str=map24
  1208.     set map_name_str=MAP24: The Chasm
  1209.     )
  1210. if %errorlevel% equ 23 (
  1211.     set map_str=map23
  1212.     set map_name_str=MAP23: Barrels O' Fun
  1213.     )
  1214. if %errorlevel% equ 22 (
  1215.     set map_str=map22
  1216.     set map_name_str=MAP22: The Catacombs
  1217.     )
  1218. if %errorlevel% equ 21 (
  1219.     set map_str=map21
  1220.     set map_name_str=MAP21: Nirvana
  1221.     )
  1222. if %errorlevel% equ 20 (
  1223.     set map_str=map20
  1224.     set map_name_str=MAP20: Gotcha
  1225.     )
  1226. if %errorlevel% equ 19 (
  1227.     set map_str=map19
  1228.     set map_name_str=MAP19: The Citadel
  1229.     )
  1230. if %errorlevel% equ 18 (
  1231.     set map_str=map18
  1232.     set map_name_str=MAP18: The Courtyard
  1233.     )
  1234. if %errorlevel% equ 17 (
  1235.     set map_str=map17
  1236.     set map_name_str=MAP17: Tenements
  1237.     )
  1238. if %errorlevel% equ 16 (
  1239.     set map_str=map16
  1240.     set map_name_str=MAP16: Suburbs
  1241.     )
  1242. if %errorlevel% equ 15 (
  1243.     set map_str=map15
  1244.     set map_name_str=MAP15: Industrial Zone
  1245.     )
  1246. if %errorlevel% equ 14 (
  1247.     set map_str=map14
  1248.     set map_name_str=MAP14: The Inmost Dens
  1249.     )
  1250. if %errorlevel% equ 13 (
  1251.     set map_str=map13
  1252.     set map_name_str=MAP13: Downtown
  1253.     )
  1254. if %errorlevel% equ 12 (
  1255.     set map_str=map12
  1256.     set map_name_str=MAP12: The Factory
  1257.     )
  1258. if %errorlevel% equ 11 (
  1259.     set map_str=map11
  1260.     set map_name_str=MAP11: 'O' of Destruction
  1261.     )
  1262. if %errorlevel% equ 10 (
  1263.     set map_str=map10
  1264.     set map_name_str=MAP10: Refueling Base
  1265.     )
  1266. if %errorlevel% equ 9 (
  1267.     set map_str=map09
  1268.     set map_name_str=MAP09: The Pit
  1269.     )
  1270. if %errorlevel% equ 8 (
  1271.     set map_str=map08
  1272.     set map_name_str=MAP08: Tricks and Traps
  1273.     )
  1274. if %errorlevel% equ 7 (
  1275.     set map_str=map07
  1276.     set map_name_str=MAP07: Dead Simple
  1277.     )
  1278. if %errorlevel% equ 6 (
  1279.     set map_str=map06
  1280.     set map_name_str=MAP06: The Crusher
  1281.     )
  1282. if %errorlevel% equ 5 (
  1283.     set map_str=map05
  1284.     set map_name_str=MAP05: The Waste Tunnels
  1285.     )
  1286. if %errorlevel% equ 4 (
  1287.     set map_str=map04
  1288.     set map_name_str=MAP04: The Focus
  1289.     )
  1290. if %errorlevel% equ 3 (
  1291.     set map_str=map03
  1292.     set map_name_str=MAP03: The Gantlet
  1293.     )
  1294. if %errorlevel% equ 2 (
  1295.     set map_str=map02
  1296.     set map_name_str=MAP02: Underhalls
  1297.     )
  1298. if %errorlevel% equ 1 (
  1299.     set map_str=map01
  1300.     set map_name_str=MAP01: Entryway
  1301.     )
  1302. goto %menu_str%
  1303.  
  1304. :doom_e6a_menu
  1305. call :show_banner
  1306. echo ------------
  1307. echo Select a Map
  1308. echo ------------
  1309. echo:
  1310. echo 1.) Entryway       0.) Refueling Base  I.) The Citadel     R.) The Spirit World
  1311. echo 2.) Underhalls     A.) 'O' of Destruction  J.) Gotcha      S.) The Living End
  1312. echo 3.) The Gantlet            B.) The Factory     K.) Nirvana     T.) Icon of Sin
  1313. echo 4.) The Focus      C.) Downtown        L.) The Catacombs   U.) IDKFA
  1314. echo 5.) The Waste Tunnels  D.) The Inmost Dens M.) Barrels O' Fun  V.) Keen
  1315. echo 6.) The Crusher        E.) Industrial Zone N.) The Chasm       W.) Betray
  1316. echo 7.) Dead Simple        F.) Suburbs     O.) Bloodfalls     
  1317. echo 8.) Tricks and Traps   G.) Tenements       P.) The Abandoned Mines
  1318. echo 9.) The Pit        H.) The Courtyard   Q.) Monster Condo  
  1319. echo:
  1320. echo Z.) Return to Select an Episode
  1321. echo:
  1322. choice /c 1234567890abcdefghijklmnopqrstuvwz
  1323. if %errorlevel% equ 34 goto map_menu
  1324. if %errorlevel% equ 33 (
  1325.     set map_str=map33
  1326.     set map_name_str=MAP33: Betray
  1327.     )
  1328. if %errorlevel% equ 32 (
  1329.     set map_str=map32
  1330.     set map_name_str=MAP32: Keen
  1331.     )
  1332. if %errorlevel% equ 31 (
  1333.     set map_str=map31
  1334.     set map_name_str=MAP31: IDKFA
  1335.     )
  1336. if %errorlevel% equ 30 (
  1337.     set map_str=map30
  1338.     set map_name_str=MAP30: Icon of Sin
  1339.     )
  1340. if %errorlevel% equ 29 (
  1341.     set map_str=map29
  1342.     set map_name_str=MAP29: The Living End
  1343.     )
  1344. if %errorlevel% equ 28 (
  1345.     set map_str=map28
  1346.     set map_name_str=MAP28: The Spirit World
  1347.     )
  1348. if %errorlevel% equ 27 (
  1349.     set map_str=map27
  1350.     set map_name_str=MAP27: Monster Condo
  1351.     )
  1352. if %errorlevel% equ 26 (
  1353.     set map_str=map26
  1354.     set map_name_str=MAP26: The Abandoned Mines
  1355.     )
  1356. if %errorlevel% equ 25 (
  1357.     set map_str=map25
  1358.     set map_name_str=MAP25: Bloodfalls
  1359.     )
  1360. if %errorlevel% equ 24 (
  1361.     set map_str=map24
  1362.     set map_name_str=MAP24: The Chasm
  1363.     )
  1364. if %errorlevel% equ 23 (
  1365.     set map_str=map23
  1366.     set map_name_str=MAP23: Barrels O' Fun
  1367.     )
  1368. if %errorlevel% equ 22 (
  1369.     set map_str=map22
  1370.     set map_name_str=MAP22: The Catacombs
  1371.     )
  1372. if %errorlevel% equ 21 (
  1373.     set map_str=map21
  1374.     set map_name_str=MAP21: Nirvana
  1375.     )
  1376. if %errorlevel% equ 20 (
  1377.     set map_str=map20
  1378.     set map_name_str=MAP20: Gotcha
  1379.     )
  1380. if %errorlevel% equ 19 (
  1381.     set map_str=map19
  1382.     set map_name_str=MAP19: The Citadel
  1383.     )
  1384. if %errorlevel% equ 18 (
  1385.     set map_str=map18
  1386.     set map_name_str=MAP18: The Courtyard
  1387.     )
  1388. if %errorlevel% equ 17 (
  1389.     set map_str=map17
  1390.     set map_name_str=MAP17: Tenements
  1391.     )
  1392. if %errorlevel% equ 16 (
  1393.     set map_str=map16
  1394.     set map_name_str=MAP16: Suburbs
  1395.     )
  1396. if %errorlevel% equ 15 (
  1397.     set map_str=map15
  1398.     set map_name_str=MAP15: Industrial Zone
  1399.     )
  1400. if %errorlevel% equ 14 (
  1401.     set map_str=map14
  1402.     set map_name_str=MAP14: The Inmost Dens
  1403.     )
  1404. if %errorlevel% equ 13 (
  1405.     set map_str=map13
  1406.     set map_name_str=MAP13: Downtown
  1407.     )
  1408. if %errorlevel% equ 12 (
  1409.     set map_str=map12
  1410.     set map_name_str=MAP12: The Factory
  1411.     )
  1412. if %errorlevel% equ 11 (
  1413.     set map_str=map11
  1414.     set map_name_str=MAP11: 'O' of Destruction
  1415.     )
  1416. if %errorlevel% equ 10 (
  1417.     set map_str=map10
  1418.     set map_name_str=MAP10: Refueling Base
  1419.     )
  1420. if %errorlevel% equ 9 (
  1421.     set map_str=map09
  1422.     set map_name_str=MAP09: The Pit
  1423.     )
  1424. if %errorlevel% equ 8 (
  1425.     set map_str=map08
  1426.     set map_name_str=MAP08: Tricks and Traps
  1427.     )
  1428. if %errorlevel% equ 7 (
  1429.     set map_str=map07
  1430.     set map_name_str=MAP07: Dead Simple
  1431.     )
  1432. if %errorlevel% equ 6 (
  1433.     set map_str=map06
  1434.     set map_name_str=MAP06: The Crusher
  1435.     )
  1436. if %errorlevel% equ 5 (
  1437.     set map_str=map05
  1438.     set map_name_str=MAP05: The Waste Tunnels
  1439.     )
  1440. if %errorlevel% equ 4 (
  1441.     set map_str=map04
  1442.     set map_name_str=MAP04: The Focus
  1443.     )
  1444. if %errorlevel% equ 3 (
  1445.     set map_str=map03
  1446.     set map_name_str=MAP03: The Gantlet
  1447.     )
  1448. if %errorlevel% equ 2 (
  1449.     set map_str=map02
  1450.     set map_name_str=MAP02: Underhalls
  1451.     )
  1452. if %errorlevel% equ 1 (
  1453.     set map_str=map01
  1454.     set map_name_str=MAP01: Entryway
  1455.     )
  1456. goto %menu_str%
  1457.  
  1458.  
  1459. :doom_e6b_menu
  1460. call :show_banner
  1461. echo ------------
  1462. echo Select a Map
  1463. echo ------------
  1464. echo:
  1465. echo 1.) Entryway       0.) Refueling Base  I.) The Citadel     R.) The Spirit World
  1466. echo 2.) Underhalls     A.) 'O' of Destruction  J.) Gotcha      S.) The Living End
  1467. echo 3.) The Gantlet            B.) The Factory     K.) Nirvana     T.) Icon of Sin
  1468. echo 4.) The Focus      C.) Downtown        L.) The Catacombs   U.) Wolfenstein
  1469. echo 5.) The Waste Tunnels  D.) The Inmost Dens M.) Barrels O' Fun  V.) Grosse
  1470. echo 6.) The Crusher        E.) Industrial Zone N.) The Chasm       W.) Betray
  1471. echo 7.) Dead Simple        F.) Suburbs     O.) Bloodfalls     
  1472. echo 8.) Tricks and Traps   G.) Tenements       P.) The Abandoned Mines
  1473. echo 9.) The Pit        H.) The Courtyard   Q.) Monster Condo  
  1474. echo:
  1475. echo Z.) Return to Select an Episode
  1476. echo:
  1477. choice /c 1234567890abcdefghijklmnopqrstuvwz
  1478. if %errorlevel% equ 34 goto map_menu
  1479. if %errorlevel% equ 33 (
  1480.     set map_str=map33
  1481.     set map_name_str=MAP33: Betray
  1482.     )
  1483. if %errorlevel% equ 32 (
  1484.     set map_str=map32
  1485.     set map_name_str=MAP32: Grosse
  1486.     )
  1487. if %errorlevel% equ 31 (
  1488.     set map_str=map31
  1489.     set map_name_str=MAP31: Wolfenstein
  1490.     )
  1491. if %errorlevel% equ 30 (
  1492.     set map_str=map30
  1493.     set map_name_str=MAP30: Icon of Sin
  1494.     )
  1495. if %errorlevel% equ 29 (
  1496.     set map_str=map29
  1497.     set map_name_str=MAP29: The Living End
  1498.     )
  1499. if %errorlevel% equ 28 (
  1500.     set map_str=map28
  1501.     set map_name_str=MAP28: The Spirit World
  1502.     )
  1503. if %errorlevel% equ 27 (
  1504.     set map_str=map27
  1505.     set map_name_str=MAP27: Monster Condo
  1506.     )
  1507. if %errorlevel% equ 26 (
  1508.     set map_str=map26
  1509.     set map_name_str=MAP26: The Abandoned Mines
  1510.     )
  1511. if %errorlevel% equ 25 (
  1512.     set map_str=map25
  1513.     set map_name_str=MAP25: Bloodfalls
  1514.     )
  1515. if %errorlevel% equ 24 (
  1516.     set map_str=map24
  1517.     set map_name_str=MAP24: The Chasm
  1518.     )
  1519. if %errorlevel% equ 23 (
  1520.     set map_str=map23
  1521.     set map_name_str=MAP23: Barrels O' Fun
  1522.     )
  1523. if %errorlevel% equ 22 (
  1524.     set map_str=map22
  1525.     set map_name_str=MAP22: The Catacombs
  1526.     )
  1527. if %errorlevel% equ 21 (
  1528.     set map_str=map21
  1529.     set map_name_str=MAP21: Nirvana
  1530.     )
  1531. if %errorlevel% equ 20 (
  1532.     set map_str=map20
  1533.     set map_name_str=MAP20: Gotcha
  1534.     )
  1535. if %errorlevel% equ 19 (
  1536.     set map_str=map19
  1537.     set map_name_str=MAP19: The Citadel
  1538.     )
  1539. if %errorlevel% equ 18 (
  1540.     set map_str=map18
  1541.     set map_name_str=MAP18: The Courtyard
  1542.     )
  1543. if %errorlevel% equ 17 (
  1544.     set map_str=map17
  1545.     set map_name_str=MAP17: Tenements
  1546.     )
  1547. if %errorlevel% equ 16 (
  1548.     set map_str=map16
  1549.     set map_name_str=MAP16: Suburbs
  1550.     )
  1551. if %errorlevel% equ 15 (
  1552.     set map_str=map15
  1553.     set map_name_str=MAP15: Industrial Zone
  1554.     )
  1555. if %errorlevel% equ 14 (
  1556.     set map_str=map14
  1557.     set map_name_str=MAP14: The Inmost Dens
  1558.     )
  1559. if %errorlevel% equ 13 (
  1560.     set map_str=map13
  1561.     set map_name_str=MAP13: Downtown
  1562.     )
  1563. if %errorlevel% equ 12 (
  1564.     set map_str=map12
  1565.     set map_name_str=MAP12: The Factory
  1566.     )
  1567. if %errorlevel% equ 11 (
  1568.     set map_str=map11
  1569.     set map_name_str=MAP11: 'O' of Destruction
  1570.     )
  1571. if %errorlevel% equ 10 (
  1572.     set map_str=map10
  1573.     set map_name_str=MAP10: Refueling Base
  1574.     )
  1575. if %errorlevel% equ 9 (
  1576.     set map_str=map09
  1577.     set map_name_str=MAP09: The Pit
  1578.     )
  1579. if %errorlevel% equ 8 (
  1580.     set map_str=map08
  1581.     set map_name_str=MAP08: Tricks and Traps
  1582.     )
  1583. if %errorlevel% equ 7 (
  1584.     set map_str=map07
  1585.     set map_name_str=MAP07: Dead Simple
  1586.     )
  1587. if %errorlevel% equ 6 (
  1588.     set map_str=map06
  1589.     set map_name_str=MAP06: The Crusher
  1590.     )
  1591. if %errorlevel% equ 5 (
  1592.     set map_str=map05
  1593.     set map_name_str=MAP05: The Waste Tunnels
  1594.     )
  1595. if %errorlevel% equ 4 (
  1596.     set map_str=map04
  1597.     set map_name_str=MAP04: The Focus
  1598.     )
  1599. if %errorlevel% equ 3 (
  1600.     set map_str=map03
  1601.     set map_name_str=MAP03: The Gantlet
  1602.     )
  1603. if %errorlevel% equ 2 (
  1604.     set map_str=map02
  1605.     set map_name_str=MAP02: Underhalls
  1606.     )
  1607. if %errorlevel% equ 1 (
  1608.     set map_str=map01
  1609.     set map_name_str=MAP01: Entryway
  1610.     )
  1611. goto %menu_str%
  1612.  
  1613. :doom_e7_menu
  1614. call :show_banner
  1615. echo ------------
  1616. echo Select a Map
  1617. echo ------------
  1618. echo:
  1619. echo 1.) The Earth Base
  1620. echo 2.) The Pain Labs
  1621. echo 3.) Canyon of the Dead
  1622. echo 4.) Hell Mountain
  1623. echo 5.) Vivisection
  1624. echo 6.) Inferno of Blood
  1625. echo 7.) Baron's Banquet
  1626. echo 8.) Tomb of Malevolence
  1627. echo 9.) March of the Demons
  1628. echo:
  1629. echo Z.) Return to Select an Episode
  1630. echo:
  1631. choice /c 123456789z
  1632. if %errorlevel% equ 10 goto map_menu
  1633. if %errorlevel% equ 9 (
  1634.     if %iwad_type_str%==doom_complete (
  1635.         set map_str=nv_map09
  1636.         set map_name_str=NV_MAP09: March of the Demons
  1637.         ) else (   
  1638.         set map_str=level09
  1639.         set map_name_str=LEVEL09: March of the Demons
  1640.         )
  1641.     )
  1642. if %errorlevel% equ 8 (
  1643.     if %iwad_type_str%==doom_complete (
  1644.         set map_str=nv_map08
  1645.         set map_name_str=NV_MAP08: Tomb of Malevolence
  1646.         ) else (
  1647.         set map_str=level08
  1648.         set map_name_str=LEVEL08: Tomb of Malevolence
  1649.         )      
  1650.     )
  1651. if %errorlevel% equ 7 (
  1652.     if %iwad_type_str%==doom_complete (
  1653.         set map_str=nv_map07
  1654.         set map_name_str=NV_MAP07: Baron's Banquet
  1655.         ) else (
  1656.         set map_str=level07
  1657.         set map_name_str=LEVEL07: Baron's Banquet
  1658.         )
  1659.     )  
  1660. if %errorlevel% equ 6 (
  1661.     if %iwad_type_str%==doom_complete (
  1662.         set map_str=nv_map06
  1663.         set map_name_str=NV_MAP06: Inferno of Blood
  1664.         ) else (
  1665.         set map_str=level06
  1666.         set map_name_str=LEVEL06: Inferno of Blood
  1667.         )
  1668.     )
  1669. if %errorlevel% equ 5 (
  1670.     if %iwad_type_str%==doom_complete (
  1671.         set map_str=nv_map05
  1672.         set map_name_str=NV_MAP05: Vivisection
  1673.         ) else (
  1674.         set map_str=level05
  1675.         set map_name_str=LEVEL05: Vivisection
  1676.         )
  1677.     )
  1678. if %errorlevel% equ 4 (
  1679.     if %iwad_type_str%==doom_complete (
  1680.         set map_str=nv_map04
  1681.         set map_name_str=NV_MAP04: Hell Mountain
  1682.         ) else (
  1683.         set map_str=level04
  1684.         set map_name_str=LEVEL04: Hell Mountain
  1685.         )
  1686.     )
  1687. if %errorlevel% equ 3 (
  1688.     if %iwad_type_str%==doom_complete (
  1689.         set map_str=nv_map03
  1690.         set map_name_str=NV_MAP03: Canyon of the Dead
  1691.         ) else (
  1692.         set map_str=level03
  1693.         set map_name_str=LEVEL03: Canyon of the Dead
  1694.         )
  1695.     )
  1696. if %errorlevel% equ 2 (
  1697.     if %iwad_type_str%==doom_complete (
  1698.         set map_str=nv_map02
  1699.         set map_name_str=NV_MAP02: The Pain Labs
  1700.         ) else (
  1701.         set map_str=level02
  1702.         set map_name_str=LEVEL02: The Pain Labs
  1703.         )
  1704.     )
  1705. if %errorlevel% equ 1 (
  1706.     if %iwad_type_str%==doom_complete (
  1707.         set map_str=nv_map01
  1708.         set map_name_str=NV_MAP01: The Earth Base
  1709.         ) else (
  1710.         set map_str=level01
  1711.         set map_name_str=LEVEL01: The Earth Base
  1712.         )
  1713.     )
  1714. goto %menu_str%
  1715.  
  1716. :doom_e8_menu
  1717. call :show_banner
  1718. echo ------------
  1719. echo Select a Map
  1720. echo ------------
  1721. echo:
  1722. echo 1.) Attack     8.) Subterra        E.) Vesperas       
  1723. echo 2.) Canyon     9.) The Garrison    F.) Titan Manor    
  1724. echo 3.) The Catwalk        0.) Black Tower     G.) Trapped on Titan   
  1725. echo 4.) The Fistula        A.) Virgil's Lead   H.) The Express Elevator to Hell
  1726. echo 5.) The Combine        B.) Minos' Judgement    I.) Bloodsea Keep  
  1727. echo 6.) Subspace       C.) Nessus      J.) Mephisto's Maosoleum
  1728. echo 7.) Paradox        D.) Geryon      K.) Bad Dream
  1729. echo:
  1730. echo Z.) Return to Select an Episode
  1731. echo:
  1732. choice /c 1234567890abcdefghijkz
  1733. if %errorlevel% equ 22 goto map_menu
  1734. if %errorlevel% equ 21 (
  1735.     set map_str=ml_map21
  1736.     set map_name_str=ML_MAP21: Bad Dream
  1737.     )
  1738. if %errorlevel% equ 20 (
  1739.     set map_str=ml_map20
  1740.     set map_name_str=ML_MAP20: Mephisto's Maosoleum
  1741.     )
  1742. if %errorlevel% equ 19 (
  1743.     set map_str=ml_map19
  1744.     set map_name_str=ML_MAP19: Bloodsea Keep
  1745.     )
  1746. if %errorlevel% equ 18 (
  1747.     set map_str=ml_map18
  1748.     set map_name_str=ML_MAP18: The Express Elevator to Hell
  1749.     )
  1750. if %errorlevel% equ 17 (
  1751.     set map_str=ml_map17
  1752.     set map_name_str=ML_MAP17: Trapped on Titan
  1753.     )
  1754. if %errorlevel% equ 16 (
  1755.     set map_str=ml_map16
  1756.     set map_name_str=ML_MAP16: Titan Manor
  1757.     )
  1758. if %errorlevel% equ 15 (
  1759.     set map_str=ml_map15
  1760.     set map_name_str=ML_MAP15: Vesperas
  1761.     )
  1762. if %errorlevel% equ 14 (
  1763.     set map_str=ml_map14
  1764.     set map_name_str=ML_MAP14: Geryon
  1765.     )
  1766. if %errorlevel% equ 13 (
  1767.     set map_str=ml_map13
  1768.     set map_name_str=ML_MAP13: Nessus
  1769.     )
  1770. if %errorlevel% equ 12 (
  1771.     set map_str=ml_map12
  1772.     set map_name_str=ML_MAP12: Minos' Judgement
  1773.     )
  1774. if %errorlevel% equ 11 (
  1775.     set map_str=ml_map11
  1776.     set map_name_str=ML_MAP11: Virgil's Lead
  1777.     )
  1778. if %errorlevel% equ 10 (
  1779.     set map_str=ml_map10
  1780.     set map_name_str=ML_MAP10: Black Tower
  1781.     )
  1782. if %errorlevel% equ 9 (
  1783.     set map_str=ml_map09
  1784.     set map_name_str=ML_MAP09: The Garrison
  1785.     )
  1786. if %errorlevel% equ 8 (
  1787.     set map_str=ml_map08
  1788.     set map_name_str=ML_MAP08: Subterra
  1789.     )
  1790. if %errorlevel% equ 7 (
  1791.     set map_str=ml_map07
  1792.     set map_name_str=ML_MAP07: Paradox
  1793.     )
  1794. if %errorlevel% equ 6 (
  1795.     set map_str=ml_map06
  1796.     set map_name_str=ML_MAP06: Subspace
  1797.     )
  1798. if %errorlevel% equ 5 (
  1799.     set map_str=ml_map05
  1800.     set map_name_str=ML_MAP05: The Combine
  1801.     )
  1802. if %errorlevel% equ 4 (
  1803.     set map_str=ml_map04
  1804.     set map_name_str=ML_MAP04: The Fistula
  1805.     )
  1806. if %errorlevel% equ 3 (
  1807.     set map_str=ml_map03
  1808.     set map_name_str=ML_MAP03: The Catwalk
  1809.     )
  1810. if %errorlevel% equ 2 (
  1811.     set map_str=ml_map02
  1812.     set map_name_str=ML_MAP02: Canyon
  1813.     )
  1814. if %errorlevel% equ 1 (
  1815.     set map_str=ml_map01
  1816.     set map_name_str=ML_MAP01: Attack
  1817.     )
  1818. goto %menu_str%
  1819.  
  1820. :doom_e9_menu
  1821. call :show_banner
  1822. echo ------------
  1823. echo Select a Map
  1824. echo ------------
  1825. echo:
  1826. echo 1.) System Control 9.) Stronghold      G.) Processing Area     O.) Baron's Den
  1827. echo 2.) Human BBQ      0.) Redemption      H.) Mill            P.) Ballistyx
  1828. echo 3.) Power Control      A.) Storage Facility    I.) Shipping/respawning     Q.) Mount Pain
  1829. echo 4.) Wormhole       B.) Crater      J.) Central Processing      R.) Heck
  1830. echo 5.) Hanger     C.) Nukage Processing   K.) Administration Center   S.) River Styx
  1831. echo 6.) Open Season        D.) Steel Works     L.) Habitat         T.) Last Call
  1832. echo 7.) Prison     E.) Dead Zone       M.) Lunar Mining Project    U.) Pharaoh
  1833. echo 8.) Metal      F.) Deepest Reaches N.) Quarry          V.) Caribbean
  1834. echo:
  1835. echo Z.) Return to Select an Episode
  1836. echo:
  1837. choice /c 1234567890abcdefghijklmnopqrstuvz
  1838. if %errorlevel% equ 33 goto map_menu
  1839. if %errorlevel% equ 32 (
  1840.     if %iwad_type_str%==doom_complete (
  1841.         set map_str=tn_map32
  1842.         set map_name_str=TN_MAP32: Carribean
  1843.         ) else (
  1844.         set map_str=map32
  1845.         set map_name_str=MAP32: Carribean
  1846.         )      
  1847.     )
  1848. if %errorlevel% equ 31 (
  1849.     if %iwad_type_str%==doom_complete (
  1850.         set map_str=tn_map31
  1851.         set map_name_str=TN_MAP31: Pharaoh
  1852.         ) else (
  1853.         set map_str=map31
  1854.         set map_name_str=MAP31: Pharaoh
  1855.         )
  1856.     )
  1857. if %errorlevel% equ 30 (
  1858.     if %iwad_type_str%==doom_complete (
  1859.         set map_str=tn_map30
  1860.         set map_name_str=TN_MAP30: Last Call
  1861.         ) else (
  1862.         set map_str=map30
  1863.         set map_name_str=MAP30: Last Call
  1864.         )
  1865.     )
  1866. if %errorlevel% equ 29 (
  1867.     if %iwad_type_str%==doom_complete (
  1868.         set map_str=tn_map29
  1869.         set map_name_str=TN_MAP29: River Styx
  1870.         ) else (
  1871.         set map_str=map29
  1872.         set map_name_str=MAP29: River Styx
  1873.         )
  1874.     )
  1875. if %errorlevel% equ 28 (
  1876.     if %iwad_type_str%==doom_complete (
  1877.         set map_str=tn_map28
  1878.         set map_name_str=TN_MAP28: Heck
  1879.         ) else (
  1880.         set map_str=map28
  1881.         set map_name_str=MAP28: Heck
  1882.         )
  1883.     )
  1884. if %errorlevel% equ 27 (
  1885.     if %iwad_type_str%==doom_complete (
  1886.         set map_str=tn_map27
  1887.         set map_name_str=TN_MAP27: Mount Pain
  1888.         ) else (
  1889.         set map_str=map27
  1890.         set map_name_str=MAP27: Mount Pain
  1891.         )
  1892.     )
  1893. if %errorlevel% equ 26 (
  1894.     if %iwad_type_str%==doom_complete (
  1895.         set map_str=tn_map26
  1896.         set map_name_str=TN_MAP26: Ballistyx
  1897.         ) else (
  1898.         set map_str=map26
  1899.         set map_name_str=MAP26: Ballistyx
  1900.         )
  1901.     )
  1902. if %errorlevel% equ 25 (
  1903.     if %iwad_type_str%==doom_complete (
  1904.         set map_str=tn_map25
  1905.         set map_name_str=TN_MAP25: Baron's Den
  1906.         ) else (
  1907.         set map_str=map25
  1908.         set map_name_str=MAP25: Baron's Den
  1909.         )
  1910.     )
  1911. if %errorlevel% equ 24 (
  1912.     if %iwad_type_str%==doom_complete (
  1913.         set map_str=tn_map24
  1914.         set map_name_str=TN_MAP24: Quarry
  1915.         ) else (
  1916.         set map_str=map24
  1917.         set map_name_str=MAP24: Quarry
  1918.         )
  1919.     )
  1920. if %errorlevel% equ 23 (
  1921.     if %iwad_type_str%==doom_complete (
  1922.         set map_str=tn_map23
  1923.         set map_name_str=TN_MAP23: Lunar Mining Project
  1924.         ) else (
  1925.         set map_str=map23
  1926.         set map_name_str=MAP23: Lunar Mining Project
  1927.         )
  1928.     )
  1929. if %errorlevel% equ 22 (
  1930.     if %iwad_type_str%==doom_complete (
  1931.         set map_str=tn_map22
  1932.         set map_name_str=TN_MAP22: Habitat
  1933.         ) else (
  1934.         set map_str=map22
  1935.         set map_name_str=MAP22: Habitat
  1936.         )
  1937.     )
  1938. if %errorlevel% equ 21 (
  1939.     if %iwad_type_str%==doom_complete (
  1940.         set map_str=tn_map21
  1941.         set map_name_str=TN_MAP21: Administration Center
  1942.         ) else (
  1943.         set map_str=map21
  1944.         set map_name_str=MAP21: Administration Center
  1945.         )
  1946.     )
  1947. if %errorlevel% equ 20 (
  1948.     if %iwad_type_str%==doom_complete (
  1949.         set map_str=tn_map20
  1950.         set map_name_str=TN_MAP20: Central Processing
  1951.         ) else (
  1952.         set map_str=map20
  1953.         set map_name_str=MAP20: Central Processing
  1954.         )
  1955.     )
  1956. if %errorlevel% equ 19 (
  1957.     if %iwad_type_str%==doom_complete (
  1958.         set map_str=tn_map19
  1959.         set map_name_str=TN_MAP19: Shipping/respawning
  1960.         ) else (
  1961.         set map_str=map19
  1962.         set map_name_str=MAP19: Shipping/respawning
  1963.         )
  1964.     )
  1965. if %errorlevel% equ 18 (
  1966.     if %iwad_type_str%==doom_complete (
  1967.         set map_str=tn_map18
  1968.         set map_name_str=TN_MAP18: Mill
  1969.         ) else (
  1970.         set map_str=map18
  1971.         set map_name_str=MAP18: Mill
  1972.         )
  1973.     )
  1974. if %errorlevel% equ 17 (
  1975.     if %iwad_type_str%==doom_complete (
  1976.         set map_str=tn_map17
  1977.         set map_name_str=TN_MAP17: Processing Area
  1978.         ) else (
  1979.         set map_str=map17
  1980.         set map_name_str=MAP17: Processing Area
  1981.         )
  1982.     )
  1983. if %errorlevel% equ 16 (
  1984.     if %iwad_type_str%==doom_complete (
  1985.         set map_str=tn_map16
  1986.         set map_name_str=TN_MAP16: Deepest Reaches
  1987.         ) else (
  1988.         set map_str=map16
  1989.         set map_name_str=MAP16: Deepest Reaches
  1990.         )
  1991.     )
  1992. if %errorlevel% equ 15 (
  1993.     if %iwad_type_str%==doom_complete (
  1994.         set map_str=tn_map15
  1995.         set map_name_str=TN_MAP15: Dead Zone
  1996.         ) else (
  1997.         set map_str=map15
  1998.         set map_name_str=MAP15: Dead Zone
  1999.         )
  2000.     )
  2001. if %errorlevel% equ 14 (
  2002.     if %iwad_type_str%==doom_complete (
  2003.         set map_str=tn_map14
  2004.         set map_name_str=TN_MAP14: Steel Works
  2005.         ) else (
  2006.         set map_str=map14
  2007.         set map_name_str=MAP14: Steel Works
  2008.         )
  2009.     )
  2010. if %errorlevel% equ 13 (
  2011.     if %iwad_type_str%==doom_complete (
  2012.         set map_str=tn_map13
  2013.         set map_name_str=TN_MAP13: Nukage Processing
  2014.         ) else (
  2015.         set map_str=map13
  2016.         set map_name_str=MAP13: Nukage Processing
  2017.         )
  2018.     )
  2019. if %errorlevel% equ 12 (
  2020.     if %iwad_type_str%==doom_complete (
  2021.         set map_str=tn_map12
  2022.         set map_name_str=TN_MAP12: Crater
  2023.         ) else (
  2024.         set map_str=map12
  2025.         set map_name_str=MAP12: Crater
  2026.         )
  2027.     )
  2028. if %errorlevel% equ 11 (
  2029.     if %iwad_type_str%==doom_complete (
  2030.         set map_str=tn_map11
  2031.         set map_name_str=TN_MAP11: Storage Facility
  2032.         ) else (
  2033.         set map_str=map11
  2034.         set map_name_str=MAP11: Storage Facility
  2035.         )
  2036.     )
  2037. if %errorlevel% equ 10 (
  2038.     if %iwad_type_str%==doom_complete (
  2039.         set map_str=tn_map10
  2040.         set map_name_str=TN_MAP10: Redemption
  2041.         ) else (
  2042.         set map_str=map10
  2043.         set map_name_str=MAP10: Redemption
  2044.         )
  2045.     )
  2046. if %errorlevel% equ 9 (
  2047.     if %iwad_type_str%==doom_complete (
  2048.         set map_str=tn_map09
  2049.         set map_name_str=TN_MAP09: Stronghold
  2050.         ) else (
  2051.         set map_str=map09
  2052.         set map_name_str=MAP09: Stronghold
  2053.         )
  2054.     )
  2055. if %errorlevel% equ 8 (
  2056.     if %iwad_type_str%==doom_complete (
  2057.         set map_str=tn_map08
  2058.         set map_name_str=TN_MAP08: Metal
  2059.         ) else (
  2060.         set map_str=map08
  2061.         set map_name_str=MAP08: Metal
  2062.         )
  2063.     )
  2064. if %errorlevel% equ 7 (
  2065.     if %iwad_type_str%==doom_complete (
  2066.         set map_str=tn_map07
  2067.         set map_name_str=TN_MAP07: Prison
  2068.         ) else (
  2069.         set map_str=map07
  2070.         set map_name_str=MAP07: Prison
  2071.         )
  2072.     )
  2073. if %errorlevel% equ 6 (
  2074.     if %iwad_type_str%==doom_complete (
  2075.         set map_str=tn_map06
  2076.         set map_name_str=TN_MAP06: Open Season
  2077.         ) else (
  2078.         set map_str=map06
  2079.         set map_name_str=MAP06: Open Season
  2080.         )
  2081.     )
  2082. if %errorlevel% equ 5 (
  2083.     if %iwad_type_str%==doom_complete (
  2084.         set map_str=tn_map05
  2085.         set map_name_str=TN_MAP05: Hanger
  2086.         ) else (
  2087.         set map_str=map05
  2088.         set map_name_str=MAP05: Hanger
  2089.         )
  2090.     )
  2091. if %errorlevel% equ 4 (
  2092.     if %iwad_type_str%==doom_complete (
  2093.         set map_str=tn_map04
  2094.         set map_name_str=TN_MAP04: Wormhole
  2095.         ) else (
  2096.         set map_str=map04
  2097.         set map_name_str=MAP04: Wormhole
  2098.         )
  2099.     )
  2100. if %errorlevel% equ 3 (
  2101.     if %iwad_type_str%==doom_complete (
  2102.         set map_str=tn_map03
  2103.         set map_name_str=TN_MAP03: Power Control
  2104.         ) else (
  2105.         set map_str=map03
  2106.         set map_name_str=MAP03: Power Control
  2107.         )
  2108.     )
  2109. if %errorlevel% equ 2 (
  2110.     if %iwad_type_str%==doom_complete (
  2111.         set map_str=tn_map02
  2112.         set map_name_str=TN_MAP02: Human BBQ
  2113.         ) else (
  2114.         set map_str=map02
  2115.         set map_name_str=MAP02: Human BBQ
  2116.         )
  2117.     )
  2118. if %errorlevel% equ 1 (
  2119.     if %iwad_type_str%==doom_complete (
  2120.         set map_str=tn_map01
  2121.         set map_name_str=TN_MAP01: System Control
  2122.         ) else (
  2123.         set map_str=map01
  2124.         set map_name_str=MAP01: System Control
  2125.         )
  2126.     )
  2127. goto %menu_str%
  2128.  
  2129. :doom_e10_menu
  2130. call :show_banner
  2131. echo ------------
  2132. echo Select a Map
  2133. echo ------------
  2134. echo:
  2135. echo 1.) Congo      9.) Abattoire       G.) Compound        O.) The Temple of Darkness
  2136. echo 2.) Well of Souls  0.) Onslaught       H.) Neurosphere     P.) Bunker
  2137. echo 3.) Aztec          A.) Hunted      I.) NME         Q.) Anti-christ
  2138. echo 4.) Caged      B.) Speed       J.) The Death Domain    R.) The Sewers
  2139. echo 5.) Ghost Town     C.) The Crypt       K.) Slayer      S.) Odyssey of Noises
  2140. echo 6.) Baron's Lair   D.) Genesis     L.) Impossible Mission  T.) The Gateway of Hell
  2141. echo 7.) Caughtyard     E.) The Twilight    M.) Tombstone       U.) Cyberden
  2142. echo 8.) Realm      F.) The Omen        N.) The Final Frontier  V.) Go 2 It
  2143. echo:
  2144. echo Z.) Return to Select an Episode
  2145. echo:
  2146. choice /c 1234567890abcdefghijklmnopqrstuvz
  2147. if %errorlevel% equ 33 goto map_menu
  2148. if %errorlevel% equ 32 (
  2149.     if %iwad_type_str%==doom_complete (
  2150.         set map_str=pl_map32
  2151.         set map_name_str=PL_MAP32: Go 2 It
  2152.         ) else (
  2153.         set map_str=map32
  2154.         set map_name_str=MAP32: Go 2 It
  2155.         )  
  2156.     )
  2157. if %errorlevel% equ 31 (
  2158.     if %iwad_type_str%==doom_complete (
  2159.         set map_str=pl_map31
  2160.         set map_name_str=PL_MAP31: Cyberden
  2161.         ) else (
  2162.         set map_str=map31
  2163.         set map_name_str=MAP31: Cyberden
  2164.         )
  2165.     )
  2166. if %errorlevel% equ 30 (
  2167.     if %iwad_type_str%==doom_complete (
  2168.         set map_str=pl_map30
  2169.         set map_name_str=PL_MAP30: The Gateway of Hell
  2170.         ) else (
  2171.         set map_str=map30
  2172.         set map_name_str=MAP30: The Gateway of Hell
  2173.         )
  2174.     )
  2175. if %errorlevel% equ 29 (
  2176.     if %iwad_type_str%==doom_complete (
  2177.         set map_str=pl_map29
  2178.         set map_name_str=PL_MAP29: Odyssey of Noises
  2179.         ) else (
  2180.         set map_str=map29
  2181.         set map_name_str=MAP29: Odyssey of Noises
  2182.         )
  2183.     )
  2184. if %errorlevel% equ 28 (
  2185.     if %iwad_type_str%==doom_complete (
  2186.         set map_str=pl_map28
  2187.         set map_name_str=PL_MAP28: The Sewers
  2188.         ) else (
  2189.         set map_str=map28
  2190.         set map_name_str=MAP28: The Sewers
  2191.         )
  2192.     )
  2193. if %errorlevel% equ 27 (
  2194.     if %iwad_type_str%==doom_complete (
  2195.         set map_str=pl_map27
  2196.         set map_name_str=PL_MAP27: Anti-christ
  2197.         ) else (
  2198.         set map_str=map27
  2199.         set map_name_str=MAP27: Anti-christ
  2200.         )
  2201.     )
  2202. if %errorlevel% equ 26 (
  2203.     if %iwad_type_str%==doom_complete (
  2204.         set map_str=pl_map26
  2205.         set map_name_str=PL_MAP26: Bunker
  2206.         ) else (
  2207.         set map_str=map26
  2208.         set map_name_str=MAP26: Bunker
  2209.         )
  2210.     )
  2211. if %errorlevel% equ 25 (
  2212.     if %iwad_type_str%==doom_complete (
  2213.         set map_str=pl_map25
  2214.         set map_name_str=PL_MAP25: The Temple of Darkness
  2215.         ) else (
  2216.         set map_str=map25
  2217.         set map_name_str=MAP25: The Temple of Darkness
  2218.         )
  2219.     )
  2220. if %errorlevel% equ 24 (
  2221.     if %iwad_type_str%==doom_complete (
  2222.         set map_str=pl_map24
  2223.         set map_name_str=PL_MAP24: The Final Frontier
  2224.         ) else (
  2225.         set map_str=map24
  2226.         set map_name_str=MAP24: The Final Frontier
  2227.         )
  2228.     )
  2229. if %errorlevel% equ 23 (
  2230.     if %iwad_type_str%==doom_complete (
  2231.         set map_str=pl_map23
  2232.         set map_name_str=PL_MAP23: Tombstone
  2233.         ) else (
  2234.         set map_str=map23
  2235.         set map_name_str=MAP23: Tombstone
  2236.         )
  2237.     )
  2238. if %errorlevel% equ 22 (
  2239.     if %iwad_type_str%==doom_complete (
  2240.         set map_str=pl_map22
  2241.         set map_name_str=PL_MAP22: Impossible Mission
  2242.         ) else (
  2243.         set map_str=map22
  2244.         set map_name_str=MAP22: Impossible Mission
  2245.         )
  2246.     )
  2247. if %errorlevel% equ 21 (
  2248.     if %iwad_type_str%==doom_complete (
  2249.         set map_str=pl_map21
  2250.         set map_name_str=PL_MAP21: Slayer
  2251.         ) else (
  2252.         set map_str=map21
  2253.         set map_name_str=MAP21: Slayer
  2254.         )
  2255.     )
  2256. if %errorlevel% equ 20 (
  2257.     if %iwad_type_str%==doom_complete (
  2258.         set map_str=pl_map20
  2259.         set map_name_str=PL_MAP20: The Death Domain
  2260.         ) else (
  2261.         set map_str=map20
  2262.         set map_name_str=MAP20: The Death Domain
  2263.         )
  2264.     )
  2265. if %errorlevel% equ 19 (
  2266.     if %iwad_type_str%==doom_complete (
  2267.         set map_str=pl_map19
  2268.         set map_name_str=PL_MAP19: NME
  2269.         ) else (
  2270.         set map_str=map19
  2271.         set map_name_str=MAP19: NME
  2272.         )
  2273.     )
  2274. if %errorlevel% equ 18 (
  2275.     if %iwad_type_str%==doom_complete (
  2276.         set map_str=pl_map18
  2277.         set map_name_str=PL_MAP18: Neurosphere
  2278.         ) else (
  2279.         set map_str=map18
  2280.         set map_name_str=MAP18: Neurosphere
  2281.         )
  2282.     )
  2283. if %errorlevel% equ 17 (
  2284.     if %iwad_type_str%==doom_complete (
  2285.         set map_str=pl_map17
  2286.         set map_name_str=PL_MAP17: Compound
  2287.         ) else (
  2288.         set map_str=map17
  2289.         set map_name_str=MAP17: Compound
  2290.         )
  2291.     )
  2292. if %errorlevel% equ 16 (
  2293.     if %iwad_type_str%==doom_complete (
  2294.         set map_str=pl_map16
  2295.         set map_name_str=PL_MAP16: The Omen
  2296.         ) else (
  2297.         set map_str=map16
  2298.         set map_name_str=MAP16: The Omen
  2299.         )
  2300.     )
  2301. if %errorlevel% equ 15 (
  2302.     if %iwad_type_str%==doom_complete (
  2303.         set map_str=pl_map15
  2304.         set map_name_str=PL_MAP15: The Twilight
  2305.         ) else (
  2306.         set map_str=map15
  2307.         set map_name_str=MAP15: The Twilight
  2308.         )
  2309.     )
  2310. if %errorlevel% equ 14 (
  2311.     if %iwad_type_str%==doom_complete (
  2312.         set map_str=pl_map14
  2313.         set map_name_str=PL_MAP14: Genesis
  2314.         ) else (
  2315.         set map_str=map14
  2316.         set map_name_str=MAP14: Genesis
  2317.         )
  2318.     )
  2319. if %errorlevel% equ 13 (
  2320.     if %iwad_type_str%==doom_complete (
  2321.         set map_str=pl_map13
  2322.         set map_name_str=PL_MAP13: The Crypt
  2323.         ) else (
  2324.         set map_str=map13
  2325.         set map_name_str=MAP13: The Crypt
  2326.         )
  2327.     )
  2328. if %errorlevel% equ 12 (
  2329.     if %iwad_type_str%==doom_complete (
  2330.         set map_str=pl_map12
  2331.         set map_name_str=PL_MAP12: Speed
  2332.         ) else (
  2333.         set map_str=map12
  2334.         set map_name_str=MAP12: Speed
  2335.         )
  2336.     )
  2337. if %errorlevel% equ 11 (
  2338.     if %iwad_type_str%==doom_complete (
  2339.         set map_str=pl_map11
  2340.         set map_name_str=PL_MAP11: Hunted
  2341.         ) else (
  2342.         set map_str=map11
  2343.         set map_name_str=MAP11: Hunted
  2344.         )
  2345.     )
  2346. if %errorlevel% equ 10 (
  2347.     if %iwad_type_str%==doom_complete (
  2348.         set map_str=pl_map10
  2349.         set map_name_str=PL_MAP10: Onslaught
  2350.         ) else (
  2351.         set map_str=map10
  2352.         set map_name_str=MAP10: Onslaught
  2353.         )
  2354.     )
  2355. if %errorlevel% equ 9 (
  2356.     if %iwad_type_str%==doom_complete (
  2357.         set map_str=pl_map09
  2358.         set map_name_str=PL_MAP09: Abattoire
  2359.         ) else (
  2360.         set map_str=map09
  2361.         set map_name_str=MAP09: Abattoire
  2362.         )
  2363.     )
  2364. if %errorlevel% equ 8 (
  2365.     if %iwad_type_str%==doom_complete (
  2366.         set map_str=pl_map08
  2367.         set map_name_str=PL_MAP08: Realm
  2368.         ) else (
  2369.         set map_str=map08
  2370.         set map_name_str=MAP08: Realm
  2371.         )
  2372.     )
  2373. if %errorlevel% equ 7 (
  2374.     if %iwad_type_str%==doom_complete (
  2375.         set map_str=pl_map07
  2376.         set map_name_str=PL_MAP07: Caughtyard
  2377.         ) else (
  2378.         set map_str=map07
  2379.         set map_name_str=MAP07: Caughtyard
  2380.         )
  2381.     )
  2382. if %errorlevel% equ 6 (
  2383.     if %iwad_type_str%==doom_complete (
  2384.         set map_str=pl_map06
  2385.         set map_name_str=PL_MAP06: Baron's Lair
  2386.         ) else (
  2387.         set map_str=map06
  2388.         set map_name_str=MAP06: Baron's Lair
  2389.         )
  2390.     )
  2391. if %errorlevel% equ 5 (
  2392.     if %iwad_type_str%==doom_complete (
  2393.         set map_str=pl_map05
  2394.         set map_name_str=PL_MAP05: Ghost Town
  2395.         ) else (
  2396.         set map_str=map05
  2397.         set map_name_str=MAP05: Ghost Town
  2398.         )
  2399.     )
  2400. if %errorlevel% equ 4 (
  2401.     if %iwad_type_str%==doom_complete (
  2402.         set map_str=pl_map04
  2403.         set map_name_str=PL_MAP04: Caged
  2404.         ) else (
  2405.         set map_str=map04
  2406.         set map_name_str=MAP04: Caged
  2407.         )
  2408.     )
  2409. if %errorlevel% equ 3 (
  2410.     if %iwad_type_str%==doom_complete (
  2411.         set map_str=pl_map03
  2412.         set map_name_str=PL_MAP03: Aztec
  2413.         ) else (
  2414.         set map_str=map03
  2415.         set map_name_str=MAP03: Aztec
  2416.         )
  2417.     )
  2418. if %errorlevel% equ 2 (
  2419.     if %iwad_type_str%==doom_complete (
  2420.         set map_str=pl_map02
  2421.         set map_name_str=PL_MAP02: Well of Souls
  2422.         ) else (
  2423.         set map_str=map02
  2424.         set map_name_str=MAP02: Well of Souls
  2425.         )
  2426.     )
  2427. if %errorlevel% equ 1 (
  2428.     if %iwad_type_str%==doom_complete (
  2429.         set map_str=pl_map01
  2430.         set map_name_str=PL_MAP01: Congo
  2431.         ) else (
  2432.         set map_str=map01
  2433.         set map_name_str=MAP01: Congo
  2434.         )
  2435.     )
  2436. goto %menu_str%
  2437.  
  2438. :heretic_e1_menu
  2439. call :show_banner
  2440. echo ------------
  2441. echo Select a Map
  2442. echo ------------
  2443. echo:
  2444. echo 1.) The Docks
  2445. echo 2.) The Dungeons
  2446. echo 3.) The Gatehouse
  2447. echo 4.) The Guard Tower
  2448. echo 5.) The Citadel
  2449. echo 6.) The Cathedral
  2450. echo 7.) The Crypts
  2451. echo 8.) Hell's Maw
  2452. echo 9.) The Graveyard
  2453. echo:
  2454. echo Z.) Return to Select an Episode
  2455. echo:
  2456. choice /c 123456789z
  2457. if %errorlevel% equ 10 goto map_menu
  2458. if %errorlevel% equ 9 (
  2459.     set map_str=e1m9
  2460.     set map_name_str=E1M9: The Graveyard
  2461.     )
  2462. if %errorlevel% equ 8 (
  2463.     set map_str=e1m8
  2464.     set map_name_str=E1M8: Hell's Maw
  2465.     )
  2466. if %errorlevel% equ 7 (
  2467.     set map_str=e1m7
  2468.     set map_name_str=E1M7: The Crypts
  2469.     )
  2470. if %errorlevel% equ 6 (
  2471.     set map_str=e1m6
  2472.     set map_name_str=E1M6: The Cathedral
  2473.     )
  2474. if %errorlevel% equ 5 (
  2475.     set map_str=e1m5
  2476.     set map_name_str=E1M5: The Citadel
  2477.     )
  2478. if %errorlevel% equ 4 (
  2479.     set map_str=e1m4
  2480.     set map_name_str=E1M4: The Guard Tower
  2481.     )
  2482. if %errorlevel% equ 3 (
  2483.     set map_str=e1m3
  2484.     set map_name_str=E1M3: The Gatehouse
  2485.     )
  2486. if %errorlevel% equ 2 (
  2487.     set map_str=e1m2
  2488.     set map_name_str=E1M2: The Dungeons
  2489.     )
  2490. if %errorlevel% equ 1 (
  2491.     set map_str=e1m1
  2492.     set map_name_str=E1M1: The Docks
  2493.     )
  2494. goto %menu_str%
  2495.  
  2496. :heretic_e2_menu
  2497. call :show_banner
  2498. echo ------------
  2499. echo Select a Map
  2500. echo ------------
  2501. echo:
  2502. echo 1.) The Crater
  2503. echo 2.) The Lava Pits
  2504. echo 3.) The River of Fire
  2505. echo 4.) The Ice Grotto
  2506. echo 5.) The Catacombs
  2507. echo 6.) The Labyrinth
  2508. echo 7.) The Great Hall
  2509. echo 8.) The Portals of Chaos
  2510. echo 9.) The Glacier
  2511. echo:
  2512. echo Z.) Return to Select an Episode
  2513. echo:
  2514. choice /c 123456789z
  2515. if %errorlevel% equ 10 goto map_menu
  2516. if %errorlevel% equ 9 (
  2517.     set map_str=e2m9
  2518.     set map_name_str=E2M9: The Glacier
  2519.     )
  2520. if %errorlevel% equ 8 (
  2521.     set map_str=e2m8
  2522.     set map_name_str=E2M8: The Portals of Chaos
  2523.     )
  2524. if %errorlevel% equ 7 (
  2525.     set map_str=e2m7
  2526.     set map_name_str=E2M7: The Great Hall
  2527.     )
  2528. if %errorlevel% equ 6 (
  2529.     set map_str=e2m6
  2530.     set map_name_str=E2M6: The Labyrinth
  2531.     )
  2532. if %errorlevel% equ 5 (
  2533.     set map_str=e2m5
  2534.     set map_name_str=E2M5: The Catacombs
  2535.     )
  2536. if %errorlevel% equ 4 (
  2537.     set map_str=e2m4
  2538.     set map_name_str=E2M4: The Ice Grotto
  2539.     )
  2540. if %errorlevel% equ 3 (
  2541.     set map_str=e2m3
  2542.     set map_name_str=E2M3: The River of Fire
  2543.     )
  2544. if %errorlevel% equ 2 (
  2545.     set map_str=e2m2
  2546.     set map_name_str=E2M2: The Lava Pits
  2547.     )
  2548. if %errorlevel% equ 1 (
  2549.     set map_str=e2m1
  2550.     set map_name_str=E2M1: The Crater
  2551.     )
  2552. goto %menu_str%
  2553.  
  2554. :heretic_e3_menu
  2555. call :show_banner
  2556. echo ------------
  2557. echo Select a Map
  2558. echo ------------
  2559. echo:
  2560. echo 1.) The Storehouse
  2561. echo 2.) The Cesspool
  2562. echo 3.) The Confluence
  2563. echo 4.) The Azure Fortress
  2564. echo 5.) The Ophidian Lair
  2565. echo 6.) The Halls of Fear
  2566. echo 7.) The Chasm
  2567. echo 8.) D'Sparil's Keep
  2568. echo 9.) The Aquifer
  2569. echo:
  2570. echo Z.) Return to Select an Episode
  2571. echo:
  2572. choice /c 123456789z
  2573. if %errorlevel% equ 10 goto map_menu
  2574. if %errorlevel% equ 9 (
  2575.     set map_str=e3m9
  2576.     set map_name_str=E3M9: The Aquifer
  2577.     )
  2578. if %errorlevel% equ 8 (
  2579.     set map_str=e3m8
  2580.     set map_name_str=E3M8: D'Sparil's Keep
  2581.     )
  2582. if %errorlevel% equ 7 (
  2583.     set map_str=e3m7
  2584.     set map_name_str=E3M7: The Chasm
  2585.     )
  2586. if %errorlevel% equ 6 (
  2587.     set map_str=e3m6
  2588.     set map_name_str=E3M6: The Halls of Fear
  2589.     )
  2590. if %errorlevel% equ 5 (
  2591.     set map_str=e3m5
  2592.     set map_name_str=E3M5: The Ophidian Lair
  2593.     )
  2594. if %errorlevel% equ 4 (
  2595.     set map_str=e3m4
  2596.     set map_name_str=E3M4: The Azure Fortress
  2597.     )
  2598. if %errorlevel% equ 3 (
  2599.     set map_str=e3m3
  2600.     set map_name_str=E3M3: The Confluence
  2601.     )
  2602. if %errorlevel% equ 2 (
  2603.     set map_str=e3m2
  2604.     set map_name_str=E3M2: The Cesspool
  2605.     )
  2606. if %errorlevel% equ 1 (
  2607.     set map_str=e3m1
  2608.     set map_name_str=E3M1: The Storehouse
  2609.     )
  2610. goto %menu_str%
  2611.  
  2612. :heretic_e4_menu
  2613. call :show_banner
  2614. echo ------------
  2615. echo Select a Map
  2616. echo ------------
  2617. echo:
  2618. echo 1.) Catafalque
  2619. echo 2.) Blockhouse
  2620. echo 3.) Ambulatory
  2621. echo 4.) Sepulcher
  2622. echo 5.) Great Stair
  2623. echo 6.) Halls of the Apostate
  2624. echo 7.) Ramparts of Perdition
  2625. echo 8.) Shattered Bridge
  2626. echo 9.) Mausoleum
  2627. echo:
  2628. echo Z.) Return to Select an Episode
  2629. echo:
  2630. choice /c 123456789z
  2631. if %errorlevel% equ 10 goto map_menu
  2632. if %errorlevel% equ 9 (
  2633.     set map_str=e4m9
  2634.     set map_name_str=E4M9: Mausoleum
  2635.     )
  2636. if %errorlevel% equ 8 (
  2637.     set map_str=e4m8
  2638.     set map_name_str=E4M8: Shattered Bridge
  2639.     )
  2640. if %errorlevel% equ 7 (
  2641.     set map_str=e4m7
  2642.     set map_name_str=E4M7: Ramparts of Perdition
  2643.     )
  2644. if %errorlevel% equ 6 (
  2645.     set map_str=e4m6
  2646.     set map_name_str=E4M6: Halls of the Apostate
  2647.     )
  2648. if %errorlevel% equ 5 (
  2649.     set map_str=e4m5
  2650.     set map_name_str=E4M5: Great Stair
  2651.     )
  2652. if %errorlevel% equ 4 (
  2653.     set map_str=e4m4
  2654.     set map_name_str=E4M4: Sepulcher
  2655.     )
  2656. if %errorlevel% equ 3 (
  2657.     set map_str=e4m3
  2658.     set map_name_str=E4M3: Ambulatory
  2659.     )
  2660. if %errorlevel% equ 2 (
  2661.     set map_str=e4m2
  2662.     set map_name_str=E4M2: Blockhouse
  2663.     )
  2664. if %errorlevel% equ 1 (
  2665.     set map_str=e4m1
  2666.     set map_name_str=E4M1: Catafalque
  2667.     )
  2668. goto %menu_str%
  2669.  
  2670. :heretic_e4a_menu
  2671. call :show_banner
  2672. echo ------------
  2673. echo Select a Map
  2674. echo ------------
  2675. echo:
  2676. echo 1.) Catafalque
  2677. echo:
  2678. echo Z.) Return to Select an Episode
  2679. echo:
  2680. choice /c 1z
  2681. if %errorlevel% equ 2 goto map_menu
  2682. if %errorlevel% equ 1 (
  2683.     set map_str=e4m1
  2684.     set map_name_str=E4M1: Catafalque
  2685.     )
  2686. goto %menu_str%
  2687.  
  2688. :heretic_e5_menu
  2689. call :show_banner
  2690. echo ------------
  2691. echo Select a Map
  2692. echo ------------
  2693. echo:
  2694. echo 1.) Ochre Cliffs
  2695. echo 2.) Rapids
  2696. echo 3.) Quay
  2697. echo 4.) Courtyard
  2698. echo 5.) Hydratyr
  2699. echo 6.) Colonnade
  2700. echo 7.) Foetid Manse
  2701. echo 8.) Field of Judgement
  2702. echo 9.) Skein of D'Sparil
  2703. echo:
  2704. echo Z.) Return to Select an Episode
  2705. echo:
  2706. choice /c 123456789z
  2707. if %errorlevel% equ 10 goto map_menu
  2708. if %errorlevel% equ 9 (
  2709.     set map_str=e5m9
  2710.     set map_name_str=E5M9: Skein of D'Sparil
  2711.     )
  2712. if %errorlevel% equ 8 (
  2713.     set map_str=e5m8
  2714.     set map_name_str=E5M8: Field of Judgement
  2715.     )
  2716. if %errorlevel% equ 7 (
  2717.     set map_str=e5m7
  2718.     set map_name_str=E5M7: Foetid Manse
  2719.     )
  2720. if %errorlevel% equ 6 (
  2721.     set map_str=e5m6
  2722.     set map_name_str=E5M6: Colonnade
  2723.     )
  2724. if %errorlevel% equ 5 (
  2725.     set map_str=e5m5
  2726.     set map_name_str=E5M5: Hydratyr
  2727.     )
  2728. if %errorlevel% equ 4 (
  2729.     set map_str=e5m4
  2730.     set map_name_str=E5M4: Courtyard
  2731.     )
  2732. if %errorlevel% equ 3 (
  2733.     set map_str=e5m3
  2734.     set map_name_str=E5M3: Quay
  2735.     )
  2736. if %errorlevel% equ 2 (
  2737.     set map_str=e5m2
  2738.     set map_name_str=E5M2: Rapids
  2739.     )
  2740. if %errorlevel% equ 1 (
  2741.     set map_str=e5m1
  2742.     set map_name_str=E5M1: Ochre Cliffs
  2743.     )
  2744. goto %menu_str%
  2745.  
  2746. :heretic_e6_menu
  2747. call :show_banner
  2748. echo ------------
  2749. echo Select a Map
  2750. echo ------------
  2751. echo:
  2752. echo 1.) Untitled
  2753. echo 2.) Untitled
  2754. echo 3.) Untitled
  2755. echo:
  2756. echo Z.) Return to Select an Episode
  2757. echo:
  2758. choice /c 123z
  2759. if %errorlevel% equ 4 goto map_menu
  2760. if %errorlevel% equ 3 (
  2761.     set map_str=e6m3
  2762.     set map_name_str=E6M3: Untitled
  2763.     )
  2764. if %errorlevel% equ 2 (
  2765.     set map_str=e6m2
  2766.     set map_name_str=E6M2: Untitled
  2767.     )
  2768. if %errorlevel% equ 1 (
  2769.     set map_str=e6m1
  2770.     set map_name_str=E6M1: Untitled
  2771.     )
  2772. goto %menu_str%
  2773.  
  2774. :hexen_e0_menu
  2775. call :show_banner
  2776. echo ------------
  2777. echo Select a Map
  2778. echo ------------
  2779. echo:
  2780. echo 1.) Winnowing Hall
  2781. echo 2.) Seven Portals
  2782. echo 3.) Guardian of Ice
  2783. echo 4.) Guardian of Fire
  2784. echo:
  2785. echo Z.) Return to Select an Episode
  2786. echo:
  2787. choice /c 1234z
  2788. if %errorlevel% equ 5 goto map_menu
  2789. if %errorlevel% equ 4 (
  2790.     set map_str=map04
  2791.     set map_name_str=MAP04: Guardian of Fire
  2792.     )
  2793. if %errorlevel% equ 3 (
  2794.     set map_str=map03
  2795.     set map_name_str=MAP03: Guardian of Ice
  2796.     )
  2797. if %errorlevel% equ 2 (
  2798.     set map_str=map02
  2799.     set map_name_str=MAP02: Seven Portals
  2800.     )
  2801. if %errorlevel% equ 1 (
  2802.     set map_str=map01
  2803.     set map_name_str=MAP01: Winnowing Hall
  2804.     )
  2805. goto %menu_str%
  2806.  
  2807. :hexen_e1_menu
  2808. call :show_banner
  2809. echo ------------
  2810. echo Select a Map
  2811. echo ------------
  2812. echo:
  2813. echo 1.) Winnowing Hall     9.) Wastelands      G.) Dungeons            O.) Wolf Chapel
  2814. echo 2.) Seven Portals      0.) Sacred Grove    H.) Desolate Garden     P.) Necropolis
  2815. echo 3.) Guardian of Ice        A.) Hypostyle       I.) Heresiarch's Seminary   Q.) Zedek's Tomb
  2816. echo 4.) Guardian of Fire       B.) Shadow Wood     J.) Dragon Chapel       R.) Menelkir's Tomb
  2817. echo 5.) Guardian of Steel      C.) Forsaken Outpost    K.) Griffin Chapel      S.) Traductus' Tomb
  2818. echo 6.) Bright Crucible        D.) Castle of Grief L.) Deathwind Chapel        T.) Vivarium
  2819. echo 7.) Darkmere           E.) Gibbet      M.) Orchard of Lamentations U.) Dark Crucible  
  2820. echo 8.) Caves of Circe     F.) Effluvium       N.) Silent Refectory       
  2821. echo:
  2822. echo Z.) Return to Select an Episode
  2823. echo:
  2824. choice /c 1234567890abcdefghijklmnopqrstuz
  2825. if %errorlevel% equ 32 goto map_menu
  2826. if %errorlevel% equ 31 (
  2827.     set map_str=map40
  2828.     set map_name_str=MAP40: Dark Crucible
  2829.     )
  2830. if %errorlevel% equ 30 (
  2831.     set map_str=map39
  2832.     set map_name_str=MAP39: Vivarium
  2833.     )
  2834. if %errorlevel% equ 29 (
  2835.     set map_str=map38
  2836.     set map_name_str=MAP38: Traductus' Tomb
  2837.     )
  2838. if %errorlevel% equ 28 (
  2839.     set map_str=map37
  2840.     set map_name_str=MAP37: Menelkir's Tomb
  2841.     )
  2842. if %errorlevel% equ 27 (
  2843.     set map_str=map36
  2844.     set map_name_str=MAP36: Zedek's Tomb
  2845.     )
  2846. if %errorlevel% equ 26 (
  2847.     set map_str=map35
  2848.     set map_name_str=MAP35: Necropolis
  2849.     )
  2850. if %errorlevel% equ 25 (
  2851.     set map_str=map34
  2852.     set map_name_str=MAP34: Wolf Chapel
  2853.     )
  2854. if %errorlevel% equ 24 (
  2855.     set map_str=map33
  2856.     set map_name_str=MAP33: Silent Refectory
  2857.     )
  2858. if %errorlevel% equ 23 (
  2859.     set map_str=map32
  2860.     set map_name_str=MAP32: Orchard of Lamentations
  2861.     )
  2862. if %errorlevel% equ 22 (
  2863.     set map_str=map31
  2864.     set map_name_str=MAP31: Deathwind Chapel
  2865.     )
  2866. if %errorlevel% equ 21 (
  2867.     set map_str=map30
  2868.     set map_name_str=MAP30: Griffin Chapel
  2869.     )
  2870. if %errorlevel% equ 20 (
  2871.     set map_str=map28
  2872.     set map_name_str=MAP28: Dragon Chapel
  2873.     )
  2874. if %errorlevel% equ 19 (
  2875.     set map_str=map27
  2876.     set map_name_str=MAP27: Heresiarch's Seminary
  2877.     )
  2878. if %errorlevel% equ 18 (
  2879.     set map_str=map26
  2880.     set map_name_str=MAP26: Desolate Garden
  2881.     )
  2882. if %errorlevel% equ 17 (
  2883.     set map_str=map25
  2884.     set map_name_str=MAP25: Dungeons
  2885.     )
  2886. if %errorlevel% equ 16 (
  2887.     set map_str=map24
  2888.     set map_name_str=MAP24: Effluvium
  2889.     )
  2890. if %errorlevel% equ 15 (
  2891.     set map_str=map23
  2892.     set map_name_str=MAP23: Gibbet
  2893.     )
  2894. if %errorlevel% equ 14 (
  2895.     set map_str=map22
  2896.     set map_name_str=MAP22: Castle of Grief
  2897.     )
  2898. if %errorlevel% equ 13 (
  2899.     set map_str=map21
  2900.     set map_name_str=MAP21: Forsaken Outpost
  2901.     )
  2902. if %errorlevel% equ 12 (
  2903.     set map_str=map13
  2904.     set map_name_str=MAP13: Shadow Wood
  2905.     )
  2906. if %errorlevel% equ 11 (
  2907.     set map_str=map12
  2908.     set map_name_str=MAP12: Hypostyle
  2909.     )
  2910. if %errorlevel% equ 10 (
  2911.     set map_str=map11
  2912.     set map_name_str=MAP11: Sacred Grove
  2913.     )
  2914. if %errorlevel% equ 9 (
  2915.     set map_str=map10
  2916.     set map_name_str=MAP10: Wastelands
  2917.     )
  2918. if %errorlevel% equ 8 (
  2919.     set map_str=map09
  2920.     set map_name_str=MAP09: Caves of Circe
  2921.     )
  2922. if %errorlevel% equ 7 (
  2923.     set map_str=map08
  2924.     set map_name_str=MAP08: Darkmere
  2925.     )
  2926. if %errorlevel% equ 6 (
  2927.     set map_str=map06
  2928.     set map_name_str=MAP06: Bright Crucible
  2929.     )
  2930. if %errorlevel% equ 5 (
  2931.     set map_str=map05
  2932.     set map_name_str=MAP05: Guardian of Steel
  2933.     )
  2934. if %errorlevel% equ 4 (
  2935.     set map_str=map04
  2936.     set map_name_str=MAP04: Guardian of Fire
  2937.     )
  2938. if %errorlevel% equ 3 (
  2939.     set map_str=map03
  2940.     set map_name_str=MAP03: Guardian of Ice
  2941.     )
  2942. if %errorlevel% equ 2 (
  2943.     set map_str=map02
  2944.     set map_name_str=MAP02: Seven Portals
  2945.     )
  2946. if %errorlevel% equ 1 (
  2947.     set map_str=map01
  2948.     set map_name_str=MAP01: Winnowing Hall
  2949.     )
  2950. goto %menu_str%
  2951.  
  2952. :hexen_e2_menu
  2953. call :show_banner
  2954. echo ------------
  2955. echo Select a Map
  2956. echo ------------
  2957. echo:
  2958. echo 1.) Ruined Village 6.) Brackenwood     A.) Locus Requiescat    F.) Abattoir
  2959. echo 2.) Blight     7.) Pyre        B.) Ordeal      G.) Dark Watch
  2960. echo 3.) Sump       8.) Constable's Gate    C.) Armory      H.) Cloaca
  2961. echo 4.) Catacomb       9.) Treasury        D.) Nave        I.) Ice Hold
  2962. echo 5.) Badlands       0.) Market Place    E.) Chantry     J.) Dark Citadel
  2963. echo:
  2964. echo Z.) Return to Select an Episode
  2965. echo:
  2966. choice /c 1234567890abcdefghijz
  2967. if %errorlevel% equ 21 goto map_menu
  2968. if %errorlevel% equ 20 (
  2969.     set map_str=map60
  2970.     set map_name_str=MAP60: Dark Citadel
  2971.     )
  2972. if %errorlevel% equ 19 (
  2973.     set map_str=map59
  2974.     set map_name_str=MAP59: Ice Hold
  2975.     )
  2976. if %errorlevel% equ 18 (
  2977.     set map_str=map58
  2978.     set map_name_str=MAP58: Cloaca
  2979.     )
  2980. if %errorlevel% equ 17 (
  2981.     set map_str=map57
  2982.     set map_name_str=MAP57: Dark Watch
  2983.     )
  2984. if %errorlevel% equ 16 (
  2985.     set map_str=map56
  2986.     set map_name_str=MAP56: Abattoir
  2987.     )
  2988. if %errorlevel% equ 15 (
  2989.     set map_str=map55
  2990.     set map_name_str=MAP55: Chantry
  2991.     )
  2992. if %errorlevel% equ 14 (
  2993.     set map_str=map54
  2994.     set map_name_str=MAP54: Nave
  2995.     )
  2996. if %errorlevel% equ 13 (
  2997.     set map_str=map53
  2998.     set map_name_str=MAP53: Armory
  2999.     )
  3000. if %errorlevel% equ 12 (
  3001.     set map_str=map52
  3002.     set map_name_str=MAP52: Ordeal
  3003.     )
  3004. if %errorlevel% equ 11 (
  3005.     set map_str=map51
  3006.     set map_name_str=MAP51: Locus Requiescat
  3007.     )
  3008. if %errorlevel% equ 10 (
  3009.     set map_str=map50
  3010.     set map_name_str=MAP50: Market Place
  3011.     )
  3012. if %errorlevel% equ 9 (
  3013.     set map_str=map49
  3014.     set map_name_str=MAP49: Treasury
  3015.     )
  3016. if %errorlevel% equ 8 (
  3017.     set map_str=map48
  3018.     set map_name_str=MAP48: Constable's Gate
  3019.     )
  3020. if %errorlevel% equ 7 (
  3021.     set map_str=map47
  3022.     set map_name_str=MAP47: Pyre
  3023.     )
  3024. if %errorlevel% equ 6 (
  3025.     set map_str=map46
  3026.     set map_name_str=MAP46: Brackenwood
  3027.     )
  3028. if %errorlevel% equ 5 (
  3029.     set map_str=map45
  3030.     set map_name_str=MAP45: Badlands
  3031.     )
  3032. if %errorlevel% equ 4 (
  3033.     set map_str=map44
  3034.     set map_name_str=MAP44: Catacomb
  3035.     )
  3036. if %errorlevel% equ 3 (
  3037.     set map_str=map43
  3038.     set map_name_str=MAP43: Sump
  3039.     )
  3040. if %errorlevel% equ 2 (
  3041.     set map_str=map42
  3042.     set map_name_str=MAP42: Blight
  3043.     )
  3044. if %errorlevel% equ 1 (
  3045.     set map_str=map41
  3046.     set map_name_str=MAP41: Ruined Village
  3047.     )
  3048. goto %menu_str%
  3049.  
  3050. :hexen_e3_menu
  3051. call :show_banner
  3052. echo ------------
  3053. echo Select a Map
  3054. echo ------------
  3055. echo:
  3056. echo 1.) Transit
  3057. echo 2.) Over N' Under
  3058. echo 3.) Deathfog
  3059. echo 4.) Castle of Pain
  3060. echo 5.) Sewer Pit
  3061. echo 6.) The Rose
  3062. echo:
  3063. echo Z.) Return to Select an Episode
  3064. echo:
  3065. choice /c 123456z
  3066. if %errorlevel% equ 7 goto map_menu
  3067. if %errorlevel% equ 6 (
  3068.     set map_str=map38
  3069.     set map_name_str=MAP38: The Rose
  3070.     )
  3071. if %errorlevel% equ 5 (
  3072.     set map_str=map37
  3073.     set map_name_str=MAP37: Sewer Pit
  3074.     )
  3075. if %errorlevel% equ 4 (
  3076.     set map_str=map36
  3077.     set map_name_str=MAP36: Castle of Pain
  3078.     )
  3079. if %errorlevel% equ 3 (
  3080.     set map_str=map35
  3081.     set map_name_str=MAP35: Deathfog
  3082.     )
  3083. if %errorlevel% equ 2 (
  3084.     set map_str=map34
  3085.     set map_name_str=MAP34: Over N' Under
  3086.     )
  3087. if %errorlevel% equ 1 (
  3088.     set map_str=map33
  3089.     set map_name_str=MAP33: Transit
  3090.     )
  3091. goto %menu_str%
  3092.  
  3093. :strife_e0_menu
  3094. call :show_banner
  3095. echo ------------
  3096. echo Select a Map
  3097. echo ------------
  3098. echo:
  3099. echo 1.) Area 1: Sanctuary
  3100. echo 2.) Area 2: Town
  3101. echo 3.) Area 3: Movement Base
  3102. echo:
  3103. echo Z.) Return to Select an Episode
  3104. echo:
  3105. choice /c 123z
  3106. if %errorlevel% equ 4 goto map_menu
  3107. if %errorlevel% equ 3 (
  3108.     set map_str=map34
  3109.     set map_name_str=MAP34: Area 3: Movement Base
  3110.     )
  3111. if %errorlevel% equ 2 (
  3112.     set map_str=map33
  3113.     set map_name_str=MAP33: Area 2: Town
  3114.     )
  3115. if %errorlevel% equ 1 (
  3116.     set map_str=map32
  3117.     set map_name_str=MAP32: Area 1: Sanctuary
  3118.     )
  3119. goto %menu_str%
  3120.  
  3121. :strife_e0a_menu
  3122. call :show_banner
  3123. echo ------------
  3124. echo Select a Map
  3125. echo ------------
  3126. echo:
  3127. echo 1.) Area 1: Sanctuary
  3128. echo 2.) Area 2: Town
  3129. echo 3.) Area 3: Movement Base
  3130. echo 4.) Factory: Production
  3131. echo 5.) Castle Clash
  3132. echo:
  3133. echo Z.) Return to Select an Episode
  3134. echo:
  3135. choice /c 12345z
  3136. if %errorlevel% equ 6 goto map_menu
  3137. if %errorlevel% equ 5 (
  3138.     set map_str=map36
  3139.     set map_name_str=MAP36: Castle Clash
  3140.     )
  3141. if %errorlevel% equ 4 (
  3142.     set map_str=map35
  3143.     set map_name_str=MAP35: Factory: Production
  3144.     )
  3145. if %errorlevel% equ 3 (
  3146.     set map_str=map34
  3147.     set map_name_str=MAP34: Area 3: Movement Base
  3148.     )
  3149. if %errorlevel% equ 2 (
  3150.     set map_str=map33
  3151.     set map_name_str=MAP33: Area 2: Town
  3152.     )
  3153. if %errorlevel% equ 1 (
  3154.     set map_str=map32
  3155.     set map_name_str=MAP32: Area 1: Sanctuary
  3156.     )
  3157. goto %menu_str%
  3158.  
  3159. :strife_e1_menu
  3160. call :show_banner
  3161. echo ------------
  3162. echo Select a Map
  3163. echo ------------
  3164. echo:
  3165. echo 1.) Sanctuary      9.) Castle: Programmer's Keep   G.) Fortress: The Bailey    O.) Catacombs: Ruined Temple
  3166. echo 2.) Town       0.) New Front Base      H.) Fortress: Stores        P.) Proving Grounds
  3167. echo 3.) Front Base         A.) Borderlands         I.) Fortress: Security Complex  Q.) The Lab
  3168. echo 4.) Power Station  B.) The Temple of the Oracle    J.) Factory: Receiving      R.) Alien Ship
  3169. echo 5.) Prison     C.) Catacombs           K.) Factory: Manufacturing  S.) Entity's Lair
  3170. echo 6.) Sewers     D.) Mines           L.) Factory: Forge      T.) Abandoned Front Base
  3171. echo 7.) Castle     E.) Fortress: Administration    M.) Order Commons       U.) Training Facility
  3172. echo 8.) Audience Chamber   F.) Fortress: Bishop's Tower    N.) Factory: Conversion Chapel
  3173. echo:
  3174. echo Z.) Return to Select an Episode
  3175. echo:
  3176. choice /c 1234567890abcdefghijklmnopqrstuz
  3177. if %errorlevel% equ 32 goto map_menu
  3178. if %errorlevel% equ 31 (
  3179.     set map_str=map31
  3180.     set map_name_str=MAP31: Training Facility
  3181.     )
  3182. if %errorlevel% equ 30 (
  3183.     set map_str=map30
  3184.     set map_name_str=MAP30: Abandoned Front Base
  3185.     )
  3186. if %errorlevel% equ 29 (
  3187.     set map_str=map29
  3188.     set map_name_str=MAP29: Entity's Lair
  3189.     )
  3190. if %errorlevel% equ 28 (
  3191.     set map_str=map28
  3192.     set map_name_str=MAP28: Alien Ship
  3193.     )
  3194. if %errorlevel% equ 27 (
  3195.     set map_str=map27
  3196.     set map_name_str=MAP27: The Lab
  3197.     )
  3198. if %errorlevel% equ 26 (
  3199.     set map_str=map26
  3200.     set map_name_str=MAP26: Proving Grounds
  3201.     )
  3202. if %errorlevel% equ 25 (
  3203.     set map_str=map25
  3204.     set map_name_str=MAP25: Catacombs: Ruined Temple
  3205.     )
  3206. if %errorlevel% equ 24 (
  3207.     set map_str=map24
  3208.     set map_name_str=MAP24: Factory: Conversion Chapel
  3209.     )
  3210. if %errorlevel% equ 23 (
  3211.     set map_str=map23
  3212.     set map_name_str=MAP23: Order Commons
  3213.     )
  3214. if %errorlevel% equ 22 (
  3215.     set map_str=map22
  3216.     set map_name_str=MAP22: Factory: Forge
  3217.     )
  3218. if %errorlevel% equ 21 (
  3219.     set map_str=map21
  3220.     set map_name_str=MAP21: Factory: Manufacturing
  3221.     )
  3222. if %errorlevel% equ 20 (
  3223.     set map_str=map20
  3224.     set map_name_str=MAP20: Factory: Receiving
  3225.     )
  3226. if %errorlevel% equ 19 (
  3227.     set map_str=map19
  3228.     set map_name_str=MAP19: Fortress: Security Complex
  3229.     )
  3230. if %errorlevel% equ 18 (
  3231.     set map_str=map18
  3232.     set map_name_str=MAP18: Fortress: Stores
  3233.     )
  3234. if %errorlevel% equ 17 (
  3235.     set map_str=map17
  3236.     set map_name_str=MAP17: Fortress: The Bailey
  3237.     )
  3238. if %errorlevel% equ 16 (
  3239.     set map_str=map16
  3240.     set map_name_str=MAP16: Fortress: Bishop's Tower
  3241.     )
  3242. if %errorlevel% equ 15 (
  3243.     set map_str=map15
  3244.     set map_name_str=MAP15: Fortress: Administration
  3245.     )
  3246. if %errorlevel% equ 14 (
  3247.     set map_str=map14
  3248.     set map_name_str=MAP14: Mines
  3249.     )
  3250. if %errorlevel% equ 13 (
  3251.     set map_str=map13
  3252.     set map_name_str=MAP13: Catacombs
  3253.     )
  3254. if %errorlevel% equ 12 (
  3255.     set map_str=map12
  3256.     set map_name_str=MAP12: The Temple of the Oracle
  3257.     )
  3258. if %errorlevel% equ 11 (
  3259.     set map_str=map11
  3260.     set map_name_str=MAP11: Borderlands
  3261.     )
  3262. if %errorlevel% equ 10 (
  3263.     set map_str=map10
  3264.     set map_name_str=MAP10: New Front Base
  3265.     )
  3266. if %errorlevel% equ 9 (
  3267.     set map_str=map09
  3268.     set map_name_str=MAP09: Castle: Programmer's Keep
  3269.     )
  3270. if %errorlevel% equ 8 (
  3271.     set map_str=map08
  3272.     set map_name_str=MAP08: Audience Chamber
  3273.     )
  3274. if %errorlevel% equ 7 (
  3275.     set map_str=map07
  3276.     set map_name_str=MAP07: Castle
  3277.     )
  3278. if %errorlevel% equ 6 (
  3279.     set map_str=map06
  3280.     set map_name_str=MAP06: Sewers
  3281.     )
  3282. if %errorlevel% equ 5 (
  3283.     set map_str=map05
  3284.     set map_name_str=MAP05: Prison
  3285.     )
  3286. if %errorlevel% equ 4 (
  3287.     set map_str=map04
  3288.     set map_name_str=MAP04: Power Station
  3289.     )
  3290. if %errorlevel% equ 3 (
  3291.     set map_str=map03
  3292.     set map_name_str=MAP03: Front Base
  3293.     )
  3294. if %errorlevel% equ 2 (
  3295.     set map_str=map02
  3296.     set map_name_str=MAP02: Town
  3297.     )
  3298. if %errorlevel% equ 1 (
  3299.     set map_str=map01
  3300.     set map_name_str=MAP01: Sanctuary
  3301.     )
  3302. goto %menu_str%
  3303.  
  3304. :strife_e1a_menu
  3305. call :show_banner
  3306. echo ------------
  3307. echo Select a Map
  3308. echo ------------
  3309. echo:
  3310. echo 1.) Sanctuary      9.) Castle: Programmer's Keep   G.) Fortress: The Bailey    O.) Catacombs: Ruined Temple
  3311. echo 2.) Town       0.) New Front Base      H.) Fortress: Stores        P.) Proving Grounds
  3312. echo 3.) Front Base         A.) Borderlands         I.) Fortress: Security Complex  Q.) The Lab
  3313. echo 4.) Power Station  B.) The Temple of the Oracle    J.) Factory: Receiving      R.) Alien Ship
  3314. echo 5.) Prison     C.) Catacombs           K.) Factory: Manufacturing  S.) Entity's Lair
  3315. echo 6.) Sewers     D.) Mines           L.) Factory: Forge      T.) Abandoned Front Base
  3316. echo 7.) Castle     E.) Fortress: Administration    M.) Order Commons       U.) Training Facility
  3317. echo 8.) Audience Chamber   F.) Fortress: Bishop's Tower    N.) Factory: Conversion Chapel  V.) Factory: Production
  3318. echo:
  3319. echo Z.) Return to Select an Episode
  3320. echo:
  3321. choice /c 1234567890abcdefghijklmnopqrstuvz
  3322. if %errorlevel% equ 33 goto map_menu
  3323. if %errorlevel% equ 32 (
  3324.     set map_str=map35
  3325.     set map_name_str=MAP35: Factory: Production
  3326.     )
  3327. if %errorlevel% equ 31 (
  3328.     set map_str=map31
  3329.     set map_name_str=MAP31: Training Facility
  3330.     )
  3331. if %errorlevel% equ 30 (
  3332.     set map_str=map30
  3333.     set map_name_str=MAP30: Abandoned Front Base
  3334.     )
  3335. if %errorlevel% equ 29 (
  3336.     set map_str=map29
  3337.     set map_name_str=MAP29: Entity's Lair
  3338.     )
  3339. if %errorlevel% equ 28 (
  3340.     set map_str=map28
  3341.     set map_name_str=MAP28: Alien Ship
  3342.     )
  3343. if %errorlevel% equ 27 (
  3344.     set map_str=map27
  3345.     set map_name_str=MAP27: The Lab
  3346.     )
  3347. if %errorlevel% equ 26 (
  3348.     set map_str=map26
  3349.     set map_name_str=MAP26: Proving Grounds
  3350.     )
  3351. if %errorlevel% equ 25 (
  3352.     set map_str=map25
  3353.     set map_name_str=MAP25: Catacombs: Ruined Temple
  3354.     )
  3355. if %errorlevel% equ 24 (
  3356.     set map_str=map24
  3357.     set map_name_str=MAP24: Factory: Conversion Chapel
  3358.     )
  3359. if %errorlevel% equ 23 (
  3360.     set map_str=map23
  3361.     set map_name_str=MAP23: Order Commons
  3362.     )
  3363. if %errorlevel% equ 22 (
  3364.     set map_str=map22
  3365.     set map_name_str=MAP22: Factory: Forge
  3366.     )
  3367. if %errorlevel% equ 21 (
  3368.     set map_str=map21
  3369.     set map_name_str=MAP21: Factory: Manufacturing
  3370.     )
  3371. if %errorlevel% equ 20 (
  3372.     set map_str=map20
  3373.     set map_name_str=MAP20: Factory: Receiving
  3374.     )
  3375. if %errorlevel% equ 19 (
  3376.     set map_str=map19
  3377.     set map_name_str=MAP19: Fortress: Security Complex
  3378.     )
  3379. if %errorlevel% equ 18 (
  3380.     set map_str=map18
  3381.     set map_name_str=MAP18: Fortress: Stores
  3382.     )
  3383. if %errorlevel% equ 17 (
  3384.     set map_str=map17
  3385.     set map_name_str=MAP17: Fortress: The Bailey
  3386.     )
  3387. if %errorlevel% equ 16 (
  3388.     set map_str=map16
  3389.     set map_name_str=MAP16: Fortress: Bishop's Tower
  3390.     )
  3391. if %errorlevel% equ 15 (
  3392.     set map_str=map15
  3393.     set map_name_str=MAP15: Fortress: Administration
  3394.     )
  3395. if %errorlevel% equ 14 (
  3396.     set map_str=map14
  3397.     set map_name_str=MAP14: Mines
  3398.     )
  3399. if %errorlevel% equ 13 (
  3400.     set map_str=map13
  3401.     set map_name_str=MAP13: Catacombs
  3402.     )
  3403. if %errorlevel% equ 12 (
  3404.     set map_str=map12
  3405.     set map_name_str=MAP12: The Temple of the Oracle
  3406.     )
  3407. if %errorlevel% equ 11 (
  3408.     set map_str=map11
  3409.     set map_name_str=MAP11: Borderlands
  3410.     )
  3411. if %errorlevel% equ 10 (
  3412.     set map_str=map10
  3413.     set map_name_str=MAP10: New Front Base
  3414.     )
  3415. if %errorlevel% equ 9 (
  3416.     set map_str=map09
  3417.     set map_name_str=MAP09: Castle: Programmer's Keep
  3418.     )
  3419. if %errorlevel% equ 8 (
  3420.     set map_str=map08
  3421.     set map_name_str=MAP08: Audience Chamber
  3422.     )
  3423. if %errorlevel% equ 7 (
  3424.     set map_str=map07
  3425.     set map_name_str=MAP07: Castle
  3426.     )
  3427. if %errorlevel% equ 6 (
  3428.     set map_str=map06
  3429.     set map_name_str=MAP06: Sewers
  3430.     )
  3431. if %errorlevel% equ 5 (
  3432.     set map_str=map05
  3433.     set map_name_str=MAP05: Prison
  3434.     )
  3435. if %errorlevel% equ 4 (
  3436.     set map_str=map04
  3437.     set map_name_str=MAP04: Power Station
  3438.     )
  3439. if %errorlevel% equ 3 (
  3440.     set map_str=map03
  3441.     set map_name_str=MAP03: Front Base
  3442.     )
  3443. if %errorlevel% equ 2 (
  3444.     set map_str=map02
  3445.     set map_name_str=MAP02: Town
  3446.     )
  3447. if %errorlevel% equ 1 (
  3448.     set map_str=map01
  3449.     set map_name_str=MAP01: Sanctuary
  3450.     )
  3451. goto %menu_str%
  3452.  
  3453. :strife_e2_menu
  3454. call :show_banner
  3455. echo ------------
  3456. echo Select a Map
  3457. echo ------------
  3458. echo:
  3459. echo 1.) Castle Clash
  3460. echo 2.) Killing Grounds
  3461. echo 3.) Ordered Chaos
  3462. echo:
  3463. echo Z.) Return to Select an Episode
  3464. echo:
  3465. choice /c 123z
  3466. if %errorlevel% equ 4 goto map_menu
  3467. if %errorlevel% equ 3 (
  3468.     set map_str=map38
  3469.     set map_name_str=MAP38: Ordered Chaos
  3470.     )
  3471. if %errorlevel% equ 2 (
  3472.     set map_str=map37
  3473.     set map_name_str=MAP37: Killing Grounds
  3474.     )
  3475. if %errorlevel% equ 1 (
  3476.     set map_str=map36
  3477.     set map_name_str=MAP36: Castle Clash
  3478.     )
  3479. goto %menu_str%
  3480.  
  3481. :chex_e1_menu
  3482. call :show_banner
  3483. echo ------------
  3484. echo Select a Map
  3485. echo ------------
  3486. echo:
  3487. echo 1.) Landing Zone
  3488. echo 2.) Storage Facility
  3489. echo 3.) Experimental Lab
  3490. echo 4.) Arboretum
  3491. echo 5.) Caverns of Bazoik
  3492. echo:
  3493. echo Z.) Return to Select an Episode
  3494. echo:
  3495. choice /c 12345z
  3496. if %errorlevel% equ 6 goto map_menu
  3497. if %errorlevel% equ 5 (
  3498.     set map_str=e1m5
  3499.     set map_name_str=E1M5: Caverns of Bazoik
  3500.     )
  3501. if %errorlevel% equ 4 (
  3502.     set map_str=e1m4
  3503.     set map_name_str=E1M4: Arboretum
  3504.     )
  3505. if %errorlevel% equ 3 (
  3506.     set map_str=e1m3
  3507.     set map_name_str=E1M3: Laboratory
  3508.     )
  3509. if %errorlevel% equ 2 (
  3510.     set map_str=e1m2
  3511.     set map_name_str=E1M2: Storage Facility
  3512.     )
  3513. if %errorlevel% equ 1 (
  3514.     set map_str=e1m1
  3515.     set map_name_str=E1M1: Landing Zone
  3516.     )
  3517. goto %menu_str%
  3518.  
  3519. :chex_e2_menu
  3520. call :show_banner
  3521. echo ------------
  3522. echo Select a Map
  3523. echo ------------
  3524. echo:
  3525. echo 1.) Spaceport
  3526. echo 2.) Cinema
  3527. echo 3.) Chex Museum
  3528. echo 4.) City Streets
  3529. echo 5.) Sewer System
  3530. echo:
  3531. echo Z.) Return to Select an Episode
  3532. echo:
  3533. choice /c 12345z
  3534. if %errorlevel% equ 6 goto map_menu
  3535. if %errorlevel% equ 5 (
  3536.     set map_str=e2m5
  3537.     set map_name_str=E2M5: Sewer System
  3538.     )
  3539. if %errorlevel% equ 4 (
  3540.     set map_str=e2m4
  3541.     set map_name_str=E2M4: City Streets
  3542.     )
  3543. if %errorlevel% equ 3 (
  3544.     set map_str=e2m3
  3545.     set map_name_str=E2M3: Chex Museum
  3546.     )
  3547. if %errorlevel% equ 2 (
  3548.     set map_str=e2m2
  3549.     set map_name_str=E2M2: Cinema
  3550.     )
  3551. if %errorlevel% equ 1 (
  3552.     set map_str=e2m1
  3553.     set map_name_str=E2M1: Spaceport
  3554.     )
  3555. goto %menu_str%
  3556.  
  3557. :chex_e3_menu
  3558. call :show_banner
  3559. echo ------------
  3560. echo Select a Map
  3561. echo ------------
  3562. echo:
  3563. echo 1.) Central Command
  3564. echo 2.) United Cereals
  3565. echo 3.) Villa Chex
  3566. echo 4.) Provinical Park
  3567. echo 5.) Meteor Spaceship
  3568. echo:
  3569. echo Z.) Return to Select an Episode
  3570. echo:
  3571. choice /c 12345z
  3572. if %errorlevel% equ 6 goto map_menu
  3573. if %errorlevel% equ 5 (
  3574.     set map_str=e3m5
  3575.     set map_name_str=E2M5: Meteor Spaceship
  3576.     )
  3577. if %errorlevel% equ 4 (
  3578.     set map_str=e3m4
  3579.     set map_name_str=E2M4: Provincial Park
  3580.     )
  3581. if %errorlevel% equ 3 (
  3582.     set map_str=e3m3
  3583.     set map_name_str=E2M3: Villa Chex
  3584.     )
  3585. if %errorlevel% equ 2 (
  3586.     set map_str=e3m2
  3587.     set map_name_str=E2M2: United Cereals
  3588.     )
  3589. if %errorlevel% equ 1 (
  3590.     set map_str=e3m1
  3591.     set map_name_str=E2M1: Central Command
  3592.     )
  3593. goto %menu_str%
  3594.  
  3595. :hacx_e1_menu
  3596. call :show_banner
  3597. echo ------------
  3598. echo Select a Map
  3599. echo ------------
  3600. echo:
  3601. echo 1.) GenEmp Corp        8.) Garden of Delights  E.) Twilight of Enk's
  3602. echo 2.) Tunnel Town        9.) Hidden Fortress F.) Protean Cybex
  3603. echo 3.) Lava Annex         0.) Anarchist Dream G.) River of Blood
  3604. echo 4.) Alcatraz       A.) Notus Us!       H.) Bizarro
  3605. echo 5.) Cyber Circus   B.) Gothik Gauntlet I.) The War Rooms
  3606. echo 6.) Digi-Ota       C.) The Sewers      J.) Intruder Alert!
  3607. echo 7.) The Great Wall D.) Trode Wars      K.) Dessicant Room
  3608. echo:
  3609. echo Z.) Return to Select an Episode
  3610. echo:
  3611. choice /c 1234567890abcdefghijkz
  3612. if %errorlevel% equ 22 goto map_menu
  3613. if %errorlevel% equ 21 (
  3614.     set map_str=map31
  3615.     set map_name_str=MAP31: Dessicant Room
  3616.     )
  3617. if %errorlevel% equ 20 (
  3618.     set map_str=map20
  3619.     set map_name_str=MAP20: Intruder Alert!
  3620.     )
  3621. if %errorlevel% equ 19 (
  3622.     set map_str=map19
  3623.     set map_name_str=MAP19: The War Rooms
  3624.     )
  3625. if %errorlevel% equ 18 (
  3626.     set map_str=map18
  3627.     set map_name_str=MAP18: Bizarro
  3628.     )
  3629. if %errorlevel% equ 17 (
  3630.     set map_str=map17
  3631.     set map_name_str=MAP17: River of Blood
  3632.     )
  3633. if %errorlevel% equ 16 (
  3634.     set map_str=map16
  3635.     set map_name_str=MAP16: Protean Cybex
  3636.     )
  3637. if %errorlevel% equ 15 (
  3638.     set map_str=map15
  3639.     set map_name_str=MAP15: Twilight of Enk's
  3640.     )
  3641. if %errorlevel% equ 14 (
  3642.     set map_str=map14
  3643.     set map_name_str=MAP14: Trode Wars
  3644.     )
  3645. if %errorlevel% equ 13 (
  3646.     set map_str=map13
  3647.     set map_name_str=MAP13: The Sewers
  3648.     )
  3649. if %errorlevel% equ 12 (
  3650.     set map_str=map12
  3651.     set map_name_str=MAP12: Gothik Gauntlet
  3652.     )
  3653. if %errorlevel% equ 11 (
  3654.     set map_str=map11
  3655.     set map_name_str=MAP11: Notus Us!
  3656.     )
  3657. if %errorlevel% equ 10 (
  3658.     set map_str=map10
  3659.     set map_name_str=MAP10: Anarchist Dream
  3660.     )
  3661. if %errorlevel% equ 9 (
  3662.     set map_str=map09
  3663.     set map_name_str=MAP09: Hidden Fortress
  3664.     )
  3665. if %errorlevel% equ 8 (
  3666.     set map_str=map08
  3667.     set map_name_str=MAP08: Garden of Delights
  3668.     )
  3669. if %errorlevel% equ 7 (
  3670.     set map_str=map07
  3671.     set map_name_str=MAP07: The Great Wall
  3672.     )
  3673. if %errorlevel% equ 6 (
  3674.     set map_str=map06
  3675.     set map_name_str=MAP06: Digi-Ota
  3676.     )
  3677. if %errorlevel% equ 5 (
  3678.     set map_str=map05
  3679.     set map_name_str=MAP05: Cyber Circus
  3680.     )
  3681. if %errorlevel% equ 4 (
  3682.     set map_str=map04
  3683.     set map_name_str=MAP04: Alcatraz
  3684.     )
  3685. if %errorlevel% equ 3 (
  3686.     set map_str=map03
  3687.     set map_name_str=MAP03: Lava Annex
  3688.     )
  3689. if %errorlevel% equ 2 (
  3690.     set map_str=map02
  3691.     set map_name_str=MAP02: Tunnel Town
  3692.     )
  3693. if %errorlevel% equ 1 (
  3694.     set map_str=map01
  3695.     set map_name_str=MAP01: GenEmp Corp
  3696.     )
  3697. goto %menu_str%
  3698.  
  3699. :hacx_e1a_menu
  3700. call :show_banner
  3701. echo ------------
  3702. echo Select a Map
  3703. echo ------------
  3704. echo:
  3705. echo 1.) GenEmp Corp        0.) Anarchist Dream I.) Valley of the Dead      R.) Bizarro
  3706. echo 2.) Tunnel Town        A.) Notus Us!       J.) Artificial Annihiliation    S.) Reality Bytes
  3707. echo 3.) Lava Annex         B.) Gothik Gauntlet     K.) CryoZine            T.) Twitch N' Kill
  3708. echo 4.) Alcatraz       C.) Catacombs       L.) Pentagon Syndrome       U.) Subspace Arcadum
  3709. echo 5.) Cyber Circus   D.) Notre Damned    M.) Capitol Punishment      V.) Dessicant Room
  3710. echo 6.) Digi-Ota       E.) Twilight of Enk's   N.) The War Rooms       W.) Future Perfect
  3711. echo 7.) The Great Wall F.) Protean Cybex   O.) Intruder Alert!     X.) GenEmp Lobby
  3712. echo 8.) Garden of Delights G.) Dune City       P.) The Darkness        Y.) Cybernetic Junction
  3713. echo 9.) Hidden Fortress    H.) River of Blood  Q.) 'Trode Wars
  3714. echo:
  3715. echo Z.) Return to Select an Episode
  3716. echo:
  3717. choice /c 1234567890abcdefghijklmnopqrstuvwxyz
  3718. if %errorlevel% equ 36 goto map_menu
  3719. if %errorlevel% equ 35 (
  3720.     set map_str=map35
  3721.     set map_name_str=MAP35: Cybernetic Junction
  3722.     )
  3723. if %errorlevel% equ 34 (
  3724.     set map_str=map34
  3725.     set map_name_str=MAP34: GenEmp Lobby
  3726.     )
  3727. if %errorlevel% equ 33 (
  3728.     set map_str=map33
  3729.     set map_name_str=MAP33: Future Perfect
  3730.     )
  3731. if %errorlevel% equ 32 (
  3732.     set map_str=map32
  3733.     set map_name_str=MAP32: Dessicant Room
  3734.     )
  3735. if %errorlevel% equ 31 (
  3736.     set map_str=map31
  3737.     set map_name_str=MAP31: Subspace Arcadum
  3738.     )
  3739. if %errorlevel% equ 30 (
  3740.     set map_str=map30
  3741.     set map_name_str=MAP30: Twitch N' Kill
  3742.     )
  3743. if %errorlevel% equ 29 (
  3744.     set map_str=map29
  3745.     set map_name_str=MAP29: Reality Bytes
  3746.     )
  3747. if %errorlevel% equ 28 (
  3748.     set map_str=map28
  3749.     set map_name_str=MAP28: Bizarro
  3750.     )
  3751. if %errorlevel% equ 27 (
  3752.     set map_str=map27
  3753.     set map_name_str=MAP27: 'Trode Wars
  3754.     )
  3755. if %errorlevel% equ 26 (
  3756.     set map_str=map26
  3757.     set map_name_str=MAP26: The Darkness
  3758.     )
  3759. if %errorlevel% equ 25 (
  3760.     set map_str=map25
  3761.     set map_name_str=MAP25: Intruder Alert!
  3762.     )
  3763. if %errorlevel% equ 24 (
  3764.     set map_str=map24
  3765.     set map_name_str=MAP24: The War Rooms
  3766.     )
  3767. if %errorlevel% equ 23 (
  3768.     set map_str=map23
  3769.     set map_name_str=MAP23: Capitol Punishment
  3770.     )
  3771. if %errorlevel% equ 22 (
  3772.     set map_str=map22
  3773.     set map_name_str=MAP22: Pentagon Syndrome
  3774.     )
  3775. if %errorlevel% equ 21 (
  3776.     set map_str=map21
  3777.     set map_name_str=MAP21: CryoZine
  3778.     )
  3779. if %errorlevel% equ 20 (
  3780.     set map_str=map20
  3781.     set map_name_str=MAP20: Artificial Annihiliation
  3782.     )
  3783. if %errorlevel% equ 19 (
  3784.     set map_str=map19
  3785.     set map_name_str=MAP19: Valley of the Dead
  3786.     )
  3787. if %errorlevel% equ 18 (
  3788.     set map_str=map18
  3789.     set map_name_str=MAP18: River of Blood
  3790.     )
  3791. if %errorlevel% equ 17 (
  3792.     set map_str=map17
  3793.     set map_name_str=MAP17: Dune City
  3794.     )
  3795. if %errorlevel% equ 16 (
  3796.     set map_str=map16
  3797.     set map_name_str=MAP16: Protean Cybex
  3798.     )
  3799. if %errorlevel% equ 15 (
  3800.     set map_str=map15
  3801.     set map_name_str=MAP15: Twilight of Enk's
  3802.     )
  3803. if %errorlevel% equ 14 (
  3804.     set map_str=map14
  3805.     set map_name_str=MAP14: Notre Damned
  3806.     )
  3807. if %errorlevel% equ 13 (
  3808.     set map_str=map13
  3809.     set map_name_str=MAP13: Catacombs
  3810.     )
  3811. if %errorlevel% equ 12 (
  3812.     set map_str=map12
  3813.     set map_name_str=MAP12: Gothik Gauntlet
  3814.     )
  3815. if %errorlevel% equ 11 (
  3816.     set map_str=map11
  3817.     set map_name_str=MAP11: Notus Us!
  3818.     )
  3819. if %errorlevel% equ 10 (
  3820.     set map_str=map10
  3821.     set map_name_str=MAP10: Anarchist Dream
  3822.     )
  3823. if %errorlevel% equ 9 (
  3824.     set map_str=map09
  3825.     set map_name_str=MAP09: Hidden Fortress
  3826.     )
  3827. if %errorlevel% equ 8 (
  3828.     set map_str=map08
  3829.     set map_name_str=MAP08: Garden of Delights
  3830.     )
  3831. if %errorlevel% equ 7 (
  3832.     set map_str=map07
  3833.     set map_name_str=MAP07: The Great Wall
  3834.     )
  3835. if %errorlevel% equ 6 (
  3836.     set map_str=map06
  3837.     set map_name_str=MAP06: Digi-Ota
  3838.     )
  3839. if %errorlevel% equ 5 (
  3840.     set map_str=map05
  3841.     set map_name_str=MAP05: Cyber Circus
  3842.     )
  3843. if %errorlevel% equ 4 (
  3844.     set map_str=map04
  3845.     set map_name_str=MAP04: Alcatraz
  3846.     )
  3847. if %errorlevel% equ 3 (
  3848.     set map_str=map03
  3849.     set map_name_str=MAP03: Lava Annex
  3850.     )
  3851. if %errorlevel% equ 2 (
  3852.     set map_str=map02
  3853.     set map_name_str=MAP02: Tunnel Town
  3854.     )
  3855. if %errorlevel% equ 1 (
  3856.     set map_str=map01
  3857.     set map_name_str=MAP01: GenEmp Corp
  3858.     )
  3859. goto %menu_str%
  3860.  
  3861. :freedoom_e1_menu
  3862. call :show_banner
  3863. echo ------------
  3864. echo Select a Map
  3865. echo ------------
  3866. echo:
  3867. echo 1.) Outer Prison
  3868. echo 2.) Communications Center
  3869. echo 3.) Waste Disposal
  3870. echo 4.) Supply Depot
  3871. echo 5.) Main Control
  3872. echo 6.) Training Facility
  3873. echo 7.) Transportation Bay
  3874. echo 8.) Outpost Quarry
  3875. echo 9.) Armory
  3876. echo:
  3877. echo Z.) Return to Select an Episode
  3878. echo:
  3879. choice /c 123456789z
  3880. if %errorlevel% equ 10 goto map_menu
  3881. if %errorlevel% equ 9 (
  3882.     set map_str=e1m9
  3883.     set map_name_str=C1M9: Armory
  3884.     )
  3885. if %errorlevel% equ 8 (
  3886.     set map_str=e1m8
  3887.     set map_name_str=C1M8: Outpost Quarry
  3888.     )
  3889. if %errorlevel% equ 7 (
  3890.     set map_str=e1m7
  3891.     set map_name_str=C1M7: Transportation Bay
  3892.     )
  3893. if %errorlevel% equ 6 (
  3894.     set map_str=e1m6
  3895.     set map_name_str=C1M6: Training Facility
  3896.     )
  3897. if %errorlevel% equ 5 (
  3898.     set map_str=e1m5
  3899.     set map_name_str=C1M5: Main Control
  3900.     )
  3901. if %errorlevel% equ 4 (
  3902.     set map_str=e1m4
  3903.     set map_name_str=C1M4: Supply Depot
  3904.     )
  3905. if %errorlevel% equ 3 (
  3906.     set map_str=e1m3
  3907.     set map_name_str=C1M3: Waste Disposal
  3908.     )
  3909. if %errorlevel% equ 2 (
  3910.     set map_str=e1m2
  3911.     set map_name_str=C1M2: Communications Center
  3912.     )
  3913. if %errorlevel% equ 1 (
  3914.     set map_str=e1m1
  3915.     set map_name_str=C1M1: Outer Prison
  3916.     )
  3917. goto %menu_str%
  3918.  
  3919. :freedoom_e2_menu
  3920. call :show_banner
  3921. echo ------------
  3922. echo Select a Map
  3923. echo ------------
  3924. echo:
  3925. echo 1.) Ruins
  3926. echo 2.) Power Plant
  3927. echo 3.) Archaelogy Site
  3928. echo 4.) Sample Holding Site
  3929. echo 5.) Fortress 31
  3930. echo 6.) Trepidation Site
  3931. echo 7.) Quarantine Vessel
  3932. echo 8.) Containment Cell
  3933. echo 9.) Corruption of Man
  3934. echo:
  3935. echo Z.) Return to Select an Episode
  3936. echo:
  3937. choice /c 123456789z
  3938. if %errorlevel% equ 10 goto map_menu
  3939. if %errorlevel% equ 9 (
  3940.     set map_str=e2m9
  3941.     set map_name_str=C2M9: Corruption of Man
  3942.     )
  3943. if %errorlevel% equ 8 (
  3944.     set map_str=e2m8
  3945.     set map_name_str=C2M8: Containment Cell
  3946.     )
  3947. if %errorlevel% equ 7 (
  3948.     set map_str=e2m7
  3949.     set map_name_str=C2M7: Quarantine Vessel
  3950.     )
  3951. if %errorlevel% equ 6 (
  3952.     set map_str=e2m6
  3953.     set map_name_str=C2M6: Trepidation Site
  3954.     )
  3955. if %errorlevel% equ 5 (
  3956.     set map_str=e2m5
  3957.     set map_name_str=C2M5: Fortress 31
  3958.     )
  3959. if %errorlevel% equ 4 (
  3960.     set map_str=e2m4
  3961.     set map_name_str=C2M4: Sample Holding Site
  3962.     )
  3963. if %errorlevel% equ 3 (
  3964.     set map_str=e2m3
  3965.     set map_name_str=C2M3: Archaeology Site
  3966.     )
  3967. if %errorlevel% equ 2 (
  3968.     set map_str=e2m2
  3969.     set map_name_str=C2M2: Power Plant
  3970.     )
  3971. if %errorlevel% equ 1 (
  3972.     set map_str=e2m1
  3973.     set map_name_str=C2M1: Ruins
  3974.     )
  3975. goto %menu_str%
  3976.  
  3977. :freedoom_e3_menu
  3978. call :show_banner
  3979. echo ------------
  3980. echo Select a Map
  3981. echo ------------
  3982. echo:
  3983. echo 1.) Land of the Lost
  3984. echo 2.) Infernal Caverns
  3985. echo 3.) Derelict Temple
  3986. echo 4.) Sacrificial Bastion
  3987. echo 5.) Oblation Temple
  3988. echo 6.) Igneous Intrusion
  3989. echo 7.) No Regrets
  3990. echo 8.) Ancient Lair
  3991. echo 9.) Acquainted With Grief
  3992. echo:
  3993. echo Z.) Return to Select an Episode
  3994. echo:
  3995. choice /c 123456789z
  3996. if %errorlevel% equ 10 goto map_menu
  3997. if %errorlevel% equ 9 (
  3998.     set map_str=e3m9
  3999.     set map_name_str=C3M9: Acquainted With Grief
  4000.     )
  4001. if %errorlevel% equ 8 (
  4002.     set map_str=e3m8
  4003.     set map_name_str=C3M8: Ancient Lair
  4004.     )
  4005. if %errorlevel% equ 7 (
  4006.     set map_str=e3m7
  4007.     set map_name_str=C3M7: No Regrets
  4008.     )
  4009. if %errorlevel% equ 6 (
  4010.     set map_str=e3m6
  4011.     set map_name_str=C3M6: Igneous Intrusion
  4012.     )
  4013. if %errorlevel% equ 5 (
  4014.     set map_str=e3m5
  4015.     set map_name_str=C3M5: Oblation Temple
  4016.     )
  4017. if %errorlevel% equ 4 (
  4018.     set map_str=e3m4
  4019.     set map_name_str=C3M4: Sacrificial Bastion
  4020.     )
  4021. if %errorlevel% equ 3 (
  4022.     set map_str=e3m3
  4023.     set map_name_str=C3M3: Derelict Temple
  4024.     )
  4025. if %errorlevel% equ 2 (
  4026.     set map_str=e3m2
  4027.     set map_name_str=C3M2: Infernal Caverns
  4028.     )
  4029. if %errorlevel% equ 1 (
  4030.     set map_str=e3m1
  4031.     set map_name_str=C3M1: Land of the Lost
  4032.     )
  4033. goto %menu_str%
  4034.  
  4035. :freedoom_e4_menu
  4036. call :show_banner
  4037. echo ------------
  4038. echo Select a Map
  4039. echo ------------
  4040. echo:
  4041. echo 1.) Maintenance Area
  4042. echo 2.) Research Complex
  4043. echo 3.) Central Computing
  4044. echo 4.) Hydroponic Facility
  4045. echo 5.) Engineering Station
  4046. echo 6.) Command Center
  4047. echo 7.) Waste Treatment
  4048. echo 8.) Launch Bay
  4049. echo 9.) Operations
  4050. echo:
  4051. echo Z.) Return to Select an Episode
  4052. echo:
  4053. choice /c 123456789z
  4054. if %errorlevel% equ 10 goto map_menu
  4055. if %errorlevel% equ 9 (
  4056.     set map_str=e4m9
  4057.     set map_name_str=C4M9: Operations
  4058.     )
  4059. if %errorlevel% equ 8 (
  4060.     set map_str=e4m8
  4061.     set map_name_str=C4M8: Launch Bay
  4062.     )
  4063. if %errorlevel% equ 7 (
  4064.     set map_str=e4m7
  4065.     set map_name_str=C4M7: Waste Treatment
  4066.     )
  4067. if %errorlevel% equ 6 (
  4068.     set map_str=e4m6
  4069.     set map_name_str=C4M6: Command Center
  4070.     )
  4071. if %errorlevel% equ 5 (
  4072.     set map_str=e4m5
  4073.     set map_name_str=C4M5: Engineering Station
  4074.     )
  4075. if %errorlevel% equ 4 (
  4076.     set map_str=e4m4
  4077.     set map_name_str=C4M4: Hydroponic Facility
  4078.     )
  4079. if %errorlevel% equ 3 (
  4080.     set map_str=e4m3
  4081.     set map_name_str=C4M3: Central Computing
  4082.     )
  4083. if %errorlevel% equ 2 (
  4084.     set map_str=e4m2
  4085.     set map_name_str=C4M2: Research Complex
  4086.     )
  4087. if %errorlevel% equ 1 (
  4088.     set map_str=e4m1
  4089.     set map_name_str=C4M1: Maintenance Area
  4090.     )
  4091. goto %menu_str%
  4092.  
  4093. :freedoom_e5_menu
  4094. call :show_banner
  4095. echo ------------
  4096. echo Select a Map
  4097. echo ------------
  4098. echo:
  4099. echo 1.) Hydroelectric Plant        9.) Datacenter      G.) City Capitol        O.) Red Works
  4100. echo 2.) Filtration Tunnels     0.) Deadly Outlands H.) Aquatics Lab        P.) Dark Depths
  4101. echo 3.) Crude Processing Center    A.) Infinite Plain  I.) Sewage Control      Q.) Warped Elementality
  4102. echo 4.) Containment Bay        B.) Railroads       J.) Blood Ember Fortress    R.) Grim Redoubt
  4103. echo 5.) Sludge Burrow      C.) Station Earth   K.) Under Realm         S.) Last Stand
  4104. echo 6.) Gamma Labs         D.) Nuclear Zone    L.) Remanasu            T.) Jaws of Defeat
  4105. echo 7.) Outer Storage Warehouse    E.) Hostile Takeover    M.) Underground Facility    U.) Be Quiet
  4106. echo 8.) Astronomy Complex      F.) Urban Jungle    N.) Tertiary Loading Bay    V.) Not Sure
  4107. echo:
  4108. echo Z.) Return to Select an Episode
  4109. echo:
  4110. choice /c 1234567890abcdefghijklmnopqrstuvz
  4111. if %errorlevel% equ 33 goto map_menu
  4112. if %errorlevel% equ 32 (
  4113.     set map_str=map32
  4114.     set map_name_str=MAP32: Not Sure
  4115.     )
  4116. if %errorlevel% equ 31 (
  4117.     set map_str=map31
  4118.     set map_name_str=MAP31: Be Quiet
  4119.     )
  4120. if %errorlevel% equ 30 (
  4121.     set map_str=map30
  4122.     set map_name_str=MAP30: Jaws of Defeat
  4123.     )
  4124. if %errorlevel% equ 29 (
  4125.     set map_str=map29
  4126.     set map_name_str=MAP29: Last Stand
  4127.     )
  4128. if %errorlevel% equ 28 (
  4129.     set map_str=map28
  4130.     set map_name_str=MAP28: Grim Redoubt
  4131.     )
  4132. if %errorlevel% equ 27 (
  4133.     set map_str=map27
  4134.     set map_name_str=MAP27: Warped Elementality
  4135.     )
  4136. if %errorlevel% equ 26 (
  4137.     set map_str=map26
  4138.     set map_name_str=MAP26: Dark Depths
  4139.     )
  4140. if %errorlevel% equ 25 (
  4141.     set map_str=map25
  4142.     set map_name_str=MAP25: Red Works
  4143.     )
  4144. if %errorlevel% equ 24 (
  4145.     set map_str=map24
  4146.     set map_name_str=MAP24: Tertiary Loading Bay
  4147.     )
  4148. if %errorlevel% equ 23 (
  4149.     set map_str=map23
  4150.     set map_name_str=MAP23: Underground Facility
  4151.     )
  4152. if %errorlevel% equ 22 (
  4153.     set map_str=map22
  4154.     set map_name_str=MAP22: Remanasu
  4155.     )
  4156. if %errorlevel% equ 21 (
  4157.     set map_str=map21
  4158.     set map_name_str=MAP21: Under Realm
  4159.     )
  4160. if %errorlevel% equ 20 (
  4161.     set map_str=map20
  4162.     set map_name_str=MAP20: Blood Ember Fortress
  4163.     )
  4164. if %errorlevel% equ 19 (
  4165.     set map_str=map19
  4166.     set map_name_str=MAP19: Sewage Control
  4167.     )
  4168. if %errorlevel% equ 18 (
  4169.     set map_str=map18
  4170.     set map_name_str=MAP18: Aquatics Lab
  4171.     )
  4172. if %errorlevel% equ 17 (
  4173.     set map_str=map17
  4174.     set map_name_str=MAP17: City Capitol
  4175.     )
  4176. if %errorlevel% equ 16 (
  4177.     set map_str=map16
  4178.     set map_name_str=MAP16: Urban Jungle
  4179.     )
  4180. if %errorlevel% equ 15 (
  4181.     set map_str=map15
  4182.     set map_name_str=MAP15: Hostile Takeover
  4183.     )
  4184. if %errorlevel% equ 14 (
  4185.     set map_str=map14
  4186.     set map_name_str=MAP14: Nuclear Zone
  4187.     )
  4188. if %errorlevel% equ 13 (
  4189.     set map_str=map13
  4190.     set map_name_str=MAP13: Station Earth
  4191.     )
  4192. if %errorlevel% equ 12 (
  4193.     set map_str=map12
  4194.     set map_name_str=MAP12: Railroads
  4195.     )
  4196. if %errorlevel% equ 11 (
  4197.     set map_str=map11
  4198.     set map_name_str=MAP11: Infinite Plain
  4199.     )
  4200. if %errorlevel% equ 10 (
  4201.     set map_str=map10
  4202.     set map_name_str=MAP10: Deadly Outlands
  4203.     )
  4204. if %errorlevel% equ 9 (
  4205.     set map_str=map09
  4206.     set map_name_str=MAP09: Datacenter
  4207.     )
  4208. if %errorlevel% equ 8 (
  4209.     set map_str=map08
  4210.     set map_name_str=MAP08: Astronomy Complex
  4211.     )
  4212. if %errorlevel% equ 7 (
  4213.     set map_str=map07
  4214.     set map_name_str=MAP07: Outer Storage Warehouse
  4215.     )
  4216. if %errorlevel% equ 6 (
  4217.     set map_str=map06
  4218.     set map_name_str=MAP06: Gamma Labs
  4219.     )
  4220. if %errorlevel% equ 5 (
  4221.     set map_str=map05
  4222.     set map_name_str=MAP05: Sludge Burrow
  4223.     )
  4224. if %errorlevel% equ 4 (
  4225.     set map_str=map04
  4226.     set map_name_str=MAP04: Containment Bay
  4227.     )
  4228. if %errorlevel% equ 3 (
  4229.     set map_str=map03
  4230.     set map_name_str=MAP03: Crude Processing Center
  4231.     )
  4232. if %errorlevel% equ 2 (
  4233.     set map_str=map02
  4234.     set map_name_str=MAP02: Filtration Tunnels
  4235.     )
  4236. if %errorlevel% equ 1 (
  4237.     set map_str=map01
  4238.     set map_name_str=MAP01: Hydroelectric Plant
  4239.     )
  4240. goto %menu_str%
  4241.  
  4242. :freedoom_e6_menu
  4243. call :show_banner
  4244. echo ------------
  4245. echo Select a Map
  4246. echo ------------
  4247. echo:
  4248. echo 1.) Tech Test      9.) Industrial Outland  G.) Underwoods      O.) Mansion Yard
  4249. echo 2.) Natural Station    0.) Detached Grounds    H.) Deserted Courtyard  P.) Acidic Crypt
  4250. echo 3.) Issues of Claveria A.) Isolated Facility   I.) Tech Isle       Q.) The Exile
  4251. echo 4.) Steel      B.) Up 'n Down Canyon   J.) Warehouse       R.) Weapons Factory
  4252. echo 5.) Dense Fields   C.) Unholy Blood    K.) Refinary        S.) Unusual Territory
  4253. echo 6.) Temple of Ammon    D.) Technical Assault   L.) Fourplay        T.) Last Man Standing
  4254. echo 7.) Main Stronghold    E.) Shallow Complex M.) Confrontation   U.) Desolated Fort
  4255. echo 8.) Artifact Base  F.) Barren Alleys   N.) Flooded Base    V.) Chocolate
  4256. echo:
  4257. echo Z.) Return to Select an Episode
  4258. echo:
  4259. choice /c 1234567890abcdefghijklmnopqrstuvz
  4260. if %errorlevel% equ 33 goto map_menu
  4261. if %errorlevel% equ 32 (
  4262.     set map_str=map32
  4263.     set map_name_str=MAP32: Chocolate
  4264.     )
  4265. if %errorlevel% equ 31 (
  4266.     set map_str=map31
  4267.     set map_name_str=MAP31: Desolated Fort
  4268.     )
  4269. if %errorlevel% equ 30 (
  4270.     set map_str=map30
  4271.     set map_name_str=MAP30: Last Man Standing
  4272.     )
  4273. if %errorlevel% equ 29 (
  4274.     set map_str=map29
  4275.     set map_name_str=MAP29: Unusual Territory
  4276.     )
  4277. if %errorlevel% equ 28 (
  4278.     set map_str=map28
  4279.     set map_name_str=MAP28: Weapons Factory
  4280.     )
  4281. if %errorlevel% equ 27 (
  4282.     set map_str=map27
  4283.     set map_name_str=MAP27: The Exile
  4284.     )
  4285. if %errorlevel% equ 26 (
  4286.     set map_str=map26
  4287.     set map_name_str=MAP26: Acidic Crypt
  4288.     )
  4289. if %errorlevel% equ 25 (
  4290.     set map_str=map25
  4291.     set map_name_str=MAP25: Mansion Yard
  4292.     )
  4293. if %errorlevel% equ 24 (
  4294.     set map_str=map24
  4295.     set map_name_str=MAP24: Flooded Base
  4296.     )
  4297. if %errorlevel% equ 23 (
  4298.     set map_str=map23
  4299.     set map_name_str=MAP23: Confrontation
  4300.     )
  4301. if %errorlevel% equ 22 (
  4302.     set map_str=map22
  4303.     set map_name_str=MAP22: Fourplay
  4304.     )
  4305. if %errorlevel% equ 21 (
  4306.     set map_str=map21
  4307.     set map_name_str=MAP21: Refinary
  4308.     )
  4309. if %errorlevel% equ 20 (
  4310.     set map_str=map20
  4311.     set map_name_str=MAP20: Warehouse
  4312.     )
  4313. if %errorlevel% equ 19 (
  4314.     set map_str=map19
  4315.     set map_name_str=MAP19: Tech Isle
  4316.     )
  4317. if %errorlevel% equ 18 (
  4318.     set map_str=map18
  4319.     set map_name_str=MAP18: Deserted Courtyard
  4320.     )
  4321. if %errorlevel% equ 17 (
  4322.     set map_str=map17
  4323.     set map_name_str=MAP17: Underwoods
  4324.     )
  4325. if %errorlevel% equ 16 (
  4326.     set map_str=map16
  4327.     set map_name_str=MAP16: Barren Alleys
  4328.     )
  4329. if %errorlevel% equ 15 (
  4330.     set map_str=map15
  4331.     set map_name_str=MAP15: Shallow Complex
  4332.     )
  4333. if %errorlevel% equ 14 (
  4334.     set map_str=map14
  4335.     set map_name_str=MAP14: Technical Assault
  4336.     )
  4337. if %errorlevel% equ 13 (
  4338.     set map_str=map13
  4339.     set map_name_str=MAP13: Unholy Blood
  4340.     )
  4341. if %errorlevel% equ 12 (
  4342.     set map_str=map12
  4343.     set map_name_str=MAP12: Up 'n Down Canyon
  4344.     )
  4345. if %errorlevel% equ 11 (
  4346.     set map_str=map11
  4347.     set map_name_str=MAP11: Isolated Facility
  4348.     )
  4349. if %errorlevel% equ 10 (
  4350.     set map_str=map10
  4351.     set map_name_str=MAP10: Detached Grounds
  4352.     )
  4353. if %errorlevel% equ 9 (
  4354.     set map_str=map09
  4355.     set map_name_str=MAP09: Industrial Outland
  4356.     )
  4357. if %errorlevel% equ 8 (
  4358.     set map_str=map08
  4359.     set map_name_str=MAP08: Artifact Base
  4360.     )
  4361. if %errorlevel% equ 7 (
  4362.     set map_str=map07
  4363.     set map_name_str=MAP07: Main Stronghold
  4364.     )
  4365. if %errorlevel% equ 6 (
  4366.     set map_str=map06
  4367.     set map_name_str=MAP06: Temple of Ammon
  4368.     )
  4369. if %errorlevel% equ 5 (
  4370.     set map_str=map05
  4371.     set map_name_str=MAP05: Dense Fields
  4372.     )
  4373. if %errorlevel% equ 4 (
  4374.     set map_str=map04
  4375.     set map_name_str=MAP04: Steel
  4376.     )
  4377. if %errorlevel% equ 3 (
  4378.     set map_str=map03
  4379.     set map_name_str=MAP03: Issues of Claveria
  4380.     )
  4381. if %errorlevel% equ 2 (
  4382.     set map_str=map02
  4383.     set map_name_str=MAP02: Natural Station
  4384.     )
  4385. if %errorlevel% equ 1 (
  4386.     set map_str=map01
  4387.     set map_name_str=MAP01: Tech Test
  4388.     )
  4389. goto %menu_str%
  4390.  
  4391. :blasphem_e1_menu
  4392. call :show_banner
  4393. echo ------------
  4394. echo Select a Map
  4395. echo ------------
  4396. echo:
  4397. echo 1.) noname
  4398. echo 2.) noname
  4399. echo 3.) Forgotten Stronghold
  4400. echo 4.) The Guard Tower
  4401. echo 5.) The Citadel
  4402. echo 6.) The Cathedral
  4403. echo 7.) The White Citadel
  4404. echo 8.) Hell's Maw
  4405. echo 9.) The Graveyard
  4406. echo:
  4407. echo Z.) Return to Select an Episode
  4408. echo:
  4409. choice /c 123456789z
  4410. if %errorlevel% equ 10 goto map_menu
  4411. if %errorlevel% equ 9 (
  4412.     set map_str=e1m9
  4413.     set map_name_str=E1M9: The Graveyard
  4414.     )
  4415. if %errorlevel% equ 8 (
  4416.     set map_str=e1m8
  4417.     set map_name_str=E1M8: Hell's Maw
  4418.     )
  4419. if %errorlevel% equ 7 (
  4420.     set map_str=e1m7
  4421.     set map_name_str=E1M7: The White Citadel
  4422.     )
  4423. if %errorlevel% equ 6 (
  4424.     set map_str=e1m6
  4425.     set map_name_str=E1M6: The Cathedral
  4426.     )
  4427. if %errorlevel% equ 5 (
  4428.     set map_str=e1m5
  4429.     set map_name_str=E1M5: The Citadel
  4430.     )
  4431. if %errorlevel% equ 4 (
  4432.     set map_str=e1m4
  4433.     set map_name_str=E1M4: The Guard Tower
  4434.     )
  4435. if %errorlevel% equ 3 (
  4436.     set map_str=e1m3
  4437.     set map_name_str=E1M3: Forgotten Stronghold
  4438.     )
  4439. if %errorlevel% equ 2 (
  4440.     set map_str=e1m2
  4441.     set map_name_str=E1M2: noname
  4442.     )
  4443. if %errorlevel% equ 1 (
  4444.     set map_str=e1m1
  4445.     set map_name_str=E1M1: noname
  4446.     )
  4447. goto %menu_str%
  4448.  
  4449. :blasphem_e2_menu
  4450. call :show_banner
  4451. echo ------------
  4452. echo Select a Map
  4453. echo ------------
  4454. echo:
  4455. echo 1.) The Remote Outpost
  4456. echo 2.) The Lava Pits
  4457. echo 3.) The River of Fire
  4458. echo 4.) The Ice Grotto
  4459. echo 5.) The Catacombs
  4460. echo 6.) The Labyrinth
  4461. echo 7.) The Great Hall
  4462. echo 8.) The Portals of Chaos
  4463. echo 9.) The Glacier
  4464. echo:
  4465. echo Z.) Return to Select an Episode
  4466. echo:
  4467.  
  4468. :: Process menu command
  4469. choice /c 123456789z
  4470. if %errorlevel% equ 10 goto map_menu
  4471. if %errorlevel% equ 9 (
  4472.     set map_str=e2m9
  4473.     set map_name_str=E2M9: The Glacier
  4474.     )
  4475. if %errorlevel% equ 8 (
  4476.     set map_str=e2m8
  4477.     set map_name_str=E2M8: The Portals of Chaos
  4478.     )
  4479. if %errorlevel% equ 7 (
  4480.     set map_str=e2m7
  4481.     set map_name_str=E2M7: The Great Hall
  4482.     )
  4483. if %errorlevel% equ 6 (
  4484.     set map_str=e2m6
  4485.     set map_name_str=E2M6: The Labyrinth
  4486.     )
  4487. if %errorlevel% equ 5 (
  4488.     set map_str=e2m5
  4489.     set map_name_str=E2M5: The Catacombs
  4490.     )
  4491. if %errorlevel% equ 4 (
  4492.     set map_str=e2m4
  4493.     set map_name_str=E2M4: The Ice Grotto
  4494.     )
  4495. if %errorlevel% equ 3 (
  4496.     set map_str=e2m3
  4497.     set map_name_str=E2M3: The River of Fire
  4498.     )
  4499. if %errorlevel% equ 2 (
  4500.     set map_str=e2m2
  4501.     set map_name_str=E2M2: The Lava Pits
  4502.     )
  4503. if %errorlevel% equ 1 (
  4504.     set map_str=e2m1
  4505.     set map_name_str=E2M1: The Remote Outpost
  4506.     )
  4507. goto %menu_str%
  4508.  
  4509. :blasphem_e4_menu
  4510. call :show_banner
  4511. echo ------------
  4512. echo Select a Map
  4513. echo ------------
  4514. echo:
  4515. echo 1.) Black Thrones
  4516. echo 2.) Desolate Ways
  4517. echo 3.) Spilling Holy Blood
  4518. echo 4.) Megaliths
  4519. echo 5.) noname
  4520. echo 6.) noname
  4521. echo 7.) noname
  4522. echo 8.) noname
  4523. echo 9.) noname
  4524. echo:
  4525. echo Z.) Return to Select an Episode
  4526. echo:
  4527. choice /c 123456789z
  4528. if %errorlevel% equ 10 goto map_menu
  4529. if %errorlevel% equ 9 (
  4530.     set map_str=e4m9
  4531.     set map_name_str=E4M9: noname
  4532.     )
  4533. if %errorlevel% equ 8 (
  4534.     set map_str=e4m8
  4535.     set map_name_str=E4M8: noname
  4536.     )
  4537. if %errorlevel% equ 7 (
  4538.     set map_str=e4m7
  4539.     set map_name_str=E4M7: noname
  4540.     )
  4541. if %errorlevel% equ 6 (
  4542.     set map_str=e4m6
  4543.     set map_name_str=E4M6: noname
  4544.     )
  4545. if %errorlevel% equ 5 (
  4546.     set map_str=e4m5
  4547.     set map_name_str=E4M5: noname
  4548.     )
  4549. if %errorlevel% equ 4 (
  4550.     set map_str=e4m4
  4551.     set map_name_str=E4M4: Megaliths
  4552.     )
  4553. if %errorlevel% equ 3 (
  4554.     set map_str=e4m3
  4555.     set map_name_str=E4M3: Spilling Holy Blood
  4556.     )
  4557. if %errorlevel% equ 2 (
  4558.     set map_str=e4m2
  4559.     set map_name_str=E4M2: Desolate Ways
  4560.     )
  4561. if %errorlevel% equ 1 (
  4562.     set map_str=e4m1
  4563.     set map_name_str=E4M1: Black Thrones
  4564.     )
  4565. goto %menu_str%
  4566.  
  4567. :delaweare_e1_menu
  4568. call :show_banner
  4569. echo ------------
  4570. echo Select a Map
  4571. echo ------------
  4572. echo:
  4573. echo 1.) Delaweare
  4574. echo:
  4575. echo Z.) Return to Select an Episode
  4576. echo:
  4577. choice /c 1z
  4578. if %errorlevel% equ 2 goto map_menu
  4579. if %errorlevel% equ 1 (
  4580.     set map_str=map01
  4581.     set map_name_str=MAP01: Delaweare
  4582.     )
  4583. goto %menu_str%
  4584.  
  4585. :harm_e1_menu
  4586. call :show_banner
  4587. echo ------------
  4588. echo Select a Map
  4589. echo ------------
  4590. echo:
  4591. echo 1.) Abduction      7.) The Underwater Lab
  4592. echo 2.) Harm's Way     8.) Airstrip One
  4593. echo 3.) Owt Mood           9.) The Launch Base
  4594. echo 4.) Megalapolis        0.) The Radioactive Zone   
  4595. echo 5.) The Hospital   A.) Echidna
  4596. echo 6.) The Weapons Factory   
  4597. echo:
  4598. echo Z.) Return to Select an Episode
  4599. echo:
  4600. choice /c 1234567890az
  4601. if %errorlevel% equ 12 goto map_menu
  4602. if %errorlevel% equ 11 (
  4603.     set map_str=map11
  4604.     set map_name_str=MAP11: Echidna
  4605.     )
  4606. if %errorlevel% equ 10 (
  4607.     set map_str=map10
  4608.     set map_name_str=MAP10: The Radioactive Zone
  4609.     )
  4610. if %errorlevel% equ 9 (
  4611.     set map_str=map09
  4612.     set map_name_str=MAP09: The Launch Base
  4613.     )
  4614. if %errorlevel% equ 8 (
  4615.     set map_str=map08
  4616.     set map_name_str=MAP08: Airstrip One
  4617.     )
  4618. if %errorlevel% equ 7 (
  4619.     set map_str=map07
  4620.     set map_name_str=MAP07: The Underwater Lab
  4621.     )
  4622. if %errorlevel% equ 6 (
  4623.     set map_str=map06
  4624.     set map_name_str=MAP06: The Weapons Factory
  4625.     )
  4626. if %errorlevel% equ 5 (
  4627.     set map_str=map05
  4628.     set map_name_str=MAP05: The Hospital
  4629.     )
  4630. if %errorlevel% equ 4 (
  4631.     set map_str=map04
  4632.     set map_name_str=MAP04: Megalapolis
  4633.     )
  4634. if %errorlevel% equ 3 (
  4635.     set map_str=map03
  4636.     set map_name_str=MAP03: Owt Mood
  4637.     )
  4638. if %errorlevel% equ 2 (
  4639.     set map_str=map02
  4640.     set map_name_str=MAP02: Harm's Way
  4641.     )
  4642. if %errorlevel% equ 1 (
  4643.     set map_str=map01
  4644.     set map_name_str=MAP01: Abduction
  4645.     )
  4646. goto %menu_str%
  4647.  
  4648. :action2_e1_menu
  4649. call :show_banner
  4650. echo ------------
  4651. echo Select a Map
  4652. echo ------------
  4653. echo:
  4654. echo 1.) Streets of Rage: It's time for Action
  4655. echo 2.) Action Bridge: The Manhattan Project  
  4656. echo 3.) Segue: Say, That's a Nice Car
  4657. echo 4.) Action Subway: Follow the Bad Dudes
  4658. echo 5.) Phylex: Rising to the Challenge
  4659. echo 6.) Phylex: Top Floor
  4660. echo 7.) Backwoods: Over the River and Through the Woods...
  4661. echo 8.) Abandoned Places: The Splatterhouse
  4662. echo 9.) Crisp's Office: Final Fight   
  4663. echo:
  4664. echo Z.) Return to Select an Episode
  4665. echo:
  4666. choice /c 123456789z
  4667. if %errorlevel% equ 10 goto map_menu
  4668. if %errorlevel% equ 9 (
  4669.     set map_str=map10
  4670.     set map_name_str=MAP10: Crisp's Office: Final Fight
  4671.     )
  4672. if %errorlevel% equ 8 (
  4673.     set map_str=map09
  4674.     set map_name_str=MAP09: Abandoned Places: The Splatterhouse
  4675.     )
  4676. if %errorlevel% equ 7 (
  4677.     set map_str=map08
  4678.     set map_name_str=MAP08: Backwoods: Over the River and Through the Woods...
  4679.     )
  4680. if %errorlevel% equ 6 (
  4681.     set map_str=map07
  4682.     set map_name_str=MAP07: Phylex: Top Floor
  4683.     )
  4684. if %errorlevel% equ 5 (
  4685.     set map_str=map06
  4686.     set map_name_str=MAP06: Phylex: Rising to the Challenge
  4687.     )
  4688. if %errorlevel% equ 4 (
  4689.     set map_str=map04
  4690.     set map_name_str=MAP04: Action Subway: Follow the Bad Dudes
  4691.     )
  4692. if %errorlevel% equ 3 (
  4693.     set map_str=map03
  4694.     set map_name_str=MAP03: Segue: Say, That's a Nice Car
  4695.     )
  4696. if %errorlevel% equ 2 (
  4697.     set map_str=map02
  4698.     set map_name_str=MAP02: Action Bridge: The Manhattan Project
  4699.     )
  4700. if %errorlevel% equ 1 (
  4701.     set map_str=map01
  4702.     set map_name_str=MAP01: Streets of Rage: It's time for Action
  4703.     )
  4704. goto %menu_str%
  4705.  
  4706. :square_e1_menu
  4707. call :show_banner
  4708. echo ------------
  4709. echo Select a Map
  4710. echo ------------
  4711. echo:
  4712. echo 1.) Welcome to Squaresville    6.) The Spillway
  4713. echo 2.) Sewerside          7.) Geometropolis
  4714. echo 3.) Up Shape Creek     8.) Fizz-O Pop Factory
  4715. echo 4.) Paint Plant            9.) Launch Base
  4716. echo 5.) A Miner Inconvenience  0.) Arctic Lab
  4717. echo:
  4718. echo Z.) Return to Select an Episode
  4719. echo:
  4720. choice /c 1234567890z
  4721. if %errorlevel% equ 11 goto map_menu
  4722. if %errorlevel% equ 10 (
  4723.     set map_str=e1a10
  4724.     set map_name_str=E1A10: Arctic Lab
  4725.     )
  4726. if %errorlevel% equ 9 (
  4727.     set map_str=e1a9
  4728.     set map_name_str=E1A9: Launch Base
  4729.     )
  4730. if %errorlevel% equ 8 (
  4731.     set map_str=e1a8
  4732.     set map_name_str=E1A8: Fizz-O Pop Factory
  4733.     )
  4734. if %errorlevel% equ 7 (
  4735.     set map_str=e1a7
  4736.     set map_name_str=E1A7: Geometropolis
  4737.     )
  4738. if %errorlevel% equ 6 (
  4739.     set map_str=e1a6
  4740.     set map_name_str=E1A6: The Spillway
  4741.     )
  4742. if %errorlevel% equ 5 (
  4743.     set map_str=e1a5
  4744.     set map_name_str=E1A5: A Miner Inconvenience
  4745.     )
  4746. if %errorlevel% equ 4 (
  4747.     set map_str=e1a4
  4748.     set map_name_str=E1A4: Paint Plant
  4749.     )
  4750. if %errorlevel% equ 3 (
  4751.     set map_str=e1a3
  4752.     set map_name_str=E1A3: Up Shape Creek
  4753.     )
  4754. if %errorlevel% equ 2 (
  4755.     set map_str=e1a2
  4756.     set map_name_str=E1A2: Sewerside
  4757.     )
  4758. if %errorlevel% equ 1 (
  4759.     set map_str=e1a1
  4760.     set map_name_str=E1A1: Welcome to Squaresville
  4761.     )
  4762. goto %menu_str%
  4763.  
  4764. :square_e2_menu
  4765. call :show_banner
  4766. echo ------------
  4767. echo Select a Map
  4768. echo ------------
  4769. echo:
  4770. echo 1.) Port Jarlsburger       7.) The Cheddarcombs
  4771. echo 2.) The Butterforge        8.) A Giant Leap for Shapekind
  4772. echo 3.) Cheese Crater      9.) Queso Chasm
  4773. echo 4.) In a Milky Way     0.) Arcanum
  4774. echo 5.) Wild Bleu Yonder       A.) Heart o' Hexas
  4775. echo 6.) Geometric Engineering  B.) Great Pyramid of Gouda
  4776. echo:
  4777. echo Z.) Return to Select an Episode
  4778. echo:
  4779. choice /c 1234567890abz
  4780. if %errorlevel% equ 13 goto map_menu
  4781. if %errorlevel% equ 12 (
  4782.     set map_str=e2a11
  4783.     set map_name_str=E2A12: Great Pyramid of Gouda
  4784.     )
  4785. if %errorlevel% equ 11 (
  4786.     set map_str=e2a11
  4787.     set map_name_str=E2A11: Heart o' Hexas
  4788.     )
  4789. if %errorlevel% equ 10 (
  4790.     set map_str=e2a10
  4791.     set map_name_str=E2A10: Arcanum
  4792.     )
  4793. if %errorlevel% equ 9 (
  4794.     set map_str=e2a9
  4795.     set map_name_str=E2A9: Queso Chasm
  4796.     )
  4797. if %errorlevel% equ 8 (
  4798.     set map_str=e2a8
  4799.     set map_name_str=E2A8: A Giant Leap for Shapekind
  4800.     )
  4801. if %errorlevel% equ 7 (
  4802.     set map_str=e2a7
  4803.     set map_name_str=E2A7: The Cheddarcombs
  4804.     )
  4805. if %errorlevel% equ 6 (
  4806.     set map_str=e2a6
  4807.     set map_name_str=E2A6: Geometric Engineering
  4808.     )
  4809. if %errorlevel% equ 5 (
  4810.     set map_str=e2a5
  4811.     set map_name_str=E2A5: Wild Bleu Yonder
  4812.     )
  4813. if %errorlevel% equ 4 (
  4814.     set map_str=e2a4
  4815.     set map_name_str=E2A4: In a Milky Way
  4816.     )
  4817. if %errorlevel% equ 3 (
  4818.     set map_str=e2a3
  4819.     set map_name_str=E2A3: Cheese Crater
  4820.     )
  4821. if %errorlevel% equ 2 (
  4822.     set map_str=e2a2
  4823.     set map_name_str=E2A2: The Butterforge
  4824.     )
  4825. if %errorlevel% equ 1 (
  4826.     set map_str=e2a1
  4827.     set map_name_str=E2A1: Port Jarlsburger
  4828.     )
  4829. goto %menu_str%
  4830.  
  4831. :square_e3_menu
  4832. call :show_banner
  4833. echo ------------
  4834. echo Select a Map
  4835. echo ------------
  4836. echo:
  4837. echo 1.) Squaresville Outskirts
  4838. echo 2.) Panic Station
  4839. echo 3.) Port Manteau          
  4840. echo 4.) The Dark Place
  4841. echo 5.) Treading Caerphilly       
  4842. echo 6.) Fromage Hommage       
  4843. echo:
  4844. echo Z.) Return to Select an Episode
  4845. echo:
  4846. choice /c 123456z
  4847. if %errorlevel% equ 7 goto map_menu
  4848. if %errorlevel% equ 6 (
  4849.     set map_str=dm06
  4850.     set map_name_str=DM06: Fromage Hommage
  4851.     )
  4852. if %errorlevel% equ 5 (
  4853.     set map_str=dm05
  4854.     set map_name_str=DM05: Treading Caerphilly
  4855.     )
  4856. if %errorlevel% equ 4 (
  4857.     set map_str=dm04
  4858.     set map_name_str=DM04: The Dark Place
  4859.     )
  4860. if %errorlevel% equ 3 (
  4861.     set map_str=dm03
  4862.     set map_name_str=DM03: Port Manteau
  4863.     )
  4864. if %errorlevel% equ 2 (
  4865.     set map_str=dm02
  4866.     set map_name_str=DM02: Panic Station
  4867.     )
  4868. if %errorlevel% equ 1 (
  4869.     set map_str=dm01
  4870.     set map_name_str=DM01: Squaresville Outskirts
  4871.     )
  4872. goto %menu_str%
  4873.  
  4874. :rotwb_e1_menu
  4875. call :show_banner
  4876. echo ------------
  4877. echo Select a Map
  4878. echo ------------
  4879. echo:
  4880. echo 1.) Into the Woods
  4881. echo 2.) Muddy Waters
  4882. echo 3.) The Gym
  4883. echo 4.) The Infested Clearing
  4884. echo 5.) Meowzekis Home
  4885. echo 6.) Sk8 or Die
  4886. echo:
  4887. echo Z.) Return to Select an Episode
  4888. echo:
  4889. choice /c 123456z
  4890. if %errorlevel% equ 7 goto map_menu
  4891. if %errorlevel% equ 6 (
  4892.     set map_str=e1m6
  4893.     set map_name_str=E1M6: Sk8 or Die
  4894.     )
  4895. if %errorlevel% equ 5 (
  4896.     set map_str=e1m5
  4897.     set map_name_str=E1M5: Meowzekis Home
  4898.     )
  4899. if %errorlevel% equ 4 (
  4900.     set map_str=e1m4
  4901.     set map_name_str=E1M4: The Infested Clearning
  4902.     )
  4903. if %errorlevel% equ 3 (
  4904.     set map_str=e1m3
  4905.     set map_name_str=E1M3: The Gym
  4906.     )
  4907. if %errorlevel% equ 2 (
  4908.     set map_str=e1m2
  4909.     set map_name_str=E1M2: Muddy Waters
  4910.     )
  4911. if %errorlevel% equ 1 (
  4912.     set map_str=e1m1
  4913.     set map_name_str=E1M1: Into the Woods
  4914.     )
  4915. goto %menu_str%
  4916.  
  4917. :rotwb_e2_menu
  4918. call :show_banner
  4919. echo ------------
  4920. echo Select a Map
  4921. echo ------------
  4922. echo:
  4923. echo 1.) Stranded in the Cold
  4924. echo 2.) Cozy Castle Kittenstein
  4925. echo 3.) A View From Above
  4926. echo 4.) Lava Caverns
  4927. echo 5.) Hunting Grounds
  4928. echo 6.) Super Speedy Swashbuckler
  4929. echo:
  4930. echo Z.) Return to Select an Episode
  4931. echo:
  4932. choice /c 123456z
  4933. if %errorlevel% equ 7 goto map_menu
  4934. if %errorlevel% equ 6 (
  4935.     set map_str=e2m6
  4936.     set map_name_str=E2M6: Super Speedy Swashbuckler
  4937.     )
  4938. if %errorlevel% equ 5 (
  4939.     set map_str=e2m5
  4940.     set map_name_str=E2M5: Hunting Grounds
  4941.     )
  4942. if %errorlevel% equ 4 (
  4943.     set map_str=e2m4
  4944.     set map_name_str=E2M4: Lava Caverns
  4945.     )
  4946. if %errorlevel% equ 3 (
  4947.     set map_str=e2m3
  4948.     set map_name_str=E2M3: A View From Above
  4949.     )
  4950. if %errorlevel% equ 2 (
  4951.     set map_str=e2m2
  4952.     set map_name_str=E2M2: Cozy Castle Kittenstein
  4953.     )
  4954. if %errorlevel% equ 1 (
  4955.     set map_str=e2m1
  4956.     set map_name_str=E2M1: Stranded in the Cold
  4957.     )
  4958. goto %menu_str%
  4959.  
  4960. :rotwb_e3_menu
  4961. call :show_banner
  4962. echo ------------
  4963. echo Select a Map
  4964. echo ------------
  4965. echo:
  4966. echo 1.) No Way Back
  4967. echo 2.) Massive Molten Magma Mess
  4968. echo 3.) Puzzling Punishment
  4969. echo 4.) Purrfect Dark
  4970. echo 5.) Top of the Tower
  4971. echo 6.) Wonders of Technology
  4972. echo:
  4973. echo Z.) Return to Select an Episode
  4974. echo:
  4975. choice /c 123456z
  4976. if %errorlevel% equ 7 goto map_menu
  4977. if %errorlevel% equ 6 (
  4978.     set map_str=e3m5
  4979.     set map_name_str=E2M6: Wonders of Technology
  4980.     )
  4981. if %errorlevel% equ 5 (
  4982.     set map_str=e3m5
  4983.     set map_name_str=E2M5: Top of the Tower
  4984.     )
  4985. if %errorlevel% equ 4 (
  4986.     set map_str=e3m4
  4987.     set map_name_str=E2M4: Purrfect Dark
  4988.     )
  4989. if %errorlevel% equ 3 (
  4990.     set map_str=e3m3
  4991.     set map_name_str=E2M3: Puzzling Punishment
  4992.     )
  4993. if %errorlevel% equ 2 (
  4994.     set map_str=e3m2
  4995.     set map_name_str=E2M2: Massive Molten Magma Mess
  4996.     )
  4997. if %errorlevel% equ 1 (
  4998.     set map_str=e3m1
  4999.     set map_name_str=E2M1: No Way Back
  5000.     )
  5001. goto %menu_str%
  5002.  
  5003. :skill_menu
  5004. if not defined iwad_file (
  5005.     echo No IWAD selected.
  5006.     pause
  5007.     goto %menu_str%
  5008.     )
  5009. call :show_banner
  5010. echo -------------------
  5011. echo Select a Difficulty
  5012. echo -------------------
  5013. echo:
  5014. if %iwad_type_str%==doom1 (
  5015.     echo 1.^) I'm Too Young to Die
  5016.     echo 2.^) Hey, Not Too Rough
  5017.     echo 3.^) Hurt Me Plenty
  5018.     echo 4.^) Ultra-Violence
  5019.     echo 5.^) Nightmare!
  5020.     echo:
  5021.     echo Z.^) Return to Game Options
  5022.     echo:
  5023.     choice /c 12345z
  5024.     if !errorlevel! equ 6 goto %menu_str%
  5025.     if !errorlevel! equ 5 (
  5026.         set skill_int=5
  5027.         set skill_str=Nightmare!
  5028.         )
  5029.     if !errorlevel! equ 4 (
  5030.         set skill_int=4
  5031.         set skill_str=Ultra-Violence
  5032.         )
  5033.     if !errorlevel! equ 3 (
  5034.         set skill_int=3
  5035.         set skill_str=Hurt Me Plenty
  5036.         )
  5037.     if !errorlevel! equ 2 (
  5038.         set skill_int=2
  5039.         set skill_str=Hey, Not Too Rough
  5040.         )
  5041.     if !errorlevel! equ 1 (
  5042.         set skill_int=1
  5043.         set skill_str=I'm Too Young to Die
  5044.         )
  5045.     )
  5046. if %iwad_type_str%==doom (
  5047.     echo 1.^) I'm Too Young to Die
  5048.     echo 2.^) Hey, Not Too Rough
  5049.     echo 3.^) Hurt Me Plenty
  5050.     echo 4.^) Ultra-Violence
  5051.     echo 5.^) Nightmare!
  5052.     echo:
  5053.     echo Z.^) Return to Game Options
  5054.     echo:
  5055.     choice /c 12345z
  5056.     if !errorlevel! equ 6 goto %menu_str%
  5057.     if !errorlevel! equ 5 (
  5058.         set skill_int=5
  5059.         set skill_str=Nightmare!
  5060.         )
  5061.     if !errorlevel! equ 4 (
  5062.         set skill_int=4
  5063.         set skill_str=Ultra-Violence
  5064.         )
  5065.     if !errorlevel! equ 3 (
  5066.         set skill_int=3
  5067.         set skill_str=Hurt Me Plenty
  5068.         )
  5069.     if !errorlevel! equ 2 (
  5070.         set skill_int=2
  5071.         set skill_str=Hey, Not Too Rough
  5072.         )
  5073.     if !errorlevel! equ 1 (
  5074.         set skill_int=1
  5075.         set skill_str=I'm Too Young to Die
  5076.         )
  5077.     )
  5078. if %iwad_type_str%==doomu (
  5079.     echo 1.^) I'm Too Young to Die
  5080.     echo 2.^) Hey, Not Too Rough
  5081.     echo 3.^) Hurt Me Plenty
  5082.     echo 4.^) Ultra-Violence
  5083.     echo 5.^) Nightmare!
  5084.     echo:
  5085.     echo Z.^) Return to Game Options
  5086.     echo:
  5087.     choice /c 12345z
  5088.     if !errorlevel! equ 6 goto %menu_str%
  5089.     if !errorlevel! equ 5 (
  5090.         set skill_int=5
  5091.         set skill_str=Nightmare!
  5092.         )
  5093.     if !errorlevel! equ 4 (
  5094.         set skill_int=4
  5095.         set skill_str=Ultra-Violence
  5096.         )
  5097.     if !errorlevel! equ 3 (
  5098.         set skill_int=3
  5099.         set skill_str=Hurt Me Plenty
  5100.         )
  5101.     if !errorlevel! equ 2 (
  5102.         set skill_int=2
  5103.         set skill_str=Hey, Not Too Rough
  5104.         )
  5105.     if !errorlevel! equ 1 (
  5106.         set skill_int=1
  5107.         set skill_str=I'm Too Young to Die
  5108.         )
  5109.     )
  5110. if %iwad_type_str%==doombfg (
  5111.     echo 1.^) I'm Too Young to Die
  5112.     echo 2.^) Hey, Not Too Rough
  5113.     echo 3.^) Hurt Me Plenty
  5114.     echo 4.^) Ultra-Violence
  5115.     echo 5.^) Nightmare!
  5116.     echo:
  5117.     echo Z.^) Return to Game Options
  5118.     echo:
  5119.     choice /c 12345z
  5120.     if !errorlevel! equ 6 goto %menu_str%
  5121.     if !errorlevel! equ 5 (
  5122.         set skill_int=5
  5123.         set skill_str=Nightmare!
  5124.         )
  5125.     if !errorlevel! equ 4 (
  5126.         set skill_int=4
  5127.         set skill_str=Ultra-Violence
  5128.         )
  5129.     if !errorlevel! equ 3 (
  5130.         set skill_int=3
  5131.         set skill_str=Hurt Me Plenty
  5132.         )
  5133.     if !errorlevel! equ 2 (
  5134.         set skill_int=2
  5135.         set skill_str=Hey, Not Too Rough
  5136.         )
  5137.     if !errorlevel! equ 1 (
  5138.         set skill_int=1
  5139.         set skill_str=I'm Too Young to Die
  5140.         )
  5141.     )
  5142. if %iwad_type_str%==doomxbox (
  5143.     echo 1.^) I'm Too Young to Die
  5144.     echo 2.^) Hey, Not Too Rough
  5145.     echo 3.^) Hurt Me Plenty
  5146.     echo 4.^) Ultra-Violence
  5147.     echo 5.^) Nightmare!
  5148.     echo:
  5149.     echo Z.^) Return to Game Options
  5150.     echo:
  5151.     choice /c 12345z
  5152.     if !errorlevel! equ 6 goto %menu_str%
  5153.     if !errorlevel! equ 5 (
  5154.         set skill_int=5
  5155.         set skill_str=Nightmare!
  5156.         )
  5157.     if !errorlevel! equ 4 (
  5158.         set skill_int=4
  5159.         set skill_str=Ultra-Violence
  5160.         )
  5161.     if !errorlevel! equ 3 (
  5162.         set skill_int=3
  5163.         set skill_str=Hurt Me Plenty
  5164.         )
  5165.     if !errorlevel! equ 2 (
  5166.         set skill_int=2
  5167.         set skill_str=Hey, Not Too Rough
  5168.         )
  5169.     if !errorlevel! equ 1 (
  5170.         set skill_int=1
  5171.         set skill_str=I'm Too Young to Die
  5172.         )
  5173.     )
  5174. if %iwad_type_str%==doomunity (
  5175.     echo 1.^) I'm Too Young to Die
  5176.     echo 2.^) Hey, Not Too Rough
  5177.     echo 3.^) Hurt Me Plenty
  5178.     echo 4.^) Ultra-Violence
  5179.     echo 5.^) Nightmare!
  5180.     echo:
  5181.     echo Z.^) Return to Game Options
  5182.     echo:
  5183.     choice /c 12345z
  5184.     if !errorlevel! equ 6 goto %menu_str%
  5185.     if !errorlevel! equ 5 (
  5186.         set skill_int=5
  5187.         set skill_str=Nightmare!
  5188.         )
  5189.     if !errorlevel! equ 4 (
  5190.         set skill_int=4
  5191.         set skill_str=Ultra-Violence
  5192.         )
  5193.     if !errorlevel! equ 3 (
  5194.         set skill_int=3
  5195.         set skill_str=Hurt Me Plenty
  5196.         )
  5197.     if !errorlevel! equ 2 (
  5198.         set skill_int=2
  5199.         set skill_str=Hey, Not Too Rough
  5200.         )
  5201.     if !errorlevel! equ 1 (
  5202.         set skill_int=1
  5203.         set skill_str=I'm Too Young to Die
  5204.         )
  5205.     )
  5206. if %iwad_type_str%==doom2 (
  5207.     echo 1.^) I'm Too Young to Die
  5208.     echo 2.^) Hey, Not Too Rough
  5209.     echo 3.^) Hurt Me Plenty
  5210.     echo 4.^) Ultra-Violence
  5211.     echo 5.^) Nightmare!
  5212.     echo:
  5213.     echo Z.^) Return to Game Options
  5214.     echo:
  5215.     choice /c 12345z
  5216.     if !errorlevel! equ 6 goto %menu_str%
  5217.     if !errorlevel! equ 5 (
  5218.         set skill_int=5
  5219.         set skill_str=Nightmare!
  5220.         )
  5221.     if !errorlevel! equ 4 (
  5222.         set skill_int=4
  5223.         set skill_str=Ultra-Violence
  5224.         )
  5225.     if !errorlevel! equ 3 (
  5226.         set skill_int=3
  5227.         set skill_str=Hurt Me Plenty
  5228.         )
  5229.     if !errorlevel! equ 2 (
  5230.         set skill_int=2
  5231.         set skill_str=Hey, Not Too Rough
  5232.         )
  5233.     if !errorlevel! equ 1 (
  5234.         set skill_int=1
  5235.         set skill_str=I'm Too Young to Die
  5236.         )
  5237.     )
  5238. if %iwad_type_str%==doom2bfg (
  5239.     echo 1.^) I'm Too Young to Die
  5240.     echo 2.^) Hey, Not Too Rough
  5241.     echo 3.^) Hurt Me Plenty
  5242.     echo 4.^) Ultra-Violence
  5243.     echo 5.^) Nightmare!
  5244.     echo:
  5245.     echo Z.^) Return to Game Options
  5246.     echo:
  5247.     choice /c 12345z
  5248.     if !errorlevel! equ 6 goto %menu_str%
  5249.     if !errorlevel! equ 5 (
  5250.         set skill_int=5
  5251.         set skill_str=Nightmare!
  5252.         )
  5253.     if !errorlevel! equ 4 (
  5254.         set skill_int=4
  5255.         set skill_str=Ultra-Violence
  5256.         )
  5257.     if !errorlevel! equ 3 (
  5258.         set skill_int=3
  5259.         set skill_str=Hurt Me Plenty
  5260.         )
  5261.     if !errorlevel! equ 2 (
  5262.         set skill_int=2
  5263.         set skill_str=Hey, Not Too Rough
  5264.         )
  5265.     if !errorlevel! equ 1 (
  5266.         set skill_int=1
  5267.         set skill_str=I'm Too Young to Die
  5268.         )
  5269.     )
  5270. if %iwad_type_str%==doom2xbox (
  5271.     echo 1.^) I'm Too Young to Die
  5272.     echo 2.^) Hey, Not Too Rough
  5273.     echo 3.^) Hurt Me Plenty
  5274.     echo 4.^) Ultra-Violence
  5275.     echo 5.^) Nightmare!
  5276.     echo:
  5277.     echo Z.^) Return to Game Options
  5278.     echo:
  5279.     choice /c 12345z
  5280.     if !errorlevel! equ 6 goto %menu_str%
  5281.     if !errorlevel! equ 5 (
  5282.         set skill_int=5
  5283.         set skill_str=Nightmare!
  5284.         )
  5285.     if !errorlevel! equ 4 (
  5286.         set skill_int=4
  5287.         set skill_str=Ultra-Violence
  5288.         )
  5289.     if !errorlevel! equ 3 (
  5290.         set skill_int=3
  5291.         set skill_str=Hurt Me Plenty
  5292.         )
  5293.     if !errorlevel! equ 2 (
  5294.         set skill_int=2
  5295.         set skill_str=Hey, Not Too Rough
  5296.         )
  5297.     if !errorlevel! equ 1 (
  5298.         set skill_int=1
  5299.         set skill_str=I'm Too Young to Die
  5300.         )
  5301.     )
  5302. if %iwad_type_str%==doom2unity (
  5303.     echo 1.^) I'm Too Young to Die
  5304.     echo 2.^) Hey, Not Too Rough
  5305.     echo 3.^) Hurt Me Plenty
  5306.     echo 4.^) Ultra-Violence
  5307.     echo 5.^) Nightmare!
  5308.     echo:
  5309.     echo Z.^) Return to Game Options
  5310.     echo:
  5311.     choice /c 12345z
  5312.     if !errorlevel! equ 6 goto %menu_str%
  5313.     if !errorlevel! equ 5 (
  5314.         set skill_int=5
  5315.         set skill_str=Nightmare!
  5316.         )
  5317.     if !errorlevel! equ 4 (
  5318.         set skill_int=4
  5319.         set skill_str=Ultra-Violence
  5320.         )
  5321.     if !errorlevel! equ 3 (
  5322.         set skill_int=3
  5323.         set skill_str=Hurt Me Plenty
  5324.         )
  5325.     if !errorlevel! equ 2 (
  5326.         set skill_int=2
  5327.         set skill_str=Hey, Not Too Rough
  5328.         )
  5329.     if !errorlevel! equ 1 (
  5330.         set skill_int=1
  5331.         set skill_str=I'm Too Young to Die
  5332.         )
  5333.     )
  5334. if %iwad_type_str%==tnt (
  5335.     echo 1.^) I'm Too Young to Die
  5336.     echo 2.^) Hey, Not Too Rough
  5337.     echo 3.^) Hurt Me Plenty
  5338.     echo 4.^) Ultra-Violence
  5339.     echo 5.^) Nightmare!
  5340.     echo:
  5341.     echo Z.^) Return to Game Options
  5342.     echo:
  5343.     choice /c 12345z
  5344.     if !errorlevel! equ 6 goto %menu_str%
  5345.     if !errorlevel! equ 5 (
  5346.         set skill_int=5
  5347.         set skill_str=Nightmare!
  5348.         )
  5349.     if !errorlevel! equ 4 (
  5350.         set skill_int=4
  5351.         set skill_str=Ultra-Violence
  5352.         )
  5353.     if !errorlevel! equ 3 (
  5354.         set skill_int=3
  5355.         set skill_str=Hurt Me Plenty
  5356.         )
  5357.     if !errorlevel! equ 2 (
  5358.         set skill_int=2
  5359.         set skill_str=Hey, Not Too Rough
  5360.         )
  5361.     if !errorlevel! equ 1 (
  5362.         set skill_int=1
  5363.         set skill_str=I'm Too Young to Die
  5364.         )
  5365.     )
  5366. if %iwad_type_str%==tntunity (
  5367.     echo 1.^) I'm Too Young to Die
  5368.     echo 2.^) Hey, Not Too Rough
  5369.     echo 3.^) Hurt Me Plenty
  5370.     echo 4.^) Ultra-Violence
  5371.     echo 5.^) Nightmare!
  5372.     echo:
  5373.     echo Z.^) Return to Game Options
  5374.     echo:
  5375.     choice /c 12345z
  5376.     if !errorlevel! equ 6 goto %menu_str%
  5377.     if !errorlevel! equ 5 (
  5378.         set skill_int=5
  5379.         set skill_str=Nightmare!
  5380.         )
  5381.     if !errorlevel! equ 4 (
  5382.         set skill_int=4
  5383.         set skill_str=Ultra-Violence
  5384.         )
  5385.     if !errorlevel! equ 3 (
  5386.         set skill_int=3
  5387.         set skill_str=Hurt Me Plenty
  5388.         )
  5389.     if !errorlevel! equ 2 (
  5390.         set skill_int=2
  5391.         set skill_str=Hey, Not Too Rough
  5392.         )
  5393.     if !errorlevel! equ 1 (
  5394.         set skill_int=1
  5395.         set skill_str=I'm Too Young to Die
  5396.         )
  5397.     )
  5398. if %iwad_type_str%==plutonia (
  5399.     echo 1.^) I'm Too Young to Die
  5400.     echo 2.^) Hey, Not Too Rough
  5401.     echo 3.^) Hurt Me Plenty
  5402.     echo 4.^) Ultra-Violence
  5403.     echo 5.^) Nightmare!
  5404.     echo:
  5405.     echo Z.^) Return to Game Options
  5406.     echo:
  5407.     choice /c 12345z
  5408.     if !errorlevel! equ 6 goto %menu_str%
  5409.     if !errorlevel! equ 5 (
  5410.         set skill_int=5
  5411.         set skill_str=Nightmare!
  5412.         )
  5413.     if !errorlevel! equ 4 (
  5414.         set skill_int=4
  5415.         set skill_str=Ultra-Violence
  5416.         )
  5417.     if !errorlevel! equ 3 (
  5418.         set skill_int=3
  5419.         set skill_str=Hurt Me Plenty
  5420.         )
  5421.     if !errorlevel! equ 2 (
  5422.         set skill_int=2
  5423.         set skill_str=Hey, Not Too Rough
  5424.         )
  5425.     if !errorlevel! equ 1 (
  5426.         set skill_int=1
  5427.         set skill_str=I'm Too Young to Die
  5428.         )
  5429.     )
  5430. if %iwad_type_str%==plutoniaunity (
  5431.     echo 1.^) I'm Too Young to Die
  5432.     echo 2.^) Hey, Not Too Rough
  5433.     echo 3.^) Hurt Me Plenty
  5434.     echo 4.^) Ultra-Violence
  5435.     echo 5.^) Nightmare!
  5436.     echo:
  5437.     echo Z.^) Return to Game Options
  5438.     echo:
  5439.     choice /c 12345z
  5440.     if !errorlevel! equ 6 goto %menu_str%
  5441.     if !errorlevel! equ 5 (
  5442.         set skill_int=5
  5443.         set skill_str=Nightmare!
  5444.         )
  5445.     if !errorlevel! equ 4 (
  5446.         set skill_int=4
  5447.         set skill_str=Ultra-Violence
  5448.         )
  5449.     if !errorlevel! equ 3 (
  5450.         set skill_int=3
  5451.         set skill_str=Hurt Me Plenty
  5452.         )
  5453.     if !errorlevel! equ 2 (
  5454.         set skill_int=2
  5455.         set skill_str=Hey, Not Too Rough
  5456.         )
  5457.     if !errorlevel! equ 1 (
  5458.         set skill_int=1
  5459.         set skill_str=I'm Too Young to Die
  5460.         )
  5461.     )
  5462. if %iwad_type_str%==doom_complete (
  5463.     echo 1.^) I'm Too Young to Die
  5464.     echo 2.^) Hey, Not Too Rough
  5465.     echo 3.^) Hurt Me Plenty
  5466.     echo 4.^) Ultra-Violence
  5467.     echo 5.^) Nightmare!
  5468.     echo:
  5469.     echo Z.^) Return to Game Options
  5470.     echo:
  5471.     choice /c 12345z
  5472.     if !errorlevel! equ 6 goto %menu_str%
  5473.     if !errorlevel! equ 5 (
  5474.         set skill_int=5
  5475.         set skill_str=Nightmare!
  5476.         )
  5477.     if !errorlevel! equ 4 (
  5478.         set skill_int=4
  5479.         set skill_str=Ultra-Violence
  5480.         )
  5481.     if !errorlevel! equ 3 (
  5482.         set skill_int=3
  5483.         set skill_str=Hurt Me Plenty
  5484.         )
  5485.     if !errorlevel! equ 2 (
  5486.         set skill_int=2
  5487.         set skill_str=Hey, Not Too Rough
  5488.         )
  5489.     if !errorlevel! equ 1 (
  5490.         set skill_int=1
  5491.         set skill_str=I'm Too Young to Die
  5492.         )
  5493.     )
  5494. if %iwad_type_str%==heretic1 (
  5495.     echo 1.^) Thou Needeth a Wet-Nurse
  5496.     echo 2.^) Yellowbellies-R-Us
  5497.     echo 3.^) Bringest Them Oneth
  5498.     echo 4.^) Thou Are a Smite-Meister
  5499.     echo 5.^) Black Plague Possesses Thee
  5500.     echo:
  5501.     echo Z.^) Return to Game Options
  5502.     echo:
  5503.     choice /c 12345z
  5504.     if !errorlevel! equ 6 goto %menu_str%
  5505.     if !errorlevel! equ 5 (
  5506.         set skill_int=5
  5507.         set skill_str=Black Plague Possesses Thee
  5508.         )
  5509.     if !errorlevel! equ 4 (
  5510.         set skill_int=4
  5511.         set skill_str=Thou Are a Smite-Meister
  5512.         )
  5513.     if !errorlevel! equ 3 (
  5514.         set skill_int=3
  5515.         set skill_str=Bringest Them Oneth
  5516.         )
  5517.     if !errorlevel! equ 2 (
  5518.         set skill_int=2
  5519.         set skill_str=Yellowbellies-R-Us
  5520.         )
  5521.     if !errorlevel! equ 1 (
  5522.         set skill_int=1
  5523.         set skill_str=Thou Needeth a Wet-Nurse
  5524.         )
  5525.     )
  5526. if %iwad_type_str%==heretic (
  5527.     echo 1.^) Thou Needeth a Wet-Nurse
  5528.     echo 2.^) Yellowbellies-R-Us
  5529.     echo 3.^) Bringest Them Oneth
  5530.     echo 4.^) Thou Are a Smite-Meister
  5531.     echo 5.^) Black Plague Possesses Thee
  5532.     echo:
  5533.     echo Z.^) Return to Game Options
  5534.     echo:
  5535.     choice /c 12345z
  5536.     if !errorlevel! equ 6 goto %menu_str%
  5537.     if !errorlevel! equ 5 (
  5538.         set skill_int=5
  5539.         set skill_str=Black Plague Possesses Thee
  5540.         )
  5541.     if !errorlevel! equ 4 (
  5542.         set skill_int=4
  5543.         set skill_str=Thou Are a Smite-Meister
  5544.         )
  5545.     if !errorlevel! equ 3 (
  5546.         set skill_int=3
  5547.         set skill_str=Bringest Them Oneth
  5548.         )
  5549.     if !errorlevel! equ 2 (
  5550.         set skill_int=2
  5551.         set skill_str=Yellowbellies-R-Us
  5552.         )
  5553.     if !errorlevel! equ 1 (
  5554.         set skill_int=1
  5555.         set skill_str=Thou Needeth a Wet-Nurse
  5556.         )
  5557.     )
  5558. if %iwad_type_str%==hereticsr (
  5559.     echo 1.^) Thou Needeth a Wet-Nurse
  5560.     echo 2.^) Yellowbellies-R-Us
  5561.     echo 3.^) Bringest Them Oneth
  5562.     echo 4.^) Thou Are a Smite-Meister
  5563.     echo 5.^) Black Plague Possesses Thee
  5564.     echo:
  5565.     echo Z.^) Return to Game Options
  5566.     echo:
  5567.     choice /c 12345z
  5568.     if !errorlevel! equ 6 goto %menu_str%
  5569.     if !errorlevel! equ 5 (
  5570.         set skill_int=5
  5571.         set skill_str=Black Plague Possesses Thee
  5572.         )
  5573.     if !errorlevel! equ 4 (
  5574.         set skill_int=4
  5575.         set skill_str=Thou Are a Smite-Meister
  5576.         )
  5577.     if !errorlevel! equ 3 (
  5578.         set skill_int=3
  5579.         set skill_str=Bringest Them Oneth
  5580.         )
  5581.     if !errorlevel! equ 2 (
  5582.         set skill_int=2
  5583.         set skill_str=Yellowbellies-R-Us
  5584.         )
  5585.     if !errorlevel! equ 1 (
  5586.         set skill_int=1
  5587.         set skill_str=Thou Needeth a Wet-Nurse
  5588.         )
  5589.     )
  5590. if %iwad_type_str%==hexdemo (
  5591.     if %class_str%==Fighter (
  5592.         echo 1.^) Squire
  5593.         echo 2.^) Knight
  5594.         echo 3.^) Warrior
  5595.         echo 4.^) Berserker
  5596.         echo 5.^) Titan
  5597.         echo:
  5598.         echo Z.^) Return to Game Options
  5599.         echo:
  5600.         choice /c 12345z
  5601.         if !errorlevel! equ 6 goto %menu_str%
  5602.         if !errorlevel! equ 5 (
  5603.             set skill_int=5
  5604.             set skill_str=Titan
  5605.             )
  5606.         if !errorlevel! equ 4 (
  5607.             set skill_int=4
  5608.             set skill_str=Berserker
  5609.             )
  5610.         if !errorlevel! equ 3 (
  5611.             set skill_int=3
  5612.             set skill_str=Warrior
  5613.             )
  5614.         if !errorlevel! equ 2 (
  5615.             set skill_int=2
  5616.             set skill_str=Knight
  5617.             )
  5618.         if !errorlevel! equ 1 (
  5619.             set skill_int=1
  5620.             set skill_str=Squire
  5621.             )
  5622.         )
  5623.     if %class_str%==Cleric (
  5624.         echo 1.^) Altar Boy
  5625.         echo 2.^) Acolyte
  5626.         echo 3.^) Priest
  5627.         echo 4.^) Cardinal
  5628.         echo 5.^) Pope
  5629.         echo:
  5630.         echo Z.^) Return to Game Options
  5631.         echo:
  5632.         choice /c 12345z
  5633.         if !errorlevel! equ 6 goto %menu_str%
  5634.         if !errorlevel! equ 5 (
  5635.             set skill_int=5
  5636.             set skill_str=Pope
  5637.             )
  5638.         if !errorlevel! equ 4 (
  5639.             set skill_int=4
  5640.             set skill_str=Cardinal
  5641.             )
  5642.         if !errorlevel! equ 3 (
  5643.             set skill_int=3
  5644.             set skill_str=Priest
  5645.             )
  5646.         if !errorlevel! equ 2 (
  5647.             set skill_int=2
  5648.             set skill_str=Acolyte
  5649.             )
  5650.         if !errorlevel! equ 1 (
  5651.             set skill_int=1
  5652.             set skill_str=Altar Boy
  5653.             )
  5654.         )
  5655.     if %class_str%==Mage (
  5656.         echo 1.^) Apprentice
  5657.         echo 2.^) Enchanter
  5658.         echo 3.^) Sorcerer
  5659.         echo 4.^) Warlock
  5660.         echo 5.^) Archmage
  5661.         echo:
  5662.         echo Z.^) Return to Game Options
  5663.         echo:
  5664.         choice /c 12345z
  5665.         if !errorlevel! equ 6 goto %menu_str%
  5666.         if !errorlevel! equ 5 (
  5667.             set skill_int=5
  5668.             set skill_str=Archmage
  5669.             )
  5670.         if !errorlevel! equ 4 (
  5671.             set skill_int=4
  5672.             set skill_str=Warlock
  5673.             )
  5674.         if !errorlevel! equ 3 (
  5675.             set skill_int=3
  5676.             set skill_str=Sorcerer
  5677.             )
  5678.         if !errorlevel! equ 2 (
  5679.             set skill_int=2
  5680.             set skill_str=Enchanter
  5681.             )
  5682.         if !errorlevel! equ 1 (
  5683.             set skill_int=1
  5684.             set skill_str=Apprentice
  5685.             )
  5686.         )      
  5687.     )
  5688. if %iwad_type_str%==hexen (
  5689.     if %class_str%==Fighter (
  5690.         echo 1.^) Squire
  5691.         echo 2.^) Knight
  5692.         echo 3.^) Warrior
  5693.         echo 4.^) Berserker
  5694.         echo 5.^) Titan
  5695.         echo:
  5696.         echo Z.^) Return to Game Options
  5697.         echo:
  5698.         choice /c 12345z
  5699.         if !errorlevel! equ 6 goto %menu_str%
  5700.         if !errorlevel! equ 5 (
  5701.             set skill_int=5
  5702.             set skill_str=Titan
  5703.             )
  5704.         if !errorlevel! equ 4 (
  5705.             set skill_int=4
  5706.             set skill_str=Berserker
  5707.             )
  5708.         if !errorlevel! equ 3 (
  5709.             set skill_int=3
  5710.             set skill_str=Warrior
  5711.             )
  5712.         if !errorlevel! equ 2 (
  5713.             set skill_int=2
  5714.             set skill_str=Knight
  5715.             )
  5716.         if !errorlevel! equ 1 (
  5717.             set skill_int=1
  5718.             set skill_str=Squire
  5719.             )
  5720.         )
  5721.     if %class_str%==Cleric (
  5722.         echo 1.^) Altar Boy
  5723.         echo 2.^) Acolyte
  5724.         echo 3.^) Priest
  5725.         echo 4.^) Cardinal
  5726.         echo 5.^) Pope
  5727.         echo:
  5728.         echo Z.^) Return to Game Options
  5729.         echo:
  5730.         choice /c 12345z
  5731.         if !errorlevel! equ 6 goto %menu_str%
  5732.         if !errorlevel! equ 5 (
  5733.             set skill_int=5
  5734.             set skill_str=Pope
  5735.             )
  5736.         if !errorlevel! equ 4 (
  5737.             set skill_int=4
  5738.             set skill_str=Cardinal
  5739.             )
  5740.         if !errorlevel! equ 3 (
  5741.             set skill_int=3
  5742.             set skill_str=Priest
  5743.             )
  5744.         if !errorlevel! equ 2 (
  5745.             set skill_int=2
  5746.             set skill_str=Acolyte
  5747.             )
  5748.         if !errorlevel! equ 1 (
  5749.             set skill_int=1
  5750.             set skill_str=Altar Boy
  5751.             )
  5752.         )
  5753.     if %class_str%==Mage (
  5754.         echo 1.^) Apprentice
  5755.         echo 2.^) Enchanter
  5756.         echo 3.^) Sorcerer
  5757.         echo 4.^) Warlock
  5758.         echo 5.^) Archmage
  5759.         echo:
  5760.         echo Z.^) Return to Game Options
  5761.         echo:
  5762.         choice /c 12345z
  5763.         if !errorlevel! equ 6 goto %menu_str%
  5764.         if !errorlevel! equ 5 (
  5765.             set skill_int=5
  5766.             set skill_str=Archmage
  5767.             )
  5768.         if !errorlevel! equ 4 (
  5769.             set skill_int=4
  5770.             set skill_str=Warlock
  5771.             )
  5772.         if !errorlevel! equ 3 (
  5773.             set skill_int=3
  5774.             set skill_str=Sorcerer
  5775.             )
  5776.         if !errorlevel! equ 2 (
  5777.             set skill_int=2
  5778.             set skill_str=Enchanter
  5779.             )
  5780.         if !errorlevel! equ 1 (
  5781.             set skill_int=1
  5782.             set skill_str=Apprentice
  5783.             )
  5784.         )      
  5785.     )
  5786. if %iwad_type_str%==hexdd (
  5787.     if %class_str%==Fighter (
  5788.         echo 1.^) Squire
  5789.         echo 2.^) Knight
  5790.         echo 3.^) Warrior
  5791.         echo 4.^) Berserker
  5792.         echo 5.^) Titan
  5793.         echo:
  5794.         echo Z.^) Return to Game Options
  5795.         echo:
  5796.         choice /c 12345z
  5797.         if !errorlevel! equ 6 goto %menu_str%
  5798.         if !errorlevel! equ 5 (
  5799.             set skill_int=5
  5800.             set skill_str=Titan
  5801.             )
  5802.         if !errorlevel! equ 4 (
  5803.             set skill_int=4
  5804.             set skill_str=Berserker
  5805.             )
  5806.         if !errorlevel! equ 3 (
  5807.             set skill_int=3
  5808.             set skill_str=Warrior
  5809.             )
  5810.         if !errorlevel! equ 2 (
  5811.             set skill_int=2
  5812.             set skill_str=Knight
  5813.             )
  5814.         if !errorlevel! equ 1 (
  5815.             set skill_int=1
  5816.             set skill_str=Squire
  5817.             )
  5818.         )
  5819.     if %class_str%==Cleric (
  5820.         echo 1.^) Altar Boy
  5821.         echo 2.^) Acolyte
  5822.         echo 3.^) Priest
  5823.         echo 4.^) Cardinal
  5824.         echo 5.^) Pope
  5825.         echo:
  5826.         echo Z.^) Return to Game Options
  5827.         echo:
  5828.         choice /c 12345z
  5829.         if !errorlevel! equ 6 goto %menu_str%
  5830.         if !errorlevel! equ 5 (
  5831.             set skill_int=5
  5832.             set skill_str=Pope
  5833.             )
  5834.         if !errorlevel! equ 4 (
  5835.             set skill_int=4
  5836.             set skill_str=Cardinal
  5837.             )
  5838.         if !errorlevel! equ 3 (
  5839.             set skill_int=3
  5840.             set skill_str=Priest
  5841.             )
  5842.         if !errorlevel! equ 2 (
  5843.             set skill_int=2
  5844.             set skill_str=Acolyte
  5845.             )
  5846.         if !errorlevel! equ 1 (
  5847.             set skill_int=1
  5848.             set skill_str=Altar Boy
  5849.             )
  5850.         )
  5851.     if %class_str%==Mage (
  5852.         echo 1.^) Apprentice
  5853.         echo 2.^) Enchanter
  5854.         echo 3.^) Sorcerer
  5855.         echo 4.^) Warlock
  5856.         echo 5.^) Archmage
  5857.         echo:
  5858.         echo Z.^) Return to Game Options
  5859.         echo:
  5860.         choice /c 12345z
  5861.         if !errorlevel! equ 6 goto %menu_str%
  5862.         if !errorlevel! equ 5 (
  5863.             set skill_int=5
  5864.             set skill_str=Archmage
  5865.             )
  5866.         if !errorlevel! equ 4 (
  5867.             set skill_int=4
  5868.             set skill_str=Warlock
  5869.             )
  5870.         if !errorlevel! equ 3 (
  5871.             set skill_int=3
  5872.             set skill_str=Sorcerer
  5873.             )
  5874.         if !errorlevel! equ 2 (
  5875.             set skill_int=2
  5876.             set skill_str=Enchanter
  5877.             )
  5878.         if !errorlevel! equ 1 (
  5879.             set skill_int=1
  5880.             set skill_str=Apprentice
  5881.             )
  5882.         )      
  5883.     )
  5884. if %iwad_type_str%==strife0 (
  5885.     echo 1.^) Training
  5886.     echo 2.^) Rookie
  5887.     echo 3.^) Veteran
  5888.     echo 4.^) Elite
  5889.     echo 5.^) Bloodbath
  5890.     echo:
  5891.     echo Z.^) Return to Game Options
  5892.     echo:
  5893.     choice /c 12345z
  5894.     if !errorlevel! equ 6 goto %menu_str%
  5895.     if !errorlevel! equ 5 (
  5896.         set skill_int=5
  5897.         set skill_str=Bloodbath
  5898.         )
  5899.     if !errorlevel! equ 4 (
  5900.         set skill_int=4
  5901.         set skill_str=Elite
  5902.         )
  5903.     if !errorlevel! equ 3 (
  5904.         set skill_int=3
  5905.         set skill_str=Veteran
  5906.         )
  5907.     if !errorlevel! equ 2 (
  5908.         set skill_int=2
  5909.         set skill_str=Rookie
  5910.         )
  5911.     if !errorlevel! equ 1 (
  5912.         set skill_int=1
  5913.         set skill_str=Training
  5914.         )
  5915.     )
  5916. if %iwad_type_str%==strife1 (
  5917.     echo 1.^) Training
  5918.     echo 2.^) Rookie
  5919.     echo 3.^) Veteran
  5920.     echo 4.^) Elite
  5921.     echo 5.^) Bloodbath
  5922.     echo:
  5923.     echo Z.^) Return to Game Options
  5924.     echo:
  5925.     choice /c 12345z
  5926.     if !errorlevel! equ 6 goto %menu_str%
  5927.     if !errorlevel! equ 5 (
  5928.         set skill_int=5
  5929.         set skill_str=Bloodbath
  5930.         )
  5931.     if !errorlevel! equ 4 (
  5932.         set skill_int=4
  5933.         set skill_str=Elite
  5934.         )
  5935.     if !errorlevel! equ 3 (
  5936.         set skill_int=3
  5937.         set skill_str=Veteran
  5938.         )
  5939.     if !errorlevel! equ 2 (
  5940.         set skill_int=2
  5941.         set skill_str=Rookie
  5942.         )
  5943.     if !errorlevel! equ 1 (
  5944.         set skill_int=1
  5945.         set skill_str=Training
  5946.         )
  5947.     )
  5948. if %iwad_type_str%==strife (
  5949.     echo 1.^) Training
  5950.     echo 2.^) Rookie
  5951.     echo 3.^) Veteran
  5952.     echo 4.^) Elite
  5953.     echo 5.^) Bloodbath
  5954.     echo:
  5955.     echo Z.^) Return to Game Options
  5956.     echo:
  5957.     choice /c 12345z
  5958.     if !errorlevel! equ 6 goto %menu_str%
  5959.     if !errorlevel! equ 5 (
  5960.         set skill_int=5
  5961.         set skill_str=Bloodbath
  5962.         )
  5963.     if !errorlevel! equ 4 (
  5964.         set skill_int=4
  5965.         set skill_str=Elite
  5966.         )
  5967.     if !errorlevel! equ 3 (
  5968.         set skill_int=3
  5969.         set skill_str=Veteran
  5970.         )
  5971.     if !errorlevel! equ 2 (
  5972.         set skill_int=2
  5973.         set skill_str=Rookie
  5974.         )
  5975.     if !errorlevel! equ 1 (
  5976.         set skill_int=1
  5977.         set skill_str=Training
  5978.         )
  5979.     )
  5980. if %iwad_type_str%==sve (
  5981.     echo 1.^) Training
  5982.     echo 2.^) Rookie
  5983.     echo 3.^) Veteran
  5984.     echo 4.^) Elite
  5985.     echo 5.^) Bloodbath
  5986.     echo:
  5987.     echo Z.^) Return to Game Options
  5988.     echo:
  5989.     choice /c 12345z
  5990.     if !errorlevel! equ 6 goto %menu_str%
  5991.     if !errorlevel! equ 5 (
  5992.         set skill_int=5
  5993.         set skill_str=Bloodbath
  5994.         )
  5995.     if !errorlevel! equ 4 (
  5996.         set skill_int=4
  5997.         set skill_str=Elite
  5998.         )
  5999.     if !errorlevel! equ 3 (
  6000.         set skill_int=3
  6001.         set skill_str=Veteran
  6002.         )
  6003.     if !errorlevel! equ 2 (
  6004.         set skill_int=2
  6005.         set skill_str=Rookie
  6006.         )
  6007.     if !errorlevel! equ 1 (
  6008.         set skill_int=1
  6009.         set skill_str=Training
  6010.         )
  6011.     )
  6012. if %iwad_type_str%==chex (
  6013.     echo 1.^) Easy Does It
  6014.     echo 2.^) Not So Sticky
  6015.     echo 3.^) Gobs of Goo
  6016.     echo 4.^) Extreme Ooze
  6017.     echo 5.^) Super Slimey
  6018.     echo:
  6019.     echo Z.^) Return to Game Options
  6020.     echo:
  6021.     choice /c 12345z
  6022.     if !errorlevel! equ 6 goto %menu_str%
  6023.     if !errorlevel! equ 5 (
  6024.         set skill_int=5
  6025.         set skill_str=Super Slimey
  6026.         )
  6027.     if !errorlevel! equ 4 (
  6028.         set skill_int=4
  6029.         set skill_str=Extreme Ooze
  6030.         )
  6031.     if !errorlevel! equ 3 (
  6032.         set skill_int=3
  6033.         set skill_str=Gobs of Goo
  6034.         )
  6035.     if !errorlevel! equ 2 (
  6036.         set skill_int=2
  6037.         set skill_str=Not So Sticky
  6038.         )
  6039.     if !errorlevel! equ 1 (
  6040.         set skill_int=1
  6041.         set skill_str=Easy Does It
  6042.         )
  6043.     )
  6044. if %iwad_type_str%==chex3 (
  6045.     echo 1.^) Easy Does It
  6046.     echo 2.^) Not So Sticky
  6047.     echo 3.^) Gobs of Goo
  6048.     echo 4.^) Extreme Ooze
  6049.     echo 5.^) Super Slimey
  6050.     echo:
  6051.     echo Z.^) Return to Game Options
  6052.     echo:
  6053.     choice /c 12345z
  6054.     if !errorlevel! equ 6 goto %menu_str%
  6055.     if !errorlevel! equ 5 (
  6056.         set skill_int=5
  6057.         set skill_str=Super Slimey
  6058.         )
  6059.     if !errorlevel! equ 4 (
  6060.         set skill_int=4
  6061.         set skill_str=Extreme Ooze
  6062.         )
  6063.     if !errorlevel! equ 3 (
  6064.         set skill_int=3
  6065.         set skill_str=Gobs of Goo
  6066.         )
  6067.     if !errorlevel! equ 2 (
  6068.         set skill_int=2
  6069.         set skill_str=Not So Sticky
  6070.         )
  6071.     if !errorlevel! equ 1 (
  6072.         set skill_int=1
  6073.         set skill_str=Easy Does It
  6074.         )
  6075.     )
  6076. if %iwad_type_str%==hacx (
  6077.     echo 1.^) Please Don't Shoot!
  6078.     echo 2.^) Arrgh, I Need Health!
  6079.     echo 3.^) Let's Rip Them Apart!
  6080.     echo 4.^) I Am Immortal
  6081.     echo 5.^) Insanity!
  6082.     echo:
  6083.     echo Z.^) Return to Game Options
  6084.     echo:
  6085.     choice /c 12345z
  6086.     if !errorlevel! equ 6 goto %menu_str%
  6087.     if !errorlevel! equ 5 (
  6088.         set skill_int=5
  6089.         set skill_str=Insanity!
  6090.         )
  6091.     if !errorlevel! equ 4 (
  6092.         set skill_int=4
  6093.         set skill_str=I Am Immortal
  6094.         )
  6095.     if !errorlevel! equ 3 (
  6096.         set skill_int=3
  6097.         set skill_str=Let's Rip Them Apart!
  6098.         )
  6099.     if !errorlevel! equ 2 (
  6100.         set skill_int=2
  6101.         set skill_str=Arrgh, I Need Health!
  6102.         )
  6103.     if !errorlevel! equ 1 (
  6104.         set skill_int=1
  6105.         set skill_str=Please Don't Shoot!
  6106.         )
  6107.     )
  6108. if %iwad_type_str%==hacx2 (
  6109.     echo 1.^) Please Don't Shoot!
  6110.     echo 2.^) Arrgh, I Need Health!
  6111.     echo 3.^) Let's Rip Them Apart!
  6112.     echo 4.^) I Am Immortal
  6113.     echo 5.^) Insanity!
  6114.     echo:
  6115.     echo Z.^) Return to Game Options
  6116.     echo:
  6117.     choice /c 12345z
  6118.     if !errorlevel! equ 6 goto %menu_str%
  6119.     if !errorlevel! equ 5 (
  6120.         set skill_int=5
  6121.         set skill_str=Insanity!
  6122.         )
  6123.     if !errorlevel! equ 4 (
  6124.         set skill_int=4
  6125.         set skill_str=I Am Immortal
  6126.         )
  6127.     if !errorlevel! equ 3 (
  6128.         set skill_int=3
  6129.         set skill_str=Let's Rip Them Apart!
  6130.         )
  6131.     if !errorlevel! equ 2 (
  6132.         set skill_int=2
  6133.         set skill_str=Arrgh, I Need Health!
  6134.         )
  6135.     if !errorlevel! equ 1 (
  6136.         set skill_int=1
  6137.         set skill_str=Please Don't Shoot!
  6138.         )
  6139.     )
  6140. if %iwad_type_str%==freedoom1 (
  6141.     echo 1.^) Please Don't Kill Me!
  6142.     echo 2.^) Will This Hurt?
  6143.     echo 3.^) Bring on the Pain
  6144.     echo 4.^) Extreme Carnage
  6145.     echo 5.^) Mayhem!
  6146.     echo:
  6147.     echo Z.^) Return to Game Options
  6148.     echo:
  6149.     choice /c 12345z
  6150.     if !errorlevel! equ 6 goto %menu_str%
  6151.     if !errorlevel! equ 5 (
  6152.         set skill_int=5
  6153.         set skill_str=Mayhem!
  6154.         )
  6155.     if !errorlevel! equ 4 (
  6156.         set skill_int=4
  6157.         set skill_str=Extreme Carnage
  6158.         )
  6159.     if !errorlevel! equ 3 (
  6160.         set skill_int=3
  6161.         set skill_str=Bring on the Pain
  6162.         )
  6163.     if !errorlevel! equ 2 (
  6164.         set skill_int=2
  6165.         set skill_str=Will This Hurt?
  6166.         )
  6167.     if !errorlevel! equ 1 (
  6168.         set skill_int=1
  6169.         set skill_str=Please Don't Kill Me!
  6170.         )
  6171.     )
  6172. if %iwad_type_str%==freedoom2 (
  6173.     echo 1.^) Please Don't Kill Me!
  6174.     echo 2.^) Will This Hurt?
  6175.     echo 3.^) Bring on the Pain
  6176.     echo 4.^) Extreme Carnage
  6177.     echo 5.^) Mayhem!
  6178.     echo:
  6179.     echo Z.^) Return to Game Options
  6180.     echo:
  6181.     choice /c 12345z
  6182.     if !errorlevel! equ 6 goto %menu_str%
  6183.     if !errorlevel! equ 5 (
  6184.         set skill_int=5
  6185.         set skill_str=Mayhem!
  6186.         )
  6187.     if !errorlevel! equ 4 (
  6188.         set skill_int=4
  6189.         set skill_str=Extreme Carnage
  6190.         )
  6191.     if !errorlevel! equ 3 (
  6192.         set skill_int=3
  6193.         set skill_str=Bring on the Pain
  6194.         )
  6195.     if !errorlevel! equ 2 (
  6196.         set skill_int=2
  6197.         set skill_str=Will This Hurt?
  6198.         )
  6199.     if !errorlevel! equ 1 (
  6200.         set skill_int=1
  6201.         set skill_str=Please Don't Kill Me!
  6202.         )
  6203.     )
  6204. if %iwad_type_str%==freedm (
  6205.     echo 1.^) Please Don't Kill Me!
  6206.     echo 2.^) Will This Hurt?
  6207.     echo 3.^) Bring on the Pain
  6208.     echo 4.^) Extreme Carnage
  6209.     echo 5.^) Mayhem!
  6210.     echo:
  6211.     echo Z.^) Return to Game Options
  6212.     echo:
  6213.     choice /c 12345z
  6214.     if !errorlevel! equ 6 goto %menu_str%
  6215.     if !errorlevel! equ 5 (
  6216.         set skill_int=5
  6217.         set skill_str=Mayhem!
  6218.         )
  6219.     if !errorlevel! equ 4 (
  6220.         set skill_int=4
  6221.         set skill_str=Extreme Carnage
  6222.         )
  6223.     if !errorlevel! equ 3 (
  6224.         set skill_int=3
  6225.         set skill_str=Bring on the Pain
  6226.         )
  6227.     if !errorlevel! equ 2 (
  6228.         set skill_int=2
  6229.         set skill_str=Will This Hurt?
  6230.         )
  6231.     if !errorlevel! equ 1 (
  6232.         set skill_int=1
  6233.         set skill_str=Please Don't Kill Me!
  6234.         )
  6235.     )
  6236. if %iwad_type_str%==blasphem (
  6237.     echo 1.^) Whimpering Craven
  6238.     echo 2.^) Still a Novice
  6239.     echo 3.^) Experienced Warrior
  6240.     echo 4.^) Grim and Morbid
  6241.     echo 5.^) Death's Right Hand
  6242.     echo:
  6243.     echo Z.^) Return to Game Options
  6244.     echo:
  6245.     choice /c 12345z
  6246.     if !errorlevel! equ 6 goto %menu_str%
  6247.     if !errorlevel! equ 5 (
  6248.         set skill_int=5
  6249.         set skill_str=Death's Right Hand
  6250.         )
  6251.     if !errorlevel! equ 4 (
  6252.         set skill_int=4
  6253.         set skill_str=Grim and Morbid
  6254.         )
  6255.     if !errorlevel! equ 3 (
  6256.         set skill_int=3
  6257.         set skill_str=Experienced Warrior
  6258.         )
  6259.     if !errorlevel! equ 2 (
  6260.         set skill_int=2
  6261.         set skill_str=Still a Novice
  6262.         )
  6263.     if !errorlevel! equ 1 (
  6264.         set skill_int=1
  6265.         set skill_str=Whimpering Craven
  6266.         )
  6267.     )
  6268. if %iwad_type_str%==square1 (
  6269.     echo 1.^) Totally Square
  6270.     echo 2.^) Let's Rocktangle
  6271.     echo 3.^) Ready to Rhombus
  6272.     echo 4.^) Quadrilateral Damage
  6273.     echo 5.^) Cubular!
  6274.     echo:
  6275.     echo Z.^) Return to Game Options
  6276.     echo:
  6277.     choice /c 12345z
  6278.     if !errorlevel! equ 6 goto %menu_str%
  6279.     if !errorlevel! equ 5 (
  6280.         set skill_int=5
  6281.         set skill_str=Cubular!
  6282.         )
  6283.     if !errorlevel! equ 4 (
  6284.         set skill_int=4
  6285.         set skill_str=Quadrilateral Damage
  6286.         )
  6287.     if !errorlevel! equ 3 (
  6288.         set skill_int=3
  6289.         set skill_str=Ready to Rhombus
  6290.         )
  6291.     if !errorlevel! equ 2 (
  6292.         set skill_int=2
  6293.         set skill_str=Let's Rocktangle
  6294.         )
  6295.     if !errorlevel! equ 1 (
  6296.         set skill_int=1
  6297.         set skill_str=Totally Square
  6298.         )
  6299.     )
  6300. if %iwad_type_str%==delaweare (
  6301.     echo 1.^) Very Easy
  6302.     echo 2.^) Easy
  6303.     echo 3.^) Medium
  6304.     echo 4.^) Hard
  6305.     echo 5.^) Very Hard
  6306.     echo:
  6307.     echo Z.^) Return to Game Options
  6308.     echo:
  6309.     choice /c 12345z
  6310.     if !errorlevel! equ 6 goto %menu_str%
  6311.     if !errorlevel! equ 5 (
  6312.         set skill_int=5
  6313.         set skill_str=Very Hard
  6314.         )
  6315.     if !errorlevel! equ 4 (
  6316.         set skill_int=4
  6317.         set skill_str=Hard
  6318.         )
  6319.     if !errorlevel! equ 3 (
  6320.         set skill_int=3
  6321.         set skill_str=Medium
  6322.         )
  6323.     if !errorlevel! equ 2 (
  6324.         set skill_int=2
  6325.         set skill_str=Easy
  6326.         )
  6327.     if !errorlevel! equ 1 (
  6328.         set skill_int=1
  6329.         set skill_str=Very Easy
  6330.         )
  6331.     )
  6332. if %iwad_type_str%==harm1 (
  6333.     echo 1.^) Very Easy
  6334.     echo 2.^) Easy
  6335.     echo 3.^) Medium
  6336.     echo 4.^) Hard
  6337.     echo 5.^) Very Hard
  6338.     echo:
  6339.     echo Z.^) Return to Game Options
  6340.     echo:
  6341.     choice /c 12345z
  6342.     if !errorlevel! equ 6 goto %menu_str%
  6343.     if !errorlevel! equ 5 (
  6344.         set skill_int=5
  6345.         set skill_str=Very Hard
  6346.         )
  6347.     if !errorlevel! equ 4 (
  6348.         set skill_int=4
  6349.         set skill_str=Hard
  6350.         )
  6351.     if !errorlevel! equ 3 (
  6352.         set skill_int=3
  6353.         set skill_str=Medium
  6354.         )
  6355.     if !errorlevel! equ 2 (
  6356.         set skill_int=2
  6357.         set skill_str=Easy
  6358.         )
  6359.     if !errorlevel! equ 1 (
  6360.         set skill_int=1
  6361.         set skill_str=Very Easy
  6362.         )
  6363.     )
  6364. if %iwad_type_str%==action2 (
  6365.     echo 1.^) Punkass Bitch
  6366.     echo 2.^) Petty Thug
  6367.     echo 3.^) Hot Shit
  6368.     echo 4.^) Badass Motherfucker
  6369.     echo:
  6370.     echo Z.^) Return to Game Options
  6371.     echo:
  6372.     choice /c 1234z
  6373.     if !errorlevel! equ 5 goto %menu_str%
  6374.     if !errorlevel! equ 4 (
  6375.         set skill_int=4
  6376.         set skill_str=Badass Motherfucker
  6377.         )
  6378.     if !errorlevel! equ 3 (
  6379.         set skill_int=3
  6380.         set skill_str=Hot Shit
  6381.         )
  6382.     if !errorlevel! equ 2 (
  6383.         set skill_int=2
  6384.         set skill_str=Petty Thug
  6385.         )
  6386.     if !errorlevel! equ 1 (
  6387.         set skill_int=1
  6388.         set skill_str=Punkass Bitch
  6389.         )
  6390.     )
  6391. if %iwad_type_str%==rotwb (
  6392.     echo 1.^) Easy
  6393.     echo 2.^) Medium
  6394.     echo 3.^) Hard
  6395.     echo:
  6396.     echo Z.^) Return to Game Options
  6397.     echo:
  6398.     choice /c 123z
  6399.     if !errorlevel! equ 4 goto %menu_str%
  6400.     if !errorlevel! equ 3 (
  6401.         set skill_int=4
  6402.         set skill_str=Hard
  6403.         )
  6404.     if !errorlevel! equ 2 (
  6405.         set skill_int=3
  6406.         set skill_str=Medium
  6407.         )
  6408.     if !errorlevel! equ 1 (
  6409.         set skill_int=2
  6410.         set skill_str=Easy
  6411.         )
  6412.     )
  6413. goto %menu_str%
  6414.  
  6415. :pwad_menu
  6416. call :show_banner
  6417. echo -----------------
  6418. echo Select PWAD Files
  6419. echo -----------------
  6420. echo:
  6421. if defined pwad1_file (echo 1.^) [%pwad1_file%]) else (echo 1.^) [Select a PWAD])
  6422. if defined pwad2_file (echo 2.^) [%pwad2_file%]) else (echo 2.^) [Select a PWAD])
  6423. if defined pwad3_file (echo 3.^) [%pwad3_file%]) else (echo 3.^) [Select a PWAD])
  6424. if defined pwad4_file (echo 4.^) [%pwad4_file%]) else (echo 4.^) [Select a PWAD])
  6425. if defined pwad5_file (echo 5.^) [%pwad5_file%]) else (echo 5.^) [Select a PWAD])
  6426. if defined pwad6_file (echo 6.^) [%pwad6_file%]) else (echo 6.^) [Select a PWAD])
  6427. if defined pwad7_file (echo 7.^) [%pwad7_file%]) else (echo 7.^) [Select a PWAD])
  6428. if defined pwad8_file (echo 8.^) [%pwad8_file%]) else (echo 8.^) [Select a PWAD])
  6429. if defined pwad9_file (echo 9.^) [%pwad9_file%]) else (echo 9.^) [Select a PWAD])
  6430. echo:
  6431. echo Z.) Return to Previous Menu
  6432. echo:
  6433. choice /c 123456789z
  6434. if %errorlevel% equ 10 goto %menu_str%
  6435. if %errorlevel% equ 9 call :pwad_query pwad9_file
  6436. if %errorlevel% equ 8 call :pwad_query pwad8_file
  6437. if %errorlevel% equ 7 call :pwad_query pwad7_file
  6438. if %errorlevel% equ 6 call :pwad_query pwad6_file
  6439. if %errorlevel% equ 5 call :pwad_query pwad5_file
  6440. if %errorlevel% equ 4 call :pwad_query pwad4_file
  6441. if %errorlevel% equ 3 call :pwad_query pwad3_file
  6442. if %errorlevel% equ 2 call :pwad_query pwad2_file
  6443. if %errorlevel% equ 1 call :pwad_query pwad1_file
  6444. goto pwad_menu
  6445.  
  6446. :advanced_menu
  6447. call :decode_dmflags
  6448. call :show_banner
  6449. echo ----------------
  6450. echo Advanced Options   DMFlags:    [%dmflags_int%]     DMFlags2:   [%dmflags2_int%]
  6451. echo ----------------
  6452. echo:
  6453. if %dmflags_4_int% equ 0 (
  6454.     if %dmflags_5_int% equ 0 (set _command_1_str=1.^) Falling Damage:   [Off]   ) else (set _command_1_str=1.^) Falling Damage:     [Hexen] )
  6455.     ) else (
  6456.     if %dmflags_5_int% equ 0 (set _command_1_str=1.^) Falling Damage:   [Old]   ) else (set _command_1_str=1.^) Falling Damage:     [Strife])
  6457.     )
  6458. if %dmflags_15_int% equ 0 (set _command_2_str=0.^) Items Respawn:   [Off]) else (set _command_2_str=0.^) Items Respawn:     [On])
  6459. if %dmflags_21_int% equ 0 (set _command_3_str=  I.^) Allow Changes to FOV:  [On]) else (set _command_3_str= I.^) Allow Changes to FOV:  [Off])
  6460. echo %_command_1_str%   %_command_2_str%    %_command_3_str%
  6461. if %dmflags2_2_int% equ 0 (set _command_1_str=2.^) Drop Weap. on Death:[Off]    ) else (set _command_1_str=2.^) Drop Weap. on Death:[On]    )
  6462. if %dmflags2_28_int% equ 0 (set _command_2_str=A.^) Powerups Respawn:   [Off]) else (set _command_2_str=A.^) Powerups Respawn:  [On])
  6463. 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])
  6464. echo %_command_1_str%   %_command_2_str%    %_command_3_str%
  6465. if %dmflags2_7_int% equ 0 (set _command_1_str=3.^) Double Ammo:     [Off]   ) else (set _command_1_str=3.^) Double Ammo:    [On]    )
  6466. if %dmflags_16_int% equ 0 (set _command_2_str=B.^) Fast Monsters:   [Off]) else (set _command_2_str=B.^) Fast Monsters:     [On])
  6467. if %dmflags2_19_int% equ 0 (set _command_3_str= K.^) Allow Automap:     [On]) else (set _command_3_str= K.^) Allow Automap:     [Off])
  6468. echo %_command_1_str%   %_command_2_str%    %_command_3_str%
  6469. if %dmflags_12_int% equ 0 (set _command_1_str=4.^) Infinite Ammo:   [Off]   ) else (set _command_1_str=4.^) Infinite Ammo:  [On]    )
  6470. if %dmflags2_8_int% equ 0 (set _command_2_str=C.^) Health Degradation:  [Off]) else (set _command_2_str=C.^) Health Degradation: [On])
  6471. if %dmflags2_20_int% equ 0 (set _command_3_str= L.^) Show Allies on Automap:    [On]) else (set _command_3_str= L.^) Show Allies on Automap:    [Off])
  6472. echo %_command_1_str%   %_command_2_str%    %_command_3_str%
  6473. if %dmflags2_17_int% equ 0 (set _command_1_str=5.^) Infinite Inventory: [Off]   ) else (set _command_1_str=5.^) Infinite Inventory: [On]    )
  6474. if %dmflags2_24_int% equ 0 (set _command_2_str=D.^) Allow Autoaim:  [On]) else (set _command_2_str=D.^) Allow Autoaim:  [Off])
  6475. if %dmflags2_21_int% equ 0 (set _command_3_str= M.^) Allow Co-Op Spy:       [On]) else (set _command_3_str= M.^) Allow Co-Op Spy:       [Off])
  6476. echo %_command_1_str%   %_command_2_str%    %_command_3_str%
  6477. if %dmflags_13_int% equ 0 (set _command_1_str=6.^) No Monsters:     [Off]   ) else (set _command_1_str=6.^) No Monsters:    [On]    )
  6478. if %dmflags2_23_int% equ 0 (set _command_2_str=E.^) Allow Suicide:  [On]) else (set _command_2_str=E.^) Allow Suicide:  [Off])
  6479. if %dmflags2_22_int% equ 0 (set _command_3_str= N.^) Allow Chasecam:        [Off]) else (set _command_3_str=    N.^) Allow Chasecam:        [On])
  6480. echo %_command_1_str%   %_command_2_str%    %_command_3_str%
  6481. if %dmflags2_18_int% equ 0 (set _command_1_str=7.^) 100%% Kills to Exit:    [Off]   ) else (set _command_1_str=7.^) 100%% Kills to Exit:    [On]    )
  6482. if %dmflags_17_int% equ 0 (set _command_2_str=F.^) Allow Jumping:   [Default]) else (set _command_2_str=F.^) Allow Jumping: [Off]   )
  6483. if %dmflags_18_int% equ 1 set _command_2_str=F.) Allow Jumping: [On]   
  6484. if %dmflags2_25_int% equ 0 (set _command_3_str=O.^) Skip Unloaded Weapons:  [On]) else (set _command_3_str=O.^) Skip Unloaded Weapons:  [Off])
  6485. echo %_command_1_str%   %_command_2_str%    %_command_3_str%
  6486. if %dmflags_14_int% equ 0 (set _command_1_str=8.^) Monsters Respawn:    [Off]   ) else (set _command_1_str=8.^) Monsters Respawn:   [On]    )
  6487. if %dmflags_23_int% equ 0 (set _command_2_str=G.^) Allow Crouching: [Default]) else (set _command_2_str=G.^) Allow Crouching:   [Off]   )
  6488. if %dmflags_24_int% equ 1 set _command_2_str=G.) Allow Crouching:   [On]   
  6489. if %dmflags2_26_int% equ 0 (set _command_3_str=P.^) Icon's Death Kills Spawns:  [Off]) else (set _command_3_str=P.^) Icon's Death Kills Spawns: [On])
  6490. echo %_command_1_str%   %_command_2_str%    %_command_3_str%   
  6491. if %dmflags2_15_int% equ 0 (set _command_1_str=9.^) Disallow Respawning:[Off]       ) else (set _command_1_str=9.^) Disallow Respawning:[On]        )
  6492. if %dmflags_19_int% equ 0 (set _command_2_str=H.^) Allow Freelook:  [Default]) else (set _command_2_str=H.^) Allow Freelook:    [Off]   )
  6493. if %dmflags_20_int% equ 1 set _command_2_str=H.) Allow Freelook:    [On]   
  6494. 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])
  6495. echo %_command_1_str%%_command_2_str%   %_command_3_str%
  6496. echo:
  6497. echo Z.) Return to Game Options
  6498. echo:
  6499. choice /c 1234567890abcdefghijklmnopqz
  6500. if %errorlevel% equ 28 goto %menu_str%
  6501. if %errorlevel% equ 27 set /a dmflags2_27_int+=1
  6502. if %errorlevel% equ 26 set /a dmflags2_26_int+=1
  6503. if %errorlevel% equ 25 set /a dmflags2_25_int+=1
  6504. if %errorlevel% equ 24 set /a dmflags2_22_int+=1
  6505. if %errorlevel% equ 23 set /a dmflags2_21_int+=1
  6506. if %errorlevel% equ 22 set /a dmflags2_20_int+=1
  6507. if %errorlevel% equ 21 set /a dmflags2_19_int+=1
  6508. if %errorlevel% equ 20 set /a dmflags2_9_int+=1
  6509. if %errorlevel% equ 19 set /a dmflags_21_int+=1
  6510. if %errorlevel% equ 18 (
  6511.     if %dmflags_20_int% equ 0 (set /a dmflags_19_int+=1) else (set /a dmflags_20_int+=1)
  6512.     if %dmflags_19_int% equ 1 (set /a dmflags_20_int+=1)
  6513.     )
  6514. if %errorlevel% equ 17 (
  6515.     if %dmflags_24_int% equ 0 (set /a dmflags_23_int+=1) else (set /a dmflags_24_int+=1)
  6516.     if %dmflags_23_int% equ 1 (set /a dmflags_24_int+=1)
  6517.     )
  6518. if %errorlevel% equ 16 (
  6519.     if %dmflags_18_int% equ 0 (set /a dmflags_17_int+=1) else (set /a dmflags_18_int+=1)
  6520.     if %dmflags_17_int% equ 1 (set /a dmflags_18_int+=1)
  6521.     )
  6522. if %errorlevel% equ 15 set /a dmflags2_23_int+=1
  6523. if %errorlevel% equ 14 set /a dmflags2_24_int+=1
  6524. if %errorlevel% equ 13 set /a dmflags2_8_int+=1
  6525. if %errorlevel% equ 12 set /a dmflags_16_int+=1
  6526. if %errorlevel% equ 11 set /a dmflags2_28_int+=1
  6527. if %errorlevel% equ 10 set /a dmflags_15_int+=1
  6528. if %errorlevel% equ 9 set /a dmflags2_15_int+=1
  6529. if %errorlevel% equ 8 set /a dmflags_14_int+=1
  6530. if %errorlevel% equ 7 set /a dmflags2_18_int+=1
  6531. if %errorlevel% equ 6 set /a dmflags_13_int+=1
  6532. if %errorlevel% equ 5 set /a dmflags2_17_int+=1
  6533. if %errorlevel% equ 4 set /a dmflags_12_int+=1
  6534. if %errorlevel% equ 3 set /a dmflags2_7_int+=1
  6535. if %errorlevel% equ 2 set /a dmflags2_2_int+=1
  6536. if %errorlevel% equ 1 (
  6537.     if %dmflags_4_int% equ 1 set /a dmflags_5_int+=1
  6538.     set /a dmflags_4_int+=1
  6539.     )
  6540. call :encode_dmflags
  6541. goto advanced_menu
  6542.  
  6543. :player_menu
  6544. call :show_banner
  6545. echo --------------
  6546. echo Player Options
  6547. echo --------------
  6548. echo:
  6549. echo 1.) Name:      [%name_str%]
  6550. echo 2.) Team Color:    [%team_str%]
  6551. echo 3.) Player Color:  [%color_str%]
  6552. echo 4.) Class:         [%class_str%]
  6553. echo 5.) Gender:        [%gender_str%]
  6554. echo:
  6555. echo Z.) Return to Previous Menu
  6556. echo:
  6557. choice /c 12345z
  6558. if %errorlevel% equ 6 goto %top_menu_str%
  6559. if %errorlevel% equ 5 (
  6560.     if %gender_str%==Male set gender_str=Female
  6561.     if %gender_str%==Female set gender_str=Neutral
  6562.     if %gender_str%==Neutral set gender_str=Object
  6563.     if %gender_str%==Object set gender_str=Male
  6564.     )
  6565. if %errorlevel% equ 4 (
  6566.     if not defined iwad_file (
  6567.         echo No IWAD selected.
  6568.         pause
  6569.         goto player_menu
  6570.         )
  6571.     if "%class_str%"=="Fighter" (
  6572.         set class_str=Cleric
  6573.         set color_int=0
  6574.         set color_str=Blue
  6575.         set skill_int=0
  6576.         set skill_str=Altar Boy
  6577.         )
  6578.     if "%class_str%"=="Cleric" (
  6579.         set class_str=Mage
  6580.         set color_int=0
  6581.         set color_str=Blue
  6582.         set skill_int=0
  6583.         set skill_str=Apprentice
  6584.         )
  6585.     if "%class_str%"=="Mage" (
  6586.         set class_str=Random
  6587.         set color_int=0
  6588.         set color_str=Blue/Gold
  6589.         set skill_int=0
  6590.         set skill_str=Squire/Altar Boy/Apprentice
  6591.         )
  6592.     if "%class_str%"=="Random" (
  6593.         set class_str=Fighter
  6594.         set color_int=0
  6595.         set color_str=Gold
  6596.         set skill_int=0
  6597.         set skill_str=Squire
  6598.         )
  6599.     )
  6600. if %errorlevel% equ 3 (
  6601.     if not defined iwad_file (
  6602.         echo No IWAD selected.
  6603.         pause
  6604.         goto player_menu
  6605.         )
  6606.     set /a color_int+=1
  6607.     if "%class_str%"=="Marine" (
  6608.         if !color_int! equ 8 set color_int=0
  6609.         if !color_int! equ 0 set color_str=Green
  6610.         if !color_int! equ 1 set color_str=Gray
  6611.             if !color_int! equ 2 set color_str=Brown
  6612.         if !color_int! equ 3 set color_str=Red
  6613.         if !color_int! equ 4 set color_str=Light Gray
  6614.         if !color_int! equ 5 set color_str=Light Brown
  6615.         if !color_int! equ 6 set color_str=Light Red
  6616.         if !color_int! equ 7 set color_str=Light Blue
  6617.         )
  6618.     if "%class_str%"=="Corvus" (
  6619.         if !color_int! equ 10 set color_int=0
  6620.         if !color_int! equ 0 set color_str=Green
  6621.         if !color_int! equ 1 set color_str=Yellow
  6622.         if !color_int! equ 2 set color_str=Red
  6623.         if !color_int! equ 3 set color_str=Blue
  6624.         if !color_int! equ 4 set color_str=Brown
  6625.         if !color_int! equ 5 set color_str=Light Gray
  6626.         if !color_int! equ 6 set color_str=Light Brown
  6627.         if !color_int! equ 7 set color_str=Light Red
  6628.         if !color_int! equ 8 set color_str=Light Blue
  6629.         if !color_int! equ 9 set color_str=Beige
  6630.         )
  6631.     if "%class_str%"=="Fighter" (
  6632.         if !color_int! equ 8 set color_int=0
  6633.         if !color_int! equ 0 set color_str=Gold
  6634.         if !color_int! equ 1 set color_str=Red
  6635.         if !color_int! equ 2 set color_str=Blue
  6636.         if !color_int! equ 3 set color_str=Dull Green
  6637.         if !color_int! equ 4 set color_str=Green
  6638.         if !color_int! equ 5 set color_str=Gray
  6639.         if !color_int! equ 6 set color_str=Brown
  6640.         if !color_int! equ 7 set color_str=Purple
  6641.         )
  6642.     if "%class_str%"=="Cleric" (
  6643.         if !color_int! equ 8 set color_int=0
  6644.         if !color_int! equ 0 set color_str=Blue
  6645.         if !color_int! equ 1 set color_str=Red
  6646.         if !color_int! equ 2 set color_str=Gold
  6647.         if !color_int! equ 3 set color_str=Dull Green
  6648.         if !color_int! equ 4 set color_str=Green
  6649.         if !color_int! equ 5 set color_str=Gray
  6650.         if !color_int! equ 6 set color_str=Brown
  6651.         if !color_int! equ 7 set color_str=Purple
  6652.         )
  6653.     if "%class_str%"=="Mage" (
  6654.         if !color_int! equ 8 set color_int=0
  6655.         if !color_int! equ 0 set color_str=Blue
  6656.         if !color_int! equ 1 set color_str=Red
  6657.         if !color_int! equ 2 set color_str=Gold
  6658.         if !color_int! equ 3 set color_str=Dull Green
  6659.         if !color_int! equ 4 set color_str=Green
  6660.         if !color_int! equ 5 set color_str=Gray
  6661.         if !color_int! equ 6 set color_str=Brown
  6662.         if !color_int! equ 7 set color_str=Purple
  6663.         )
  6664.     if "%class_str%"=="Random" (
  6665.         if !color_int! equ 8 set color_int=0
  6666.         if !color_int! equ 0 set color_str=Blue/Gold
  6667.         if !color_int! equ 1 set color_str=Red
  6668.         if !color_int! equ 2 set color_str=Blue/Gold
  6669.         if !color_int! equ 3 set color_str=Dull Green
  6670.         if !color_int! equ 4 set color_str=Green
  6671.         if !color_int! equ 5 set color_str=Gray
  6672.         if !color_int! equ 6 set color_str=Brown
  6673.         if !color_int! equ 7 set color_str=Purple
  6674.         )
  6675.     if "%class_str%"=="Rebel" (
  6676.         if !color_int! equ 8 set color_int=0
  6677.         if !color_int! equ 0 set color_str=Brown
  6678.         if !color_int! equ 1 set color_str=Red
  6679.         if !color_int! equ 2 set color_str=Rust
  6680.         if !color_int! equ 3 set color_str=Gray
  6681.         if !color_int! equ 4 set color_str=Dark Green
  6682.         if !color_int! equ 5 set color_str=Gold
  6683.         if !color_int! equ 6 set color_str=Bright Green
  6684.         if !color_int! equ 7 set color_str=Blue
  6685.         )
  6686.     if "%class_str%"=="Chex Warrior" (
  6687.         if !color_int! equ 8 set color_int=0
  6688.         if !color_int! equ 0 set color_str=Light Blue
  6689.         if !color_int! equ 1 set color_str=Green
  6690.         if !color_int! equ 2 set color_str=Gray
  6691.         if !color_int! equ 3 set color_str=Brown
  6692.         if !color_int! equ 4 set color_str=Red
  6693.         if !color_int! equ 5 set color_str=Light Gray
  6694.         if !color_int! equ 6 set color_str=Light Brown
  6695.         if !color_int! equ 7 set color_str=Light Red
  6696.         )
  6697.     if "%class_str%"=="Square" (
  6698.         if !color_int! equ 15 set color_int=0
  6699.         if !color_int! equ 0 set color_str=Purple
  6700.         if !color_int! equ 1 set color_str=Blue
  6701.         if !color_int! equ 2 set color_str=Yellow
  6702.         if !color_int! equ 3 set color_str=Red
  6703.         if !color_int! equ 4 set color_str=Green
  6704.         if !color_int! equ 5 set color_str=Pink
  6705.         if !color_int! equ 6 set color_str=Cyan
  6706.         if !color_int! equ 7 set color_str=Brown
  6707.         if !color_int! equ 8 set color_str=Tan
  6708.         if !color_int! equ 9 set color_str=Olive
  6709.         if !color_int! equ 10 set color_str=Gray
  6710.         if !color_int! equ 11 set color_str=Black
  6711.         if !color_int! equ 12 set color_str=Maroon
  6712.         if !color_int! equ 13 set color_str=Beige
  6713.         if !color_int! equ 14 set color_str=Orange
  6714.         )
  6715.     if "%class_str%"=="Hacker" (
  6716.         if !color_int! equ 1 set color_int=0
  6717.         if !color_int! equ 0 set color_str=Unknown
  6718.         )
  6719.     if "%class_str%"=="Harmony" (
  6720.         if !color_int! equ 1 set color_int=0
  6721.         if !color_int! equ 0 set color_str=Unknown
  6722.         )
  6723.     )
  6724. if %errorlevel% equ 2 (
  6725.     set /a team_int+=1
  6726.     if !team_int! equ 256 set team_int=0
  6727.     if !team_int! equ 0 set team_str=Blue
  6728.     if !team_int! equ 1 set team_str=Red
  6729.     if !team_int! equ 2 set team_str=Green
  6730.     if !team_int! equ 3 set team_str=Gold
  6731.     if !team_int! equ 4 set team_str=Black
  6732.     if !team_int! equ 5 set team_str=White
  6733.     if !team_int! equ 6 set team_str=Orange
  6734.     if !team_int! equ 7 set team_str=Purple
  6735.     if !team_int! equ 8 set team_int=255
  6736.     if !team_int! equ 255 set team_str=None
  6737.     )
  6738. if %errorlevel% equ 1 (
  6739.     call :show_banner
  6740.     set /p name_str=What name would you like to go by?
  6741.     )
  6742. goto player_menu
  6743.  
  6744. :host_menu
  6745. set top_menu_str=host_menu
  6746. for /f %%a in ('powershell Invoke-RestMethod api.ipify.org') do set hostaddress=%%a
  6747. call :show_banner
  6748. echo -----------
  6749. echo Host a Game
  6750. echo -----------
  6751. echo:
  6752. echo Your Remote IP Address is [%hostaddress%]
  6753. echo:
  6754. echo 1.) Configure Multiplayer Options
  6755. echo 2.) Configure Game Options
  6756. echo 3.) Configure Player Options
  6757. if defined demo_mode_str (echo 4.^) Record a Demo File:         [%demo_file%.lmp]) else (echo 4.^) Record a Demo File:          [Off])
  6758. echo:
  6759. echo 5.) Launch GZDoom
  6760. echo:
  6761. echo Z.) Return to Main Menu
  6762. echo:
  6763. choice /c 12345z
  6764. if %errorlevel% equ 6 goto main_menu
  6765. if %errorlevel% equ 5 (
  6766.     if not defined iwad_file (
  6767.         echo No IWAD selected.
  6768.         pause
  6769.         ) else (
  6770.         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%
  6771.         exit
  6772.         )
  6773.     )
  6774. if %errorlevel% equ 4 call :record_query
  6775. if %errorlevel% equ 3 goto player_menu
  6776. if %errorlevel% equ 2 goto game_menu
  6777. if %errorlevel% equ 1 goto multi_menu
  6778. goto host_menu
  6779.  
  6780. :multi_menu
  6781. set menu_str=multi_menu
  6782. call :show_banner
  6783. echo -------------------
  6784. echo Multiplayer Options
  6785. echo -------------------
  6786. echo:
  6787. echo Your Remote IP Address is [%hostaddress%]
  6788. echo:
  6789. echo 1.) Host Port:                 [%port_int%]
  6790. if %netmode_int% equ 0 (echo 2.^) Network Mode:             [Peer-To-Peer]) else (echo 2.^) Network Mode:               [Packet Server])
  6791. echo 3.) Number of Players:                 [%players_int%]
  6792. echo 4.) Game Mode:                     [%mode_name_str%]
  6793. if defined mode_str (echo 5.^) Configure Deathmatch Specific Options) else (echo 5.^) Configure Co-Operative Specific Options)
  6794. echo:
  6795. echo Z.) Return to Host a Game
  6796. echo:
  6797. choice /c 12345z
  6798. if %errorlevel% equ 6 goto host_menu
  6799. if %errorlevel% equ 5 (
  6800.     if defined mode_str (goto deathmatch_menu) else (goto coop_menu)
  6801.     )
  6802. if %errorlevel% equ 4 (
  6803.     if defined mode_str (
  6804.         set mode_str=
  6805.         set mode_name_str=Co-Operative
  6806.         set dmflags_int=0
  6807.         set dmflags2_int=0
  6808.         ) else (
  6809.         set mode_str=altdeath
  6810.         set mode_name_str=Deathmatch
  6811.         set dmflags_int=16388
  6812.         set dmflags2_int=0
  6813.         )
  6814.     )
  6815. if %errorlevel% equ 3 call :players_query  
  6816. if %errorlevel% equ 2 (
  6817.     if %netmode_int% equ 0 (set netmode_int=1) else (set netmode_int=0)
  6818.     )
  6819. if %errorlevel% equ 1 call :port_query
  6820. goto multi_menu
  6821.  
  6822. :coop_menu
  6823. call :decode_dmflags
  6824. call :show_banner
  6825. echo --------------------
  6826. echo Co-Operative Options           DMFlags:    [%dmflags_int%]     DMFlags2:   [%dmflags2_int%]
  6827. echo --------------------
  6828. echo:
  6829. if %dmflags_22_int% equ 0 (echo 1.^) Spawn Multi-Player Weapons:        [On]) else (echo 1.^) Spawn Multi-Player Weapons:       [Off])
  6830. if %dmflags_25_int% equ 0 (echo 2.^) Lose Entire Inventory on Death:    [Off]) else (echo 2.^) Lose Entire Inventory on Death:  [On])
  6831. if %dmflags_26_int% equ 0 (echo 3.^) Keep Keys on Death:            [On]) else (echo 3.^) Keep Keys on Death:           [Off])         
  6832. if %dmflags_27_int% equ 0 (echo 4.^) Keep Weapons on Death:     [On]) else (echo 4.^) Keep Weapons on Death:        [Off])
  6833. if %dmflags_28_int% equ 0 (echo 5.^) Keep Armor on Death:       [On]) else (echo 5.^) Keep Armor on Death:      [Off])
  6834. if %dmflags_29_int% equ 0 (echo 6.^) Keep Powerups on Death:        [On]) else (echo 6.^) Keep Powerups on Death:       [Off])
  6835. if %dmflags_30_int% equ 0 (echo 7.^) Keep Ammo on Death:            [On]) else (echo 7.^) Keep Ammo on Death:           [Off])
  6836. if %dmflags_31_int% equ 0 (echo 8.^) Lose Half Ammo on Death:       [Off]) else (echo 8.^) Lose Half Ammo on Death:     [On])
  6837. if %dmflags2_13_int% equ 0 (echo 9.^) Respawn Where Died:           [Off]) else (echo 9.^) Respawn Where Died:          [On])
  6838. echo:
  6839. echo Z.) Return to Game Options
  6840. echo:
  6841. choice /c 123456789z
  6842. if %errorlevel% equ 10 goto multi_menu
  6843. if %errorlevel% equ 9 set /a dmflags2_13_int+=1
  6844. if %errorlevel% equ 8 set /a dmflags_31_int+=1
  6845. if %errorlevel% equ 7 set /a dmflags_30_int+=1
  6846. if %errorlevel% equ 6 set /a dmflags_29_int+=1
  6847. if %errorlevel% equ 5 set /a dmflags_28_int+=1
  6848. if %errorlevel% equ 4 set /a dmflags_27_int+=1
  6849. if %errorlevel% equ 3 set /a dmflags_26_int+=1
  6850. if %errorlevel% equ 2 set /a dmflags_25_int+=1
  6851. if %errorlevel% equ 1 set /a dmflags_22_int+=1
  6852. call :encode_dmflags
  6853. goto coop_menu
  6854.  
  6855. :deathmatch_menu
  6856. call :decode_dmflags
  6857. call :show_banner
  6858. echo ------------------
  6859. echo Deathmatch Options     DMFlags:    [%dmflags_int%]     DMFlags2:   [%dmflags2_int%]
  6860. echo ------------------
  6861. echo:
  6862. if %dmflags_3_int% equ 0 (set _command_1_str=1.^) Weapons Stay on Map:  [Off]) else (set _command_1_str=1.^) Weapons Stay on Map:   [On])
  6863. if %dmflags2_10_int% equ 0 (set _command_2_str=9.^) Barrels Respawn:        [Off]) else (set _command_2_str=9.^) Barrels Respawn:       [On])
  6864. echo %_command_1_str%   %_command_2_str%
  6865. if %dmflags_2_int% equ 0 (set _command_1_str=2.^) Allow Powerups:       [On]) else (set _command_1_str=2.^) Allow Powerups:         [Off])
  6866. if %dmflags2_11_int% equ 0 (set _command_2_str=0.^) Respawn Protection:     [Off]) else (set _command_2_str=0.^) Respawn Protection:        [On])
  6867. echo %_command_1_str%   %_command_2_str%
  6868. if %dmflags_1_int% equ 0 (set _command_1_str=3.^) Allow Health Items:       [On]) else (set _command_1_str=3.^) Allow Health Items:     [Off])
  6869. if %dmflags2_16_int% equ 0 (set _command_2_str=A.^) Lose 1 Frag on Death:   [Off]) else (set _command_2_str=A.^) Lose 1 Frag on Death:  [On])
  6870. echo %_command_1_str%   %_command_2_str%
  6871. if %dmflags_10_int% equ 0 (set _command_1_str=4.^) Allow Armor Items:       [On]) else (set _command_1_str=4.^) Allow Armor Items:      [Off])
  6872. if %dmflags2_14_int% equ 0 (set _command_2_str=B.^) Frags are Persistant:   [Off]) else (set _command_2_str=B.^) Frags are Persistant:  [On])
  6873. echo %_command_1_str%   %_command_2_str%
  6874. if %dmflags_8_int% equ 0 (set _command_1_str=5.^) Use Furthest Spawn Points:    [Off]) else (set _command_1_str=5.^) Use Furthest Spawn Points: [On])
  6875. if %dmflags2_5_int% equ 0 (set _command_2_str=C.^) Disallow Team Switching:     [Off]) else (set _command_2_str=C.^) Disallow Team Switching:   [On])
  6876. echo %_command_1_str%   %_command_2_str%
  6877. if %dmflags_7_int% equ 0 (set _command_1_str=6.^) Do Not Change Maps:       [Off]) else (set _command_1_str=6.^) Do Not Change Maps:        [On])
  6878. if %teamplay_bool%==false (set _command_2_str=D.^) Team Deathmatch:     [Off]) else (set _command_2_str=D.^) Team Deathmatch:       [On])
  6879. echo %_command_1_str%   %_command_2_str%
  6880. if %dmflags_9_int% equ 0 (set _command_1_str=7.^) Force Respawn:        [Off]) else (set _command_1_str=7.^) Force Respawn:     [On])
  6881. if %timelimit_float% equ 0 (set _command_2_str=E.^) Time Limit:         [Off]) else (set _command_2_str=E.^) Time Limit:            [%timelimit_float% Minutes])
  6882. echo %_command_1_str%   %_command_2_str%
  6883. if %dmflags_11_int% equ 0 (set _command_1_str=8.^) Allow Exiting Map:       [On]) else (set _command_1_str=8.^) Allow Exiting Map:      [Off])
  6884. if %fraglimit_int% equ 0 (set _command_2_str=F.^) Frag Limit:           [Off]) else (set _command_2_str=F.^) Frag Limit:            [%fraglimit_int% Frags])
  6885. echo %_command_1_str%   %_command_2_str%
  6886. echo:
  6887. echo Z.) Return to Game Options
  6888. echo:
  6889. choice /c 1234567890abcdefz
  6890. if %errorlevel% equ 17 goto multi_menu
  6891. if %errorlevel% equ 16 (
  6892.     call :show_banner
  6893.     set /p fraglimit_int=How many frags are needed to win ^(0 for No Limit^)?
  6894.     set /a fraglimit_float/=1
  6895.     )
  6896. if %errorlevel% equ 15 (
  6897.     call :show_banner
  6898.     set /p timelimit_float=How many minutes should a match last ^(0 for No Limit^)?
  6899.     set /a timelimit_float/=1
  6900.     )
  6901. if %errorlevel% equ 14 if %teamplay_bool%==false (set teamplay_bool=true) else (set teamplay_bool=false)
  6902. if %errorlevel% equ 13 set /a dmflags2_5_int+=1
  6903. if %errorlevel% equ 12 set /a dmflags2_14_int+=1
  6904. if %errorlevel% equ 11 set /a dmflags2_16_int+=1
  6905. if %errorlevel% equ 10 set /a dmflags2_11_int+=1
  6906. if %errorlevel% equ 9 set /a dmflags2_10_int+=1
  6907. if %errorlevel% equ 8 set /a dmflags_11_int+=1
  6908. if %errorlevel% equ 7 set /a dmflags_9_int+=1
  6909. if %errorlevel% equ 6 set /a dmflags_7_int+=1
  6910. if %errorlevel% equ 5 set /a dmflags_8_int+=1
  6911. if %errorlevel% equ 4 set /a dmflags_10_int+=1
  6912. if %errorlevel% equ 3 set /a dmflags_1_int+=1
  6913. if %errorlevel% equ 2 set /a dmflags_2_int+=1
  6914. if %errorlevel% equ 1 set /a dmflags_3_int+=1
  6915. call :encode_dmflags
  6916. goto deathmatch_menu
  6917.  
  6918. :join_menu
  6919. set top_menu_str=join_menu
  6920. set menu_str=join_menu
  6921. call :show_banner
  6922. echo -----------
  6923. echo Join a Game
  6924. echo -----------
  6925. echo:
  6926. echo 1.) Host IP Address:       [%host_str%]
  6927. echo 2.) Host Port:         [%port_int%]
  6928. echo 3.) IWAD:          [%iwad_str%]
  6929. echo 4.) Select PWAD Files
  6930. echo 5.) Configure Player Options
  6931. if defined demo_mode_str (echo 6.^) Record a Demo File:     [%demo_file%.lmp]) else (echo 6.^) Record a Demo File:      [Off])
  6932. echo:
  6933. echo 7.) Launch GZDoom
  6934. echo:
  6935. echo Z.) Return to Main Menu
  6936. echo:
  6937. choice /c 1234567z
  6938. if %errorlevel% equ 8 goto main_menu
  6939. if %errorlevel% equ 7 (
  6940.     if not defined iwad_file (
  6941.         echo No IWAD selected.
  6942.         pause
  6943.         ) else (
  6944.         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%
  6945.         exit
  6946.         )
  6947.     )
  6948. if %errorlevel% equ 6 call :record_query
  6949. if %errorlevel% equ 5 goto player_menu
  6950. if %errorlevel% equ 4 goto pwad_menu
  6951. if %errorlevel% equ 3 goto iwad_menu
  6952. if %errorlevel% equ 2 call :port_query
  6953. if %errorlevel% equ 1 (
  6954.     call :show_banner
  6955.     set /p host_str=What is the IP Address of the Host?
  6956.     )
  6957. goto join_menu
  6958.  
  6959. :demo_menu
  6960. set menu_str=demo_menu
  6961. call :show_banner
  6962. echo ------------
  6963. echo Demo Options
  6964. echo ------------
  6965. echo:
  6966. echo 1.) IWAD:      [%iwad_str%]
  6967. if defined demo_file (echo 2.^) Demo File:      [%demo_file%]) else (echo 2.^) Demo File:       [Select a Demo File])
  6968. echo 3.) Select PWAD Files
  6969. echo:
  6970. echo 4.) Launch GZDoom
  6971. echo:
  6972. echo Z.) Return to Main Menu
  6973. echo:
  6974. choice /c 1234z
  6975. if %errorlevel% equ 5 goto main_menu
  6976. if %errorlevel% equ 4 (
  6977.     if not defined iwad_file (
  6978.         echo No IWAD selected.
  6979.         pause
  6980.         goto demo_menu
  6981.         )
  6982.     if not defined demo_file (
  6983.         echo No demo selected.
  6984.         pause
  6985.         goto demo_menu
  6986.         )
  6987.     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%
  6988.     exit
  6989.     )
  6990. if %errorlevel% equ 3 goto pwad_menu
  6991. if %errorlevel% equ 2 (
  6992.     call :show_banner
  6993.     set /p demo_file=What demo file would you like to load?
  6994.     set demo_file=!demo_file!.lmp
  6995.     if not exist !demo_file! (
  6996.         set demo_file=
  6997.         echo File Not Found!
  6998.         pause
  6999.         )
  7000.     )
  7001. if %errorlevel% equ 1 goto iwad_menu
  7002. goto demo_menu
  7003.  
  7004. :show_banner
  7005. cls
  7006. echo =========================================================================
  7007. echo  ________  ________                ________  _____ ______   ________        
  7008. echo ^|\   ____\^|\_____  \              ^|\   ____\^|\   _ \  _   \^|\   ___ \        
  7009. echo \ \  \___^| \^|___/  /^| ____________\ \  \___^|\ \  \\\__\ \  \ \  \_^|\ \      
  7010. echo  \ \  \  ___   /  / /^|\____________\ \  \    \ \  \\^|__^| \  \ \  \ \\ \      
  7011. echo   \ \  \^|\  \ /  /_/_\^|____________^|\ \  \____\ \  \    \ \  \ \  \_\\ \    
  7012. echo    \ \_______\\________\             \ \_______\ \__\    \ \__\ \_______\    
  7013. echo     \^|_______^|\^|_______^|              \^|_______^|\^|__^|     \^|__^|\^|_______^|
  7014. echo:
  7015. echo           -=[Ludwig's Command Line Helper %version_str% for GZDoom %gz_version_str%]=-
  7016. echo:
  7017. echo =========================================================================
  7018. echo:
  7019. exit /b
  7020.  
  7021. :scan_iwads
  7022. echo Locating IWADs...
  7023. echo:
  7024. set doom_complete_version_str=N/A
  7025. set doom2_version_str=N/A
  7026. set doom2f_version_str=N/A
  7027. set plutonia_version_str=N/A
  7028. set plutoniaunity_version_str=N/A
  7029. set tnt_version_str=N/A
  7030. set tntunity_version_str=N/A
  7031. set doomu_version_str=N/A
  7032. set doom_version_str=N/A
  7033. set doom1_version_str=N/A
  7034. set doom2bfg_version_str=N/A
  7035. set doom2xbox_version_str=N/A
  7036. set doom2unity_version_str=N/A
  7037. set doombfg_version_str=N/A
  7038. set doomxbox_version_str=N/A
  7039. set doomunity_version_str=N/A
  7040. set freedoom1_version_str=N/A
  7041. set freedoom2_version_str=N/A
  7042. set freedm_version_str=N/A
  7043. set heretic_version_str=N/A
  7044. set hereticsr_version_str=N/A
  7045. set heretic1_version_str=N/A
  7046. set hexen_version_str=N/A
  7047. set hexdd_version_str=N/A
  7048. set hexdemo_version_str=N/A
  7049. set strife_version_str=N/A
  7050. set sve_version_str=N/A
  7051. set strife0_version_str=N/A
  7052. set strife1_version_str=N/A
  7053. set blashpem_version_str=N/A
  7054. set chex_version_str=N/A
  7055. set chex3_version_str=N/A
  7056. set action2_version_str=N/A
  7057. set harm1_version_str=N/A
  7058. set hacx_version_str=N/A
  7059. set hacx2_version_str=N/A
  7060. set square1_version_str=N/A
  7061. set delaweare_version_str=N/A
  7062. set rotwb_version_str=N/A
  7063. for %%g in (*.wad,*.pk3) do (
  7064.     for /f "tokens=* skip=1" %%h in ('certutil -hashfile %%g MD5 ^|find /v "CertUtil:"') do (
  7065.         set _md5_str=%%h
  7066.         set _md5_str=!_md5_str: =!
  7067.         call :hash_file %%g !_md5_str! f0cefca49926d00903cf57551d901abe doom1 1.9 "DOOM Shareware"
  7068.         call :hash_file %%g !_md5_str! 5f4eb849b1af12887dec04a2a12e5e62 doom1 1.8 "DOOM Shareware"
  7069.         call :hash_file %%g !_md5_str! c428ea394dc52835f2580d5bfd50d76f doom1 1.666 "DOOM Shareware"
  7070.         call :hash_file %%g !_md5_str! 762fd6d4b960d4b759730f01387a50a1 doom1 1.6 "DOOM Shareware"
  7071.         call :hash_f