TRX/src/specific/shell.c

#include "game/cinema.h"
#include "game/demo.h"
#include "game/game.h"
#include "game/inv.h"
#include "game/savegame.h"
#include "game/setup.h"
#include "game/text.h"
#include "game/vars.h"
#include "specific/display.h"
#include "specific/file.h"
#include "specific/frontend.h"
#include "specific/init.h"
#include "specific/output.h"
#include "specific/shed.h"
#include "specific/shed.h"
#include "specific/shell.h"
#include "specific/sndpc.h"
#include "util.h"
#include <stdio.h>

#ifdef T1M_FEAT_GAMEFLOW
    #include "game/gameflow.h"
#endif

void GameMain()
{
    DemoLevel = 1;
    SoundIsActive = 1;
    HiRes = 0;
    GameHiRes = 0;
    ScreenSizer = 1.0;
    GameSizer = 1.0;

    S_InitialiseSystem();
    InitialiseStartInfo();

#ifdef T1M_FEAT_GAMEFLOW
    if (!GF_LoadScriptFile("Tomb1Main_gameflow.json5")) {
        TRACE("MAIN: unable to load script file");
    }
#endif

    S_FrontEndCheck();

    FILE *fp = fopen("atiset.dat", "rb");
    if (fp) {
        fread(&OptionMusicVolume, sizeof(int16_t), 1, fp);
        fread(&OptionSoundFXVolume, sizeof(int16_t), 1, fp);
        fread(Layout[1], sizeof(int16_t), 13, fp);
        fread(&AppSettings, sizeof(int32_t), 1, fp);
        fread(&GameHiRes, sizeof(int32_t), 1, fp);
        fread(&GameSizer, sizeof(double), 1, fp);
        if (OptionMusicVolume) {
            S_CDVolume(25 * OptionMusicVolume + 5);
        } else {
            S_CDVolume(0);
        }
        // NOTE: missing in original code
        if (OptionSoundFXVolume) {
            adjust_master_volume(6 * OptionSoundFXVolume + 3);
        } else {
            adjust_master_volume(0);
        }
        fclose(fp);
    }

    if (IsHardwareRenderer) {
        GameSizer = 1.0;
        dword_45E960 = AppSettings;
    }
    HiRes = 0;
    TempVideoAdjust(2, 1.0);
    S_DisplayPicture("data\\eidospc");
    sub_408E41();

    if (IsHardwareRenderer) {
        HardwarePrepareFMV();
    }
    WinPlayFMV(FMV_CORE, 1);
    WinPlayFMV(FMV_ESCAPE, 1);
    WinPlayFMV(FMV_INTRO, 1);
    if (!IsHardwareRenderer) {
        HiRes = -1;
    } else {
        HardwareFMVDone();
        if (!IsHardwareRenderer) {
            HiRes = -1;
        }
    }

    GameMemoryPointer = _malloc(0x380000);
    if (!GameMemoryPointer) {
        S_ExitSystem("ERROR: Could not allocate enough memory");
        return;
    }

    int32_t gf_option = GF_EXIT_TO_TITLE;

    int8_t loop_continue = 1;
    while (loop_continue) {
        TempVideoRemove();
        int32_t gf_direction = gf_option & ~((1 << 6) - 1);
        int32_t gf_param = gf_option & ((1 << 6) - 1);

        TRACE("%d %d", gf_direction >> 6, gf_param);

        switch (gf_direction) {
        case GF_STARTGAME:
            if (!LevelIsValid(gf_param)) {
                do {
                    ++gf_param;
                } while (gf_param <= LV_LEVEL10C && !LevelIsValid(gf_param));
            }
            if (gf_param == LV_TITLE) {
                S_ExitSystem("MAIN: play title");
                return;
            }
            gf_option = StartGame(gf_param);
            break;

        case GF_STARTCINE:
            gf_option = StartCinematic(gf_param);
            break;

        case GF_STARTDEMO:
            gf_option = StartDemo();
            break;

        case GF_LEVELCOMPLETE:
            gf_option = LevelCompleteSequence(gf_param);
            break;

        case GF_EXIT_TO_TITLE:
            T_InitPrint();
            TempVideoAdjust(2, 1.0);
            S_DisplayPicture("data\\titleh");
            NoInputCount = 0;
            if (TitleLoaded) {
                S_CDPlay(2);
            } else {
                if (!InitialiseLevel(LV_TITLE)) {
                    gf_option = GF_EXITGAME;
                    break;
                }
                TitleLoaded = 1;
            }

            dword_45B940 = 0;
            Display_Inventory(1);
            dword_45B940 = 1;

            S_FadeToBlack();
            S_CDStop();

            if (ResetFlag) {
                ResetFlag = 0;
                gf_option = GF_STARTDEMO;
            } else if (InventoryChosen == O_PHOTO_OPTION) {
                gf_option = GF_STARTGAME | LV_GYM;
            } else {
                if (InventoryChosen != O_PASSPORT_OPTION) {
                    gf_option = GF_EXITGAME;
                }
                if (InventoryExtraData[0]) {
                    if (InventoryExtraData[0] == 1) {
                        InitialiseStartInfo();
#ifdef T1M_FEAT_GAMEPLAY
                        SaveGame[0].bonus_flag = InventoryExtraData[1];
                        ModifyStartInfo(LV_FIRSTLEVEL);
#endif
                        gf_option = GF_STARTGAME | LV_FIRSTLEVEL;
                    } else {
                        gf_option = GF_EXITGAME;
                    }
                } else {
                    S_LoadGame(
                        SaveGame, sizeof(SAVEGAME_INFO), InventoryExtraData[1]);
                    gf_option = GF_STARTGAME | LV_CURRENT;
                }
            }
            break;

        case GF_EXITGAME:
            loop_continue = 0;
            break;

        default:
            sprintf(
                StringToShow, "MAIN: Unknown request %x %d", gf_direction,
                gf_param);
            S_ExitSystem(StringToShow);
            return;
        }
    }

    fp = fopen("atiset.dat", "wb");
    if (fp) {
        fwrite(&OptionMusicVolume, sizeof(int16_t), 1, fp);
        fwrite(&OptionSoundFXVolume, sizeof(int16_t), 1, fp);
        fwrite(Layout[1], sizeof(int16_t), 13, fp);
        fwrite(&AppSettings, sizeof(int32_t), 1, fp);
        fwrite(&GameHiRes, sizeof(int32_t), 1, fp);
        fwrite(&GameSizer, sizeof(double), 1, fp);
        fclose(fp);
    }
}

void T1MInjectSpecificShell()
{
    INJECT(0x00438410, GameMain);
}