#include "diablo.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 BOOL hallok[20]; int l4holdx; // weak int l4holdy; // weak int SP4x1; // idb int SP4x2; // weak int SP4y1; // idb int SP4y2; // weak unsigned char L4dungeon[80][80]; unsigned char dung[20][20]; //int dword_52A4DC; // weak const unsigned char L4ConvTbl[16] = { 30u, 6u, 1u, 6u, 2u, 6u, 6u, 6u, 9u, 6u, 1u, 6u, 2u, 6u, 3u, 6u }; const 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 }; const 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 }; const 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 }; const 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 }; const 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 }; const 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 }; static void DRLG_L4Shadows() { int x, y; BOOL okflag; for(y = 1; y < 40; y++) { for(x = 1; x < 40; x++) { okflag = FALSE; if(dungeon[x][y] == 3) { okflag = TRUE; } if(dungeon[x][y] == 4) { okflag = TRUE; } if(dungeon[x][y] == 8) { okflag = TRUE; } if(dungeon[x][y] == 15) { okflag = TRUE; } if(!okflag) { continue; } if(dungeon[x - 1][y] == 6) { dungeon[x - 1][y] = 47; } if(dungeon[x - 1][y - 1] == 6) { dungeon[x - 1][y - 1] = 48; } } } } static void InitL4Dungeon() { int i, j; memset(dung, 0, sizeof(dung)); memset(L4dungeon, 0, sizeof(L4dungeon)); for(j = 0; j < 40; j++) { for(i = 0; i < 40; i++) { dungeon[i][j] = 30; dflags[i][j] = 0; } } } void DRLG_LoadL4SP() { setloadflag_2 = 0; if(QuestStatus(Q_WARLORD)) { pSetPiece_2 = (char *)DiabLoad("Levels\\L4Data\\Warlord.DUN", NULL, 'STPC'); setloadflag_2 = 1; } if(currlevel == 15 && gbMaxPlayers != 1) { pSetPiece_2 = (char *)DiabLoad("Levels\\L4Data\\Vile1.DUN", NULL, 'STPC'); setloadflag_2 = 1; } } void DRLG_FreeL4SP() { MemFreeDbg(pSetPiece_2); } void DRLG_L4SetSPRoom(int rx1, int ry1) { int rw, rh, i, j; unsigned char *sp; rw = (unsigned char)pSetPiece_2[0]; rh = (unsigned char)pSetPiece_2[2]; setpc_x = rx1; setpc_y = ry1; setpc_w = rw; setpc_h = rh; sp = (unsigned char *)&pSetPiece_2[4]; for(j = 0; j < rh; j++) { for(i = 0; i < rw; i++) { if(*sp != 0) { dungeon[i + rx1][j + ry1] = *sp; dflags[i + rx1][j + ry1] |= 0x80; } else { dungeon[i + rx1][j + ry1] = 6; } sp += 2; } } } static void L4makeDmt() { int i, j, val, dmtx, dmty; for(j = 0, dmty = 1; dmty <= 77; j++, dmty += 2) { for(i = 0, dmtx = 1; dmtx <= 77; i++, dmtx += 2) { val = L4dungeon[dmtx+1][dmty+1]; val = 2 * val + L4dungeon[dmtx][dmty+1]; val = 2 * val + L4dungeon[dmtx+1][dmty]; val = 2 * val + L4dungeon[dmtx][dmty]; dungeon[i][j] = L4ConvTbl[val]; } } } static int L4HWallOk(int i, int j) { int x; BOOL wallok; for(x = 1; dungeon[i + x][j] == 6; x++) { if(dflags[i + x][j] != 0) { break; } if(dungeon[i + x][j - 1] != 6) { break; } if(dungeon[i + x][j + 1] != 6) { break; } } wallok = FALSE; if(dungeon[i + x][j] == 10) { wallok = TRUE; } if(dungeon[i + x][j] == 12) { wallok = TRUE; } if(dungeon[i + x][j] == 13) { wallok = TRUE; } if(dungeon[i + x][j] == 15) { wallok = TRUE; } if(dungeon[i + x][j] == 16) { wallok = TRUE; } if(dungeon[i + x][j] == 21) { wallok = TRUE; } if(dungeon[i + x][j] == 22) { wallok = TRUE; } if(x <= 3) { wallok = FALSE; } if(wallok) { return x; } else { return -1; } } static int L4VWallOk(int i, int j) { int y; BOOL wallok; for(y = 1; dungeon[i][j + y] == 6; y++) { if(dflags[i][j + y] != 0) { break; } if(dungeon[i - 1][j + y] != 6) { break; } if(dungeon[i + 1][j + y] != 6) { break; } } wallok = FALSE; if(dungeon[i][j + y] == 8) { wallok = TRUE; } if(dungeon[i][j + y] == 9) { wallok = TRUE; } if(dungeon[i][j + y] == 11) { wallok = TRUE; } if(dungeon[i][j + y] == 14) { wallok = TRUE; } if(dungeon[i][j + y] == 15) { wallok = TRUE; } if(dungeon[i][j + y] == 16) { wallok = TRUE; } if(dungeon[i][j + y] == 21) { wallok = TRUE; } if(dungeon[i][j + y] == 23) { wallok = TRUE; } if(y <= 3) { wallok = FALSE; } if(wallok) { return y; } else { return -1; } } static void L4HorizWall(int i, int j, int dx) { int xx; if(dungeon[i][j] == 13) { dungeon[i][j] = 17; } if(dungeon[i][j] == 16) { dungeon[i][j] = 11; } if(dungeon[i][j] == 12) { dungeon[i][j] = 14; } for(xx = 1; xx < dx; xx++) { dungeon[i + xx][j] = 2; } if(dungeon[i + dx][j] == 15) { dungeon[i + dx][j] = 14; } if(dungeon[i + dx][j] == 10) { dungeon[i + dx][j] = 17; } if(dungeon[i + dx][j] == 21) { dungeon[i + dx][j] = 23; } if(dungeon[i + dx][j] == 22) { dungeon[i + dx][j] = 29; } xx = random(0, dx - 3) + 1; dungeon[i + xx][j] = 57; dungeon[i + xx + 2][j] = 56; dungeon[i + xx + 1][j] = 60; if(dungeon[i + xx][j - 1] == 6) { dungeon[i + xx][j - 1] = 58; } if(dungeon[i + xx + 1][j - 1] == 6) { dungeon[i + xx + 1][j - 1] = 59; } } static void L4VertWall(int i, int j, int dy) { int yy; if(dungeon[i][j] == 14) { dungeon[i][j] = 17; } if(dungeon[i][j] == 8) { dungeon[i][j] = 9; } if(dungeon[i][j] == 15) { dungeon[i][j] = 10; } for(yy = 1; yy < dy; yy++) { dungeon[i][j + yy] = 1; } if(dungeon[i][j + dy] == 11) { dungeon[i][j + dy] = 17; } if(dungeon[i][j + dy] == 9) { dungeon[i][j + dy] = 10; } if(dungeon[i][j + dy] == 16) { dungeon[i][j + dy] = 13; } if(dungeon[i][j + dy] == 21) { dungeon[i][j + dy] = 22; } if(dungeon[i][j + dy] == 23) { dungeon[i][j + dy] = 29; } yy = random(0, dy - 3) + 1; dungeon[i][j + yy] = 53; dungeon[i][j + yy + 2] = 52; dungeon[i][j + yy + 1] = 6; if(dungeon[i - 1][j + yy] == 6) { dungeon[i - 1][j + yy] = 54; } if(dungeon[i - 1][j + yy - 1] == 6) { dungeon[i - 1][j + yy - 1] = 55; } } static void L4AddWall() { int i, j, x, y; for(j = 0; j < 40; j++) { for(i = 0; i < 40; i++) { if(dflags[i][j] != 0) { continue; } if(dungeon[i][j] == 10 && random(0, 100) < 100) { x = L4HWallOk(i, j); if(x != -1) { L4HorizWall(i, j, x); } } if(dungeon[i][j] == 12 && random(0, 100) < 100) { x = L4HWallOk(i, j); if(x != -1) { L4HorizWall(i, j, x); } } if(dungeon[i][j] == 13 && random(0, 100) < 100) { x = L4HWallOk(i, j); if(x != -1) { L4HorizWall(i, j, x); } } if(dungeon[i][j] == 15 && random(0, 100) < 100) { x = L4HWallOk(i, j); if(x != -1) { L4HorizWall(i, j, x); } } if(dungeon[i][j] == 16 && random(0, 100) < 100) { x = L4HWallOk(i, j); if(x != -1) { L4HorizWall(i, j, x); } } if(dungeon[i][j] == 21 && random(0, 100) < 100) { x = L4HWallOk(i, j); if(x != -1) { L4HorizWall(i, j, x); } } if(dungeon[i][j] == 22 && random(0, 100) < 100) { x = L4HWallOk(i, j); if(x != -1) { L4HorizWall(i, j, x); } } if(dungeon[i][j] == 8 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } if(dungeon[i][j] == 9 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } if(dungeon[i][j] == 11 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } if(dungeon[i][j] == 14 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } if(dungeon[i][j] == 15 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } if(dungeon[i][j] == 16 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } if(dungeon[i][j] == 21 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } if(dungeon[i][j] == 23 && random(0, 100) < 100) { y = L4VWallOk(i, j); if(y != -1) { L4VertWall(i, j, y); } } } } } static void L4tileFix() { int i, j; for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 6) dungeon[i + 1][j] = 5; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 13; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 14; } } for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 6) dungeon[i + 1][j] = 2; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 9) dungeon[i + 1][j] = 11; if(dungeon[i][j] == 9 && dungeon[i + 1][j] == 6) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 13; if(dungeon[i][j] == 6 && dungeon[i + 1][j] == 14) dungeon[i + 1][j] = 15; if(dungeon[i][j] == 6 && dungeon[i][j + 1] == 13) dungeon[i][j + 1] = 16; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 10; if(dungeon[i][j] == 6 && dungeon[i][j - 1] == 1) dungeon[i][j - 1] = 1; } } for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 13 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 27; if(dungeon[i][j] == 27 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 27; if(dungeon[i][j] == 27 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 27) dungeon[i + 1][j] = 26; if(dungeon[i][j] == 27 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 15) dungeon[i + 1][j] = 14; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 15) dungeon[i + 1][j] = 14; if(dungeon[i][j] == 22 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 27 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 6 && dungeon[i + 1][j] == 27 && dungeon[i + 1][j + 1] != 0) /* check */ dungeon[i + 1][j] = 22; if(dungeon[i][j] == 22 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 1 && dungeon[i + 1][j - 1] == 1) dungeon[i + 1][j] = 13; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 30 && dungeon[i][j + 1] == 6) dungeon[i + 1][j] = 28; if(dungeon[i][j] == 16 && dungeon[i + 1][j] == 6 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 27; if(dungeon[i][j] == 16 && dungeon[i][j + 1] == 30 && dungeon[i + 1][j + 1] == 30) dungeon[i][j + 1] = 27; if(dungeon[i][j] == 6 && dungeon[i + 1][j] == 30 && dungeon[i + 1][j - 1] == 6) dungeon[i + 1][j] = 21; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 27 && dungeon[i + 1][j + 1] == 9) dungeon[i + 1][j] = 29; if(dungeon[i][j] == 9 && dungeon[i + 1][j] == 15) dungeon[i + 1][j] = 14; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 27 && dungeon[i + 1][j + 1] == 2) dungeon[i + 1][j] = 29; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 18) dungeon[i + 1][j] = 24; if(dungeon[i][j] == 9 && dungeon[i + 1][j] == 15) dungeon[i + 1][j] = 14; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 19 && dungeon[i + 1][j - 1] == 30) dungeon[i + 1][j] = 24; if(dungeon[i][j] == 24 && dungeon[i][j - 1] == 30 && dungeon[i][j - 2] == 6) dungeon[i][j - 1] = 21; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 28; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 28; if(dungeon[i][j] == 28 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 28 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 19 && dungeon[i + 2][j] == 2 && dungeon[i + 1][j - 1] == 18 && dungeon[i + 1][j + 1] == 1) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 19 && dungeon[i + 2][j] == 2 && dungeon[i + 1][j - 1] == 22 && dungeon[i + 1][j + 1] == 1) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 19 && dungeon[i + 2][j] == 2 && dungeon[i + 1][j - 1] == 18 && dungeon[i + 1][j + 1] == 13) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 21 && dungeon[i + 2][j] == 2 && dungeon[i + 1][j - 1] == 18 && dungeon[i + 1][j + 1] == 1) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 21 && dungeon[i + 1][j + 1] == 1 && dungeon[i + 1][j - 1] == 22 && dungeon[i + 2][j] == 3) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 28 && dungeon[i + 2][j] == 30 && dungeon[i + 1][j - 1] == 6) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 28 && dungeon[i + 2][j] == 1) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 27 && dungeon[i + 1][j + 1] == 30) dungeon[i + 1][j] = 29; if(dungeon[i][j] == 28 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 21 && dungeon[i + 1][j - 1] == 21) dungeon[i + 1][j] = 24; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 27 && dungeon[i + 1][j + 1] == 30) dungeon[i + 1][j] = 29; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 18) dungeon[i + 1][j] = 25; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 9 && dungeon[i + 2][j] == 2) dungeon[i + 1][j] = 11; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 10) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 15 && dungeon[i][j + 1] == 3) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 22 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 18 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 24 && dungeon[i - 1][j] == 30) dungeon[i - 1][j] = 19; if(dungeon[i][j] == 21 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 21 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 10; if(dungeon[i][j] == 22 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 21 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 16 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 13 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 22 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 18 && dungeon[i + 2][j] == 30) dungeon[i + 1][j] = 24; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 9 && dungeon[i + 1][j + 1] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 27 && dungeon[i + 1][j + 1] == 2) dungeon[i + 1][j] = 29; if(dungeon[i][j] == 23 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 23 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 25 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 22 && dungeon[i + 1][j] == 9) dungeon[i + 1][j] = 11; if(dungeon[i][j] == 23 && dungeon[i + 1][j] == 9) dungeon[i + 1][j] = 11; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 11 && dungeon[i + 1][j] == 15) dungeon[i + 1][j] = 14; if(dungeon[i][j] == 23 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 27) dungeon[i + 1][j] = 26; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 18) dungeon[i + 1][j] = 24; if(dungeon[i][j] == 26 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 29 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 29 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 1 && dungeon[i][j - 1] == 15) dungeon[i][j - 1] = 10; if(dungeon[i][j] == 18 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 23 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 18 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 10; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 30 && dungeon[i + 1][j + 1] == 30) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 28 && dungeon[i + 1][j - 1] == 6) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 23 && dungeon[i + 1][j] == 18 && dungeon[i][j - 1] == 6) dungeon[i + 1][j] = 24; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 23 && dungeon[i + 2][j] == 30) dungeon[i + 1][j] = 28; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 28 && dungeon[i + 2][j] == 30 && dungeon[i + 1][j - 1] == 6) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 23 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 29 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 29 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 26 && dungeon[i + 1][j] == 30) dungeon[i + 1][j] = 19; if(dungeon[i][j] == 16 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 13 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 10; if(dungeon[i][j] == 25 && dungeon[i][j + 1] == 30) dungeon[i][j + 1] = 18; if(dungeon[i][j] == 18 && dungeon[i][j + 1] == 2) dungeon[i][j + 1] = 15; if(dungeon[i][j] == 11 && dungeon[i + 1][j] == 3) dungeon[i + 1][j] = 5; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 9) dungeon[i + 1][j] = 11; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 13; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 13 && dungeon[i + 1][j - 1] == 6) dungeon[i + 1][j] = 16; } } for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 21 && dungeon[i][j + 1] == 24 && dungeon[i][j + 2] == 1) dungeon[i][j + 1] = 17; if(dungeon[i][j] == 15 && dungeon[i + 1][j + 1] == 9 && dungeon[i + 1][j - 1] == 1 && dungeon[i + 2][j] == 16) dungeon[i + 1][j] = 29; if(dungeon[i][j] == 2 && dungeon[i - 1][j] == 6) dungeon[i - 1][j] = 8; if(dungeon[i][j] == 1 && dungeon[i][j - 1] == 6) dungeon[i][j - 1] = 7; if(dungeon[i][j] == 6 && dungeon[i + 1][j] == 15 && dungeon[i + 1][j + 1] == 4) dungeon[i + 1][j] = 10; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 3) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 6) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 9 && dungeon[i][j + 1] == 3) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 10 && dungeon[i][j + 1] == 3) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 13 && dungeon[i][j + 1] == 3) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 5) dungeon[i][j + 1] = 12; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 16) dungeon[i][j + 1] = 13; if(dungeon[i][j] == 6 && dungeon[i][j + 1] == 13) dungeon[i][j + 1] = 16; if(dungeon[i][j] == 25 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 10; if(dungeon[i][j] == 13 && dungeon[i][j + 1] == 5) dungeon[i][j + 1] = 12; if(dungeon[i][j] == 28 && dungeon[i][j - 1] == 6 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 10) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 9) dungeon[i + 1][j] = 11; if(dungeon[i][j] == 11 && dungeon[i + 1][j] == 3) dungeon[i + 1][j] = 5; if(dungeon[i][j] == 10 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 27 && dungeon[i + 1][j] == 9) dungeon[i + 1][j] = 11; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 1) dungeon[i + 1][j] = 16; if(dungeon[i][j] == 11 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 3) dungeon[i + 1][j] = 5; if(dungeon[i][j] == 9 && dungeon[i + 1][j] == 3) dungeon[i + 1][j] = 5; if(dungeon[i][j] == 14 && dungeon[i + 1][j] == 3) dungeon[i + 1][j] = 5; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 3) dungeon[i + 1][j] = 5; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 5 && dungeon[i + 1][j - 1] == 16) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 2 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 9 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 1 && dungeon[i][j - 1] == 8) dungeon[i][j - 1] = 9; if(dungeon[i][j] == 28 && dungeon[i + 1][j] == 23 && dungeon[i + 1][j + 1] == 3) dungeon[i + 1][j] = 16; } } for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 10) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 17 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 10 && dungeon[i + 1][j] == 4) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 17 && dungeon[i][j + 1] == 5) dungeon[i][j + 1] = 12; if(dungeon[i][j] == 29 && dungeon[i][j + 1] == 9) dungeon[i][j + 1] = 10; if(dungeon[i][j] == 13 && dungeon[i][j + 1] == 5) dungeon[i][j + 1] = 12; if(dungeon[i][j] == 9 && dungeon[i][j + 1] == 16) dungeon[i][j + 1] = 13; if(dungeon[i][j] == 10 && dungeon[i][j + 1] == 16) dungeon[i][j + 1] = 13; if(dungeon[i][j] == 16 && dungeon[i][j + 1] == 3) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 11 && dungeon[i][j + 1] == 5) dungeon[i][j + 1] = 12; if(dungeon[i][j] == 10 && dungeon[i + 1][j] == 3 && dungeon[i + 1][j - 1] == 16) dungeon[i + 1][j] = 12; if(dungeon[i][j] == 16 && dungeon[i][j + 1] == 5) dungeon[i][j + 1] = 12; if(dungeon[i][j] == 1 && dungeon[i][j + 1] == 6) dungeon[i][j + 1] = 4; if(dungeon[i][j] == 21 && dungeon[i + 1][j] == 13 && dungeon[i][j + 1] == 10) dungeon[i + 1][j + 1] = 12; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 10) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 22 && dungeon[i][j + 1] == 11) dungeon[i][j + 1] = 17; if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 28 && dungeon[i + 2][j] == 16) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 28 && dungeon[i + 1][j] == 23 && dungeon[i + 1][j + 1] == 1 && dungeon[i + 2][j] == 6) dungeon[i + 1][j] = 16; } } for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 15 && dungeon[i + 1][j] == 28 && dungeon[i + 2][j] == 16) dungeon[i + 1][j] = 23; if(dungeon[i][j] == 21 && dungeon[i + 1][j - 1] == 21 && dungeon[i + 1][j + 1] == 13 && dungeon[i + 2][j] == 2) dungeon[i + 1][j] = 17; if(dungeon[i][j] == 19 && dungeon[i + 1][j] == 15 && dungeon[i + 1][j + 1] == 12) dungeon[i + 1][j] = 17; } } } static void DRLG_L4Subs() { int x, y, i, rv; unsigned char c; for(y = 0; y < 40; y++) { for(x = 0; x < 40; x++) { if(random(0, 3) == 0) { c = L4BTYPES[dungeon[x][y]]; if(c != 0 && dflags[x][y] == 0) { rv = random(0, 16); i = -1; while(rv >= 0) { i++; if(i == sizeof(L4BTYPES)) { i = 0; } if(c == L4BTYPES[i]) { rv--; } } dungeon[x][y] = i; } } } } for(y = 0; y < 40; y++) { for(x = 0; x < 40; x++) { if(random(0, 10) == 0) { if(L4BTYPES[dungeon[x][y]] == 6 && dflags[x][y] == 0) { dungeon[x][y] = random(0, 3) + 95; } } } } } static void L4makeDungeon() { int i, j, k, l; for(j = 0; j < 20; j++) { for(i = 0; i < 20; i++) { k = i << 1; l = j << 1; L4dungeon[k][l] = dung[i][j]; L4dungeon[k][l + 1] = dung[i][j]; L4dungeon[k + 1][l] = dung[i][j]; L4dungeon[k + 1][l + 1] = dung[i][j]; } } for(j = 0; j < 20; j++) { for(i = 0; i < 20; i++) { k = i << 1; l = j << 1; L4dungeon[k][l + 40] = dung[i][19 - j]; L4dungeon[k][l + 41] = dung[i][19 - j]; L4dungeon[k + 1][l + 40] = dung[i][19 - j]; L4dungeon[k + 1][l + 41] = dung[i][19 - j]; } } for(j = 0; j < 20; j++) { for(i = 0; i < 20; i++) { k = i << 1; l = j << 1; L4dungeon[k + 40][l] = dung[19 - i][j]; L4dungeon[k + 40][l + 1] = dung[19 - i][j]; L4dungeon[k + 41][l] = dung[19 - i][j]; L4dungeon[k + 41][l + 1] = dung[19 - i][j]; } } for(j = 0; j < 20; j++) { for(i = 0; i < 20; i++) { k = i << 1; l = j << 1; L4dungeon[k + 40][l + 40] = dung[19 - i][19 - j]; L4dungeon[k + 40][l + 41] = dung[19 - i][19 - j]; L4dungeon[k + 41][l + 40] = dung[19 - i][19 - j]; L4dungeon[k + 41][l + 41] = dung[19 - i][19 - j]; } } } static void uShape() { int j, i, rv; for(j = 19; j >= 0; j--) { for(i = 19; i >= 0; i--) { if(dung[i][j] != 1) { hallok[j] = FALSE; } if(dung[i][j] == 1) { if(dung[i][j + 1] == 1 && dung[i + 1][j + 1] == 0) { hallok[j] = TRUE; } else { hallok[j] = FALSE; } i = 0; } } } rv = random(0, 19) + 1; do { if(hallok[rv]) { for(i = 19; i >= 0; i--) { if(dung[i][rv] == 1) { i = -1; rv = 0; } else { dung[i][rv] = 1; dung[i][rv + 1] = 1; } } } else { rv++; if(rv == 20) { rv = 1; } } } while(rv != 0); for(i = 19; i >= 0; i--) { for(j = 19; j >= 0; j--) { if(dung[i][j] != 1) { hallok[i] = FALSE; } if(dung[i][j] == 1) { if(dung[i + 1][j] == 1 && dung[i + 1][j + 1] == 0) { hallok[i] = TRUE; } else { hallok[i] = FALSE; } j = 0; } } } rv = random(0, 19) + 1; do { if(hallok[rv]) { for(j = 19; j >= 0; j--) { if(dung[rv][j] == 1) { j = -1; rv = 0; } else { dung[rv][j] = 1; dung[rv + 1][j] = 1; } } } else { rv++; if(rv == 20) { rv = 1; } } } while(rv != 0); } static long GetArea() { int i, j; long rv; rv = 0; for(j = 0; j < 20; j++) { for(i = 0; i < 20; i++) { if(dung[i][j] == 1) { rv++; } } } return rv; } static void L4drawRoom(int x, int y, int width, int height) { int i, j; for(j = 0; j < height; j++) { for(i = 0; i < width; i++) { dung[i + x][j + y] = 1; } } } static BOOL L4checkRoom(int x, int y, int width, int height) { int i, j; if(x <= 0 || y <= 0) { return FALSE; } for(j = 0; j < height; j++) { for(i = 0; i < width; i++) { if(i + x < 0 || i + x >= 20 || j + y < 0 || j + y >= 20) { return FALSE; } if(dung[i + x][j + y] != 0) { return FALSE; } } } return TRUE; } static void L4roomGen(int x, int y, int w, int h, int dir) { int num; BOOL ran, ran2; int width, height, rx, ry, ry2; int cw, ch, cx1, cy1, cx2; int dirProb = random(0, 4); switch(dir == 1 ? dirProb != 0 : dirProb == 0) { case FALSE: num = 0; do { cw = (random(0, 5) + 2) & ~1; ch = (random(0, 5) + 2) & ~1; cy1 = h/2 + y - ch/2; cx1 = x-cw; ran = L4checkRoom(cx1-1, cy1-1, ch+2, cw+1); /// BUGFIX: swap args 3 and 4 ("ch+2" and "cw+1") num++; } while(ran == FALSE && num < 20); if(ran == TRUE) L4drawRoom(cx1, cy1, cw, ch); cx2 = x+w; ran2 = L4checkRoom(cx2, cy1-1, cw+1, ch+2); if(ran2 == TRUE) L4drawRoom(cx2, cy1, cw, ch); if(ran == TRUE) L4roomGen(cx1, cy1, cw, ch, 1); if(ran2 == TRUE) L4roomGen(cx2, cy1, cw, ch, 1); break; case TRUE: num = 0; do { width = (random(0, 5) + 2) & ~1; height = (random(0, 5) + 2) & ~1; rx = w/2 + x - width/2; ry = y-height; ran = L4checkRoom(rx-1, ry-1, width+2, height+1); num++; } while(ran == FALSE && num < 20); if(ran == TRUE) L4drawRoom(rx, ry, width, height); ry2 = y+h; ran2 = L4checkRoom(rx-1, ry2, width+2, height+1); if(ran2 == TRUE) L4drawRoom(rx, ry2, width, height); if(ran == TRUE) L4roomGen(rx, ry, width, height, 0); if(ran2 == TRUE) L4roomGen(rx, ry2, width, height, 0); break; } } static void L4firstRoom() { int x, y, w, h, rndx, rndy, xmin, xmax, ymin, ymax; if(currlevel != 16) { if(currlevel == quests[Q_WARLORD]._qlevel && quests[Q_WARLORD]._qactive) { /// ASSERT: assert(gbMaxPlayers == 1); w = 11; h = 11; } else if(currlevel == quests[Q_BETRAYER]._qlevel && gbMaxPlayers != 1) { w = 11; h = 11; } else { w = random(0, 5) + 2; h = random(0, 5) + 2; } } else { w = 14; h = 14; } xmin = (20 - w) >> 1; xmax = 19 - w; rndx = random(0, xmax - xmin + 1) + xmin; if(rndx + w > 19) { x = 19 - w + 1; } else { x = rndx; } ymin = (20 - h) >> 1; ymax = 19 - h; rndy = random(0, ymax - ymin + 1) + ymin; if(rndy + h > 19) { y = 19 - h + 1; } else { y = rndy; } if(currlevel == 16) { l4holdx = x; l4holdy = y; } if(QuestStatus(Q_WARLORD) || currlevel == quests[Q_BETRAYER]._qlevel && gbMaxPlayers != 1) { SP4x1 = x + 1; SP4y1 = y + 1; SP4x2 = SP4x1 + w; SP4y2 = SP4y1 + h; } else { SP4x1 = 0; SP4y1 = 0; SP4x2 = 0; SP4y2 = 0; } L4drawRoom(x, y, w, h); L4roomGen(x, y, w, h, random(0, 2)); } void L4SaveQuads() { int i, j, x, y; y = 0; for(j = 0; j < 14; j++) { x = 0; for(i = 0; i < 14; i++) { dflags[i + l4holdx][j + l4holdy] = 1; dflags[39 - x - l4holdx][j + l4holdy] = 1; dflags[i + l4holdx][39 - y - l4holdy] = 1; dflags[39 - x - l4holdx][39 - y - l4holdy] = 1; x++; } y++; } } void DRLG_L4SetRoom(unsigned char *pSetPiece, int rx1, int ry1) { int rw, rh, i, j; unsigned char *sp; rw = pSetPiece[0]; rh = pSetPiece[2]; sp = &pSetPiece[4]; for(j = 0; j < rh; j++) { for(i = 0; i < rw; i++) { if(*sp != 0) { dungeon[i + rx1][j + ry1] = *sp; dflags[i + rx1][j + ry1] |= 0x80; } else { dungeon[i + rx1][j + ry1] = 6; } sp += 2; } } } void DRLG_LoadDiabQuads(BOOL preflag) { BYTE *lpSetPiece; lpSetPiece = DiabLoad("Levels\\L4Data\\diab1.DUN", NULL, 'STPC'); diabquad1x = 4 + l4holdx; diabquad1y = 4 + l4holdy; DRLG_L4SetRoom(lpSetPiece, diabquad1x, diabquad1y); mem_free_dbg(lpSetPiece); if(preflag) { lpSetPiece = DiabLoad("Levels\\L4Data\\diab2b.DUN", NULL, 'STPC'); } else { lpSetPiece = DiabLoad("Levels\\L4Data\\diab2a.DUN", NULL, 'STPC'); } diabquad2x = 27 - l4holdx; diabquad2y = 1 + l4holdy; DRLG_L4SetRoom(lpSetPiece, diabquad2x, diabquad2y); mem_free_dbg(lpSetPiece); if(preflag) { lpSetPiece = DiabLoad("Levels\\L4Data\\diab3b.DUN", NULL, 'STPC'); } else { lpSetPiece = DiabLoad("Levels\\L4Data\\diab3a.DUN", NULL, 'STPC'); } diabquad3x = 1 + l4holdx; diabquad3y = 27 - l4holdy; DRLG_L4SetRoom(lpSetPiece, diabquad3x, diabquad3y); mem_free_dbg(lpSetPiece); if(preflag) { lpSetPiece = DiabLoad("Levels\\L4Data\\diab4b.DUN", NULL, 'STPC'); } else { lpSetPiece = DiabLoad("Levels\\L4Data\\diab4a.DUN", NULL, 'STPC'); } diabquad4x = 28 - l4holdx; diabquad4y = 28 - l4holdy; DRLG_L4SetRoom(lpSetPiece, diabquad4x, diabquad4y); mem_free_dbg(lpSetPiece); } static BOOL DRLG_L4PlaceMiniSet(const unsigned char *miniset, int tmin, int tmax, int cx, int cy, BOOL setview, int ldir) { int sx, sy, sw, sh, xx, yy, i, ii, numt, bailcnt; BOOL found; sw = miniset[0]; sh = miniset[1]; if(tmax - tmin == 0) { numt = 1; } else { numt = random(0, tmax - tmin) + tmin; } for(i = 0; i < numt; i++) { sx = random(0, 40 - sw); sy = random(0, 40 - sh); found = FALSE; for(bailcnt = 0; !found && bailcnt < 200; bailcnt++) { found = TRUE; if(sx >= SP4x1 && sx <= SP4x2 && sy >= SP4y1 && sy <= SP4y2) { found = FALSE; } if(cx != -1 && sx >= cx - sw && sx <= cx + 12) { sx = random(0, 40 - sw); sy = random(0, 40 - sh); found = FALSE; } if(cy != -1 && sy >= cy - sh && sy <= cy + 12) { sx = random(0, 40 - sw); sy = random(0, 40 - sh); found = FALSE; } ii = 2; for(yy = 0; yy < sh && found == TRUE; yy++) { for(xx = 0; xx < sw && found == TRUE; xx++) { if(miniset[ii] != 0 && dungeon[xx + sx][yy + sy] != miniset[ii]) { found = FALSE; } if(dflags[xx + sx][yy + sy] != 0) { found = FALSE; } ii++; } } if(!found) { sx++; if(sx == 40 - sw) { sx = 0; sy++; if(sy == 40 - sh) { sy = 0; } } } } if(bailcnt >= 200) { return FALSE; } ii = sw * sh + 2; for(yy = 0; yy < sh; yy++) { for(xx = 0; xx < sw; xx++) { if(miniset[ii] != 0) { dungeon[xx + sx][yy + sy] = miniset[ii]; dflags[xx + sx][yy + sy] |= 8; } ii++; } } } if(currlevel == 15) { quests[15]._qtx = sx + 1; quests[15]._qty = sy + 1; } if(setview == TRUE) { ViewX = 2 * sx + 21; ViewY = 2 * sy + 22; } if(ldir == 0) { LvlViewX = 2 * sx + 21; LvlViewY = 2 * sy + 22; } return TRUE; } static void DRLG_L4FTVR(int i, int j, int x, int y, int d) { if(dTransVal[x][y] != 0 || dungeon[i][j] != 6) { if(d == 1) { dTransVal[x][y] = TransVal; dTransVal[x][y + 1] = TransVal; } if(d == 2) { dTransVal[x + 1][y] = TransVal; dTransVal[x + 1][y + 1] = TransVal; } if(d == 3) { dTransVal[x][y] = TransVal; dTransVal[x + 1][y] = TransVal; } if(d == 4) { dTransVal[x][y + 1] = TransVal; dTransVal[x + 1][y + 1] = TransVal; } if(d == 5) { dTransVal[x + 1][y + 1] = TransVal; } if(d == 6) { dTransVal[x][y + 1] = TransVal; } if(d == 7) { dTransVal[x + 1][y] = TransVal; } if(d == 8) { dTransVal[x][y] = TransVal; } } else { dTransVal[x][y] = TransVal; dTransVal[x + 1][y] = TransVal; dTransVal[x][y + 1] = TransVal; dTransVal[x + 1][y + 1] = TransVal; DRLG_L4FTVR(i + 1, j, x + 2, y, 1); DRLG_L4FTVR(i - 1, j, x - 2, y, 2); DRLG_L4FTVR(i, j + 1, x, y + 2, 3); DRLG_L4FTVR(i, j - 1, x, y - 2, 4); DRLG_L4FTVR(i - 1, j - 1, x - 2, y - 2, 5); DRLG_L4FTVR(i + 1, j - 1, x + 2, y - 2, 6); DRLG_L4FTVR(i - 1, j + 1, x - 2, y + 2, 7); DRLG_L4FTVR(i + 1, j + 1, x + 2, y + 2, 8); } } static void DRLG_L4FloodTVal() { int i, j, xx, yy; yy = 16; for(j = 0; j < DMAXY; j++) { xx = 16; for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 6 && dTransVal[xx][yy] == 0) { DRLG_L4FTVR(i, j, xx, yy, 0); TransVal++; } xx += 2; } yy += 2; } } BOOL IsDURWall(char d) { if(d == 25) { return TRUE; } if(d == 28) { return TRUE; } if(d == 23) { return TRUE; } return FALSE; } BOOL IsDLLWall(char dd) { if(dd == 27) { return TRUE; } if(dd == 26) { return TRUE; } if(dd == 22) { return TRUE; } return FALSE; } static void DRLG_L4TransFix() { int i, j, xx, yy; yy = 16; for(j = 0; j < DMAXY; j++) { xx = 16; for(i = 0; i < DMAXX; i++) { if(IsDURWall(dungeon[i][j]) && dungeon[i][j - 1] == 18) { dTransVal[xx + 1][yy] = dTransVal[xx][yy]; dTransVal[xx + 1][yy + 1] = dTransVal[xx][yy]; } if(IsDLLWall(dungeon[i][j]) && dungeon[i + 1][j] == 19) { dTransVal[xx][yy + 1] = dTransVal[xx][yy]; dTransVal[xx + 1][yy + 1] = dTransVal[xx][yy]; } if(dungeon[i][j] == 18) { dTransVal[xx + 1][yy] = dTransVal[xx][yy]; dTransVal[xx + 1][yy + 1] = dTransVal[xx][yy]; } if(dungeon[i][j] == 19) { dTransVal[xx][yy + 1] = dTransVal[xx][yy]; dTransVal[xx + 1][yy + 1] = dTransVal[xx][yy]; } if(dungeon[i][j] == 24) { dTransVal[xx + 1][yy] = dTransVal[xx][yy]; dTransVal[xx][yy + 1] = dTransVal[xx][yy]; dTransVal[xx + 1][yy + 1] = dTransVal[xx][yy]; } if(dungeon[i][j] == 57) { dTransVal[xx - 1][yy] = dTransVal[xx][yy + 1]; dTransVal[xx][yy] = dTransVal[xx][yy + 1]; } if(dungeon[i][j] == 53) { dTransVal[xx][yy - 1] = dTransVal[xx + 1][yy]; dTransVal[xx][yy] = dTransVal[xx + 1][yy]; } xx += 2; } yy += 2; } } static void DRLG_L4Corners() { int i, j; for(j = 1; j < DMAXY - 1; j++) { for(i = 1; i < DMAXX - 1; i++) { if(dungeon[i][j] >= 18 && dungeon[i][j] <= 30) { if(dungeon[i + 1][j] < 18) { dungeon[i][j] += 98; } else if(dungeon[i][j + 1] < 18) { dungeon[i][j] += 98; } } } } } void L4FixRim() { int i, j; for(i = 0; i < 20; i++) { dung[i][0] = 0; } for(j = 0; j < 20; j++) { dung[0][j] = 0; } } void DRLG_L4GeneralFix() { int i, j; for(j = 0; j < 39; j++) { for(i = 0; i < 39; i++) { if((dungeon[i][j] == 24 || dungeon[i][j] == 122) && dungeon[i + 1][j] == 2 && dungeon[i][j + 1] == 5) { dungeon[i][j] = 17; } } } } static void DRLG_L4(int entry) { int i, j, spi, spj; BOOL doneflag; do { DRLG_InitTrans(); do { InitL4Dungeon(); L4firstRoom(); L4FixRim(); } while(GetArea() < 173); uShape(); L4makeDungeon(); L4makeDmt(); L4tileFix(); if(currlevel == 16) { L4SaveQuads(); } if(QuestStatus(Q_WARLORD) || currlevel == quests[Q_BETRAYER]._qlevel && gbMaxPlayers != 1) { for(spi = SP4x1; spi < SP4x2; spi++) { for(spj = SP4y1; spj < SP4y2; spj++) { dflags[spi][spj] = 1; } } } L4AddWall(); DRLG_L4FloodTVal(); DRLG_L4TransFix(); if(setloadflag_2) { DRLG_L4SetSPRoom(SP4x1, SP4y1); } if(currlevel == 16) { DRLG_LoadDiabQuads(TRUE); } if(QuestStatus(Q_WARLORD)) { if(entry == 0) { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 1, 0); if(doneflag && currlevel == 13) { doneflag = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 0, 6); } ViewX++; } else if(entry == 1) { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0); if(doneflag && currlevel == 13) { doneflag = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 0, 6); } ViewX = 2 * setpc_x + 22; ViewY = 2 * setpc_y + 22; } else { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0); if(doneflag && currlevel == 13) { doneflag = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 1, 6); } ViewX++; } } else if(currlevel != 15) { if(entry == 0) { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 1, 0); if(doneflag && currlevel != 16) { doneflag = DRLG_L4PlaceMiniSet(L4DSTAIRS, 1, 1, -1, -1, 0, 1); } if(doneflag && currlevel == 13) { doneflag = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 0, 6); } ViewX++; } else if(entry == 1) { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0); if(doneflag && currlevel != 16) { doneflag = DRLG_L4PlaceMiniSet(L4DSTAIRS, 1, 1, -1, -1, 1, 1); } if(doneflag && currlevel == 13) { doneflag = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 0, 6); } ViewY++; } else { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0); if(doneflag && currlevel != 16) { doneflag = DRLG_L4PlaceMiniSet(L4DSTAIRS, 1, 1, -1, -1, 0, 1); } if(doneflag && currlevel == 13) { doneflag = DRLG_L4PlaceMiniSet(L4TWARP, 1, 1, -1, -1, 1, 6); } ViewX++; } } else { if(entry == 0) { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 1, 0); if(doneflag) { if(gbMaxPlayers == 1 && quests[Q_DIABLO]._qactive != 2) { doneflag = DRLG_L4PlaceMiniSet(L4PENTA, 1, 1, -1, -1, 0, 1); } else { doneflag = DRLG_L4PlaceMiniSet(L4PENTA2, 1, 1, -1, -1, 0, 1); } } ViewX++; } else { doneflag = DRLG_L4PlaceMiniSet(L4USTAIRS, 1, 1, -1, -1, 0, 0); if(doneflag) { if(gbMaxPlayers == 1 && quests[Q_DIABLO]._qactive != 2) { doneflag = DRLG_L4PlaceMiniSet(L4PENTA, 1, 1, -1, -1, 1, 1); } else { doneflag = DRLG_L4PlaceMiniSet(L4PENTA2, 1, 1, -1, -1, 1, 1); } } ViewY++; } } } while(!doneflag); DRLG_L4GeneralFix(); if(currlevel != 16) { DRLG_PlaceThemeRooms(7, 10, 6, 8, 1); } DRLG_L4Shadows(); DRLG_L4Corners(); DRLG_L4Subs(); DRLG_Init_Globals(); if(QuestStatus(Q_WARLORD)) { for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { pdungeon[i][j] = dungeon[i][j]; } } } DRLG_CheckQuests(SP4x1, SP4y1); if(currlevel == 15) { for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { if(dungeon[i][j] == 98) { Make_SetPC(i - 1, j - 1, 5, 5); } if(dungeon[i][j] == 107) { Make_SetPC(i - 1, j - 1, 5, 5); } } } } if(currlevel == 16) { for(j = 0; j < DMAXY; j++) { for(i = 0; i < DMAXX; i++) { pdungeon[i][j] = dungeon[i][j]; } } DRLG_LoadDiabQuads(FALSE); } } static void DRLG_L4Pass3() { int i, j, xx, yy; long v1, v2, v3, v4, lv; lv = 30-1; #ifdef USE_ASM __asm { mov esi, pMegaTiles mov eax, lv shl eax, 3 add esi, eax xor eax, eax lodsw inc eax mov v1, eax lodsw inc eax mov v2, eax lodsw inc eax mov v3, eax lodsw inc eax mov v4, eax } #else v1 = ((WORD *)&pMegaTiles[lv << 3])[0] + 1; v2 = ((WORD *)&pMegaTiles[lv << 3])[1] + 1; v3 = ((WORD *)&pMegaTiles[lv << 3])[2] + 1; v4 = ((WORD *)&pMegaTiles[lv << 3])[3] + 1; #endif for(j = 0; j < MAXDUNY; j += 2) { for(i = 0; i < MAXDUNX; i += 2) { dPiece[i][j] = v1; dPiece[i+1][j] = v2; dPiece[i][j+1] = v3; dPiece[i+1][j+1] = v4; } } yy = 16; for(j = 0; j < DMAXY; j++) { xx = 16; for(i = 0; i < DMAXX; i++) { lv = (unsigned char)dungeon[i][j]-1; if(lv >= 0) { #ifdef USE_ASM __asm { mov esi, pMegaTiles mov eax, lv shl eax, 3 add esi, eax xor eax, eax lodsw inc eax mov v1, eax lodsw inc eax mov v2, eax lodsw inc eax mov v3, eax lodsw inc eax mov v4, eax } #else v1 = ((WORD *)&pMegaTiles[lv << 3])[0] + 1; v2 = ((WORD *)&pMegaTiles[lv << 3])[1] + 1; v3 = ((WORD *)&pMegaTiles[lv << 3])[2] + 1; v4 = ((WORD *)&pMegaTiles[lv << 3])[3] + 1; #endif } else { v1 = 0; v2 = 0; v3 = 0; v4 = 0; } dPiece[xx][yy] = v1; dPiece[xx+1][yy] = v2; dPiece[xx][yy+1] = v3; dPiece[xx+1][yy+1] = v4; xx += 2; } yy += 2; } } void CreateL4Dungeon(unsigned int rseed, int entry) { SetRndSeed(rseed); dminx = 16; dminy = 16; dmaxx = 96; dmaxy = 96; ViewX = 40; ViewY = 40; DRLG_InitSetPC(); DRLG_LoadL4SP(); DRLG_L4(entry); DRLG_L4Pass3(); DRLG_FreeL4SP(); DRLG_SetPC(); }