Guest User

gzcmd 3.5

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