/*

* 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 diabquad1x; // weak

int diabquad1y; // weak

int diabquad3x; // idb

int diabquad3y; // idb

int diabquad2x; // idb

int diabquad2y; // idb

int diabquad4x; // idb

int diabquad4y; // idb

int hallok[20];

int l4holdx; // weak

int l4holdy; // weak

int SP4x1; // idb

int SP4x2; // weak

int SP4y1; // idb

int SP4y2; // weak

char L4dungeon[80][80];

char dung[20][20];

//int dword_52A4DC; // weak

unsigned char L4ConvTbl[16] = { 30u, 6u, 1u, 6u, 2u, 6u, 6u, 6u, 9u, 6u, 1u, 6u, 2u, 6u, 3u, 6u };

unsigned char L4USTAIRS[42] =

{

4u,

5u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

0u,

0u,

0u,

0u,

36u,

38u,

35u,

0u,

37u,

34u,

33u,

32u,

0u,

0u,

31u,

0u,

0u,

0u,

0u,

0u

};

unsigned char L4TWARP[42] =

{

4u,

5u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

0u,

0u,

0u,

0u,

134u,

136u,

133u,

0u,

135u,

132u,

131u,

130u,

0u,

0u,

129u,

0u,

0u,

0u,

0u,

0u

};

unsigned char L4DSTAIRS[52] =

{

5u,

5u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

0u,

0u,

0u,

0u,

0u,

0u,

0u,

45u,

41u,

0u,

0u,

44u,

43u,

40u,

0u,

0u,

46u,

42u,

39u,

0u,

0u,

0u,

0u,

0u,

0u

};

unsigned char L4PENTA[52] =

{

5u,

5u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

0u,

0u,

0u,

0u,

0u,

0u,

98u,

100u,

103u,

0u,

0u,

99u,

102u,

105u,

0u,

0u,

101u,

104u,

106u,

0u,

0u,

0u,

0u,

0u,

0u

};

unsigned char L4PENTA2[52] =

{

5u,

5u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

6u,

0u,

0u,

0u,

0u,

0u,

0u,

107u,

109u,

112u,

0u,

0u,

108u,

111u,

114u,

0u,

0u,

110u,

113u,

115u,

0u,

0u,

0u,

0u,

0u,

0u

};

unsigned char L4BTYPES[140] =

{

0, 1, 2, 3, 4, 5, 6, 7, 8, 9,

10, 11, 12, 13, 14, 15, 16, 17, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 6,

6, 6, 0, 0, 0, 0, 0, 0, 0, 0,

0, 1, 2, 1, 2, 1, 2, 1, 1, 2,

2, 0, 0, 0, 0, 0, 0, 15, 16, 9,

12, 4, 5, 7, 0, 0, 0, 0, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 0,

0, 0, 0, 0, 0, 0, 0, 0, 0, 0

};

//----- (00412655) --------------------------------------------------------

void __cdecl DRLG_LoadL4SP()

{

setloadflag_2 = 0;

if ( QuestStatus(11) )

{

pSetPiece_2 = (char *)LoadFileInMem("Levels\\L4Data\\Warlord.DUN", 0);

setloadflag_2 = 1;

}

if ( currlevel == 15 && gbMaxPlayers != 1 )

{

pSetPiece_2 = (char *)LoadFileInMem("Levels\\L4Data\\Vile1.DUN", 0);

setloadflag_2 = 1;

}

}

// 5B50D8: using guessed type int setloadflag_2;

// 679660: using guessed type char gbMaxPlayers;

//----- (004126AD) --------------------------------------------------------

void __cdecl DRLG_FreeL4SP()

{

char *v0; // ecx

v0 = pSetPiece_2;

pSetPiece_2 = 0;

mem_free_dbg(v0);

}

//----- (004126BF) --------------------------------------------------------

void __fastcall DRLG_L4SetSPRoom(int rx1, int ry1)

{

int v2; // edi

int v3; // esi

int v4; // eax

char v5; // bl

int v6; // [esp+8h] [ebp-Ch]

char *v7; // [esp+Ch] [ebp-8h]

int v8; // [esp+10h] [ebp-4h]

v8 = 0;

v2 = (unsigned char)pSetPiece_2[2];

v3 = (unsigned char)*pSetPiece_2;

setpc_x = rx1;

setpc_y = ry1;

setpc_w = v3;

setpc_h = v2;

v7 = pSetPiece_2 + 4;

if ( v2 > 0 )

{

do

{

if ( v3 > 0 )

{

v6 = v3;

v4 = ry1 + v8 + 40 * rx1;

do

{

v5 = *v7;

if ( *v7 )

{

dflags[0][v4] |= 0x80u;

dungeon[0][v4] = v5;

}

else

{

dungeon[0][v4] = 6;

}

v7 += 2;

v4 += 40;

--v6;

}

while ( v6 );

}

++v8;

}

while ( v8 < v2 );

}

}

// 5CF330: using guessed type int setpc_h;

// 5CF334: using guessed type int setpc_w;

//----- (00412744) --------------------------------------------------------

void __cdecl L4SaveQuads()

{

char *v0; // esi

char *v1; // edx

char *v2; // edi

char *v3; // eax

char *v4; // ecx

char *v5; // ebx

signed int v6; // [esp+Ch] [ebp-14h]

signed int v7; // [esp+10h] [ebp-10h]

char *v8; // [esp+14h] [ebp-Ch]

char *v9; // [esp+18h] [ebp-8h]

char *v10; // [esp+1Ch] [ebp-4h]

v0 = &dflags[39][l4holdy - 40 * l4holdx]; /* check */

