ID-Tech1-Engine-Modstarter

:: prerequirement: create_array function and gzdoom

:: all mods should be located in ./bin/mods
:: the gzdoom.exe and everyting it needs to run should be in ./bin
:: the create_array.bat and create_string.bat files should be in ./bin/recources
:: feel free to modify the paths on your own if you find the correct lines in this file...

:: the variables for everything to work out well
@echo off
mode con cols=26 lines=6
setlocal EnableDelayedExpansion
title SmarStart
color 02

cd bin\recources

set pos=1
set msc=true

:: GFX-Variable: the list of graphical mods to add to a version by simply typing %gfx%
set gfx=

:: EXE-Array:the list of mods, separated with space compared to the game mode, separated with comma
:: syntax: call create_array exe "," " ,%gfx%,[names of files of modpack]"
call create_array exe "," " ,%gfx%"

:: LIST-Array: the list of names for the dedicated game mode
:: syntax: call create_array list "," "vanilla,gfx,[displayname of modpack]"
call create_array list "," "vanilla,gfx"

:: The code for the menu
:mnucode
    setlocal
    cls
    set /a a=%pos%-1
    echo        w=last
    echo a=accept   s=next
    echo m=toggle music
    echo mode: !list[%a%]!
    echo music=%msc%
    choice /c WSAEM /n
    if %errorlevel%==5 (
        if %msc% == true (
            set msc=false
        ) ELSE (
            set msc=true
        )
    )
    if %errorlevel%==4 exit
    if %errorlevel%==3 goto :exe
    if %errorlevel%==2 (
        if %pos% LSS %list_lenght% (
            set /a pos=%pos%+1
        )
    )
    if %errorlevel%==1 (
        if %pos% GTR 1 (
            set /a pos=%pos%-1
        )
    )
    goto :mnucode
    endlocal
goto :eof

:: the executive function
:exe
    if %msc%==true (
        set music=music2.wad CustomMusic.wad
    )
    cd ..\mods
    ..\gzdoom.exe -iwad doom2.wad -file %music% !exe[%a%]!
    cd ..\recources
    goto mnucode
goto :eof