mirrors
/
devilution
1
0
Fork 0
Code Releases Activity
devilution/Source/diablo.cpp

2332 lines
52 KiB
C++
Raw Blame History

/*
* UNPUBLISHED -- Rights reserved under the copyright laws of the
* United States. Use of a copyright notice is precautionary only and
* does not imply publication or disclosure.
*
* THIS DOCUMENTATION CONTAINS CONFIDENTIAL AND PROPRIETARY INFORMATION
* OF BLIZZARD ENTERTAINMENT. ANY DUPLICATION, MODIFICATION,
* DISTRIBUTION, OR DISCLOSURE IS STRICTLY PROHIBITED WITHOUT THE PRIOR
* EXPRESS WRITTEN PERMISSION OF BLIZZARD ENTERTAINMENT.
*/
#include "../types.h"
int diablo_cpp_init_value; // weak
HWND ghMainWnd;
int glMid1Seed[17];
int glMid2Seed[17];
int gnLevelTypeTbl[17];
int MouseY; // idb
int MouseX; // idb
bool gbGameLoopStartup; // idb
int glSeedTbl[17];
int gbRunGame; // weak
int glMid3Seed[17];
int gbRunGameResult; // weak
int zoomflag; // weak
int gbProcessPlayers; // weak
int glEndSeed[17];
int dword_5256E8; // weak
HINSTANCE ghInst; // idb
int DebugMonsters[10];
char cineflag; // weak
int drawpanflag; // weak
int visiondebug; // weak
int scrollflag; /* unused */
int light4flag; // weak
int leveldebug; // weak
int monstdebug; // weak
int trigdebug; /* unused */
int setseed; // weak
int debugmonsttypes; // weak
int PauseMode; // weak
int sgnTimeoutCurs;
char sgbMouseDown; // weak
int color_cycle_timer; // weak
int diablo_inf = 0x7F800000; // weak
/* rdata */
int fullscreen = 1; // weak
#ifdef _DEBUG
int showintrodebug = 1;
int questdebug = -1;
int debug_mode_key_s;
int debug_mode_key_w;
int debug_mode_key_inverted_v;
int debug_mode_dollar_sign;
int debug_mode_key_d;
int debug_mode_key_i;
int dbgplr;
int dbgqst;
int dbgmon;
int frameflag;
int frameend;
int framerate;
int framestart;
#endif
int FriendlyMode = 1; // weak
char *spszMsgTbl[4] =
{
"I need help! Come Here!",
"Follow me.",
"Here's something for you.",
"Now you DIE!"
}; // weak
char *spszMsgKeyTbl[4] = { "F9", "F10", "F11", "F12" }; // weak
//----- (004087B6) --------------------------------------------------------
struct diablo_cpp_init
{
diablo_cpp_init()
{
diablo_cpp_init_value = diablo_inf;
}
} _diablo_cpp_init;
// 479BF8: using guessed type int diablo_inf;
// 525514: using guessed type int diablo_cpp_init_value;
//----- (004087C1) --------------------------------------------------------
void __cdecl FreeGameMem()
{
void *v0; // ecx
void *v1; // ecx
void *v2; // ecx
void *v3; // ecx
void *v4; // ecx
music_stop();
v0 = pDungeonCels;
pDungeonCels = 0;
mem_free_dbg(v0);
v1 = pMegaTiles;
pMegaTiles = 0;
mem_free_dbg(v1);
v2 = *(void **)&dpiece_defs[0].blocks;
*(_DWORD *)&dpiece_defs[0].blocks = 0;
mem_free_dbg(v2);
v3 = level_special_cel;
level_special_cel = 0;
mem_free_dbg(v3);
v4 = pSpeedCels;
pSpeedCels = 0;
mem_free_dbg(v4);
FreeMissiles();
FreeMonsters();
FreeObjectGFX();
FreeEffects();
FreeTownerGFX();
}
//----- (00408838) --------------------------------------------------------
int __fastcall diablo_init_menu(int a1, int bSinglePlayer)
{
int v2; // esi
int v3; // edi
int v4; // ecx
int pfExitProgram; // [esp+Ch] [ebp-4h]
v2 = bSinglePlayer;
v3 = a1;
byte_678640 = 1;
while ( 1 )
{
pfExitProgram = 0;
dword_5256E8 = 0;
if ( !NetInit(v2, &pfExitProgram) )
break;
byte_678640 = 0;
if ( (v3 || !*(_DWORD *)&gbValidSaveFile)
&& (InitLevels(), InitQuests(), InitPortals(), InitDungMsgs(myplr), !*(_DWORD *)&gbValidSaveFile)
|| (v4 = WM_DIABLOADGAME, !dword_5256E8) )
{
v4 = WM_DIABNEWGAME;
}
run_game_loop(v4);
NetClose();
pfile_create_player_description(0, 0);
if ( !gbRunGameResult )
goto LABEL_11;
}
gbRunGameResult = pfExitProgram == 0;
LABEL_11:
SNetDestroy();
return gbRunGameResult;
}
// 525698: using guessed type int gbRunGameResult;
// 5256E8: using guessed type int dword_5256E8;
// 678640: using guessed type char byte_678640;
//----- (004088E2) --------------------------------------------------------
void __fastcall run_game_loop(int uMsg)
{
//int v3; // eax
bool v5; // zf
//int v6; // eax
signed int v7; // [esp+8h] [ebp-24h]
LRESULT (__stdcall *saveProc)(HWND, UINT, WPARAM, LPARAM); // [esp+Ch] [ebp-20h]
struct tagMSG msg; // [esp+10h] [ebp-1Ch]
nthread_ignore_mutex(1);
start_game(uMsg);
saveProc = SetWindowProc(GM_Game);
control_update_life_mana();
msg_process_net_packets();
gbRunGame = 1;
gbProcessPlayers = 1;
gbRunGameResult = 1;
drawpanflag = 255;
DrawAndBlit();
PaletteFadeIn(8);
drawpanflag = 255;
gbGameLoopStartup = 1;
nthread_ignore_mutex(0);
while ( gbRunGame )
{
diablo_color_cyc_logic();
if ( PeekMessageA(&msg, NULL, 0, 0, PM_NOREMOVE) )
{
SetThreadPriority(GetCurrentThread(), THREAD_PRIORITY_ABOVE_NORMAL);
while ( PeekMessageA(&msg, NULL, 0, 0, PM_REMOVE) )
{
if ( msg.message == WM_QUIT )
{
gbRunGameResult = 0;
gbRunGame = 0;
break;
}
TranslateMessage(&msg);
DispatchMessageA(&msg);
}
if ( !gbRunGame || (v7 = 1, !nthread_has_500ms_passed()) )
v7 = 0;
SetThreadPriority(GetCurrentThread(), THREAD_PRIORITY_NORMAL);
v5 = v7 == 0;
}
else
{
//_LOBYTE(v6) = nthread_has_500ms_passed();
v5 = nthread_has_500ms_passed() == 0;
}
if ( !v5 )
{
multi_process_network_packets();
game_loop(gbGameLoopStartup);
msgcmd_send_chat();
gbGameLoopStartup = 0;
DrawAndBlit();
}
#ifdef SLEEP
Sleep(1);
#endif
}
if ( (unsigned char)gbMaxPlayers > 1u )
pfile_write_hero();
pfile_flush_W();
PaletteFadeOut(8);
SetCursor(0);
ClearScreenBuffer();
drawpanflag = 255;
scrollrt_draw_game_screen(1);
SetWindowProc(saveProc);
free_game();
if ( cineflag )
{
cineflag = 0;
DoEnding();
}
}
// 525650: using guessed type int gbRunGame;
// 525698: using guessed type int gbRunGameResult;
// 5256A0: using guessed type int gbProcessPlayers;
// 525718: using guessed type char cineflag;
// 52571C: using guessed type int drawpanflag;
// 679660: using guessed type char gbMaxPlayers;
//----- (00408A8C) --------------------------------------------------------
void __fastcall start_game(int uMsg)
{
cineflag = 0;
zoomflag = 1;
InitCursor();
InitLightTable();
LoadDebugGFX();
music_stop();
ShowProgress(uMsg);
gmenu_init_menu();
InitLevelCursor();
sgnTimeoutCurs = 0;
sgbMouseDown = 0;
track_repeat_walk(0);
}
// 52569C: using guessed type int zoomflag;
// 525718: using guessed type char cineflag;
// 525748: using guessed type char sgbMouseDown;
//----- (00408ADB) --------------------------------------------------------
void __cdecl free_game()
{
int i; // esi
FreeControlPan();
FreeInvGFX();
FreeGMenu();
FreeQuestText();
FreeStoreMem();
for(i = 0; i < 4; i++)
FreePlayerGFX(i);
FreeItemGFX();
FreeCursor();
FreeLightTable();
FreeDebugGFX();
FreeGameMem();
}
//----- (00408B1E) --------------------------------------------------------
bool __cdecl diablo_get_not_running()
{
SetLastError(0);
CreateEventA(NULL, FALSE, FALSE, "DiabloEvent");
return GetLastError() != ERROR_ALREADY_EXISTS;
}
//----- (00408B4A) --------------------------------------------------------
int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
HINSTANCE v4; // esi
//int v11; // ecx
char Filename[260]; // [esp+8h] [ebp-10Ch]
char value_name[8]; // [esp+10Ch] [ebp-8h]
v4 = hInstance;
#ifndef DEBUGGER
diablo_reload_process(hInstance);
#endif
ghInst = v4;
if ( RestrictedTest() )
ErrDlg(TEMPLATE_ERR_RESTRICTED, 0, "C:\\Src\\Diablo\\Source\\DIABLO.CPP", 877);
if ( ReadOnlyTest() )
{
if ( !GetModuleFileNameA(ghInst, Filename, 0x104u) )
*Filename = '\0';
DirErrDlg(Filename);
}
ShowCursor(FALSE);
srand(GetTickCount());
encrypt_init_lookup_table();
exception_get_filter();
if ( !diablo_find_window("DIABLO") && diablo_get_not_running() )
{
diablo_init_screen();
diablo_parse_flags(lpCmdLine);
init_create_window();
sound_init();
UiInitialize();
#ifdef _DEBUG
if ( showintrodebug )
play_movie("gendata\\logo.smk", 1);
#else
play_movie("gendata\\logo.smk", 1);
#endif
strcpy(value_name, "Intro");
if ( !SRegLoadValue("Diablo", value_name, 0, (int *)&hInstance) )
hInstance = (HINSTANCE)1;
if ( hInstance )
play_movie("gendata\\diablo1.smk", 1);
SRegSaveValue("Diablo", value_name, 0, 0);
#ifdef _DEBUG
if ( showintrodebug )
{
UiTitleDialog(7);
BlackPalette();
}
#else
UiTitleDialog(7);
BlackPalette();
#endif
mainmenu_action(0); /* v11 fix unused arg */
UiDestroy();
palette_save_gamme();
if ( ghMainWnd )
{
Sleep(300);
DestroyWindow(ghMainWnd);
}
}
return 0;
}
//----- (00408CB1) --------------------------------------------------------
void __fastcall diablo_parse_flags(char *args)
{
#ifdef _DEBUG
int n; // edi
int v15; // eax
#endif
while ( *args )
{
for ( ; isspace(*args); ++args )
;
if ( !_strcmpi("dd_emulate", args) )
{
gbEmulate = 1;
args += strlen("dd_emulate");
}
else if ( !_strcmpi("dd_backbuf", args) )
{
gbBackBuf = 1;
args += strlen("dd_backbuf");
}
else if ( !_strcmpi("ds_noduplicates", args) )
{
gbDupSounds = 0;
args += strlen("ds_noduplicates");
}
else
{
#ifdef _DEBUG
switch ( tolower(*args++) )
{
case '^': // god mod with all spells as skills
debug_mode_key_inverted_v = 1;
break;
case '$': // demi-god
debug_mode_dollar_sign = 1;
break;
/*case 'b': // enable drop log
debug_mode_key_b = 1;
break;*/
case 'd': // no startup video+???
showintrodebug = 0;
debug_mode_key_d = 1;
break;
case 'f': // draw fps
EnableFrameCount();
break;
case 'i': // disable network timeout
debug_mode_key_i = 1;
break;
/*case 'j': // <level>: init trigger at level
for ( ; isspace(*args); ++args )
;
for ( n = 0; isdigit(*args); n = v15 + 10 * n - 48 )
v15 = *args++;
debug_mode_key_J_trigger = n;
break;*/
case 'l': // <dtype> <level>: start in level as type
setlevel = 0;
for ( leveldebug = 1; isspace(*args); ++args )
;
for ( n = 0; isdigit(*args); n = v15 + 10 * n - 48 )
v15 = *args++;
for ( leveltype = n; isspace(*args); ++args )
;
for ( n = 0; isdigit(*args); n = v15 + 10 * n - 48 )
v15 = *args++;
currlevel = n;
plr[0].plrlevel = n;
break;
case 'm': // <mtype>: add debug monster, up to 10 allowed
for ( monstdebug = 1; isspace(*args); ++args )
;
for ( n = 0; isdigit(*args); n = v15 + 10 * n - 48 )
v15 = *args++;
DebugMonsters[debugmonsttypes++] = n;
break;
case 'n': // disable startup video
showintrodebug = 0;
break;
case 'q': // <qnum>: force a certain quest
for ( ; isspace(*args); ++args )
;
for ( n = 0; isdigit(*args); n = v15 + 10 * n - 48 )
v15 = *args++;
questdebug = n;
break;
case 'r': // <seed>: set map seed to
for ( ; isspace(*args); ++args )
;
for ( n = 0; isdigit(*args); n = v15 + 10 * n - 48 )
v15 = *args++;
setseed = n;
break;
case 's': // unused
debug_mode_key_s = 1;
break;
case 't': // <qlvl>: sets current quest level
leveldebug = 1;
for ( setlevel = 1; isspace(*args); ++args )
;
for ( n = 0; isdigit(*args); n = v15 + 10 * n - 48 )
v15 = *args++;
setlvlnum = n;
break;
case 'v': // draw yellow debug tiles
visiondebug = 1;
break;
case 'w': // rest of the cheats, some only in town
debug_mode_key_w = 1;
break;
case 'x':
fullscreen = 0;
break;
default:
break;
}
#else
tolower(*args++);
#endif
}
}
}
// 4A22D6: using guessed type char gbDupSounds;
// 52A548: using guessed type char gbBackBuf;
// 52A549: using guessed type char gbEmulate;
//----- (00408D61) --------------------------------------------------------
void __cdecl diablo_init_screen()
{
int v0; // ecx
int *v1; // eax
v0 = 0;
MouseX = 320;
MouseY = 240;
ScrollInfo._sdx = 0;
ScrollInfo._sdy = 0;
ScrollInfo._sxoff = 0;
ScrollInfo._syoff = 0;
ScrollInfo._sdir = 0;
v1 = screen_y_times_768;
do
{
*v1 = v0;
++v1;
v0 += 768;
}
while ( (signed int)v1 < (signed int)&screen_y_times_768[1024] );
ClrDiabloMsg();
}
// 69CEFC: using guessed type int scrollrt_cpp_init_value;
//----- (00408DB1) --------------------------------------------------------
HWND __fastcall diablo_find_window(LPCSTR lpClassName)
{
HWND result; // eax
HWND v2; // esi
HWND v3; // eax
HWND v4; // edi
result = FindWindowA(lpClassName, 0);
v2 = result;
if ( result )
{
v3 = GetLastActivePopup(result);
if ( v3 )
v2 = v3;
v4 = GetTopWindow(v2);
if ( !v4 )
v4 = v2;
SetForegroundWindow(v2);
SetFocus(v4);
result = (HWND)1;
}
return result;
}
//----- (00408DF4) --------------------------------------------------------
void __fastcall diablo_reload_process(HMODULE hModule)
{
char *i; // eax
DWORD dwSize; // esi
BOOL v3; // edi
_DWORD *v4; // eax
_DWORD *v5; // esi
HWND v6; // eax
char Name[276]; // [esp+Ch] [ebp-29Ch]
char Filename[260]; // [esp+120h] [ebp-188h]
STARTUPINFOA si; // [esp+224h] [ebp-84h]
SYSTEM_INFO sinf; // [esp+268h] [ebp-40h]
PROCESS_INFORMATION pi; // [esp+28Ch] [ebp-1Ch]
DWORD dwProcessId; // [esp+29Ch] [ebp-Ch]
HANDLE hMap; // [esp+2A0h] [ebp-8h]
HWND hWnd; // [esp+2A4h] [ebp-4h]
*Filename = empty_string;
memset(Filename + 1, 0, sizeof(Filename) - 1);
// *(_WORD *)&Filename[257] = 0;
// Filename[259] = 0;
GetModuleFileNameA(hModule, Filename, 0x104u);
wsprintfA(Name, "Reload-%s", Filename);
for ( i = Name; *i; ++i )
{
if ( *i == '\\' )
*i = '/';
}
GetSystemInfo(&sinf);
dwSize = sinf.dwPageSize;
if ( sinf.dwPageSize < 4096 )
dwSize = 4096;
hMap = CreateFileMappingA((HANDLE)0xFFFFFFFF, NULL, SEC_COMMIT|PAGE_READWRITE, 0, dwSize, Name);
v3 = GetLastError() != ERROR_ALREADY_EXISTS;
if ( hMap )
{
v4 = (unsigned int *)MapViewOfFile(hMap, FILE_MAP_ALL_ACCESS, 0, 0, dwSize);
v5 = v4;
if ( v4 )
{
if ( v3 )
{
*v4 = -1;
v4[1] = 0;
memset(&si, 0, sizeof(si));
si.cb = sizeof(si);
CreateProcessA(Filename, NULL, NULL, NULL, FALSE, CREATE_NEW_PROCESS_GROUP, NULL, NULL, &si, &pi);
WaitForInputIdle(pi.hProcess, 0xFFFFFFFF);
CloseHandle(pi.hThread);
CloseHandle(pi.hProcess);
while ( *v5 < 0 )
Sleep(1000);
UnmapViewOfFile(v5);
CloseHandle(hMap);
ExitProcess(0);
}
if ( InterlockedIncrement((long *)v4) )
{
v6 = GetForegroundWindow();
do
{
hWnd = v6;
v6 = GetWindow(v6, 3u);
}
while ( v6 );
while ( 1 )
{
GetWindowThreadProcessId(hWnd, &dwProcessId);
if ( dwProcessId == v5[1] )
break;
hWnd = GetWindow(hWnd, 2u);
if ( !hWnd )
goto LABEL_23;
}
SetForegroundWindow(hWnd);
LABEL_23:
UnmapViewOfFile(v5);
CloseHandle(hMap);
ExitProcess(0);
}
v5[1] = GetCurrentProcessId();
}
}
}
//----- (00408FCF) --------------------------------------------------------
int __cdecl PressEscKey()
{
int result; // eax
result = 0;
if ( doomflag )
{
doom_close();
result = 1;
}
if ( helpflag )
{
helpflag = 0;
result = 1;
}
if ( qtextflag )
{
qtextflag = 0;
sfx_stop();
}
else
{
if ( !stextflag )
goto LABEL_10;
STextESC();
}
result = 1;
LABEL_10:
if ( msgflag )
{
msgdelay = 0;
result = 1;
}
if ( talkflag )
{
control_reset_talk();
result = 1;
}
if ( dropGoldFlag )
{
control_drop_gold(VK_ESCAPE);
result = 1;
}
if ( spselflag )
{
spselflag = 0;
result = 1;
}
return result;
}
// 4B84DC: using guessed type int dropGoldFlag;
// 4B8960: using guessed type int talkflag;
// 4B8C98: using guessed type int spselflag;
// 52575C: using guessed type int doomflag;
// 52B9F0: using guessed type char msgdelay;
// 52B9F1: using guessed type char msgflag;
// 646D00: using guessed type char qtextflag;
// 6AA705: using guessed type char stextflag;
//----- (0040905E) --------------------------------------------------------
LRESULT __stdcall DisableInputWndProc(HWND hWnd, int uMsg, int wParam, int lParam)
{
bool v5; // zf
if ( uMsg <= (unsigned int)WM_LBUTTONDOWN )
{
if ( uMsg != WM_LBUTTONDOWN )
{
if ( uMsg >= (unsigned int)WM_KEYFIRST
&& (uMsg <= (unsigned int)WM_CHAR
|| uMsg == WM_SYSKEYDOWN
|| uMsg == WM_SYSCOMMAND
|| uMsg == WM_MOUSEFIRST) )
{
return 0;
}
return init_palette(hWnd, uMsg, wParam, lParam);
}
if ( !sgbMouseDown )
{
sgbMouseDown = 1;
LABEL_21:
SetCapture(hWnd);
return 0;
}
return 0;
}
if ( uMsg == WM_LBUTTONUP )
{
v5 = sgbMouseDown == 1;
goto LABEL_23;
}
if ( uMsg != WM_RBUTTONDOWN )
{
if ( uMsg != WM_RBUTTONUP )
{
if ( uMsg == WM_CAPTURECHANGED )
{
if ( hWnd != (HWND)lParam )
sgbMouseDown = 0;
return 0;
}
return init_palette(hWnd, uMsg, wParam, lParam);
}
v5 = sgbMouseDown == 2;
LABEL_23:
if ( v5 )
{
sgbMouseDown = 0;
ReleaseCapture();
}
return 0;
}
if ( !sgbMouseDown )
{
sgbMouseDown = 2;
goto LABEL_21;
}
return 0;
}
// 525748: using guessed type char sgbMouseDown;
//----- (00409131) --------------------------------------------------------
int __stdcall GM_Game(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
if ( uMsg > WM_LBUTTONDOWN )
{
if ( uMsg == WM_LBUTTONUP )
{
MouseX = (unsigned short)lParam;
MouseY = (unsigned int)lParam >> 16;
if ( sgbMouseDown != 1 )
return 0;
sgbMouseDown = 0;
LeftMouseUp();
track_repeat_walk(0);
}
else
{
if ( uMsg == WM_RBUTTONDOWN )
{
MouseX = (unsigned short)lParam;
MouseY = (unsigned int)lParam >> 16;
if ( !sgbMouseDown )
{
sgbMouseDown = 2;
SetCapture(hWnd);
RightMouseDown();
}
return 0;
}
if ( uMsg != WM_RBUTTONUP )
{
if ( uMsg == WM_CAPTURECHANGED )
{
if ( hWnd != (HWND)lParam )
{
sgbMouseDown = 0;
track_repeat_walk(0);
}
}
else if ( uMsg > WM_DIAB && uMsg <= WM_DIABRETOWN )
{
if ( (unsigned char)gbMaxPlayers > 1u )
pfile_write_hero();
nthread_ignore_mutex(1);
PaletteFadeOut(8);
FreeMonsterSnd();
music_stop();
track_repeat_walk(0);
sgbMouseDown = 0;
ReleaseCapture();
ShowProgress(uMsg);
drawpanflag = 255;
DrawAndBlit();
if ( gbRunGame )
PaletteFadeIn(8);
nthread_ignore_mutex(0);
gbGameLoopStartup = 1;
return 0;
}
return init_palette(hWnd, uMsg, wParam, lParam);
}
MouseX = (unsigned short)lParam;
MouseY = (unsigned int)lParam >> 16;
if ( sgbMouseDown != 2 )
return 0;
sgbMouseDown = 0;
}
ReleaseCapture();
return 0;
}
switch ( uMsg )
{
case WM_LBUTTONDOWN:
MouseX = (unsigned short)lParam;
MouseY = (unsigned int)lParam >> 16;
if ( !sgbMouseDown )
{
sgbMouseDown = 1;
SetCapture(hWnd);
track_repeat_walk(LeftMouseDown(wParam));
}
return 0;
case WM_KEYFIRST:
PressKey(wParam);
return 0;
case WM_KEYUP:
ReleaseKey(wParam);
return 0;
case WM_CHAR:
PressChar(wParam);
return 0;
case WM_SYSKEYDOWN:
if ( PressSysKey(wParam) )
return 0;
return init_palette(hWnd, uMsg, wParam, lParam);
case WM_SYSCOMMAND:
if ( wParam == SC_CLOSE )
{
gbRunGame = 0;
gbRunGameResult = 0;
return 0;
}
return init_palette(hWnd, uMsg, wParam, lParam);
}
if ( uMsg != WM_MOUSEFIRST )
return init_palette(hWnd, uMsg, wParam, lParam);
MouseX = (unsigned short)lParam;
MouseY = (unsigned int)lParam >> 16;
gmenu_on_mouse_move((unsigned short)lParam);
return 0;
}
// 525650: using guessed type int gbRunGame;
// 525698: using guessed type int gbRunGameResult;
// 52571C: using guessed type int drawpanflag;
// 525748: using guessed type char sgbMouseDown;
// 679660: using guessed type char gbMaxPlayers;
//----- (004093B2) --------------------------------------------------------
bool __fastcall LeftMouseDown(int a1)
{
int v1; // edi
int v3; // eax
bool v6; // zf
int v7; // ecx
int v8; // eax
unsigned char v9; // dl
unsigned char v11; // dl
unsigned short v12; // ax
unsigned char v13; // dl
unsigned short v15; // [esp-8h] [ebp-10h]
v1 = a1;
if ( gmenu_left_mouse(1) || control_check_talk_btn() || sgnTimeoutCurs )
return 0;
if ( deathflag )
{
control_check_btn_press();
return 0;
}
if ( PauseMode == 2 )
return 0;
if ( doomflag )
{
doom_close();
return 0;
}
if ( spselflag )
{
SetSpell();
return 0;
}
if ( stextflag )
{
CheckStoreBtn();
return 0;
}
if ( MouseY >= 352 )
{
if ( !talkflag && !dropGoldFlag )
{
if ( !gmenu_exception() )
CheckInvScrn();
}
DoPanBtn();
if ( pcurs <= 1 || pcurs >= 12 )
return 0;
goto LABEL_48;
}
if ( gmenu_exception() || TryIconCurs() )
return 0;
if ( questlog && MouseX > 32 && MouseX < 288 && MouseY > 32 && MouseY < 308 )
{
QuestlogESC();
return 0;
}
if ( qtextflag )
{
qtextflag = 0;
sfx_stop();
return 0;
}
if ( chrflag && MouseX < 320 )
{
CheckChrBtns();
return 0;
}
if ( invflag && MouseX > 320 )
{
if ( !dropGoldFlag )
CheckInvItem();
return 0;
}
if ( sbookflag && MouseX > 320 )
{
CheckSBook();
return 0;
}
if ( pcurs >= CURSOR_FIRSTITEM )
{
if ( !TryInvPut() )
return 0;
NetSendCmdPItem(1u, CMD_PUTITEM, cursmx, cursmy);
LABEL_48:
SetCursor(CURSOR_HAND);
return 0;
}
v3 = 21720 * myplr;
if ( plr[myplr]._pStatPts && !spselflag )
CheckLvlBtn();
if ( lvlbtndown )
return 0;
if ( leveltype )
{
v7 = abs(plr[myplr].WorldX - cursmx) < 2 && abs(plr[myplr].WorldY - cursmy) < 2;
_HIWORD(v8) = _HIWORD(pcurs);
if ( pcursitem != -1 && pcurs == 1 && v1 != 5 )
{
_LOWORD(v8) = pcursitem;
NetSendCmdLocParam1(1u, (invflag == 0) + CMD_GOTOGETITEM, cursmx, cursmy, v8);
LABEL_96:
if ( pcursitem != -1 )
return 0;
v6 = pcursobj == -1;
goto LABEL_98;
}
if ( pcursobj != -1 )
{
if ( v1 != 5 || v7 && (v7 = 120 * pcursobj, *((_BYTE *)&object[0]._oBreak + v7) == 1) )
{
_LOWORD(v7) = pcursobj;
NetSendCmdLocParam1(1u, (pcurs == 5) + CMD_OPOBJXY, cursmx, cursmy, v7);
goto LABEL_95;
}
}
if ( plr[myplr]._pwtype == 1 )
{
if ( v1 == 5 )
{
v9 = CMD_RATTACKXY;
LABEL_84:
NetSendCmdLoc(1u, v9, cursmx, cursmy);
goto LABEL_95;
}
if ( pcursmonst != -1 )
{
v15 = pcursmonst;
if ( !CanTalkToMonst(pcursmonst) )
{
v11 = CMD_RATTACKID;
LABEL_89:
NetSendCmdParam1(1u, v11, v15);
goto LABEL_96;
}
LABEL_88:
v11 = CMD_ATTACKID;
goto LABEL_89;
}
_LOBYTE(v12) = pcursplr;
if ( pcursplr == -1 || FriendlyMode )
goto LABEL_96;
v13 = CMD_RATTACKPID;
}
else
{
if ( v1 == 5 )
{
if ( pcursmonst == -1 || !CanTalkToMonst(pcursmonst) )
{
v9 = CMD_SATTACKXY;
goto LABEL_84;
}
v12 = pcursmonst;
v13 = CMD_ATTACKID;
LABEL_94:
NetSendCmdParam1(1u, v13, v12);
LABEL_95:
if ( v1 == 5 )
return 0;
goto LABEL_96;
}
if ( pcursmonst != -1 )
{
v15 = pcursmonst;
goto LABEL_88;
}
_LOBYTE(v12) = pcursplr;
if ( pcursplr == -1 || FriendlyMode )
goto LABEL_96;
v13 = CMD_ATTACKPID;
}
v12 = (char)v12;
goto LABEL_94;
}
if ( pcursitem != -1 && pcurs == 1 )
{
_LOWORD(v3) = pcursitem;
NetSendCmdLocParam1(1u, (invflag == 0) + CMD_GOTOGETITEM, cursmx, cursmy, v3);
}
if ( pcursmonst != -1 )
NetSendCmdLocParam1(1u, CMD_TALKXY, cursmx, cursmy, pcursmonst);
v6 = pcursitem == -1;
LABEL_98:
if ( v6 && pcursmonst == -1 && pcursplr == -1 )
return 1;
return 0;
}
// 484368: using guessed type int FriendlyMode;
// 4B84DC: using guessed type int dropGoldFlag;
// 4B851C: using guessed type int lvlbtndown;
// 4B8960: using guessed type int talkflag;
// 4B8968: using guessed type int sbookflag;
// 4B8C98: using guessed type int spselflag;
// 4B8CC0: using guessed type char pcursitem;
// 4B8CC1: using guessed type char pcursobj;
// 4B8CC2: using guessed type char pcursplr;
// 525740: using guessed type int PauseMode;
// 52575C: using guessed type int doomflag;
// 5BB1ED: using guessed type char leveltype;
// 646D00: using guessed type char qtextflag;
// 69BD04: using guessed type int questlog;
// 6AA705: using guessed type char stextflag;
//----- (004097EC) --------------------------------------------------------
bool __cdecl TryIconCurs()
{
unsigned char v0; // dl
int v1; // edx
int v2; // eax
int v3; // eax
int v4; // ST0C_4
int v5; // eax
switch ( pcurs )
{
case CURSOR_RESURRECT:
v0 = CMD_RESURRECT;
LABEL_3:
NetSendCmdParam1(1u, v0, pcursplr);
return 1;
case CURSOR_HEALOTHER:
v0 = CMD_HEALOTHER;
goto LABEL_3;
case CURSOR_TELEKINESIS:
DoTelekinesis();
return 1;
case CURSOR_IDENTIFY:
if ( pcursinvitem != -1 )
{
CheckIdentify(myplr, pcursinvitem);
return 1;
}
LABEL_26:
SetCursor(CURSOR_HAND);
return 1;
case CURSOR_REPAIR:
if ( pcursinvitem != -1 )
{
DoRepair(myplr, pcursinvitem);
return 1;
}
goto LABEL_26;
case CURSOR_RECHARGE:
if ( pcursinvitem != -1 )
{
DoRecharge(myplr, pcursinvitem);
return 1;
}
goto LABEL_26;
case CURSOR_TELEPORT:
v1 = plr[myplr]._pTSpell;
if ( pcursmonst == -1 )
{
if ( pcursplr == -1 )
{
v4 = GetSpellLevel(myplr, v1);
v5 = 21720 * myplr;
_LOWORD(v5) = plr[myplr]._pTSpell;
NetSendCmdLocParam2(1u, CMD_TSPELLXY, cursmx, cursmy, v5, v4);
}
else
{
v3 = GetSpellLevel(myplr, v1);
NetSendCmdParam3(1u, CMD_TSPELLPID, pcursplr, plr[myplr]._pTSpell, v3);
}
}
else
{
v2 = GetSpellLevel(myplr, v1);
NetSendCmdParam3(1u, CMD_TSPELLID, pcursmonst, plr[myplr]._pTSpell, v2);
}
goto LABEL_26;
}
if ( pcurs == CURSOR_DISARM && pcursobj == -1 )
goto LABEL_26;
return 0;
}
// 4B8CB8: using guessed type char pcursinvitem;
// 4B8CC1: using guessed type char pcursobj;
// 4B8CC2: using guessed type char pcursplr;
//----- (00409963) --------------------------------------------------------
void __cdecl LeftMouseUp()
{
gmenu_left_mouse(0);
control_release_talk_btn();
if ( panbtndown )
CheckBtnUp();
if ( chrbtnactive )
ReleaseChrBtns();
if ( lvlbtndown )
ReleaseLvlBtn();
if ( stextflag )
ReleaseStoreBtn();
}
// 4B851C: using guessed type int lvlbtndown;
// 4B87A8: using guessed type int chrbtnactive;
// 4B8C90: using guessed type int panbtndown;
// 6AA705: using guessed type char stextflag;
//----- (004099A8) --------------------------------------------------------
void __cdecl RightMouseDown()
{
if ( !gmenu_exception() && sgnTimeoutCurs == CURSOR_NONE && PauseMode != 2 && !plr[myplr]._pInvincible )
{
if ( doomflag )
{
doom_close();
}
else if ( !stextflag )
{
if ( spselflag )
{
SetSpell();
}
else if ( MouseY >= 352
|| (!sbookflag || MouseX <= 320)
&& !TryIconCurs()
&& (pcursinvitem == -1 || !UseInvItem(myplr, pcursinvitem)) )
{
if ( pcurs == 1 )
{
if ( pcursinvitem == -1 || !UseInvItem(myplr, pcursinvitem) )
CheckPlrSpell();
}
else if ( pcurs > 1 && pcurs < 12 )
{
SetCursor(CURSOR_HAND);
}
}
}
}
}
// 4B8968: using guessed type int sbookflag;
// 4B8C98: using guessed type int spselflag;
// 4B8CB8: using guessed type char pcursinvitem;
// 525740: using guessed type int PauseMode;
// 52575C: using guessed type int doomflag;
// 6AA705: using guessed type char stextflag;
//----- (00409A8E) --------------------------------------------------------
bool __fastcall PressSysKey(int wParam)
{
if ( gmenu_exception() || wParam != VK_F10 )
return 0;
diablo_hotkey_msg(1);
return 1;
}
//----- (00409AB0) --------------------------------------------------------
void __fastcall diablo_hotkey_msg(int dwMsg)
{
int v1; // esi
char *v2; // eax
char Filename[260]; // [esp+4h] [ebp-154h]
char ReturnedString[80]; // [esp+108h] [ebp-50h]
v1 = dwMsg;
if ( gbMaxPlayers != 1 )
{
if ( !GetModuleFileNameA(ghInst, Filename, 0x104u) )
TermMsg("Can't get program name");
v2 = strrchr(Filename, '\\');
if ( v2 )
*v2 = 0;
strcat(Filename, "\\Diablo.ini");
GetPrivateProfileStringA("NetMsg", spszMsgKeyTbl[v1], spszMsgTbl[v1], ReturnedString, 0x50u, Filename);
NetSendCmdString(-1, ReturnedString);
}
}
// 48436C: using guessed type char *spszMsgTbl[4];
// 48437C: using guessed type char *spszMsgKeyTbl[4];
// 679660: using guessed type char gbMaxPlayers;
//----- (00409B51) --------------------------------------------------------
void __fastcall ReleaseKey(int vkey)
{
if ( vkey == VK_SNAPSHOT )
CaptureScreen();
}
//----- (00409B5C) --------------------------------------------------------
void __fastcall PressKey(int vkey)
{
int v1; // esi
int v2; // ecx
int v3; // ecx
signed int v4; // eax
v1 = vkey;
if ( !gmenu_presskeys(vkey) && !control_presskeys(v1) )
{
if ( !deathflag )
goto LABEL_113;
if ( sgnTimeoutCurs == CURSOR_NONE )
{
if ( v1 == VK_F9 )
diablo_hotkey_msg(0);
if ( v1 == VK_F10 )
diablo_hotkey_msg(1);
if ( v1 == VK_F11 )
diablo_hotkey_msg(2);
if ( v1 == VK_F12 )
diablo_hotkey_msg(3);
if ( v1 == VK_RETURN )
control_type_message();
if ( v1 == VK_ESCAPE )
{
LABEL_113:
if ( v1 == VK_ESCAPE )
{
if ( !PressEscKey() )
{
track_repeat_walk(0);
gamemenu_previous();
}
return;
}
if ( sgnTimeoutCurs == CURSOR_NONE && !dropGoldFlag )
{
if ( v1 == VK_PAUSE )
{
diablo_pause_game();
return;
}
if ( PauseMode != 2 )
{
switch ( v1 )
{
case VK_RETURN:
if ( stextflag )
{
STextEnter();
}
else if ( questlog )
{
QuestlogEnter();
}
else
{
control_type_message();
}
return;
case VK_F1:
if ( helpflag )
{
helpflag = 0;
return;
}
if ( stextflag )
{
ClearPanel();
AddPanelString("No help available", 1);
AddPanelString("while in stores", 1);
track_repeat_walk(0);
return;
}
invflag = 0;
chrflag = 0;
sbookflag = 0;
spselflag = 0;
if ( qtextflag && !leveltype )
{
qtextflag = 0;
sfx_stop();
}
questlog = 0;
automapflag = 0;
msgdelay = 0;
gamemenu_off();
DisplayHelp();
LABEL_110:
doom_close();
return;
#ifdef _DEBUG
case VK_F3:
if ( pcursitem != -1 )
{
sprintf(tempstr, "IDX = %i : Seed = %i : CF = %i", item[pcursitem].IDidx, item[pcursitem]._iSeed, item[pcursitem]._iCreateInfo);
NetSendCmdString(1 << myplr, tempstr);
}
sprintf(tempstr, "Numitems : %i", numitems);
NetSendCmdString(1 << myplr, tempstr);
return;
case VK_F4:
PrintDebugQuest();
return;
#endif
case VK_F5:
v2 = 0;
goto LABEL_48;
case VK_F6:
v2 = 1;
goto LABEL_48;
case VK_F7:
v2 = 2;
goto LABEL_48;
case VK_F8:
v2 = 3;
LABEL_48:
if ( spselflag )
SetSpeedSpell(v2);
else
ToggleSpell(v2);
return;
case VK_F9:
v3 = 0;
LABEL_59:
diablo_hotkey_msg(v3);
return;
case VK_F10:
v3 = 1;
goto LABEL_59;
case VK_F11:
v3 = 2;
goto LABEL_59;
case VK_F12:
v3 = 3;
goto LABEL_59;
case VK_UP:
if ( stextflag )
{
STextUp();
}
else if ( questlog )
{
QuestlogUp();
}
else if ( helpflag )
{
HelpScrollUp();
}
else if ( automapflag )
{
AutomapUp();
}
return;
case VK_DOWN:
if ( stextflag )
{
STextDown();
}
else if ( questlog )
{
QuestlogDown();
}
else if ( helpflag )
{
HelpScrollDown();
}
else if ( automapflag )
{
AutomapDown();
}
return;
case VK_PRIOR:
if ( stextflag )
STextPrior();
return;
case VK_NEXT:
if ( stextflag )
STextNext();
return;
case VK_LEFT:
if ( automapflag && !talkflag )
AutomapLeft();
return;
case VK_RIGHT:
if ( automapflag && !talkflag )
AutomapRight();
return;
case VK_TAB:
DoAutoMap();
return;
case VK_SPACE:
if ( !chrflag )
{
if ( !invflag )
{
LABEL_106:
helpflag = 0;
invflag = 0;
chrflag = 0;
sbookflag = 0;
spselflag = 0;
if ( qtextflag && !leveltype )
{
qtextflag = 0;
sfx_stop();
}
questlog = 0;
automapflag = 0;
msgdelay = 0;
gamemenu_off();
goto LABEL_110;
}
v4 = MouseX;
if ( MouseX >= 480 || MouseY >= 352 )
{
LABEL_101:
if ( !invflag && chrflag && v4 > 160 && MouseY < 352 )
SetCursorPos(v4 - 160, MouseY);
goto LABEL_106;
}
SetCursorPos(MouseX + 160, MouseY);
}
v4 = MouseX;
goto LABEL_101;
}
}
}
}
}
}
}
// 4B84DC: using guessed type int dropGoldFlag;
// 4B8960: using guessed type int talkflag;
// 4B8968: using guessed type int sbookflag;
// 4B8C98: using guessed type int spselflag;
// 525740: using guessed type int PauseMode;
// 52B9F0: using guessed type char msgdelay;
// 5BB1ED: using guessed type char leveltype;
// 646D00: using guessed type char qtextflag;
// 69BD04: using guessed type int questlog;
// 6AA705: using guessed type char stextflag;
//----- (00409F43) --------------------------------------------------------
void __cdecl diablo_pause_game()
{
if ( (unsigned char)gbMaxPlayers <= 1u )
{
if ( PauseMode )
{
PauseMode = 0;
}
else
{
PauseMode = 2;
FreeMonsterSnd();
track_repeat_walk(0);
}
drawpanflag = 255;
}
}
// 52571C: using guessed type int drawpanflag;
// 525740: using guessed type int PauseMode;
// 679660: using guessed type char gbMaxPlayers;
//----- (00409F7F) --------------------------------------------------------
void __fastcall PressChar(int vkey)
{
int v1; // ebx
BOOL v4; // ecx
int v5; // ecx
int v6; // eax
BOOL v7; // ecx
int v9; // ecx
int v10; // eax
int v11; // eax
int v12; // eax
int v13; // eax
int v14; // eax
int v15; // eax
int v16; // eax
int v18; // [esp-4h] [ebp-8h]
v1 = vkey;
if ( !gmenu_exception() && !control_talk_last_key(v1) && sgnTimeoutCurs == CURSOR_NONE && !deathflag )
{
if ( (_BYTE)v1 == 'p' || (_BYTE)v1 == 'P' )
{
diablo_pause_game();
}
else if ( PauseMode != 2 )
{
if ( doomflag )
{
doom_close();
return;
}
if ( dropGoldFlag )
{
control_drop_gold(v1);
return;
}
switch ( v1 )
{
case '!':
case '1':
v9 = myplr;
v10 = plr[myplr].SpdList[0]._itype;
if ( v10 != -1 && v10 != 11 )
{
v18 = 47;
goto LABEL_72;
}
return;
case '#':
case '3':
v9 = myplr;
v12 = plr[myplr].SpdList[2]._itype;
if ( v12 != -1 && v12 != 11 )
{
v18 = 49;
goto LABEL_72;
}
return;
case '$':
case '4':
v9 = myplr;
v13 = plr[myplr].SpdList[3]._itype;
if ( v13 != -1 && v13 != 11 )
{
v18 = 50;
goto LABEL_72;
}
return;
case '%':
case '5':
v9 = myplr;
v14 = plr[myplr].SpdList[4]._itype;
if ( v14 != -1 && v14 != 11 )
{
v18 = 51;
goto LABEL_72;
}
return;
case '&':
case '7':
v9 = myplr;
v16 = plr[myplr].SpdList[6]._itype;
if ( v16 != -1 && v16 != 11 )
{
v18 = 53;
goto LABEL_72;
}
return;
case '*':
case '8':
#ifdef _DEBUG
if ( debug_mode_key_inverted_v || debug_mode_key_w )
{
NetSendCmd(1, CMD_CHEAT_EXPERIENCE);
return;
}
#endif
v9 = myplr;
if ( plr[myplr].SpdList[7]._itype != -1
&& plr[myplr].SpdList[7]._itype != 11 )
{
v18 = 54;
goto LABEL_72;
}
return;
case '+':
case '=':
if ( automapflag )
AutomapZoomIn();
return;
case '-':
case '_':
if ( automapflag )
AutomapZoomOut();
return;
case '2':
case '@':
v9 = myplr;
v11 = plr[myplr].SpdList[1]._itype;
if ( v11 != -1 && v11 != 11 )
{
v18 = 48;
goto LABEL_72;
}
return;
case '6':
case '^':
v9 = myplr;
v15 = plr[myplr].SpdList[5]._itype;
if ( v15 != -1 && v15 != 11 )
{
v18 = 52;
LABEL_72:
UseInvItem(v9, v18);
}
return;
case 'B':
case 'b':
if ( !stextflag )
{
invflag = 0;
sbookflag = sbookflag == 0;
}
return;
case 'C':
case 'c':
if ( !stextflag )
{
questlog = 0;
v7 = chrflag == 0;
chrflag = chrflag == 0;
if ( !v7 || invflag )
goto LABEL_18;
goto LABEL_24;
}
return;
case 'F':
case 'f':
palette_inc_gamma();
return;
case 'G':
case 'g':
palette_dec_gamma();
return;
case 'I':
case 'i':
if ( stextflag )
return;
sbookflag = 0;
v4 = invflag == 0;
invflag = invflag == 0;
if ( !v4 || chrflag )
{
LABEL_24:
if ( MouseX < 480 )
{
v5 = MouseY;
if ( MouseY < 352 )
{
v6 = MouseX + 160;
goto LABEL_27;
}
}
}
else
{
LABEL_18:
if ( MouseX > 160 )
{
v5 = MouseY;
if ( MouseY < 352 )
{
v6 = MouseX - 160;
LABEL_27:
SetCursorPos(v6, v5);
return;
}
}
}
break;
case 'Q':
case 'q':
if ( !stextflag )
{
chrflag = 0;
if ( questlog )
questlog = 0;
else
StartQuestlog();
}
return;
case 'S':
case 's':
if ( !stextflag )
{
invflag = 0;
if ( spselflag )
spselflag = 0;
else
DoSpeedBook();
track_repeat_walk(0);
}
return;
case 'V':
NetSendCmdString(1 << myplr, gszVersionNumber);
return;
case 'v':
NetSendCmdString(1 << myplr, gszProductName);
return;
case 'Z':
case 'z':
zoomflag = zoomflag == 0;
return;
#ifdef _DEBUG
case '[':
if ( !currlevel && debug_mode_key_w )
TakeGoldCheat();
return;
case ']':
if ( !currlevel && debug_mode_key_w )
MaxSpellsCheat();
return;
case 'a':
if ( debug_mode_key_inverted_v )
{
spelldata[SPL_TELEPORT].sTownSpell = 1;
plr[myplr]._pSplLvl[plr[myplr]._pSpell]++;
}
return;
case 'D':
PrintDebugPlayer(1);
return;
case 'd':
PrintDebugPlayer(0);
return;
case 'e':
if ( debug_mode_key_d )
{
sprintf(tempstr, "EFlag = %i", plr[myplr]._peflag);
NetSendCmdString(1 << myplr, tempstr);
}
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 )
{
sprintf(tempstr, "PX = %i PY = %i", plr[myplr].WorldX, plr[myplr].WorldY);
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 && debug_mode_key_w )
GiveGoldCheat();
return;
case '~':
if ( !currlevel && debug_mode_key_w )
StoresCheat();
return;
#endif
default:
return;
}
}
}
}
// 4B84DC: using guessed type int dropGoldFlag;
// 4B8968: using guessed type int sbookflag;
// 4B8C98: using guessed type int spselflag;
// 52569C: using guessed type int zoomflag;
// 525740: using guessed type int PauseMode;
// 52575C: using guessed type int doomflag;
// 69BD04: using guessed type int questlog;
// 6AA705: using guessed type char stextflag;
//----- (0040A391) --------------------------------------------------------
void __cdecl LoadLvlGFX()
{
unsigned char *v0; // eax
char *v1; // ecx
unsigned char *v2; // eax
char *v3; // ecx
unsigned char *v4; // eax
char *v5; // ecx
if ( !leveltype )
{
pDungeonCels = LoadFileInMem("Levels\\TownData\\Town.CEL", 0);
pMegaTiles = LoadFileInMem("Levels\\TownData\\Town.TIL", 0);
v4 = LoadFileInMem("Levels\\TownData\\Town.MIN", 0);
v5 = "Levels\\TownData\\TownS.CEL";
goto LABEL_14;
}
if ( leveltype == 1 )
{
pDungeonCels = LoadFileInMem("Levels\\L1Data\\L1.CEL", 0);
v2 = LoadFileInMem("Levels\\L1Data\\L1.TIL", 0);
v3 = "Levels\\L1Data\\L1.MIN";
goto LABEL_12;
}
if ( leveltype != 2 )
{
if ( leveltype != 3 )
{
if ( leveltype != 4 )
{
TermMsg("LoadLvlGFX");
return;
}
pDungeonCels = LoadFileInMem("Levels\\L4Data\\L4.CEL", 0);
v0 = LoadFileInMem("Levels\\L4Data\\L4.TIL", 0);
v1 = "Levels\\L4Data\\L4.MIN";
goto LABEL_10;
}
pDungeonCels = LoadFileInMem("Levels\\L3Data\\L3.CEL", 0);
v2 = LoadFileInMem("Levels\\L3Data\\L3.TIL", 0);
v3 = "Levels\\L3Data\\L3.MIN";
LABEL_12:
pMegaTiles = v2;
v4 = LoadFileInMem(v3, 0);
v5 = "Levels\\L1Data\\L1S.CEL";
goto LABEL_14;
}
pDungeonCels = LoadFileInMem("Levels\\L2Data\\L2.CEL", 0);
v0 = LoadFileInMem("Levels\\L2Data\\L2.TIL", 0);
v1 = "Levels\\L2Data\\L2.MIN";
LABEL_10:
pMegaTiles = v0;
v4 = LoadFileInMem(v1, 0);
v5 = "Levels\\L2Data\\L2S.CEL";
LABEL_14:
*(_DWORD *)&dpiece_defs[0].blocks = (unsigned int)v4;
level_special_cel = LoadFileInMem(v5, 0);
}
// 5BB1ED: using guessed type char leveltype;
//----- (0040A4B4) --------------------------------------------------------
void __cdecl LoadAllGFX()
{
pSpeedCels = DiabloAllocPtr(0x100000);
IncProgress();
IncProgress();
InitObjectGFX();
IncProgress();
InitMissileGFX();
IncProgress();
}
//----- (0040A4E1) --------------------------------------------------------
void __fastcall CreateLevel(int lvldir)
{
int hnd; // cl
switch ( leveltype )
{
case 0:
CreateTown(lvldir);
InitTownTriggers();
hnd = 0;
break;
case 1:
CreateL5Dungeon(glSeedTbl[currlevel], lvldir);
InitL1Triggers();
Freeupstairs();
hnd = 1;
break;
case 2:
CreateL2Dungeon(glSeedTbl[currlevel], lvldir);
InitL2Triggers();
Freeupstairs();
hnd = 2;
break;
case 3:
CreateL3Dungeon(glSeedTbl[currlevel], lvldir);
InitL3Triggers();
Freeupstairs();
hnd = 3;
break;
case 4:
CreateL4Dungeon(glSeedTbl[currlevel], lvldir);
InitL4Triggers();
Freeupstairs();
hnd = 4;
break;
default:
TermMsg("CreateLevel");
return;
}
LoadRndLvlPal(hnd);
}
// 5BB1ED: using guessed type char leveltype;
//----- (0040A5A4) --------------------------------------------------------
void __fastcall LoadGameLevel(bool firstflag, int lvldir)
{
int v2; // ebp
bool visited; // edx
int i; // ecx
int j; // eax
v2 = 0;
if ( setseed )
glSeedTbl[currlevel] = setseed;
music_stop();
SetCursor(CURSOR_HAND);
SetRndSeed(glSeedTbl[currlevel]);
IncProgress();
MakeLightTable();
LoadLvlGFX();
IncProgress();
if ( firstflag )
{
InitInv();
InitItemGFX();
InitQuestText();
if ( gbMaxPlayers )
{
for(i = 0; i < gbMaxPlayers; i++)
InitPlrGFXMem(i);
}
InitStores();
InitAutomapOnce();
InitHelp();
}
SetRndSeed(glSeedTbl[currlevel]);
if ( !leveltype )
SetupTownStores();
IncProgress();
InitAutomap();
if ( leveltype && lvldir != 4 )
{
InitLighting();
InitVision();
}
InitLevelMonsters();
IncProgress();
if ( !setlevel )
{
CreateLevel(lvldir);
IncProgress();
FillSolidBlockTbls();
SetRndSeed(glSeedTbl[currlevel]);
if ( leveltype )
{
GetLevelMTypes();
InitThemes();
LoadAllGFX();
}
else
{
InitMissileGFX();
}
IncProgress();
if ( lvldir == 3 )
GetReturnLvlPos();
if ( lvldir == 5 )
GetPortalLvlPos();
IncProgress();
for(i = 0; i < 4; i++)
{
if ( plr[i].plractive )
{
if ( currlevel == plr[i].plrlevel )
{
InitPlayerGFX(v2);
if ( lvldir != 4 )
InitPlayer(v2, firstflag);
}
}
++v2;
}
PlayDungMsgs();
InitMultiView();
IncProgress();
visited = 0;
if ( gbMaxPlayers > 0 )
{
for(i = 0; i < gbMaxPlayers; i++)
{
if ( plr[i].plractive )
visited = visited || plr[i]._pLvlVisited[currlevel];
}
}
SetRndSeed(glSeedTbl[currlevel]);
if ( leveltype )
{
if ( firstflag || lvldir == 4 || !plr[myplr]._pLvlVisited[currlevel] || gbMaxPlayers != 1 )
{
HoldThemeRooms();
glMid1Seed[currlevel] = GetRndSeed();
InitMonsters();
glMid2Seed[currlevel] = GetRndSeed();
InitObjects(currlevel);
InitItems();
CreateThemeRooms();
glMid3Seed[currlevel] = GetRndSeed();
InitMissiles();
InitDead();
glEndSeed[currlevel] = GetRndSeed();
if ( gbMaxPlayers != 1 )
DeltaLoadLevel();
IncProgress();
SavePreLighting();
goto LABEL_55;
}
InitMonsters();
InitMissiles();
InitDead();
IncProgress();
LoadLevel();
LABEL_54:
IncProgress();
LABEL_55:
if ( gbMaxPlayers == 1 )
ResyncQuests();
else
ResyncMPQuests();
goto LABEL_72;
}
for(i = 0; i < 112; i++)
{
for(j = 0; j < 112; j++)
dFlags[i][j] |= 0x40;
}
InitTowners();
InitItems();
InitMissiles();
IncProgress();
if ( !firstflag && lvldir != 4 && plr[myplr]._pLvlVisited[currlevel] )
{
if ( gbMaxPlayers != 1 )
goto LABEL_53;
LoadLevel();
}
if ( gbMaxPlayers == 1 )
goto LABEL_54;
LABEL_53:
DeltaLoadLevel();
goto LABEL_54;
}
pSpeedCels = DiabloAllocPtr(0x100000);
LoadSetMap();
IncProgress();
GetLevelMTypes();
InitMonsters();
InitMissileGFX();
InitDead();
FillSolidBlockTbls();
IncProgress();
if ( lvldir == 5 )
GetPortalLvlPos();
for(i = 0; i < 4; i++)
{
if ( plr[i].plractive )
{
if ( currlevel == plr[i].plrlevel )
{
InitPlayerGFX(v2);
if ( lvldir != 4 )
InitPlayer(v2, firstflag);
}
}
++v2;
}
InitMultiView();
IncProgress();
if ( firstflag || lvldir == 4 || !plr[myplr]._pSLvlVisited[(unsigned char)setlvlnum] )
{
InitItems();
SavePreLighting();
}
else
{
LoadLevel();
}
InitMissiles();
IncProgress();
LABEL_72:
SyncPortals();
for(i = 0; i < 4; i++)
{
if ( plr[i].plractive && plr[i].plrlevel == currlevel && (!plr[i]._pLvlChanging || i == myplr) )
{
if ( plr[i]._pHitPoints <= 0 )
dFlags[plr[i].WorldX][plr[i].WorldY] |= 4;
else if ( gbMaxPlayers == 1 )
dPlayer[plr[i].WorldX][plr[i].WorldY] = i + 1;
else
SyncInitPlrPos(i);
}
}
if ( leveltype )
SetDungeonMicros();
InitLightMax();
IncProgress();
IncProgress();
if ( firstflag )
{
InitControlPan();
IncProgress();
}
if ( leveltype )
{
ProcessLightList();
ProcessVisionList();
}
music_start((unsigned char)leveltype);
//do
// _LOBYTE(v19) = IncProgress();
while ( !IncProgress() );
if ( setlevel && setlvlnum == SL_SKELKING && quests[12]._qactive == 2 )
PlaySFX(USFX_SKING1);
}
// 525738: using guessed type int setseed;
// 5BB1ED: using guessed type char leveltype;
// 5CCB10: using guessed type char setlvlnum;
// 5CF31D: using guessed type char setlevel;
// 679660: using guessed type char gbMaxPlayers;
//----- (0040AAE3) --------------------------------------------------------
void __fastcall game_loop(bool startup)
{
int v1; // ecx
int v2; // esi
v1 = startup != 0 ? 0x39 : 0;
v2 = v1 + 3;
if ( v1 != -3 )
{
while ( 1 )
{
--v2;
if ( !multi_handle_delta() )
break;
timeout_cursor(0);
game_logic();
if ( gbRunGame )
{
if ( gbMaxPlayers != 1 )
{
if ( nthread_has_500ms_passed() )
{
if ( v2 )
continue;
}
}
}
return;
}
timeout_cursor(1);
}
}
// 525650: using guessed type int gbRunGame;
// 679660: using guessed type char gbMaxPlayers;
//----- (0040AB33) --------------------------------------------------------
void __cdecl game_logic()
{
if ( PauseMode != 2 )
{
if ( PauseMode == 1 )
PauseMode = 2;
if ( gbMaxPlayers == 1 && gmenu_exception() )
{
drawpanflag |= 1u;
}
else
{
if ( !gmenu_exception() && sgnTimeoutCurs == CURSOR_NONE )
{
CheckCursMove();
track_process();
}
if ( gbProcessPlayers )
ProcessPlayers();
if ( leveltype )
{
ProcessMonsters();
ProcessObjects();
ProcessMissiles();
ProcessItems();
ProcessLightList();
ProcessVisionList();
}
else
{
ProcessTowners();
ProcessItems();
ProcessMissiles();
}
#ifdef _DEBUG
if ( debug_mode_key_inverted_v )
{
if ( GetAsyncKeyState(VK_SHIFT) & 0x8000 )
ScrollView();
}
#endif
sound_update();
ClearPlrMsg();
CheckTriggers();
CheckQuests();
drawpanflag |= 1u;
pfile_update(0);
}
}
}
// 5256A0: using guessed type int gbProcessPlayers;
// 525718: using guessed type char cineflag;
// 52571C: using guessed type int drawpanflag;
// 525740: using guessed type int PauseMode;
// 5BB1ED: using guessed type char leveltype;
// 679660: using guessed type char gbMaxPlayers;
//----- (0040ABE7) --------------------------------------------------------
void __fastcall timeout_cursor(bool timeout)
{
if ( timeout )
{
if ( sgnTimeoutCurs == CURSOR_NONE && !sgbMouseDown )
{
sgnTimeoutCurs = pcurs;
multi_net_ping();
ClearPanel();
AddPanelString("-- Network timeout --", 1);
AddPanelString("-- Waiting for players --", 1);
SetCursor(CURSOR_HOURGLASS);
drawpanflag = 255;
}
scrollrt_draw_game_screen(1);
}
else if ( sgnTimeoutCurs )
{
SetCursor(sgnTimeoutCurs);
sgnTimeoutCurs = 0;
ClearPanel();
drawpanflag = 255;
}
}
// 52571C: using guessed type int drawpanflag;
// 525748: using guessed type char sgbMouseDown;
//----- (0040AC6B) --------------------------------------------------------
void __cdecl diablo_color_cyc_logic()
{
DWORD v0; // eax
v0 = GetTickCount();
if ( v0 - color_cycle_timer >= 0x32 )
{
color_cycle_timer = v0;
if ( palette_get_colour_cycling() )
{
if ( leveltype == 4 )
{
lighting_color_cycling();
}
else if ( leveltype == 3 )
{
if ( fullscreen )
palette_update_caves();
}
}
}
}
// 484364: using guessed type int fullscreen;
// 52574C: using guessed type int color_cycle_timer;
// 5BB1ED: using guessed type char leveltype;
View Git Blame Copy Permalink