v1 = &dflags[39][-l4holdy + 39 + -40 * l4holdx];

v9 = &dflags[l4holdx][l4holdy];

v8 = &dflags[0][40 * l4holdx - l4holdy + 39];

v6 = 14;

do

{

v2 = v1;

v10 = v8;

v3 = v9;

v4 = v0;

v7 = 14;

do

{

v5 = v10;

v10 += 40;

*v3 = 1;

*v4 = 1;

*v5 = 1;

*v2 = 1;

v4 -= 40;

v2 -= 40;

v3 += 40;

--v7;

}

while ( v7 );

++v9;

--v8;

--v1;

++v0;

--v6;

}

while ( v6 );

}

// 528A34: using guessed type int l4holdx;

// 528A38: using guessed type int l4holdy;

//----- (004127D3) --------------------------------------------------------

void __fastcall DRLG_L4SetRoom(unsigned char *pSetPiece, int rx1, int ry1)

{

int v3; // ebx

int v4; // edi

unsigned char *v5; // esi

int v6; // eax

char v7; // cl

int v8; // [esp+Ch] [ebp-8h]

int v9; // [esp+10h] [ebp-4h]

v3 = *pSetPiece;

v4 = 0;

v8 = pSetPiece[2];

v5 = pSetPiece + 4;

if ( v8 > 0 )

{

do

{

if ( v3 > 0 )

{

v9 = v3;

v6 = ry1 + v4 + 40 * rx1;

do

{

v7 = *v5;

if ( *v5 )

{

dflags[0][v6] |= 0x80u;

dungeon[0][v6] = v7;

}

else

{

dungeon[0][v6] = 6;

}

v6 += 40;

v5 += 2;

--v9;

}

while ( v9 );

}

++v4;

}

while ( v4 < v8 );

}

}

//----- (00412831) --------------------------------------------------------

void __fastcall DRLG_LoadDiabQuads(bool preflag)

