mirror
/
devilutionX
mirror of https://github.com/diasurgical/devilutionX.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
6533 Commits
44 Branches
22 Tags
292 MiB
 
 
 
 
 
 
Tree: f4f6a8a51e
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'f4f6a8a51e'
${ noResults }
devilutionX/Source/diablo.cpp

2110 lines
51 KiB
Raw Blame History

/**
* @file diablo.cpp
*
* Implementation of the main game initialization functions.
*/
#include <array>
#include <fmt/format.h>
#include <config.h>
#include "automap.h"
#include "capture.h"
#include "control.h"
#include "cursor.h"
#include "dead.h"
#ifdef _DEBUG
#include "debug.h"
#endif
#include "DiabloUI/diabloui.h"
#include "doom.h"
#include "drlg_l1.h"
#include "drlg_l2.h"
#include "drlg_l3.h"
#include "drlg_l4.h"
#include "dx.h"
#include "encrypt.h"
#include "engine/cel_sprite.hpp"
#include "engine/load_cel.hpp"
#include "engine/load_file.hpp"
#include "error.h"
#include "gamemenu.h"
#include "gmenu.h"
#include "help.h"
#include "init.h"
#include "lighting.h"
#include "loadsave.h"
#include "mainmenu.h"
#include "minitext.h"
#include "missiles.h"
#include "movie.h"
#include "multi.h"
#include "nthread.h"
#include "objects.h"
#include "options.h"
#include "pfile.h"
#include "plrmsg.h"
#include "qol/common.h"
#include "qol/itemlabels.h"
#include "restrict.h"
#include "setmaps.h"
#include "stores.h"
#include "storm/storm.h"
#include "themes.h"
#include "town.h"
#include "towners.h"
#include "track.h"
#include "trigs.h"
#include "utils/console.h"
#include "utils/language.h"
#include "utils/paths.h"
#include "utils/language.h"
#include "controls/keymapper.hpp"
#ifndef NOSOUND
#include "sound.h"
#endif
#ifdef GPERF_HEAP_FIRST_GAME_ITERATION
#include <gperftools/heap-profiler.h>
#endif
namespace devilution {
SDL_Window *ghMainWnd;
DWORD glSeedTbl[NUMLEVELS];
dungeon_type gnLevelTypeTbl[NUMLEVELS];
int glEndSeed[NUMLEVELS];
int glMid1Seed[NUMLEVELS];
int glMid2Seed[NUMLEVELS];
int glMid3Seed[NUMLEVELS];
int MouseX;
int MouseY;
bool gbGameLoopStartup;
bool gbRunGame;
bool gbRunGameResult;
bool zoomflag;
/** Enable updating of player character, set to false once Diablo dies */
bool gbProcessPlayers;
bool gbLoadGame;
bool cineflag;
int force_redraw;
int setseed;
int PauseMode;
bool forceSpawn;
bool forceDiablo;
bool gbNestArt;
bool gbBard;
bool gbBarbarian;
bool gbQuietMode = false;
int sgnTimeoutCurs;
clicktype sgbMouseDown;
int color_cycle_timer;
uint16_t gnTickDelay = 50;
Keymapper keymapper {
// Workaround: remove once the INI library has been replaced.
[](const std::string &key, const std::string &value) {
setIniValue("Keymapping", key.c_str(), value.c_str());
},
[](const std::string &key) -> std::string {
std::array<char, 64> result;
if (!getIniValue("Keymapping", key.c_str(), result.data(), result.size()))
return {};
return { result.data() };
}
};
std::array<Keymapper::ActionIndex, 4> quickSpellActionIndexes;
/* rdata */
bool gbForceWindowed = false;
bool gbShowIntro = true;
bool leveldebug = false;
#ifdef _DEBUG
bool monstdebug = false;
_monster_id DebugMonsters[10];
int debugmonsttypes = 0;
bool visiondebug = false;
int questdebug = -1;
bool debug_mode_key_s = false;
bool debug_mode_key_w = false;
bool debug_mode_key_inverted_v = false;
bool debug_mode_dollar_sign = false;
bool debug_mode_key_i = false;
int debug_mode_key_j = 0;
int arrowdebug = 0;
#endif
/** Specifies whether players are in non-PvP mode. */
bool gbFriendlyMode = true;
QuickMessage QuickMessages[QUICK_MESSAGE_OPTIONS] = {
{ "QuickMessage1", N_("I need help! Come Here!") },
{ "QuickMessage2", N_("Follow me.") },
{ "QuickMessage3", N_("Here's something for you.") },
{ "QuickMessage4", N_("Now you DIE!") }
};
/** To know if these things have been done when we get to the diablo_deinit() function */
bool was_archives_init = false;
/** To know if surfaces have been initialized or not */
bool was_window_init = false;
bool was_ui_init = false;
bool was_snd_init = false;
// Controller support:
extern void plrctrls_every_frame();
extern void plrctrls_after_game_logic();
void initKeymapActions();
[[noreturn]] static void print_help_and_exit()
{
printInConsole("%s", _(/* TRANSLATORS: Commandline Option */ "Options:\n"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "-h, --help", _("Print this message and exit"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--version", _("Print the version and exit"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--data-dir", _("Specify the folder of diabdat.mpq"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--save-dir", _("Specify the folder of save files"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--config-dir", _("Specify the location of diablo.ini"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--ttf-dir", _("Specify the location of the .ttf font"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--ttf-name", _("Specify the name of a custom .ttf font"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "-n", _("Skip startup videos"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "-f", _("Display frames per second"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "-x", _("Run in windowed mode"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--verbose", _("Enable verbose logging"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--spawn", _("Force spawn mode even if diabdat.mpq is found"));
printInConsole("%s", _(/* TRANSLATORS: Commandline Option */ "\nHellfire options:\n"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--diablo", _("Force diablo mode even if hellfire.mpq is found"));
printInConsole(" %-20s %-30s\n", /* TRANSLATORS: Commandline Option */ "--nestart", _("Use alternate nest palette"));
#ifdef _DEBUG
printInConsole("\nDebug options:\n");
printInConsole(" %-20s %-30s\n", "-w", "Enable cheats");
printInConsole(" %-20s %-30s\n", "-$", "Enable god mode");
printInConsole(" %-20s %-30s\n", "-^", "Enable god mode and debug tools");
printInConsole(" %-20s %-30s\n", "-v", "Highlight visibility");
printInConsole(" %-20s %-30s\n", "-i", "Ignore network timeout");
printInConsole(" %-20s %-30s\n", "-j <##>", "Mausoleum warps to given level");
printInConsole(" %-20s %-30s\n", "-l <##> <##>", "Start in level as type");
printInConsole(" %-20s %-30s\n", "-m <##>", "Add debug monster, up to 10 allowed");
printInConsole(" %-20s %-30s\n", "-q <#>", "Force a certain quest");
printInConsole(" %-20s %-30s\n", "-r <##########>", "Set map seed");
printInConsole(" %-20s %-30s\n", "-t <##>", "Set current quest level");
#endif
printInConsole("%s", _("\nReport bugs at https://github.com/diasurgical/devilutionX/\n"));
diablo_quit(0);
}
static void diablo_parse_flags(int argc, char **argv)
{
for (int i = 1; i < argc; i++) {
if (strcasecmp("-h", argv[i]) == 0 || strcasecmp("--help", argv[i]) == 0) {
print_help_and_exit();
} else if (strcasecmp("--version", argv[i]) == 0) {
printInConsole("%s v%s\n", PROJECT_NAME, PROJECT_VERSION);
diablo_quit(0);
} else if (strcasecmp("--data-dir", argv[i]) == 0) {
paths::SetBasePath(argv[++i]);
} else if (strcasecmp("--save-dir", argv[i]) == 0) {
paths::SetPrefPath(argv[++i]);
} else if (strcasecmp("--config-dir", argv[i]) == 0) {
paths::SetConfigPath(argv[++i]);
} else if (strcasecmp("--lang-dir", argv[i]) == 0) {
paths::SetLangPath(argv[++i]);
} else if (strcasecmp("--ttf-dir", argv[i]) == 0) {
paths::SetTtfPath(argv[++i]);
} else if (strcasecmp("--ttf-name", argv[i]) == 0) {
paths::SetTtfName(argv[++i]);
} else if (strcasecmp("-n", argv[i]) == 0) {
gbShowIntro = false;
} else if (strcasecmp("-f", argv[i]) == 0) {
EnableFrameCount();
} else if (strcasecmp("-x", argv[i]) == 0) {
gbForceWindowed = true;
} else if (strcasecmp("--spawn", argv[i]) == 0) {
forceSpawn = true;
} else if (strcasecmp("--diablo", argv[i]) == 0) {
forceDiablo = true;
} else if (strcasecmp("--nestart", argv[i]) == 0) {
gbNestArt = true;
} else if (strcasecmp("--vanilla", argv[i]) == 0) {
gbVanilla = true;
} else if (strcasecmp("--verbose", argv[i]) == 0) {
SDL_LogSetAllPriority(SDL_LOG_PRIORITY_VERBOSE);
#ifdef _DEBUG
} else if (strcasecmp("-^", argv[i]) == 0) {
debug_mode_key_inverted_v = true;
} else if (strcasecmp("-$", argv[i]) == 0) {
debug_mode_dollar_sign = true;
} else if (strcasecmp("-i", argv[i]) == 0) {
debug_mode_key_i = true;
} else if (strcasecmp("-j", argv[i]) == 0) {
debug_mode_key_j = SDL_atoi(argv[++i]);
} else if (strcasecmp("-l", argv[i]) == 0) {
setlevel = false;
leveldebug = true;
leveltype = (dungeon_type)SDL_atoi(argv[++i]);
currlevel = SDL_atoi(argv[++i]);
plr[0].plrlevel = currlevel;
} else if (strcasecmp("-m", argv[i]) == 0) {
monstdebug = true;
DebugMonsters[debugmonsttypes++] = (_monster_id)SDL_atoi(argv[++i]);
} else if (strcasecmp("-q", argv[i]) == 0) {
questdebug = SDL_atoi(argv[++i]);
} else if (strcasecmp("-r", argv[i]) == 0) {
setseed = SDL_atoi(argv[++i]);
} else if (strcasecmp("-s", argv[i]) == 0) {
debug_mode_key_s = true;
} else if (strcasecmp("-t", argv[i]) == 0) {
leveldebug = true;
setlevel = true;
setlvlnum = (_setlevels)SDL_atoi(argv[++i]);
} else if (strcasecmp("-v", argv[i]) == 0) {
visiondebug = true;
} else if (strcasecmp("-w", argv[i]) == 0) {
debug_mode_key_w = true;
#endif
} else {
printInConsole("%s", fmt::format(_("unrecognized option '{:s}'\n"), argv[i]).c_str());
print_help_and_exit();
}
}
}
void FreeGameMem()
{
music_stop();
pDungeonCels = nullptr;
pMegaTiles = nullptr;
pLevelPieces = nullptr;
pSpecialCels = std::nullopt;
FreeMissiles();
FreeMonsters();
FreeObjectGFX();
FreeMonsterSnd();
FreeTownerGFX();
}
static void start_game(interface_mode uMsg)
{
zoomflag = true;
CalcViewportGeometry();
cineflag = false;
InitCursor();
#ifdef _DEBUG
LoadDebugGFX();
#endif
assert(ghMainWnd);
music_stop();
InitQol();
ShowProgress(uMsg);
gmenu_init_menu();
InitLevelCursor();
sgnTimeoutCurs = CURSOR_NONE;
sgbMouseDown = CLICK_NONE;
track_repeat_walk(false);
}
static void free_game()
{
FreeQol();
FreeControlPan();
FreeInvGFX();
FreeGMenu();
FreeQuestText();
FreeStoreMem();
for (auto &player : plr)
ResetPlayerGFX(player);
FreeCursor();
#ifdef _DEBUG
FreeDebugGFX();
#endif
FreeGameMem();
}
// Controller support: Actions to run after updating the cursor state.
// Defined in SourceX/controls/plctrls.cpp.
extern void finish_simulated_mouse_clicks(int current_mouse_x, int current_mouse_y);
extern void plrctrls_after_check_curs_move();
static bool ProcessInput()
{
if (PauseMode == 2) {
return false;
}
plrctrls_every_frame();
if (!gbIsMultiplayer && gmenu_is_active()) {
force_redraw |= 1;
return false;
}
if (!gmenu_is_active() && sgnTimeoutCurs == CURSOR_NONE) {
#ifndef USE_SDL1
finish_simulated_mouse_clicks(MouseX, MouseY);
#endif
CheckCursMove();
plrctrls_after_check_curs_move();
track_process();
}
return true;
}
static void run_game_loop(interface_mode uMsg)
{
WNDPROC saveProc;
tagMSG msg;
nthread_ignore_mutex(true);
start_game(uMsg);
assert(ghMainWnd);
saveProc = SetWindowProc(GM_Game);
control_update_life_mana();
run_delta_info();
gbRunGame = true;
gbProcessPlayers = true;
gbRunGameResult = true;
force_redraw = 255;
DrawAndBlit();
LoadPWaterPalette();
PaletteFadeIn(8);
force_redraw = 255;
gbGameLoopStartup = true;
nthread_ignore_mutex(false);
#ifdef GPERF_HEAP_FIRST_GAME_ITERATION
unsigned run_game_iteration = 0;
#endif
while (gbRunGame) {
while (FetchMessage(&msg)) {
if (msg.message == DVL_WM_QUIT) {
gbRunGameResult = false;
gbRunGame = false;
break;
}
TranslateMessage(&msg);
PushMessage(&msg);
}
if (!gbRunGame)
break;
if (!nthread_has_500ms_passed()) {
ProcessInput();
force_redraw |= 1;
DrawAndBlit();
continue;
}
diablo_color_cyc_logic();
multi_process_network_packets();
game_loop(gbGameLoopStartup);
gbGameLoopStartup = false;
DrawAndBlit();
#ifdef GPERF_HEAP_FIRST_GAME_ITERATION
if (run_game_iteration++ == 0)
HeapProfilerDump("first_game_iteration");
#endif
}
if (gbIsMultiplayer) {
pfile_write_hero(/*write_game_data=*/false, /*clear_tables=*/true);
}
PaletteFadeOut(8);
NewCursor(CURSOR_NONE);
ClearScreenBuffer();
force_redraw = 255;
scrollrt_draw_game_screen();
saveProc = SetWindowProc(saveProc);
assert(saveProc == GM_Game);
free_game();
if (cineflag) {
cineflag = false;
DoEnding();
}
}
bool StartGame(bool bNewGame, bool bSinglePlayer)
{
gbSelectProvider = true;
do {
gbLoadGame = false;
if (!NetInit(bSinglePlayer)) {
gbRunGameResult = true;
break;
}
// Save 2.8 MiB of RAM by freeing all main menu resources
// before starting the game.
UiDestroy();
gbSelectProvider = false;
if (bNewGame || !gbValidSaveFile) {
InitLevels();
InitQuests();
InitPortals();
InitDungMsgs(plr[myplr]);
}
interface_mode uMsg = WM_DIABNEWGAME;
if (gbValidSaveFile && gbLoadGame) {
uMsg = WM_DIABLOADGAME;
}
run_game_loop(uMsg);
NetClose();
// If the player left the game into the main menu,
// initialize main menu resources.
if (gbRunGameResult)
UiInitialize();
} while (gbRunGameResult);
SNetDestroy();
return gbRunGameResult;
}
static void diablo_init_screen()
{
MouseX = gnScreenWidth / 2;
MouseY = gnScreenHeight / 2;
if (!sgbControllerActive)
SetCursorPos(MouseX, MouseY);
ScrollInfo.tile = { 0, 0 };
ScrollInfo.offset = { 0, 0 };
ScrollInfo._sdir = SDIR_NONE;
ClrDiabloMsg();
}
char gszVersionNumber[64] = "internal version unknown";
char gszProductName[64] = "DevilutionX vUnknown";
static void SetApplicationVersions()
{
snprintf(gszProductName, sizeof(gszProductName) / sizeof(char), "%s v%s", PROJECT_NAME, PROJECT_VERSION);
strncpy(gszVersionNumber, fmt::format(_("version {:s}"), PROJECT_VERSION).c_str(), sizeof(gszVersionNumber) / sizeof(char));
}
static void diablo_init()
{
if (sgOptions.Graphics.bShowFPS)
EnableFrameCount();
init_create_window();
was_window_init = true;
SFileEnableDirectAccess(true);
init_archives();
was_archives_init = true;
if (forceSpawn)
gbIsSpawn = true;
if (forceDiablo)
gbIsHellfire = false;
gbIsHellfireSaveGame = gbIsHellfire;
LanguageInitialize();
SetApplicationVersions();
for (size_t i = 0; i < QUICK_MESSAGE_OPTIONS; i++) {
if (strlen(sgOptions.Chat.szHotKeyMsgs[i]) != 0) {
continue;
}
strncpy(sgOptions.Chat.szHotKeyMsgs[i], _(QuickMessages[i].message), MAX_SEND_STR_LEN);
}
UiInitialize();
UiSetSpawned(gbIsSpawn);
was_ui_init = true;
ReadOnlyTest();
InitHash();
diablo_init_screen();
#ifndef NOSOUND
snd_init();
was_snd_init = true;
#endif
ui_sound_init();
// Item graphics are loaded early, they already get touched during hero selection.
InitItemGFX();
}
static void diablo_splash()
{
if (!gbShowIntro)
return;
play_movie("gendata\\logo.smk", true);
if (gbIsHellfire && sgOptions.Hellfire.bIntro) {
play_movie("gendata\\Hellfire.smk", true);
sgOptions.Hellfire.bIntro = false;
}
if (!gbIsHellfire && !gbIsSpawn && sgOptions.Diablo.bIntro) {
play_movie("gendata\\diablo1.smk", true);
sgOptions.Diablo.bIntro = false;
}
UiTitleDialog();
}
static void diablo_deinit()
{
FreeItemGFX();
if (sbWasOptionsLoaded)
SaveOptions();
if (was_snd_init) {
effects_cleanup_sfx();
}
#ifndef NOSOUND
Aulib::quit();
#endif
if (was_ui_init)
UiDestroy();
if (was_archives_init)
init_cleanup();
if (was_window_init)
dx_cleanup(); // Cleanup SDL surfaces stuff, so we have to do it before SDL_Quit().
if (was_fonts_init)
FontsCleanup();
if (SDL_WasInit(SDL_INIT_EVERYTHING & ~SDL_INIT_HAPTIC) != 0)
SDL_Quit();
}
void diablo_quit(int exitStatus)
{
diablo_deinit();
exit(exitStatus);
}
int DiabloMain(int argc, char **argv)
{
#ifdef _DEBUG
SDL_LogSetAllPriority(SDL_LOG_PRIORITY_DEBUG);
#endif
diablo_parse_flags(argc, argv);
initKeymapActions();
LoadOptions();
diablo_init();
diablo_splash();
mainmenu_loop();
diablo_deinit();
return 0;
}
static bool LeftMouseCmd(bool bShift)
{
bool bNear;
assert(MouseY < PANEL_TOP || MouseX < PANEL_LEFT || MouseX >= PANEL_LEFT + PANEL_WIDTH);
if (leveltype == DTYPE_TOWN) {
if (pcursitem != -1 && pcurs == CURSOR_HAND)
NetSendCmdLocParam1(true, invflag ? CMD_GOTOGETITEM : CMD_GOTOAGETITEM, { cursmx, cursmy }, pcursitem);
if (pcursmonst != -1)
NetSendCmdLocParam1(true, CMD_TALKXY, { cursmx, cursmy }, pcursmonst);
if (pcursitem == -1 && pcursmonst == -1 && pcursplr == -1)
return true;
} else {
auto &myPlayer = plr[myplr];
bNear = myPlayer.position.tile.WalkingDistance({ cursmx, cursmy }) < 2;
if (pcursitem != -1 && pcurs == CURSOR_HAND && !bShift) {
NetSendCmdLocParam1(true, invflag ? CMD_GOTOGETITEM : CMD_GOTOAGETITEM, { cursmx, cursmy }, pcursitem);
} else if (pcursobj != -1 && (!objectIsDisabled(pcursobj)) && (!bShift || (bNear && object[pcursobj]._oBreak == 1))) {
NetSendCmdLocParam1(true, pcurs == CURSOR_DISARM ? CMD_DISARMXY : CMD_OPOBJXY, { cursmx, cursmy }, pcursobj);
} else if (myPlayer._pwtype == WT_RANGED) {
if (bShift) {
NetSendCmdLoc(myplr, true, CMD_RATTACKXY, { cursmx, cursmy });
} else if (pcursmonst != -1) {
if (CanTalkToMonst(pcursmonst)) {
NetSendCmdParam1(true, CMD_ATTACKID, pcursmonst);
} else {
NetSendCmdParam1(true, CMD_RATTACKID, pcursmonst);
}
} else if (pcursplr != -1 && !gbFriendlyMode) {
NetSendCmdParam1(true, CMD_RATTACKPID, pcursplr);
}
} else {
if (bShift) {
if (pcursmonst != -1) {
if (CanTalkToMonst(pcursmonst)) {
NetSendCmdParam1(true, CMD_ATTACKID, pcursmonst);
} else {
NetSendCmdLoc(myplr, true, CMD_SATTACKXY, { cursmx, cursmy });
}
} else {
NetSendCmdLoc(myplr, true, CMD_SATTACKXY, { cursmx, cursmy });
}
} else if (pcursmonst != -1) {
NetSendCmdParam1(true, CMD_ATTACKID, pcursmonst);
} else if (pcursplr != -1 && !gbFriendlyMode) {
NetSendCmdParam1(true, CMD_ATTACKPID, pcursplr);
}
}
if (!bShift && pcursitem == -1 && pcursobj == -1 && pcursmonst == -1 && pcursplr == -1)
return true;
}
return false;
}
bool TryIconCurs()
{
if (pcurs == CURSOR_RESURRECT) {
NetSendCmdParam1(true, CMD_RESURRECT, pcursplr);
return true;
}
if (pcurs == CURSOR_HEALOTHER) {
NetSendCmdParam1(true, CMD_HEALOTHER, pcursplr);
return true;
}
if (pcurs == CURSOR_TELEKINESIS) {
DoTelekinesis();
return true;
}
if (pcurs == CURSOR_IDENTIFY) {
if (pcursinvitem != -1)
CheckIdentify(myplr, pcursinvitem);
else
NewCursor(CURSOR_HAND);
return true;
}
if (pcurs == CURSOR_REPAIR) {
if (pcursinvitem != -1)
DoRepair(myplr, pcursinvitem);
else
NewCursor(CURSOR_HAND);
return true;
}
if (pcurs == CURSOR_RECHARGE) {
if (pcursinvitem != -1)
DoRecharge(myplr, pcursinvitem);
else
NewCursor(CURSOR_HAND);
return true;
}
if (pcurs == CURSOR_OIL) {
if (pcursinvitem != -1)
DoOil(myplr, pcursinvitem);
else
NewCursor(CURSOR_HAND);
return true;
}
if (pcurs == CURSOR_TELEPORT) {
auto &myPlayer = plr[myplr];
if (pcursmonst != -1)
NetSendCmdParam3(true, CMD_TSPELLID, pcursmonst, myPlayer._pTSpell, GetSpellLevel(myplr, myPlayer._pTSpell));
else if (pcursplr != -1)
NetSendCmdParam3(true, CMD_TSPELLPID, pcursplr, myPlayer._pTSpell, GetSpellLevel(myplr, myPlayer._pTSpell));
else
NetSendCmdLocParam2(true, CMD_TSPELLXY, { cursmx, cursmy }, myPlayer._pTSpell, GetSpellLevel(myplr, myPlayer._pTSpell));
NewCursor(CURSOR_HAND);
return true;
}
if (pcurs == CURSOR_DISARM && pcursobj == -1) {
NewCursor(CURSOR_HAND);
return true;
}
return false;
}
static bool LeftMouseDown(int wParam)
{
if (gmenu_left_mouse(true))
return false;
if (control_check_talk_btn())
return false;
if (sgnTimeoutCurs != CURSOR_NONE)
return false;
if (deathflag) {
control_check_btn_press();
return false;
}
if (PauseMode == 2) {
return false;
}
if (DoomFlag) {
doom_close();
return false;
}
if (spselflag) {
SetSpell();
return false;
}
if (stextflag != STORE_NONE) {
CheckStoreBtn();
return false;
}
bool isShiftHeld = (wParam & DVL_MK_SHIFT) != 0;
if (MouseY < PANEL_TOP || MouseX < PANEL_LEFT || MouseX >= PANEL_LEFT + PANEL_WIDTH) {
if (!gmenu_is_active() && !TryIconCurs()) {
if (questlog && MouseX > 32 && MouseX < 288 && MouseY > 32 && MouseY < 308) {
QuestlogESC();
} else if (qtextflag) {
qtextflag = false;
stream_stop();
} else if (chrflag && MouseX < SPANEL_WIDTH && MouseY < SPANEL_HEIGHT) {
CheckChrBtns();
} else if (invflag && MouseX > RIGHT_PANEL && MouseY < SPANEL_HEIGHT) {
if (!dropGoldFlag)
CheckInvItem(isShiftHeld);
} else if (sbookflag && MouseX > RIGHT_PANEL && MouseY < SPANEL_HEIGHT) {
CheckSBook();
} else if (pcurs >= CURSOR_FIRSTITEM) {
if (TryInvPut()) {
NetSendCmdPItem(true, CMD_PUTITEM, { cursmx, cursmy });
NewCursor(CURSOR_HAND);
}
} else {
if (plr[myplr]._pStatPts != 0 && !spselflag)
CheckLvlBtn();
if (!lvlbtndown)
return LeftMouseCmd(isShiftHeld);
}
}
} else {
if (!talkflag && !dropGoldFlag && !gmenu_is_active())
CheckInvScrn(isShiftHeld);
DoPanBtn();
if (pcurs > CURSOR_HAND && pcurs < CURSOR_FIRSTITEM)
NewCursor(CURSOR_HAND);
}
return false;
}
static void LeftMouseUp(int wParam)
{
gmenu_left_mouse(false);
control_release_talk_btn();
bool isShiftHeld = (wParam & (DVL_MK_SHIFT | DVL_MK_LBUTTON)) != 0;
if (panbtndown)
CheckBtnUp();
if (chrbtnactive)
ReleaseChrBtns(isShiftHeld);
if (lvlbtndown)
ReleaseLvlBtn();
if (stextflag != STORE_NONE)
ReleaseStoreBtn();
}
static void RightMouseDown()
{
if (gmenu_is_active() || sgnTimeoutCurs != CURSOR_NONE || PauseMode == 2 || plr[myplr]._pInvincible) {
return;
}
if (DoomFlag) {
doom_close();
return;
}
if (stextflag != STORE_NONE)
return;
if (spselflag) {
SetSpell();
return;
}
if (MouseY >= SPANEL_HEIGHT
|| ((!sbookflag || MouseX <= RIGHT_PANEL)
&& !TryIconCurs()
&& (pcursinvitem == -1 || !UseInvItem(myplr, pcursinvitem)))) {
if (pcurs == CURSOR_HAND) {
if (pcursinvitem == -1 || !UseInvItem(myplr, pcursinvitem))
CheckPlrSpell();
} else if (pcurs > CURSOR_HAND && pcurs < CURSOR_FIRSTITEM) {
NewCursor(CURSOR_HAND);
}
}
}
void diablo_pause_game()
{
if (!gbIsMultiplayer) {
if (PauseMode != 0) {
PauseMode = 0;
} else {
PauseMode = 2;
sound_stop();
track_repeat_walk(false);
}
force_redraw = 255;
}
}
static void diablo_hotkey_msg(DWORD dwMsg)
{
if (!gbIsMultiplayer) {
return;
}
assert(dwMsg < QUICK_MESSAGE_OPTIONS);
NetSendCmdString(0xFFFFFF, sgOptions.Chat.szHotKeyMsgs[dwMsg]);
}
static bool PressSysKey(int wParam)
{
if (gmenu_is_active() || wParam != DVL_VK_F10)
return false;
diablo_hotkey_msg(1);
return true;
}
static void ReleaseKey(int vkey)
{
if (vkey == DVL_VK_SNAPSHOT)
CaptureScreen();
if (vkey == DVL_VK_MENU || vkey == DVL_VK_LMENU || vkey == DVL_VK_RMENU)
AltPressed(false);
if (vkey == DVL_VK_CONTROL || vkey == DVL_VK_LCONTROL || vkey == DVL_VK_RCONTROL)
ToggleItemLabelHighlight();
}
static void ClosePanels()
{
if (CanPanelsCoverView()) {
if (!chrflag && !questlog && (invflag || sbookflag) && MouseX < 480 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX + 160, MouseY);
} else if (!invflag && !sbookflag && (chrflag || questlog) && MouseX > 160 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX - 160, MouseY);
}
}
invflag = false;
chrflag = false;
sbookflag = false;
questlog = false;
}
bool PressEscKey()
{
bool rv = false;
if (DoomFlag) {
doom_close();
rv = true;
}
if (helpflag) {
helpflag = false;
rv = true;
}
if (qtextflag) {
qtextflag = false;
stream_stop();
rv = true;
}
if (stextflag != STORE_NONE) {
STextESC();
rv = true;
}
if (msgflag != EMSG_NONE) {
msgdelay = 0;
rv = true;
}
if (talkflag) {
control_reset_talk();
rv = true;
}
if (dropGoldFlag) {
control_drop_gold(DVL_VK_ESCAPE);
rv = true;
}
if (spselflag) {
spselflag = false;
rv = true;
}
if (invflag || chrflag || sbookflag || questlog) {
ClosePanels();
rv = true;
}
return rv;
}
static void PressKey(int vkey)
{
if (gmenu_presskeys(vkey) || control_presskeys(vkey)) {
return;
}
if (vkey == DVL_VK_MENU || vkey == DVL_VK_LMENU || vkey == DVL_VK_RMENU)
AltPressed(true);
if (deathflag) {
if (sgnTimeoutCurs != CURSOR_NONE) {
return;
}
keymapper.keyPressed(vkey);
if (vkey == DVL_VK_RETURN) {
if ((GetAsyncKeyState(DVL_VK_MENU) & 0x8000) != 0)
dx_reinit();
else
control_type_message();
}
if (vkey != DVL_VK_ESCAPE) {
return;
}
}
if (vkey == DVL_VK_ESCAPE) {
if (!PressEscKey()) {
track_repeat_walk(false);
gamemenu_on();
}
return;
}
if (sgnTimeoutCurs != CURSOR_NONE || dropGoldFlag) {
return;
}
if (vkey == DVL_VK_PAUSE) {
diablo_pause_game();
return;
}
if (PauseMode == 2) {
if (vkey == DVL_VK_RETURN && (GetAsyncKeyState(DVL_VK_MENU) & 0x8000) != 0)
dx_reinit();
return;
}
keymapper.keyPressed(vkey);
if (vkey == DVL_VK_RETURN) {
if ((GetAsyncKeyState(DVL_VK_MENU) & 0x8000) != 0) {
dx_reinit();
} else if (stextflag != STORE_NONE) {
STextEnter();
} else if (questlog) {
QuestlogEnter();
} else {
control_type_message();
}
} else if (vkey == DVL_VK_UP) {
if (stextflag != STORE_NONE) {
STextUp();
} else if (questlog) {
QuestlogUp();
} else if (helpflag) {
HelpScrollUp();
} else if (AutomapActive) {
AutomapUp();
}
} else if (vkey == DVL_VK_DOWN) {
if (stextflag != STORE_NONE) {
STextDown();
} else if (questlog) {
QuestlogDown();
} else if (helpflag) {
HelpScrollDown();
} else if (AutomapActive) {
AutomapDown();
}
} else if (vkey == DVL_VK_PRIOR) {
if (stextflag != STORE_NONE) {
STextPrior();
}
} else if (vkey == DVL_VK_NEXT) {
if (stextflag != STORE_NONE) {
STextNext();
}
} else if (vkey == DVL_VK_LEFT) {
if (AutomapActive && !talkflag) {
AutomapLeft();
}
} else if (vkey == DVL_VK_RIGHT) {
if (AutomapActive && !talkflag) {
AutomapRight();
}
} else if (vkey == DVL_VK_TAB) {
DoAutoMap();
} else if (vkey == DVL_VK_SPACE) {
ClosePanels();
helpflag = false;
spselflag = false;
if (qtextflag && leveltype == DTYPE_TOWN) {
qtextflag = false;
stream_stop();
}
AutomapActive = false;
msgdelay = 0;
gamemenu_off();
doom_close();
}
}
/**
* @internal `return` must be used instead of `break` to be bin exact as C++
*/
static void PressChar(int32_t vkey)
{
if (gmenu_is_active() || control_talk_last_key(vkey) || sgnTimeoutCurs != CURSOR_NONE || deathflag) {
return;
}
if ((char)vkey == 'p' || (char)vkey == 'P') {
diablo_pause_game();
return;
}
if (PauseMode == 2) {
return;
}
if (DoomFlag) {
doom_close();
return;
}
if (dropGoldFlag) {
control_drop_gold(vkey);
return;
}
switch (vkey) {
case '+':
case '=':
if (AutomapActive) {
AutomapZoomIn();
}
return;
case '-':
case '_':
if (AutomapActive) {
AutomapZoomOut();
}
return;
#ifdef _DEBUG
case ')':
case '0':
if (debug_mode_key_inverted_v) {
if (arrowdebug > 2) {
arrowdebug = 0;
}
auto &myPlayer = plr[myplr];
if (arrowdebug == 0) {
myPlayer._pIFlags &= ~ISPL_FIRE_ARROWS;
myPlayer._pIFlags &= ~ISPL_LIGHT_ARROWS;
}
if (arrowdebug == 1) {
myPlayer._pIFlags |= ISPL_FIRE_ARROWS;
}
if (arrowdebug == 2) {
myPlayer._pIFlags |= ISPL_LIGHT_ARROWS;
}
arrowdebug++;
}
return;
case ':':
if (currlevel == 0 && debug_mode_key_w) {
SetAllSpellsCheat();
}
return;
case '[':
if (currlevel == 0 && debug_mode_key_w) {
TakeGoldCheat();
}
return;
case ']':
if (currlevel == 0 && debug_mode_key_w) {
MaxSpellsCheat();
}
return;
case 'a':
if (debug_mode_key_inverted_v) {
spelldata[SPL_TELEPORT].sTownSpell = true;
auto &myPlayer = plr[myplr];
myPlayer._pSplLvl[myPlayer._pSpell]++;
}
return;
case 'D':
PrintDebugPlayer(true);
return;
case 'd':
PrintDebugPlayer(false);
return;
case 'L':
case 'l':
if (debug_mode_key_inverted_v) {
ToggleLighting();
}
return;
case 'M':
NextDebugMonster();
return;
case 'm':
GetDebugMonster();
return;
case 'R':
case 'r':
sprintf(tempstr, "seed = %i", glSeedTbl[currlevel]);
NetSendCmdString(1 << myplr, tempstr);
sprintf(tempstr, "Mid1 = %i : Mid2 = %i : Mid3 = %i", glMid1Seed[currlevel], glMid2Seed[currlevel], glMid3Seed[currlevel]);
NetSendCmdString(1 << myplr, tempstr);
sprintf(tempstr, "End = %i", glEndSeed[currlevel]);
NetSendCmdString(1 << myplr, tempstr);
return;
case 'T':
case 't':
if (debug_mode_key_inverted_v) {
auto &myPlayer = plr[myplr];
sprintf(tempstr, "PX = %i PY = %i", myPlayer.position.tile.x, myPlayer.position.tile.y);
NetSendCmdString(1 << myplr, tempstr);
sprintf(tempstr, "CX = %i CY = %i DP = %i", cursmx, cursmy, dungeon[cursmx][cursmy]);
NetSendCmdString(1 << myplr, tempstr);
}
return;
case '|':
if (currlevel == 0 && debug_mode_key_w) {
GiveGoldCheat();
}
return;
#endif
}
}
static void GetMousePos(int32_t lParam)
{
MouseX = (short)(lParam & 0xffff);
MouseY = (short)((lParam >> 16) & 0xffff);
}
void DisableInputWndProc(uint32_t uMsg, int32_t wParam, int32_t lParam)
{
switch (uMsg) {
case DVL_WM_KEYDOWN:
case DVL_WM_KEYUP:
case DVL_WM_CHAR:
case DVL_WM_SYSKEYDOWN:
case DVL_WM_SYSCOMMAND:
return;
case DVL_WM_MOUSEMOVE:
GetMousePos(lParam);
return;
case DVL_WM_LBUTTONDOWN:
if (sgbMouseDown != CLICK_NONE)
return;
sgbMouseDown = CLICK_LEFT;
return;
case DVL_WM_LBUTTONUP:
if (sgbMouseDown != CLICK_LEFT)
return;
sgbMouseDown = CLICK_NONE;
return;
case DVL_WM_RBUTTONDOWN:
if (sgbMouseDown != CLICK_NONE)
return;
sgbMouseDown = CLICK_RIGHT;
return;
case DVL_WM_RBUTTONUP:
if (sgbMouseDown != CLICK_RIGHT)
return;
sgbMouseDown = CLICK_NONE;
return;
case DVL_WM_CAPTURECHANGED:
sgbMouseDown = CLICK_NONE;
return;
}
MainWndProc(uMsg);
}
void GM_Game(uint32_t uMsg, int32_t wParam, int32_t lParam)
{
switch (uMsg) {
case DVL_WM_KEYDOWN:
PressKey(wParam);
return;
case DVL_WM_KEYUP:
ReleaseKey(wParam);
return;
case DVL_WM_CHAR:
PressChar(wParam);
return;
case DVL_WM_SYSKEYDOWN:
if (PressSysKey(wParam))
return;
break;
case DVL_WM_SYSCOMMAND:
if (wParam == DVL_SC_CLOSE) {
gbRunGame = false;
gbRunGameResult = false;
return;
}
break;
case DVL_WM_MOUSEMOVE:
GetMousePos(lParam);
gmenu_on_mouse_move();
return;
case DVL_WM_LBUTTONDOWN:
GetMousePos(lParam);
if (sgbMouseDown == CLICK_NONE) {
sgbMouseDown = CLICK_LEFT;
track_repeat_walk(LeftMouseDown(wParam));
}
return;
case DVL_WM_LBUTTONUP:
GetMousePos(lParam);
if (sgbMouseDown == CLICK_LEFT) {
sgbMouseDown = CLICK_NONE;
LeftMouseUp(wParam);
track_repeat_walk(false);
}
return;
case DVL_WM_RBUTTONDOWN:
GetMousePos(lParam);
if (sgbMouseDown == CLICK_NONE) {
sgbMouseDown = CLICK_RIGHT;
RightMouseDown();
}
return;
case DVL_WM_RBUTTONUP:
GetMousePos(lParam);
if (sgbMouseDown == CLICK_RIGHT) {
sgbMouseDown = CLICK_NONE;
}
return;
case DVL_WM_CAPTURECHANGED:
sgbMouseDown = CLICK_NONE;
track_repeat_walk(false);
break;
case WM_DIABNEXTLVL:
case WM_DIABPREVLVL:
case WM_DIABRTNLVL:
case WM_DIABSETLVL:
case WM_DIABWARPLVL:
case WM_DIABTOWNWARP:
case WM_DIABTWARPUP:
case WM_DIABRETOWN:
if (gbIsMultiplayer)
pfile_write_hero();
nthread_ignore_mutex(true);
PaletteFadeOut(8);
sound_stop();
music_stop();
track_repeat_walk(false);
sgbMouseDown = CLICK_NONE;
ShowProgress((interface_mode)uMsg);
force_redraw = 255;
DrawAndBlit();
LoadPWaterPalette();
if (gbRunGame)
PaletteFadeIn(8);
nthread_ignore_mutex(false);
gbGameLoopStartup = true;
return;
}
MainWndProc(uMsg);
}
void LoadLvlGFX()
{
assert(pDungeonCels == nullptr);
constexpr int SpecialCelWidth = 64;
switch (leveltype) {
case DTYPE_TOWN:
if (gbIsHellfire) {
pDungeonCels = LoadFileInMem("NLevels\\TownData\\Town.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("NLevels\\TownData\\Town.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("NLevels\\TownData\\Town.MIN");
} else {
pDungeonCels = LoadFileInMem("Levels\\TownData\\Town.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("Levels\\TownData\\Town.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("Levels\\TownData\\Town.MIN");
}
pSpecialCels = LoadCel("Levels\\TownData\\TownS.CEL", SpecialCelWidth);
break;
case DTYPE_CATHEDRAL:
if (currlevel < 21) {
pDungeonCels = LoadFileInMem("Levels\\L1Data\\L1.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("Levels\\L1Data\\L1.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("Levels\\L1Data\\L1.MIN");
pSpecialCels = LoadCel("Levels\\L1Data\\L1S.CEL", SpecialCelWidth);
} else {
pDungeonCels = LoadFileInMem("NLevels\\L5Data\\L5.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("NLevels\\L5Data\\L5.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("NLevels\\L5Data\\L5.MIN");
pSpecialCels = LoadCel("NLevels\\L5Data\\L5S.CEL", SpecialCelWidth);
}
break;
case DTYPE_CATACOMBS:
pDungeonCels = LoadFileInMem("Levels\\L2Data\\L2.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("Levels\\L2Data\\L2.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("Levels\\L2Data\\L2.MIN");
pSpecialCels = LoadCel("Levels\\L2Data\\L2S.CEL", SpecialCelWidth);
break;
case DTYPE_CAVES:
if (currlevel < 17) {
pDungeonCels = LoadFileInMem("Levels\\L3Data\\L3.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("Levels\\L3Data\\L3.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("Levels\\L3Data\\L3.MIN");
} else {
pDungeonCels = LoadFileInMem("NLevels\\L6Data\\L6.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("NLevels\\L6Data\\L6.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("NLevels\\L6Data\\L6.MIN");
}
pSpecialCels = LoadCel("Levels\\L1Data\\L1S.CEL", SpecialCelWidth);
break;
case DTYPE_HELL:
pDungeonCels = LoadFileInMem("Levels\\L4Data\\L4.CEL");
pMegaTiles = LoadFileInMem<MegaTile>("Levels\\L4Data\\L4.TIL");
pLevelPieces = LoadFileInMem<uint16_t>("Levels\\L4Data\\L4.MIN");
pSpecialCels = LoadCel("Levels\\L2Data\\L2S.CEL", SpecialCelWidth);
break;
default:
app_fatal("LoadLvlGFX");
}
}
void LoadAllGFX()
{
IncProgress();
IncProgress();
InitObjectGFX();
IncProgress();
InitMissileGFX();
IncProgress();
}
/**
* @param lvldir method of entry
*/
void CreateLevel(lvl_entry lvldir)
{
switch (leveltype) {
case DTYPE_TOWN:
CreateTown(lvldir);
InitTownTriggers();
LoadRndLvlPal(DTYPE_TOWN);
break;
case DTYPE_CATHEDRAL:
CreateL5Dungeon(glSeedTbl[currlevel], lvldir);
InitL1Triggers();
Freeupstairs();
if (currlevel < 21) {
LoadRndLvlPal(DTYPE_CATHEDRAL);
} else {
LoadRndLvlPal(DTYPE_CRYPT);
}
break;
case DTYPE_CATACOMBS:
CreateL2Dungeon(glSeedTbl[currlevel], lvldir);
InitL2Triggers();
Freeupstairs();
LoadRndLvlPal(DTYPE_CATACOMBS);
break;
case DTYPE_CAVES:
CreateL3Dungeon(glSeedTbl[currlevel], lvldir);
InitL3Triggers();
Freeupstairs();
if (currlevel < 17) {
LoadRndLvlPal(DTYPE_CAVES);
} else {
LoadRndLvlPal(DTYPE_NEST);
}
break;
case DTYPE_HELL:
CreateL4Dungeon(glSeedTbl[currlevel], lvldir);
InitL4Triggers();
Freeupstairs();
LoadRndLvlPal(DTYPE_HELL);
break;
default:
app_fatal("CreateLevel");
}
}
static void UpdateMonsterLights()
{
for (int i = 0; i < nummonsters; i++) {
MonsterStruct *mon = &monster[monstactive[i]];
if (mon->mlid != NO_LIGHT) {
if (mon->mlid == plr[myplr]._plid) { // Fix old saves where some monsters had 0 instead of NO_LIGHT
mon->mlid = NO_LIGHT;
continue;
}
LightListStruct *lid = &LightList[mon->mlid];
if (mon->position.tile != lid->position.tile) {
ChangeLightXY(mon->mlid, mon->position.tile);
}
}
}
}
void LoadGameLevel(bool firstflag, lvl_entry lvldir)
{
if (setseed != 0)
glSeedTbl[currlevel] = setseed;
music_stop();
if (pcurs > CURSOR_HAND && pcurs < CURSOR_FIRSTITEM) {
NewCursor(CURSOR_HAND);
}
SetRndSeed(glSeedTbl[currlevel]);
IncProgress();
MakeLightTable();
LoadLvlGFX();
IncProgress();
if (firstflag) {
InitInv();
InitQuestText();
InitStores();
InitAutomapOnce();
InitHelp();
InitText();
}
SetRndSeed(glSeedTbl[currlevel]);
if (leveltype == DTYPE_TOWN)
SetupTownStores();
IncProgress();
InitAutomap();
if (leveltype != DTYPE_TOWN && lvldir != ENTRY_LOAD) {
InitLighting();
InitVision();
}
InitLevelMonsters();
IncProgress();
auto &myPlayer = plr[myplr];
if (!setlevel) {
CreateLevel(lvldir);
IncProgress();
FillSolidBlockTbls();
SetRndSeed(glSeedTbl[currlevel]);
if (leveltype != DTYPE_TOWN) {
GetLevelMTypes();
InitThemes();
LoadAllGFX();
} else {
IncProgress();
IncProgress();
InitMissileGFX();
IncProgress();
IncProgress();
}
IncProgress();
if (lvldir == ENTRY_RTNLVL)
GetReturnLvlPos();
if (lvldir == ENTRY_WARPLVL)
GetPortalLvlPos();
IncProgress();
for (int i = 0; i < MAX_PLRS; i++) {
auto &player = plr[i];
if (player.plractive && currlevel == player.plrlevel) {
InitPlayerGFX(player);
if (lvldir != ENTRY_LOAD)
InitPlayer(i, firstflag);
}
}
PlayDungMsgs();
InitMultiView();
IncProgress();
bool visited = false;
int players = gbIsMultiplayer ? MAX_PLRS : 1;
for (int i = 0; i < players; i++) {
auto &player = plr[i];
if (player.plractive)
visited = visited || player._pLvlVisited[currlevel];
}
SetRndSeed(glSeedTbl[currlevel]);
if (leveltype != DTYPE_TOWN) {
if (firstflag || lvldir == ENTRY_LOAD || !myPlayer._pLvlVisited[currlevel] || gbIsMultiplayer) {
HoldThemeRooms();
glMid1Seed[currlevel] = GetRndSeed();
InitMonsters();
glMid2Seed[currlevel] = GetRndSeed();
IncProgress();
InitObjects();
InitItems();
if (currlevel < 17)
CreateThemeRooms();
IncProgress();
glMid3Seed[currlevel] = GetRndSeed();
InitMissiles();
InitDead();
glEndSeed[currlevel] = GetRndSeed();
if (gbIsMultiplayer)
DeltaLoadLevel();
IncProgress();
SavePreLighting();
} else {
HoldThemeRooms();
InitMonsters();
InitMissiles();
InitDead();
IncProgress();
LoadLevel();
IncProgress();
}
} else {
for (int i = 0; i < MAXDUNX; i++) {
for (int j = 0; j < MAXDUNY; j++)
dFlags[i][j] |= BFLAG_LIT;
}
InitTowners();
InitItems();
InitMissiles();
IncProgress();
if (!firstflag && lvldir != ENTRY_LOAD && myPlayer._pLvlVisited[currlevel] && !gbIsMultiplayer)
LoadLevel();
if (gbIsMultiplayer)
DeltaLoadLevel();
IncProgress();
}
if (!gbIsMultiplayer)
ResyncQuests();
else
ResyncMPQuests();
} else {
LoadSetMap();
IncProgress();
GetLevelMTypes();
IncProgress();
InitMonsters();
IncProgress();
InitMissileGFX();
IncProgress();
InitDead();
IncProgress();
FillSolidBlockTbls();
IncProgress();
if (lvldir == ENTRY_WARPLVL)
GetPortalLvlPos();
IncProgress();
for (int i = 0; i < MAX_PLRS; i++) {
auto &player = plr[i];
if (player.plractive && currlevel == player.plrlevel) {
InitPlayerGFX(player);
if (lvldir != ENTRY_LOAD)
InitPlayer(i, firstflag);
}
}
IncProgress();
InitMultiView();
IncProgress();
if (firstflag || lvldir == ENTRY_LOAD || !myPlayer._pSLvlVisited[setlvlnum]) {
InitItems();
SavePreLighting();
} else {
LoadLevel();
}
InitMissiles();
IncProgress();
}
SyncPortals();
for (int i = 0; i < MAX_PLRS; i++) {
auto &player = plr[i];
if (player.plractive && player.plrlevel == currlevel && (!player._pLvlChanging || i == myplr)) {
if (player._pHitPoints > 0) {
if (!gbIsMultiplayer)
dPlayer[player.position.tile.x][player.position.tile.y] = i + 1;
else
SyncInitPlrPos(i);
} else {
dFlags[player.position.tile.x][player.position.tile.y] |= BFLAG_DEAD_PLAYER;
}
}
}
SetDungeonMicros();
InitLightMax();
IncProgress();
IncProgress();
if (firstflag) {
InitControlPan();
}
IncProgress();
UpdateMonsterLights();
if (leveltype != DTYPE_TOWN) {
ProcessLightList();
ProcessVisionList();
}
if (currlevel >= 21) {
if (currlevel == 21) {
items_427ABA(CornerStone.position);
}
if (quests[Q_NAKRUL]._qactive == QUEST_DONE && currlevel == 24) {
objects_454BA8();
}
}
if (currlevel >= 17)
music_start(currlevel > 20 ? TMUSIC_L5 : TMUSIC_L6);
else
music_start(leveltype);
while (!IncProgress())
;
if (!gbIsSpawn && setlevel && setlvlnum == SL_SKELKING && quests[Q_SKELKING]._qactive == QUEST_ACTIVE)
PlaySFX(USFX_SKING1);
}
static void game_logic()
{
if (!ProcessInput()) {
return;
}
if (gbProcessPlayers) {
ProcessPlayers();
}
if (leveltype != DTYPE_TOWN) {
ProcessMonsters();
ProcessObjects();
ProcessMissiles();
ProcessItems();
ProcessLightList();
ProcessVisionList();
} else {
ProcessTowners();
ProcessItems();
ProcessMissiles();
}
#ifdef _DEBUG
if (debug_mode_key_inverted_v && (GetAsyncKeyState(DVL_VK_SHIFT) & 0x8000) != 0) {
ScrollView();
}
#endif
sound_update();
ClearPlrMsg();
CheckTriggers();
CheckQuests();
force_redraw |= 1;
pfile_update(false);
plrctrls_after_game_logic();
}
static void timeout_cursor(bool bTimeout)
{
if (bTimeout) {
if (sgnTimeoutCurs == CURSOR_NONE && sgbMouseDown == CLICK_NONE) {
sgnTimeoutCurs = pcurs;
multi_net_ping();
ClearPanel();
AddPanelString(_("-- Network timeout --"));
AddPanelString(_("-- Waiting for players --"));
NewCursor(CURSOR_HOURGLASS);
force_redraw = 255;
}
scrollrt_draw_game_screen();
} else if (sgnTimeoutCurs != CURSOR_NONE) {
NewCursor(sgnTimeoutCurs);
sgnTimeoutCurs = CURSOR_NONE;
ClearPanel();
force_redraw = 255;
}
}
/**
* @param bStartup Process additional ticks before returning
*/
void game_loop(bool bStartup)
{
uint16_t wait = bStartup ? sgGameInitInfo.nTickRate * 3 : 3;
for (unsigned i = 0; i < wait; i++) {
if (!multi_handle_delta()) {
timeout_cursor(true);
break;
}
timeout_cursor(false);
game_logic();
if (!gbRunGame || !gbIsMultiplayer || !nthread_has_500ms_passed())
break;
}
}
void diablo_color_cyc_logic()
{
if (!sgOptions.Graphics.bColorCycling)
return;
if (leveltype == DTYPE_HELL) {
lighting_color_cycling();
} else if (currlevel >= 21) {
palette_update_crypt();
} else if (currlevel >= 17) {
palette_update_hive();
} else if (setlevel && setlvlnum == quests[Q_PWATER]._qslvl) {
UpdatePWaterPalette();
} else if (leveltype == DTYPE_CAVES) {
palette_update_caves();
}
}
void helpKeyPressed()
{
if (helpflag) {
helpflag = false;
} else if (stextflag != STORE_NONE) {
ClearPanel();
AddPanelString(_("No help available")); /// BUGFIX: message isn't displayed
AddPanelString(_("while in stores"));
track_repeat_walk(false);
} else {
invflag = false;
chrflag = false;
sbookflag = false;
spselflag = false;
if (qtextflag && leveltype == DTYPE_TOWN) {
qtextflag = false;
stream_stop();
}
questlog = false;
AutomapActive = false;
msgdelay = 0;
gamemenu_off();
DisplayHelp();
doom_close();
}
}
#ifdef _DEBUG
void itemInfoKeyPressed()
{
if (pcursitem != -1) {
sprintf(
tempstr,
"IDX = %i : Seed = %i : CF = %i",
items[pcursitem].IDidx,
items[pcursitem]._iSeed,
items[pcursitem]._iCreateInfo);
NetSendCmdString(1 << myplr, tempstr);
}
sprintf(tempstr, "Numitems : %i", numitems);
NetSendCmdString(1 << myplr, tempstr);
}
#endif
void inventoryKeyPressed()
{
if (stextflag != STORE_NONE)
return;
invflag = !invflag;
if (!chrflag && !questlog && CanPanelsCoverView()) {
if (!invflag) { // We closed the invetory
if (MouseX < 480 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX + 160, MouseY);
}
} else if (!sbookflag) { // We opened the invetory
if (MouseX > 160 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX - 160, MouseY);
}
}
}
sbookflag = false;
}
void characterSheetKeyPressed()
{
if (stextflag != STORE_NONE)
return;
chrflag = !chrflag;
if (!invflag && !sbookflag && CanPanelsCoverView()) {
if (!chrflag) { // We closed the character sheet
if (MouseX > 160 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX - 160, MouseY);
}
} else if (!questlog) { // We opened the character sheet
if (MouseX < 480 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX + 160, MouseY);
}
}
}
questlog = false;
}
void questLogKeyPressed()
{
if (stextflag != STORE_NONE)
return;
if (!questlog) {
StartQuestlog();
} else {
questlog = false;
}
if (!invflag && !sbookflag && CanPanelsCoverView()) {
if (!questlog) { // We closed the quest log
if (MouseX > 160 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX - 160, MouseY);
}
} else if (!chrflag) { // We opened the character quest log
if (MouseX < 480 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX + 160, MouseY);
}
}
}
chrflag = false;
}
void displaySpellsKeyPressed()
{
if (stextflag != STORE_NONE)
return;
chrflag = false;
questlog = false;
invflag = false;
sbookflag = false;
if (!spselflag) {
DoSpeedBook();
} else {
spselflag = false;
}
track_repeat_walk(false);
}
void spellBookKeyPressed()
{
if (stextflag != STORE_NONE)
return;
sbookflag = !sbookflag;
if (!chrflag && !questlog && CanPanelsCoverView()) {
if (!sbookflag) { // We closed the invetory
if (MouseX < 480 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX + 160, MouseY);
}
} else if (!invflag) { // We opened the invetory
if (MouseX > 160 && MouseY < PANEL_TOP) {
SetCursorPos(MouseX - 160, MouseY);
}
}
}
invflag = false;
}
bool isPlayerDead()
{
return plr[myplr]._pmode == PM_DEATH || deathflag;
}
void initKeymapActions()
{
keymapper.addAction({
"Help",
DVL_VK_F1,
helpKeyPressed,
[&]() { return !isPlayerDead(); },
});
#ifdef _DEBUG
keymapper.addAction({
"ItemInfo",
DVL_VK_INVALID,
itemInfoKeyPressed,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"QuestDebug",
DVL_VK_INVALID,
PrintDebugQuest,
[&]() { return !isPlayerDead(); },
});
#endif
for (int i = 0; i < 4; ++i) {
quickSpellActionIndexes[i] = keymapper.addAction({
std::string("QuickSpell") + std::to_string(i + 1),
DVL_VK_F5 + i,
[i]() {
if (spselflag) {
SetSpeedSpell(i);
return;
}
ToggleSpell(i);
},
[&]() { return !isPlayerDead(); },
});
}
for (int i = 0; i < 4; ++i) {
keymapper.addAction({
QuickMessages[i].key,
DVL_VK_F9 + i,
[i]() { diablo_hotkey_msg(i); },
});
}
keymapper.addAction({
"DecreaseGamma",
'G',
DecreaseGamma,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"IncreaseGamma",
'F',
IncreaseGamma,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"Inventory",
'I',
inventoryKeyPressed,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"Character",
'C',
characterSheetKeyPressed,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"QuestLog",
'Q',
questLogKeyPressed,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"Zoom",
'Z',
[] {
zoomflag = !zoomflag;
CalcViewportGeometry();
},
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"DisplaySpells",
'S',
displaySpellsKeyPressed,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"SpellBook",
'B',
spellBookKeyPressed,
[&]() { return !isPlayerDead(); },
});
keymapper.addAction({
"GameInfo",
'V',
[] {
char pszStr[120];
const char *difficulties[3] = {
_("Normal"),
_("Nightmare"),
_("Hell"),
};
strcpy(pszStr, fmt::format(_(/* TRANSLATORS: {:s} means: Character Name, Game Version, Game Difficulty. */ "{:s}, version = {:s}, mode = {:s}"), gszProductName, PROJECT_VERSION, difficulties[sgGameInitInfo.nDifficulty]).c_str());
NetSendCmdString(1 << myplr, pszStr);
},
[&]() { return !isPlayerDead(); },
});
for (int i = 0; i < 8; ++i) {
keymapper.addAction({
std::string("BeltItem") + std::to_string(i + 1),
'1' + i,
[i] {
auto &myPlayer = plr[myplr];
if (!myPlayer.SpdList[i].isEmpty() && myPlayer.SpdList[i]._itype != ITYPE_GOLD) {
UseInvItem(myplr, INVITEM_BELT_FIRST + i);
}
},
[&]() { return !isPlayerDead(); },
});
}
keymapper.addAction({
"QuickSave",
DVL_VK_F2,
[] { gamemenu_save_game(false); },
[&]() { return !gbIsMultiplayer && !isPlayerDead(); },
});
keymapper.addAction({
"QuickLoad",
DVL_VK_F3,
[] { gamemenu_load_game(false); },
[&]() { return !gbIsMultiplayer && gbValidSaveFile; },
});
keymapper.addAction({
"QuitGame",
DVL_VK_INVALID,
[] { gamemenu_quit_game(false); },
});
#ifdef _DEBUG
keymapper.addAction({
"CheatExperience",
DVL_VK_INVALID,
[] {
if (debug_mode_key_inverted_v || debug_mode_key_w) {
NetSendCmd(true, CMD_CHEAT_EXPERIENCE);
return;
}
},
[&]() { return !isPlayerDead(); },
});
#endif
keymapper.addAction({
"StopHero",
DVL_VK_INVALID,
[] { plr[myplr].Stop(); },
[&]() { return !isPlayerDead(); },
});
}
} // namespace devilution