@echo OFF
title L4D Starter - Sabbienized!
setlocal


find /C "mat_queue_mode" left4dead\cfg\config.cfg>nul
IF ERRORLEVEL 1 GOTO writeMatQueue
IF ERRORLEVEL 0 GOTO chooseConnection
:writeMatQueue
echo mat_queue_mode "0" >> left4dead\cfg\config.cfg

:chooseConnection
color 70
CLS
echo L4D Server starter, Sabbienized!
echo --------------------------------
echo What DO you want TO DO?
echo   1.         Use the last used settings!
echo   2.         Be a big strong server!
echo   3.         Be a lousy terminal-like thingie
echo   543251351. GET back TO work!
echo --------------------------------
echo.
set /p gameMode=Server)
IF %gameMode% == 1 GOTO startTheGame
IF %gameMode% == 2 GOTO chooseMap
IF %gameMode% == 3 GOTO enterIp
IF %gameMode% == 543251351 GOTO leaveThis
GOTO chooseConnection

:enterIp
color 75
CLS
echo L4D Server starter, Sabbienized!
echo --------------------------------
echo Enter the IP of the server, OR:
echo   1. Last used IP address
echo   0. Shit, what were the previous options again?
echo --------------------------------
echo.
set /p connectIp=IP)
IF %connectIp% == 0 GOTO chooseConnection
IF %connectIp% == 1 GOTO lastUsedIp
GOTO startTheGame
:lastUsedIp
GOTO startTheGame

:chooseMap
color 72
CLS
echo L4D Server starter, Sabbienized!
echo --------------------------------
echo Please choose a map:
echo   1. Hospital
echo   2. Farm
echo   3. Airport
echo   4. Smalltown
echo   0. I chose the wrong OPTION in the previous menu
echo --------------------------------
echo.
set /p mapNum=Map)
IF %mapNum% == 0 GOTO chooseConnection
IF %mapNum% == 1 GOTO chooseChapter
IF %mapNum% == 2 GOTO chooseChapter
IF %mapNum% == 3 GOTO chooseChapter
IF %mapNum% == 4 GOTO chooseChapter
GOTO chooseMap

:chooseChapter
CLS
echo L4D Server starter, Sabbienized!
echo --------------------------------
echo Please choose a chapter:
GOTO map%mapNum%Chaps
:map1Chaps
echo   1. Apartment
echo   2. Subway
echo   3. Sewers
echo   4. Interior
echo   5. Rooftop
GOTO chooseChapFinal
:map2Chaps
echo   1. Hilltop
echo   2. Traintunnel
echo   3. Bridge
echo   4. Barn
echo   5. Cornfield
GOTO chooseChapFinal
:map3Chaps
echo   1. Greenhouse
echo   2. Offices
echo   3. Garage
echo   4. Terminal
echo   5. Runway
GOTO chooseChapFinal
:map4Chaps
echo   1. Caves
echo   2. Drainage
echo   3. Ranchhouse
echo   4. Mainstreet
echo   5. Houseboat
GOTO chooseChapFinal
:chooseChapFinal
echo   0. I changed my mind about the map thing!
echo --------------------------------
echo.
set /p chapNum=Chapter)
IF %chapNum% == 0 GOTO chooseMap
IF %chapNum% == 1 GOTO setMap%mapNum%Names
IF %chapNum% == 2 GOTO setMap%mapNum%Names
IF %chapNum% == 3 GOTO setMap%mapNum%Names
IF %chapNum% == 4 GOTO setMap%mapNum%Names
IF %chapNum% == 5 GOTO setMap%mapNum%Names
GOTO chooseChapter

:setMap1Names
IF %chapNum% == 1 set mapName=l4d_hospital01_apartment
IF %chapNum% == 2 set mapName=l4d_hospital02_subway
IF %chapNum% == 3 set mapName=l4d_hospital03_sewers
IF %chapNum% == 4 set mapName=l4d_hospital04_interior
IF %chapNum% == 5 set mapName=l4d_hospital05_rooftop
GOTO endMapNames
:setMap2Names
IF %chapNum% == 1 set mapName=l4d_farm01_hilltop
IF %chapNum% == 2 set mapName=l4d_farm02_traintunnel
IF %chapNum% == 3 set mapName=l4d_farm03_bridge
IF %chapNum% == 4 set mapName=l4d_farm04_barn
IF %chapNum% == 5 set mapName=l4d_farm05_cornfield
GOTO endMapNames
:setMap3Names
IF %chapNum% == 1 set mapName=l4d_airport01_greenhouse
IF %chapNum% == 2 set mapName=l4d_airport02_offices
IF %chapNum% == 3 set mapName=l4d_airport03_garage
IF %chapNum% == 4 set mapName=l4d_airport04_terminal
IF %chapNum% == 5 set mapName=l4d_airport05_runway
GOTO endMapNames
:setMap4Names
IF %chapNum% == 1 set mapName=l4d_smalltown01_caves
IF %chapNum% == 2 set mapName=l4d_smalltown02_drainage
IF %chapNum% == 3 set mapName=l4d_smalltown03_ranchhouse
IF %chapNum% == 4 set mapName=l4d_smalltown04_mainstreet
IF %chapNum% == 5 set mapName=l4d_smalltown05_houseboat
GOTO endMapNames
:endMapNames

:chooseDifficulty
CLS
echo L4D Server starter, Sabbienized!
echo --------------------------------
echo Please choose a difficulty:
echo   1. Easy
echo   2. Medium
echo   3. Hard
echo   4. Impossible
echo   0. I changed my mind about the map thing!
echo --------------------------------
echo.
set /p diffNum=Difficulty)
IF %diffNum% == 0 GOTO chooseMap
IF %diffNum% == 1 set diffName=Easy
IF %diffNum% == 2 set diffName=Medium
IF %diffNum% == 3 set diffName=Hard
IF %diffNum% == 4 set diffName=Impossible
:endDifficulty

:startTheGame
CLS
echo L4D Server starter, Sabbienized!
echo.
echo.
echo     Starting Left 4 Dead, please WAIT...
echo.
IF %gameMode% == 1 (
  IF exist lastUsed.dat (
    FOR /f "tokens=1,3*" %%f in ('"type lastUsed.dat"') do (
      echo %date% - %time% :: Game Started :: last settings: %%f %%g %%h >> playingLog.txt
      left4dead.exe %%f %%g %%h
    )
  ) ELSE (
    echo ERROR: No last settings found..
    pause
    GOTO chooseConnection
  )
)
IF %gameMode% == 2 (
  echo %date% - %time% :: Game Started :: %mapName% ON %diffName% >> playingLog.txt
  left4dead.exe -game left4dead -console -novid +sv_allow_lobby_connect_only 0 +z_difficulty %diffName% +map %mapName%
  echo -game left4dead -console -novid +sv_allow_lobby_connect_only 0 +z_difficulty %diffName% +map %mapName% > lastUsed.dat
)
IF %gameMode% == 3 (
  echo %date% - %time% :: Game Started :: Connecting TO %connectIp% >> playingLog.txt
  left4dead.exe -game left4dead -console -novid +connect %connectIp%
  echo -game left4dead -console -novid +connect %connectIp% > lastUsed.dat
)
echo %date% - %time% :: Game ended >> playingLog.txt
:leaveThis
endlocal
color