{

bool v1; // esi

unsigned char *v2; // edi

char *v3; // ecx

unsigned char *v4; // edi

char *v5; // ecx

unsigned char *v6; // edi

char *v7; // ecx

unsigned char *v8; // esi

v1 = preflag;

v2 = LoadFileInMem("Levels\\L4Data\\diab1.DUN", 0);

diabquad1x = l4holdx + 4;

diabquad1y = l4holdy + 4;

DRLG_L4SetRoom(v2, l4holdx + 4, l4holdy + 4);

mem_free_dbg(v2);

v3 = "Levels\\L4Data\\diab2b.DUN";

if ( !v1 )

v3 = "Levels\\L4Data\\diab2a.DUN";

v4 = LoadFileInMem(v3, 0);

diabquad2y = l4holdy + 1;

diabquad2x = 27 - l4holdx;

DRLG_L4SetRoom(v4, 27 - l4holdx, l4holdy + 1);

mem_free_dbg(v4);

v5 = "Levels\\L4Data\\diab3b.DUN";

if ( !v1 )

v5 = "Levels\\L4Data\\diab3a.DUN";

v6 = LoadFileInMem(v5, 0);

diabquad3x = l4holdx + 1;

diabquad3y = 27 - l4holdy;

DRLG_L4SetRoom(v6, l4holdx + 1, 27 - l4holdy);

mem_free_dbg(v6);

v7 = "Levels\\L4Data\\diab4b.DUN";

if ( !v1 )

v7 = "Levels\\L4Data\\diab4a.DUN";

v8 = LoadFileInMem(v7, 0);

diabquad4y = 28 - l4holdy;

diabquad4x = 28 - l4holdx;

DRLG_L4SetRoom(v8, 28 - l4holdx, 28 - l4holdy);

mem_free_dbg(v8);

}

// 5289C4: using guessed type int diabquad1x;

// 5289C8: using guessed type int diabquad1y;

// 528A34: using guessed type int l4holdx;

// 528A38: using guessed type int l4holdy;

//----- (00412933) --------------------------------------------------------

bool __fastcall IsDURWall(char d)

{

bool result; // al

if ( d == 25 || d == 28 )

result = 1;

else

result = d == 23;

return result;

}

//----- (00412948) --------------------------------------------------------

bool __fastcall IsDLLWall(char dd)

{

bool result; // al

if ( dd == 27 || dd == 26 )

result = 1;

else

result = dd == 22;

return result;

}

//----- (0041295D) --------------------------------------------------------

void __cdecl L4FixRim()

{

char (*v0)[20]; // eax

v0 = dung;

do

{

*(_BYTE *)v0 = 0;

++v0;

}

while ( (signed int)v0 < (signed int)&dung[20][0] );

*(_DWORD *)&dung[0][0] = 0;

*(_DWORD *)&dung[0][4] = 0;

*(_DWORD *)&dung[0][8] = 0;

*(_DWORD *)&dung[0][12] = 0;

*(_DWORD *)&dung[0][16] = 0;

}

// 52A4DC: using guessed type int dword_52A4DC;

//----- (0041297B) --------------------------------------------------------

void __cdecl DRLG_L4GeneralFix()

{

signed int v0; // ecx

char *v1; // eax

signed int v2; // esi

v0 = 0;

do

{

v1 = (char *)dungeon + v0;

v2 = 39;

do

{

if ( (*v1 == 24 || *v1 == 122) && v1[40] == 2 && v1[1] == 5 )

*v1 = 17;

v1 += 40;

--v2;

}

while ( v2 );

++v0;

}

while ( v0 < 39 );

}

//----- (004129B0) --------------------------------------------------------

void __fastcall CreateL4Dungeon(int rseed, int entry)

{

int v2; // esi

v2 = entry;

SetRndSeed(rseed);

dminx = 16;

dminy = 16;

dmaxx = 96;

dmaxy = 96;

ViewX = 40;

ViewY = 40;

DRLG_InitSetPC();

DRLG_LoadL4SP();

DRLG_L4(v2);

DRLG_L4Pass3();

DRLG_FreeL4SP();

DRLG_SetPC();

}

// 5CF328: using guessed type int dmaxx;

// 5CF32C: using guessed type int dmaxy;

// 5D2458: using guessed type int dminx;

// 5D245C: using guessed type int dminy;

//----- (00412A00) --------------------------------------------------------

void __fastcall DRLG_L4(int entry)

