//------------------------------------------------------------------------- /* Copyright (C) 2010-2019 EDuke32 developers and contributors Copyright (C) 2019 Nuke.YKT This file is part of NBlood. NBlood is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License version 2 as published by the Free Software Foundation. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ //------------------------------------------------------------------------- #include "ns.h" // Must come before everything else! #include "build.h" #include "mmulti.h" #include "compat.h" #include "baselayer.h" #include "common.h" #include "common_game.h" #include "g_input.h" #include "db.h" #include "blood.h" #include "choke.h" #include "controls.h" #include "dude.h" #include "endgame.h" #include "eventq.h" #include "fx.h" #include "gib.h" #include "globals.h" #include "levels.h" #include "loadsave.h" #include "network.h" #include "sectorfx.h" #include "seq.h" #include "sound.h" #include "triggers.h" #include "view.h" #include "misc.h" #include "gameconfigfile.h" #include "gamecontrol.h" #include "m_argv.h" #include "statistics.h" #include "menu.h" #include "raze_sound.h" #include "nnexts.h" #include "secrets.h" #include "gamestate.h" #include "screenjob.h" BEGIN_BLD_NS void LocalKeys(void); void InitCheats(); char bAddUserMap = false; bool bNoDemo = false; bool bQuickStart = true; char gUserMapFilename[BMAX_PATH]; short BloodVersion = 0x115; int gNetPlayers; int gChokeCounter = 0; double g_gameUpdateTime, g_gameUpdateAndDrawTime; double g_gameUpdateAvgTime = 0.001; bool gQuitGame; int gQuitRequest; enum gametokens { T_INCLUDE = 0, T_INTERFACE = 0, T_LOADGRP = 1, T_MODE = 1, T_CACHESIZE = 2, T_ALLOW = 2, T_NOAUTOLOAD, T_INCLUDEDEFAULT, T_SOUND, T_FILE, //T_CUTSCENE, //T_ANIMSOUNDS, //T_NOFLOORPALRANGE, T_ID, T_MINPITCH, T_MAXPITCH, T_PRIORITY, T_TYPE, T_DISTANCE, T_VOLUME, T_DELAY, T_RENAMEFILE, T_GLOBALGAMEFLAGS, T_ASPECT, T_FORCEFILTER, T_FORCENOFILTER, T_TEXTUREFILTER, T_RFFDEFINEID, T_TILEFROMTEXTURE, T_IFCRC, T_IFMATCH, T_CRC32, T_SIZE, T_SURFACE, T_VOXEL, T_VIEW, T_SHADE, }; int blood_globalflags; void QuitGame(void) { throw CExitEvent(0); } void PrecacheDude(spritetype *pSprite) { DUDEINFO *pDudeInfo = getDudeInfo(pSprite->type); seqPrecacheId(pDudeInfo->seqStartID); seqPrecacheId(pDudeInfo->seqStartID+5); seqPrecacheId(pDudeInfo->seqStartID+1); seqPrecacheId(pDudeInfo->seqStartID+2); switch (pSprite->type) { case kDudeCultistTommy: case kDudeCultistShotgun: case kDudeCultistTesla: case kDudeCultistTNT: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+7); seqPrecacheId(pDudeInfo->seqStartID+8); seqPrecacheId(pDudeInfo->seqStartID+9); seqPrecacheId(pDudeInfo->seqStartID+13); seqPrecacheId(pDudeInfo->seqStartID+14); seqPrecacheId(pDudeInfo->seqStartID+15); break; case kDudeZombieButcher: case kDudeGillBeast: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+7); seqPrecacheId(pDudeInfo->seqStartID+8); seqPrecacheId(pDudeInfo->seqStartID+9); seqPrecacheId(pDudeInfo->seqStartID+10); seqPrecacheId(pDudeInfo->seqStartID+11); break; case kDudeGargoyleStatueFlesh: case kDudeGargoyleStatueStone: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+6); fallthrough__; case kDudeGargoyleFlesh: case kDudeGargoyleStone: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+7); seqPrecacheId(pDudeInfo->seqStartID+8); seqPrecacheId(pDudeInfo->seqStartID+9); break; case kDudePhantasm: case kDudeHellHound: case kDudeSpiderBrown: case kDudeSpiderRed: case kDudeSpiderBlack: case kDudeSpiderMother: case kDudeTchernobog: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+7); seqPrecacheId(pDudeInfo->seqStartID+8); break; case kDudeCerberusTwoHead: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+7); fallthrough__; case kDudeHand: case kDudeBoneEel: case kDudeBat: case kDudeRat: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+7); break; case kDudeCultistBeast: seqPrecacheId(pDudeInfo->seqStartID+6); break; case kDudeZombieAxeBuried: seqPrecacheId(pDudeInfo->seqStartID+12); seqPrecacheId(pDudeInfo->seqStartID+9); fallthrough__; case kDudeZombieAxeLaying: seqPrecacheId(pDudeInfo->seqStartID+10); fallthrough__; case kDudeZombieAxeNormal: seqPrecacheId(pDudeInfo->seqStartID+6); seqPrecacheId(pDudeInfo->seqStartID+7); seqPrecacheId(pDudeInfo->seqStartID+8); seqPrecacheId(pDudeInfo->seqStartID+11); seqPrecacheId(pDudeInfo->seqStartID+13); seqPrecacheId(pDudeInfo->seqStartID+14); break; } } void PrecacheThing(spritetype *pSprite) { switch (pSprite->type) { case kThingGlassWindow: // worthless... case kThingFluorescent: seqPrecacheId(12); break; case kThingSpiderWeb: seqPrecacheId(15); break; case kThingMetalGrate: seqPrecacheId(21); break; case kThingFlammableTree: seqPrecacheId(25); seqPrecacheId(26); break; case kTrapMachinegun: seqPrecacheId(38); seqPrecacheId(40); seqPrecacheId(28); break; case kThingObjectGib: //case kThingObjectExplode: weird that only gib object is precached and this one is not break; } tilePrecacheTile(pSprite->picnum); } void PreloadTiles(void) { nPrecacheCount = 0; int skyTile = -1; memset(gotpic,0,sizeof(gotpic)); // Fonts for (int i = 0; i < numsectors; i++) { tilePrecacheTile(sector[i].floorpicnum, 0); tilePrecacheTile(sector[i].ceilingpicnum, 0); if ((sector[i].ceilingstat&1) != 0 && skyTile == -1) skyTile = sector[i].ceilingpicnum; } for (int i = 0; i < numwalls; i++) { tilePrecacheTile(wall[i].picnum, 0); if (wall[i].overpicnum >= 0) tilePrecacheTile(wall[i].overpicnum, 0); } for (int i = 0; i < kMaxSprites; i++) { if (sprite[i].statnum < kMaxStatus) { spritetype *pSprite = &sprite[i]; switch (pSprite->statnum) { case kStatDude: PrecacheDude(pSprite); break; case kStatThing: PrecacheThing(pSprite); break; default: tilePrecacheTile(pSprite->picnum); break; } } } // Precache common SEQs for (int i = 0; i < 100; i++) { seqPrecacheId(i); } tilePrecacheTile(1147); // water drip tilePrecacheTile(1160); // blood drip // Player SEQs seqPrecacheId(dudeInfo[31].seqStartID+6); seqPrecacheId(dudeInfo[31].seqStartID+7); seqPrecacheId(dudeInfo[31].seqStartID+8); seqPrecacheId(dudeInfo[31].seqStartID+9); seqPrecacheId(dudeInfo[31].seqStartID+10); seqPrecacheId(dudeInfo[31].seqStartID+14); seqPrecacheId(dudeInfo[31].seqStartID+15); seqPrecacheId(dudeInfo[31].seqStartID+12); seqPrecacheId(dudeInfo[31].seqStartID+16); seqPrecacheId(dudeInfo[31].seqStartID+17); seqPrecacheId(dudeInfo[31].seqStartID+18); if (skyTile > -1 && skyTile < kMaxTiles) { for (int i = 1; i < gSkyCount; i++) tilePrecacheTile(skyTile+i, 0); } WeaponPrecache(); viewPrecacheTiles(); fxPrecache(); gibPrecache(); I_GetEvent(); } void PreloadCache(void) { PreloadTiles(); ClockTicks clock = totalclock; int cnt = 0; int percentDisplayed = -1; for (int i = 0; i < kMaxTiles && !inputState.GetKeyStatus(sc_Space); i++) { if (TestBitString(gotpic, i)) { // For the hardware renderer precaching the raw pixel data is pointless. if (videoGetRenderMode() < REND_POLYMOST) tileLoad(i); if (r_precache) PrecacheHardwareTextures(i); if ((++cnt & 7) == 0) I_GetEvent(); } } memset(gotpic,0,sizeof(gotpic)); } void EndLevel(void) { gViewPos = VIEWPOS_0; sndKillAllSounds(); sfxKillAllSounds(); ambKillAll(); seqKillAll(); } PLAYER gPlayerTemp[kMaxPlayers]; int gHealthTemp[kMaxPlayers]; vec3_t startpos; int16_t startang, startsectnum; void StartLevel(GAMEOPTIONS *gameOptions) { STAT_Update(0); EndLevel(); gInput = {}; gStartNewGame = 0; ready2send = 0; netWaitForEveryone(0); currentLevel = FindMapByLevelNum(levelnum(gGameOptions.nEpisode, gGameOptions.nLevel)); if (gGameOptions.nGameType == 0) { if (!(gGameOptions.uGameFlags&1)) levelSetupOptions(gGameOptions.nEpisode, gGameOptions.nLevel); /////// gGameOptions.weaponsV10x = gWeaponsV10x; /////// } else if (gGameOptions.nGameType > 0 && !(gGameOptions.uGameFlags&1)) { gGameOptions.nEpisode = gPacketStartGame.episodeId; gGameOptions.nLevel = gPacketStartGame.levelId; gGameOptions.nGameType = gPacketStartGame.gameType; gGameOptions.nDifficulty = gPacketStartGame.difficulty; gGameOptions.nMonsterSettings = gPacketStartGame.monsterSettings; gGameOptions.nWeaponSettings = gPacketStartGame.weaponSettings; gGameOptions.nItemSettings = gPacketStartGame.itemSettings; gGameOptions.nRespawnSettings = gPacketStartGame.respawnSettings; gGameOptions.bFriendlyFire = gPacketStartGame.bFriendlyFire; gGameOptions.bKeepKeysOnRespawn = gPacketStartGame.bKeepKeysOnRespawn; if (gPacketStartGame.userMap) levelAddUserMap(gPacketStartGame.userMapName); else levelSetupOptions(gGameOptions.nEpisode, gGameOptions.nLevel); /////// gGameOptions.weaponsV10x = gPacketStartGame.weaponsV10x; /////// gBlueFlagDropped = false; gRedFlagDropped = false; } if (gameOptions->uGameFlags&1) { for (int i = connecthead; i >= 0; i = connectpoint2[i]) { memcpy(&gPlayerTemp[i],&gPlayer[i],sizeof(PLAYER)); gHealthTemp[i] = xsprite[gPlayer[i].pSprite->extra].health; } } bVanilla = false; enginecompatibility_mode = ENGINECOMPATIBILITY_19960925;//bVanilla; memset(xsprite,0,sizeof(xsprite)); memset(sprite,0,kMaxSprites*sizeof(spritetype)); //drawLoadingScreen(); if (dbLoadMap(currentLevel->fileName,(int*)&startpos.x,(int*)&startpos.y,(int*)&startpos.z,&startang,&startsectnum,(unsigned int*)&gameOptions->uMapCRC)) { I_Error("Unable to load map"); } SECRET_SetMapName(currentLevel->DisplayName(), currentLevel->name); STAT_NewLevel(currentLevel->fileName); G_LoadMapHack(currentLevel->fileName); wsrand(gameOptions->uMapCRC); gKillMgr.Clear(); gSecretMgr.Clear(); gLevelTime = 0; automapping = 1; int modernTypesErased = 0; for (int i = 0; i < kMaxSprites; i++) { spritetype *pSprite = &sprite[i]; if (pSprite->statnum < kMaxStatus && pSprite->extra > 0) { XSPRITE *pXSprite = &xsprite[pSprite->extra]; if ((pXSprite->lSkill & (1 << gameOptions->nDifficulty)) || (pXSprite->lS && gameOptions->nGameType == 0) || (pXSprite->lB && gameOptions->nGameType == 2) || (pXSprite->lT && gameOptions->nGameType == 3) || (pXSprite->lC && gameOptions->nGameType == 1)) { DeleteSprite(i); continue; } #ifdef NOONE_EXTENSIONS if (!gModernMap && nnExtEraseModernStuff(pSprite, pXSprite)) modernTypesErased++; #endif } } #ifdef NOONE_EXTENSIONS if (!gModernMap) Printf("> Modern types erased: %d.\n", modernTypesErased); #endif startpos.z = getflorzofslope(startsectnum,startpos.x,startpos.y); for (int i = 0; i < kMaxPlayers; i++) { gStartZone[i].x = startpos.x; gStartZone[i].y = startpos.y; gStartZone[i].z = startpos.z; gStartZone[i].sectnum = startsectnum; gStartZone[i].ang = startang; #ifdef NOONE_EXTENSIONS // Create spawn zones for players in teams mode. if (gModernMap && i <= kMaxPlayers / 2) { gStartZoneTeam1[i].x = startpos.x; gStartZoneTeam1[i].y = startpos.y; gStartZoneTeam1[i].z = startpos.z; gStartZoneTeam1[i].sectnum = startsectnum; gStartZoneTeam1[i].ang = startang; gStartZoneTeam2[i].x = startpos.x; gStartZoneTeam2[i].y = startpos.y; gStartZoneTeam2[i].z = startpos.z; gStartZoneTeam2[i].sectnum = startsectnum; gStartZoneTeam2[i].ang = startang; } #endif } InitSectorFX(); warpInit(); actInit(false); evInit(); for (int i = connecthead; i >= 0; i = connectpoint2[i]) { if (!(gameOptions->uGameFlags&1)) { if (numplayers == 1) { gProfile[i].skill = gSkill; gProfile[i].nAutoAim = cl_autoaim; gProfile[i].nWeaponSwitch = cl_weaponswitch; } playerInit(i,0); } playerStart(i, 1); } if (gameOptions->uGameFlags&1) { for (int i = connecthead; i >= 0; i = connectpoint2[i]) { PLAYER *pPlayer = &gPlayer[i]; pPlayer->pXSprite->health &= 0xf000; pPlayer->pXSprite->health |= gHealthTemp[i]; pPlayer->weaponQav = gPlayerTemp[i].weaponQav; pPlayer->curWeapon = gPlayerTemp[i].curWeapon; pPlayer->weaponState = gPlayerTemp[i].weaponState; pPlayer->weaponAmmo = gPlayerTemp[i].weaponAmmo; pPlayer->qavCallback = gPlayerTemp[i].qavCallback; pPlayer->qavLoop = gPlayerTemp[i].qavLoop; pPlayer->weaponTimer = gPlayerTemp[i].weaponTimer; pPlayer->nextWeapon = gPlayerTemp[i].nextWeapon; } } gameOptions->uGameFlags &= ~3; PreloadCache(); InitMirrors(); gFrameClock = 0; trInit(); if (!bVanilla && !gMe->packSlots[1].isActive) // if diving suit is not active, turn off reverb sound effect sfxSetReverb(0); ambInit(); netReset(); gFrame = 0; gChokeCounter = 0; M_ClearMenus(); // viewSetMessage(""); viewSetErrorMessage(""); netWaitForEveryone(0); totalclock = 0; paused = 0; ready2send = 1; } bool gRestartGame = false; void ProcessFrame(void) { char buffer[128]; for (int i = connecthead; i >= 0; i = connectpoint2[i]) { gPlayer[i].input.buttonFlags = gFifoInput[gNetFifoTail&255][i].buttonFlags; gPlayer[i].input.keyFlags.word |= gFifoInput[gNetFifoTail&255][i].keyFlags.word; gPlayer[i].input.useFlags.byte |= gFifoInput[gNetFifoTail&255][i].useFlags.byte; if (gFifoInput[gNetFifoTail&255][i].newWeapon) gPlayer[i].input.newWeapon = gFifoInput[gNetFifoTail&255][i].newWeapon; gPlayer[i].input.forward = gFifoInput[gNetFifoTail&255][i].forward; gPlayer[i].input.q16turn = gFifoInput[gNetFifoTail&255][i].q16turn; gPlayer[i].input.strafe = gFifoInput[gNetFifoTail&255][i].strafe; gPlayer[i].input.q16mlook = gFifoInput[gNetFifoTail&255][i].q16mlook; } gNetFifoTail++; #if 0 if (!(gFrame&7)) { CalcGameChecksum(); memcpy(gCheckFifo[gCheckHead[myconnectindex]&255][myconnectindex], gChecksum, sizeof(gChecksum)); gCheckHead[myconnectindex]++; } #endif for (int i = connecthead; i >= 0; i = connectpoint2[i]) { if (gPlayer[i].input.keyFlags.quit) { gPlayer[i].input.keyFlags.quit = 0; netBroadcastPlayerLogoff(i); if (i == myconnectindex) { // netBroadcastMyLogoff(gQuitRequest == 2); gQuitGame = true; gRestartGame = gQuitRequest == 2; netDeinitialize(); netResetToSinglePlayer(); return; } } if (gPlayer[i].input.keyFlags.restart) { gPlayer[i].input.keyFlags.restart = 0; levelRestart(); return; } if (gPlayer[i].input.keyFlags.pause) { gPlayer[i].input.keyFlags.pause = 0; if (paused && gGameOptions.nGameType > 0 && numplayers > 1) { sprintf(buffer,"%s paused the game",gProfile[i].name); viewSetMessage(buffer); } } } viewClearInterpolations(); { if (paused || gEndGameMgr.at0 || (gGameOptions.nGameType == 0 && M_Active())) return; } for (int i = connecthead; i >= 0; i = connectpoint2[i]) { viewBackupView(i); playerProcess(&gPlayer[i]); } trProcessBusy(); evProcess((int)gFrameClock); seqProcess(4); DoSectorPanning(); actProcessSprites(); actPostProcess(); #ifdef POLYMER G_RefreshLights(); #endif viewCorrectPrediction(); ambProcess(); viewUpdateDelirium(); viewUpdateShake(); sfxUpdate3DSounds(); if (gMe->hand == 1) { const int CHOKERATE = 8; const int COUNTRATE = 30; gChokeCounter += CHOKERATE; while (gChokeCounter >= COUNTRATE) { gChoke.at1c(gMe); gChokeCounter -= COUNTRATE; } } gLevelTime++; gFrame++; gFrameClock += 4; if ((gGameOptions.uGameFlags&1) != 0 && !gStartNewGame) { ready2send = 0; #if 0 if (gNetPlayers > 1 && gNetMode == NETWORK_SERVER && gPacketMode == PACKETMODE_1 && myconnectindex == connecthead) { while (gNetFifoMasterTail < gNetFifoTail) { netGetPackets(); h andleevents(); netMasterUpdate(); } } #endif seqKillAll(); if (gGameOptions.uGameFlags&2) { STAT_Update(true); if (gGameOptions.nGameType == 0) { auto completion = [] (bool) { gamestate = GS_MENUSCREEN; M_StartControlPanel(false); M_SetMenu(NAME_Mainmenu); M_SetMenu(NAME_CreditsMenu); gGameOptions.uGameFlags &= ~3; gQuitGame = 1; }; if (gGameOptions.uGameFlags&8) { levelPlayEndScene(gGameOptions.nEpisode, completion); } else completion(false); } else { gGameOptions.uGameFlags &= ~3; gRestartGame = 1; gQuitGame = 1; } } else { gEndGameMgr.Setup(); } } } void ParseOptions(void) { } void ClockStrobe() { //gGameClock++; } void ReadAllRFS(); static const char* actions[] = { "Move_Forward", "Move_Backward", "Turn_Left", "Turn_Right", "Strafe", "Fire", "Open", "Run", "Alt_Fire", // Duke3D", Blood "Jump", "Crouch", "Look_Up", "Look_Down", "Look_Left", "Look_Right", "Strafe_Left", "Strafe_Right", "Aim_Up", "Aim_Down", "SendMessage", "Map", "Shrink_Screen", "Enlarge_Screen", "Show_Opponents_Weapon", "Map_Follow_Mode", "See_Coop_View", "Mouse_Aiming", "Toggle_Crosshair", "Dpad_Select", "Dpad_Aiming", "Third_Person_View", "Toggle_Crouch", }; static void app_init() { InitCheats(); buttonMap.SetButtons(actions, NUM_ACTIONS); memcpy(&gGameOptions, &gSingleGameOptions, sizeof(GAMEOPTIONS)); gGameOptions.nMonsterSettings = !userConfig.nomonsters; bQuickStart = userConfig.nologo; ReadAllRFS(); HookReplaceFunctions(); Printf("Initializing Build 3D engine\n"); engineInit(); Printf("Loading tiles\n"); if (!tileInit(0, NULL)) I_FatalError("TILES###.ART files not found"); levelLoadDefaults(); loaddefinitionsfile(BLOODWIDESCREENDEF); loaddefinitions_game(BLOODWIDESCREENDEF, FALSE); const char* defsfile = G_DefFile(); uint32_t stime = timerGetTicks(); if (!loaddefinitionsfile(defsfile)) { uint32_t etime = timerGetTicks(); Printf("Definitions file \"%s\" loaded in %d ms.\n", defsfile, etime - stime); } loaddefinitions_game(defsfile, FALSE); powerupInit(); Printf("Loading cosine table\n"); trigInit(); Printf("Initializing view subsystem\n"); viewInit(); Printf("Initializing dynamic fire\n"); FireInit(); Printf("Initializing weapon animations\n"); WeaponInit(); LoadSaveSetup(); LoadSavedInfo(); Printf("Loading control setup\n"); ctrlInit(); timerInit(120); timerSetCallback(ClockStrobe); Printf("Initializing network users\n"); netInitialize(true); videoInit(); Printf("Initializing sound system\n"); sndInit(); registerosdcommands(); registerinputcommands(); gChoke.sub_83ff0(518, sub_84230); if (bAddUserMap) { levelAddUserMap(gUserMapFilename); gStartNewGame = 1; } videoSetViewableArea(0, 0, xdim - 1, ydim - 1); UpdateDacs(0, true); } static void gameInit() { //RESTART: netReset(); gViewIndex = myconnectindex; gMe = gView = &gPlayer[myconnectindex]; netBroadcastPlayerInfo(myconnectindex); #if 0 Printf("Waiting for network players!\n"); netWaitForEveryone(0); if (gRestartGame) { // Network error gQuitGame = false; gRestartGame = false; netDeinitialize(); netResetToSinglePlayer(); goto RESTART; } #endif UpdateNetworkMenus(); gQuitGame = 0; gRestartGame = 0; if (gGameOptions.nGameType > 0) { inputState.ClearAllInput(); } } static void gameTicker() { bool gameUpdate = false; double const gameUpdateStartTime = timerGetHiTicks(); while (gPredictTail < gNetFifoHead[myconnectindex] && !paused) { viewUpdatePrediction(&gFifoInput[gPredictTail & 255][myconnectindex]); } if (numplayers == 1) gBufferJitter = 0; while (totalclock >= gNetFifoClock && ready2send) { gNetInput = gInput; gInput = {}; netGetInput(); gNetFifoClock += 4; while (gNetFifoHead[myconnectindex] - gNetFifoTail > gBufferJitter && !gStartNewGame && !gQuitGame) { int i; for (i = connecthead; i >= 0; i = connectpoint2[i]) if (gNetFifoHead[i] == gNetFifoTail) break; if (i >= 0) break; ProcessFrame(); gameUpdate = true; } } if (gameUpdate) { g_gameUpdateTime = timerGetHiTicks() - gameUpdateStartTime; if (g_gameUpdateAvgTime < 0.f) g_gameUpdateAvgTime = g_gameUpdateTime; g_gameUpdateAvgTime = ((GAMEUPDATEAVGTIMENUMSAMPLES - 1.f) * g_gameUpdateAvgTime + g_gameUpdateTime) / ((float)GAMEUPDATEAVGTIMENUMSAMPLES); } if (gQuitRequest && gQuitGame) videoClearScreen(0); else { netCheckSync(); viewDrawScreen(); g_gameUpdateAndDrawTime = g_beforeSwapTime/* timerGetHiTicks()*/ - gameUpdateStartTime; } } static void drawBackground() { twod->ClearScreen(); DrawTexture(twod, tileGetTexture(2518, true), 0, 0, DTA_FullscreenEx, FSMode_ScaleToFit43, TAG_DONE); if (gQuitRequest && !gQuitGame) netBroadcastMyLogoff(gQuitRequest == 2); } static void commonTicker(bool &playvideo) { if (TestBitString(gotpic, 2342)) { FireProcess(); ClearBitString(gotpic, 2342); } if (gStartNewGame) { gStartNewGame = false; gQuitGame = false; auto completion = [](bool = false) { StartLevel(&gGameOptions); levelTryPlayMusicOrNothing(gGameOptions.nEpisode, gGameOptions.nLevel); gNetFifoClock = gFrameClock = totalclock; gamestate = GS_LEVEL; }; if (gEpisodeInfo[gGameOptions.nEpisode].cutALevel == gGameOptions.nLevel && gEpisodeInfo[gGameOptions.nEpisode].cutsceneAName[0]) levelPlayIntroScene(gGameOptions.nEpisode, completion); else completion(false); } if (gRestartGame) { Mus_Stop(); soundEngine->StopAllChannels(); gQuitGame = 0; gQuitRequest = 0; gRestartGame = 0; levelSetupOptions(0, 0); if (gGameOptions.nGameType != 0) { playvideo = !bQuickStart; } else playvideo = false; gamestate = GS_STARTUP; } } int GameInterface::app_main() { app_init(); gamestate = GS_STARTUP; bool playvideo = !bQuickStart; while (true) { if (gamestate == GS_STARTUP) gameInit(); commonTicker(playvideo); netGetPackets(); handleevents(); updatePauseStatus(); D_ProcessEvents(); ctrlGetInput(); switch (gamestate) { default: case GS_STARTUP: if (playvideo) playlogos(); else { gamestate = GS_MENUSCREEN; M_StartControlPanel(false); M_SetMenu(NAME_Mainmenu); } break; case GS_MENUSCREEN: case GS_FULLCONSOLE: drawBackground(); break; case GS_INTRO: case GS_INTERMISSION: RunScreenJobFrame(); // This handles continuation through its completion callback. break; case GS_LEVEL: gameTicker(); LocalKeys(); break; case GS_FINALE: gEndGameMgr.ProcessKeys(); gEndGameMgr.Draw(); break; } videoNextPage(); } return 0; } static int parsedefinitions_game(scriptfile *, int); static void parsedefinitions_game_include(const char *fileName, scriptfile *pScript, const char *cmdtokptr, int const firstPass) { scriptfile *included = scriptfile_fromfile(fileName); if (!included) { if (!Bstrcasecmp(cmdtokptr,"null") || pScript == NULL) // this is a bit overboard to prevent unused parameter warnings { // Printf("Warning: Failed including %s as module\n", fn); } /* else { Printf("Warning: Failed including %s on line %s:%d\n", fn, script->filename,scriptfile_getlinum(script,cmdtokptr)); } */ } else { parsedefinitions_game(included, firstPass); scriptfile_close(included); } } static int parsedefinitions_game(scriptfile *pScript, int firstPass) { int token; char *pToken; static const tokenlist tokens[] = { { "include", T_INCLUDE }, { "#include", T_INCLUDE }, { "includedefault", T_INCLUDEDEFAULT }, { "#includedefault", T_INCLUDEDEFAULT }, { "loadgrp", T_LOADGRP }, { "cachesize", T_CACHESIZE }, { "noautoload", T_NOAUTOLOAD }, { "sound", T_SOUND }, //{ "cutscene", T_CUTSCENE }, //{ "animsounds", T_ANIMSOUNDS }, { "renamefile", T_RENAMEFILE }, { "globalgameflags", T_GLOBALGAMEFLAGS }, { "rffdefineid", T_RFFDEFINEID }, { "tilefromtexture", T_TILEFROMTEXTURE }, }; static const tokenlist soundTokens[] = { { "id", T_ID }, { "file", T_FILE }, { "minpitch", T_MINPITCH }, { "maxpitch", T_MAXPITCH }, { "priority", T_PRIORITY }, { "type", T_TYPE }, { "distance", T_DISTANCE }, { "volume", T_VOLUME }, }; #if 0 static const tokenlist animTokens [] = { { "delay", T_DELAY }, { "aspect", T_ASPECT }, { "sounds", T_SOUND }, { "forcefilter", T_FORCEFILTER }, { "forcenofilter", T_FORCENOFILTER }, { "texturefilter", T_TEXTUREFILTER }, }; #endif do { token = getatoken(pScript, tokens, ARRAY_SIZE(tokens)); pToken = pScript->ltextptr; switch (token) { case T_LOADGRP: { char *fileName; if (!scriptfile_getstring(pScript,&fileName) && firstPass) { fileSystem.AddAdditionalFile(fileName); } } break; case T_CACHESIZE: { int32_t cacheSize; if (scriptfile_getnumber(pScript, &cacheSize) || !firstPass) break; } break; case T_INCLUDE: { char *fileName; if (!scriptfile_getstring(pScript, &fileName)) parsedefinitions_game_include(fileName, pScript, pToken, firstPass); break; } case T_INCLUDEDEFAULT: { parsedefinitions_game_include(G_DefaultDefFile(), pScript, pToken, firstPass); break; } case T_NOAUTOLOAD: if (firstPass) gNoAutoLoad = true; break; case T_RFFDEFINEID: { char *resName = NULL; char *resType = NULL; char *rffName = NULL; int resID; if (scriptfile_getstring(pScript, &resName)) break; if (scriptfile_getstring(pScript, &resType)) break; if (scriptfile_getnumber(pScript, &resID)) break; if (scriptfile_getstring(pScript, &rffName)) break; if (!firstPass) { FStringf name("%s.%s", resName, resType); fileSystem.CreatePathlessCopy(resName, resID, 0); } } break; case T_TILEFROMTEXTURE: { char *texturetokptr = pScript->ltextptr, *textureend; int32_t tile = -1; int32_t havesurface = 0, havevox = 0, haveview = 0, haveshade = 0; int32_t surface = 0, vox = 0, view = 0, shade = 0; int32_t tile_crc32 = 0; vec2_t tile_size{}; uint8_t have_crc32 = 0; uint8_t have_size = 0; static const tokenlist tilefromtexturetokens[] = { { "surface", T_SURFACE }, { "voxel", T_VOXEL }, { "ifcrc", T_IFCRC }, { "view", T_VIEW }, { "shade", T_SHADE }, }; if (scriptfile_getsymbol(pScript,&tile)) break; if (scriptfile_getbraces(pScript,&textureend)) break; while (pScript->textptr < textureend) { int32_t token = getatoken(pScript,tilefromtexturetokens,ARRAY_SIZE(tilefromtexturetokens)); switch (token) { case T_IFCRC: scriptfile_getsymbol(pScript, &tile_crc32); have_crc32 = 1; break; case T_IFMATCH: { char *ifmatchend; static const tokenlist ifmatchtokens[] = { { "crc32", T_CRC32 }, { "size", T_SIZE }, }; if (scriptfile_getbraces(pScript,&ifmatchend)) break; while (pScript->textptr < ifmatchend) { int32_t token = getatoken(pScript,ifmatchtokens,ARRAY_SIZE(ifmatchtokens)); switch (token) { case T_CRC32: scriptfile_getsymbol(pScript, &tile_crc32); have_crc32 = 1; break; case T_SIZE: scriptfile_getsymbol(pScript, &tile_size.x); scriptfile_getsymbol(pScript, &tile_size.y); have_size = 1; break; default: break; } } break; } case T_SURFACE: havesurface = 1; scriptfile_getsymbol(pScript, &surface); break; case T_VOXEL: havevox = 1; scriptfile_getsymbol(pScript, &vox); break; case T_VIEW: haveview = 1; scriptfile_getsymbol(pScript, &view); break; case T_SHADE: haveshade = 1; scriptfile_getsymbol(pScript, &shade); break; } } if (!firstPass) { if (EDUKE32_PREDICT_FALSE((unsigned)tile >= MAXUSERTILES)) { Printf("Error: missing or invalid 'tile number' for texture definition near line %s:%d\n", pScript->filename, scriptfile_getlinum(pScript,texturetokptr)); break; } if (have_crc32) { int32_t const orig_crc32 = tileGetCRC32(tile); if (orig_crc32 != tile_crc32) { // Printf("CRC32 of tile %d doesn't match! CRC32: %d, Expected: %d\n", tile, orig_crc32, tile_crc32); break; } } if (have_size) { vec2_16_t const orig_size = tilesiz[tile]; if (orig_size.x != tile_size.x && orig_size.y != tile_size.y) { // Printf("Size of tile %d doesn't match! Size: (%d, %d), Expected: (%d, %d)\n", tile, orig_size.x, orig_size.y, tile_size.x, tile_size.y); break; } } if (havesurface) surfType[tile] = surface; if (havevox) voxelIndex[tile] = vox; if (haveshade) tileShade[tile] = shade; if (haveview) picanm[tile].extra = view&7; } } break; case T_GLOBALGAMEFLAGS: scriptfile_getnumber(pScript, &blood_globalflags); break; case T_EOF: return 0; default: break; } } while (1); return 0; } int loaddefinitions_game(const char *fileName, int32_t firstPass) { scriptfile *pScript = scriptfile_fromfile(fileName); if (pScript) parsedefinitions_game(pScript, firstPass); if (userConfig.AddDefs) for (auto & m : *userConfig.AddDefs) parsedefinitions_game_include(m, NULL, "null", firstPass); if (pScript) scriptfile_close(pScript); scriptfile_clearsymbols(); return 0; } bool DemoRecordStatus(void) { return false; } bool VanillaMode() { return false; } int sndTryPlaySpecialMusic(int nMusic) { if (Mus_Play(nullptr, quoteMgr.GetQuote(nMusic), true)) { return 0; } return 1; } void sndPlaySpecialMusicOrNothing(int nMusic) { if (sndTryPlaySpecialMusic(nMusic)) { Mus_Stop(); } } extern IniFile* BloodINI; void GameInterface::FreeGameData() { if (BloodINI) delete BloodINI; netDeinitialize(); } ReservedSpace GameInterface::GetReservedScreenSpace(int viewsize) { int top = 0; if (gGameOptions.nGameType > 0 && gGameOptions.nGameType <= 3) { top = (tilesiz[2229].y * ((gNetPlayers + 3) / 4)); } return { top, 25 }; } ::GameInterface* CreateInterface() { return new GameInterface; } END_BLD_NS