{

signed int v1; // ebp

//int v2; // eax

int v3; // edx

char *v4; // edi

char v5; // bp

unsigned int v6; // ecx

char *v7; // edi

int v8; // ecx

//int v9; // eax

int v10; // eax

unsigned char *v11; // ecx

unsigned char *v12; // ecx

//int v13; // eax

signed int v14; // eax

signed int v15; // ecx

int v16; // ebx

int v17; // edi

char *v18; // ebp

signed int v19; // ecx

signed int v20; // eax

signed int v21; // esi

int v22; // [esp-8h] [ebp-20h]

int v23; // [esp+10h] [ebp-8h]

int v24; // [esp+14h] [ebp-4h]

v1 = 0;

v23 = entry;

do

{

DRLG_InitTrans();

do

{

InitL4Dungeon();

L4firstRoom();

L4FixRim();

}

while ( GetArea() < 173 );

uShape();

L4makeDungeon();

L4makeDmt();

L4tileFix();

if ( currlevel == 16 )

L4SaveQuads();

//_LOBYTE(v2) = QuestStatus(11);

if ( (QuestStatus(11) || currlevel == quests[15]._qlevel && gbMaxPlayers != 1) && SP4x1 < SP4x2 )

{

v3 = SP4x1;

v24 = SP4x2 - SP4x1;

do

{

if ( SP4y1 < SP4y2 )

{

v4 = &dflags[v3][SP4y1];

v5 = SP4y2 - SP4y1;

v6 = (unsigned int)(SP4y2 - SP4y1) >> 2;

memset(v4, 1u, 4 * v6);

v7 = &v4[4 * v6];

v8 = v5 & 3;

v1 = 0;

memset(v7, 1, v8);

}

++v3;

--v24;

}

while ( v24 );

}

L4AddWall();

DRLG_L4FloodTVal();

DRLG_L4TransFix();

if ( setloadflag_2 )

DRLG_L4SetSPRoom(SP4x1, SP4y1);

if ( currlevel == 16 )

DRLG_LoadDiabQuads(1);

//_LOBYTE(v9) = QuestStatus(11);

if ( !QuestStatus(11) )

{

if ( currlevel == 15 )

{

if ( !v23 )

{

v10 = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 1, 0);

if ( v10 )

{

if ( gbMaxPlayers != 1 || (v11 = L4PENTA, quests[5]._qactive == 2) )

v11 = L4PENTA2;

v10 = DRLG_L4PlaceMiniSet(v11, 1, 1, -1, -1, 0, 1);

}

goto LABEL_35;

}

v10 = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0);

if ( v10 )

{

if ( gbMaxPlayers != 1 || (v12 = L4PENTA, quests[5]._qactive == 2) )

v12 = L4PENTA2;

v10 = DRLG_L4PlaceMiniSet(v12, 1, 1, -1, -1, 1, 1);

}

}

else

{

if ( !v23 )

{

v10 = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 1, 0);

if ( v10 )

{

if ( currlevel != 16 )

v10 = DRLG_L4PlaceMiniSet(L4DSTAIRS, 1, 1, -1, -1, 0, 1);

goto LABEL_31;

}

LABEL_35:

++ViewX;

continue;

}

v10 = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0);

if ( v23 != 1 )

{

if ( v10 )

{

if ( currlevel != 16 )

v10 = DRLG_L4PlaceMiniSet(L4DSTAIRS, 1, 1, -1, -1, 0, 1);

LABEL_46:

if ( v10 )

{

if ( currlevel == 13 )

{

v22 = 1;

LABEL_34:

v10 = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, v22, 6);

goto LABEL_35;

}

}

}

goto LABEL_35;

}

if ( v10 )

{

if ( currlevel != 16 )

v10 = DRLG_L4PlaceMiniSet(L4DSTAIRS, 1, 1, -1, -1, 1, 1);

if ( v10 && currlevel == 13 )

v10 = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 0, 6);

}

}

++ViewY;

continue;

}

if ( !v23 )

{

v10 = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 1, 0);

LABEL_31:

if ( !v10 || currlevel != 13 )

goto LABEL_35;

v22 = 0;

goto LABEL_34;

}

v10 = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0);

if ( v23 != 1 )

goto LABEL_46;

if ( v10 && currlevel == 13 )

v10 = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 0, 6);

ViewX = 2 * setpc_x + 22;

ViewY = 2 * setpc_y + 22;

}

while ( !v10 );

DRLG_L4GeneralFix();

if ( currlevel != 16 )

DRLG_PlaceThemeRooms(7, 10, 6, 8, 1);

DRLG_L4Shadows();

DRLG_L4Corners();

DRLG_L4Subs();

DRLG_Init_Globals();

//_LOBYTE(v13) = QuestStatus(11);

if ( QuestStatus(11) )

{

do

{

v14 = v1;

v15 = 40;

do

{

pdungeon[0][v14] = dungeon[0][v14];

v14 += 40;

--v15;

}

while ( v15 );

++v1;

}

while ( v1 < 40 );

}

DRLG_CheckQuests(SP4x1, SP4y1);

if ( currlevel == 15 )

{

v16 = -1;

do

{

v17 = -1;

v18 = &dungeon[0][v16 + 1];

do

{

if ( *v18 == 98 )

Make_SetPC(v17, v16, 5, 5);

if ( *v18 == 107 )

Make_SetPC(v17, v16, 5, 5);

v18 += 40;

++v17;

}

while ( v17 + 1 < 40 );

++v16;

}

while ( v16 < 39 );

}

if ( currlevel == 16 )

{

v19 = 0;

do

{

v20 = v19;

v21 = 40;

do

{

pdungeon[0][v20] = dungeon[0][v20];

v20 += 40;

--v21;

}

while ( v21 );

++v19;

}

while ( v19 < 40 );

DRLG_LoadDiabQuads(0);

}

}

// 528A40: using guessed type int SP4x2;

// 528A48: using guessed type int SP4y2;

// 5B50D8: using guessed type int setloadflag_2;

// 679660: using guessed type char gbMaxPlayers;

//----- (00412DDD) --------------------------------------------------------

void __cdecl DRLG_L4Shadows()

{

signed int v0; // esi

char *v1; // eax

signed int v2; // edi

char v3; // dl

signed int v4; // ecx

v0 = 1;

do

{

v1 = &dungeon[1][v0];

v2 = 39;

do

{

v3 = *v1;

v4 = 0;

if ( *v1 == 3 )

v4 = 1;

if ( v3 == 4 )

v4 = 1;

if ( v3 == 8 )

v4 = 1;

if ( v3 == 15 )

v4 = 1;

if ( v4 )

{

if ( *(v1 - 40) == 6 )

*(v1 - 40) = 47;

if ( *(v1 - 41) == 6 )

*(v1 - 41) = 48;

}

v1 += 40;

--v2;

}

while ( v2 );

++v0;

}

while ( v0 < 40 );

}

//----- (00412E34) --------------------------------------------------------

void __cdecl InitL4Dungeon()

{

signed int v0; // edx

signed int v1; // eax

signed int v2; // ecx

memset(dung, 0, 0x190u);

memset(L4dungeon, 0, 0x1900u);

v0 = 0;

do

{

v1 = v0;

v2 = 40;

do

{

dflags[0][v1] = 0;

dungeon[0][v1] = 30;

v1 += 40;

--v2;

}

while ( v2 );

++v0;

}

while ( v0 < 40 );

}

//----- (00412E7B) --------------------------------------------------------

void __cdecl L4makeDmt()

{

signed int v0; // ecx

char (*v1)[40]; // ebp

char (*v2)[40]; // esi

char *v3; // eax

signed int v4; // edi

int v5; // edx

int v6; // ebx

v0 = 1;

v1 = dungeon;

do

{

v2 = v1;

v3 = &L4dungeon[1][v0 + 1];

v4 = 39;

do

{

v5 = (unsigned char)v3[80];

v6 = (unsigned char)*v3;

v3 += 160;

*(_BYTE *)v2 = L4ConvTbl[2 * ((unsigned char)*(v3 - 81) + 2 * (v6 + 2 * v5))

+ (unsigned char)*(v3 - 161)];

++v2;

--v4;

}

while ( v4 );

v1 = (char (*)[40])((char *)v1 + 1);

v0 += 2;

}

while ( v0 <= 77 );

}

//----- (00412ECB) --------------------------------------------------------

void __cdecl L4AddWall()

{

int v0; // edi

int v1; // esi

int v2; // ebx

int v3; // eax

int v4; // eax

int v5; // eax

int v6; // eax

int v7; // eax

int v8; // eax

int v9; // eax

int v10; // eax

int v11; // eax

int v12; // eax

int v13; // eax

int v14; // eax

int v15; // eax

int v16; // eax

int v17; // eax

v0 = 0;

do

{

v1 = 0;

v2 = v0;

do

{

if ( !dflags[0][v2] )

{