2015-05-19 21:54:34 +00:00
|
|
|
//-------------------------------------------------------------------------
|
|
|
|
/*
|
|
|
|
Copyright (C) 1997, 2005 - 3D Realms Entertainment
|
|
|
|
|
|
|
|
This file is part of Shadow Warrior version 1.2
|
|
|
|
|
|
|
|
Shadow Warrior is free software; you can redistribute it and/or
|
|
|
|
modify it under the terms of the GNU General Public License
|
|
|
|
as published by the Free Software Foundation; either version 2
|
|
|
|
of the License, or (at your option) any later version.
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
|
|
|
|
|
|
See the GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with this program; if not, write to the Free Software
|
|
|
|
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
|
|
|
|
|
|
Original Source: 1997 - Frank Maddin and Jim Norwood
|
|
|
|
Prepared for public release: 03/28/2005 - Charlie Wiederhold, 3D Realms
|
|
|
|
*/
|
|
|
|
//-------------------------------------------------------------------------
|
2019-10-09 16:09:05 +00:00
|
|
|
#include "ns.h"
|
2015-05-19 21:54:34 +00:00
|
|
|
#include "build.h"
|
|
|
|
|
|
|
|
#include "names2.h"
|
|
|
|
#include "panel.h"
|
2020-08-05 22:18:45 +00:00
|
|
|
#include "misc.h"
|
2015-05-19 21:54:34 +00:00
|
|
|
|
2019-10-09 16:09:05 +00:00
|
|
|
BEGIN_SW_NS
|
|
|
|
|
2015-05-19 21:54:34 +00:00
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
//
|
|
|
|
// WARPING - PLANE STYLE
|
|
|
|
//
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
2020-09-09 18:32:24 +00:00
|
|
|
extern bool Prediction;
|
2021-11-03 15:51:38 +00:00
|
|
|
DSWActor* WarpToArea(DSWActor* sp_from, int32_t* x, int32_t* y, int32_t* z, int* sectnum);
|
2015-05-19 21:54:34 +00:00
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
bool WarpPlaneSectorInfo(short sectnum, DSWActor** sp_ceiling, DSWActor** sp_floor)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-07-10 12:25:18 +00:00
|
|
|
*sp_floor = nullptr;
|
|
|
|
*sp_ceiling = nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (Prediction)
|
2020-09-09 17:52:52 +00:00
|
|
|
return false;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
2019-12-03 09:44:51 +00:00
|
|
|
if (sectnum < 0 || !TEST(sector[sectnum].extra, SECTFX_WARP_SECTOR))
|
2020-09-09 17:52:52 +00:00
|
|
|
return false;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
SWStatIterator it(STAT_WARP);
|
|
|
|
while (auto actor = it.Next())
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
auto sp = &actor->s();
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (sp->sectnum == sectnum)
|
|
|
|
{
|
|
|
|
// skip - don't teleport
|
|
|
|
if (SP_TAG10(sp) == 1)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
if (sp->hitag == WARP_CEILING_PLANE)
|
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
*sp_ceiling = actor;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
else if (sp->hitag == WARP_FLOOR_PLANE)
|
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
*sp_floor = actor;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2020-09-09 17:52:52 +00:00
|
|
|
return true;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
DSWActor* WarpPlane(int32_t* x, int32_t* y, int32_t* z, int* sectnum)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
DSWActor* sp_floor,* sp_ceiling;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (Prediction)
|
2021-07-10 12:25:18 +00:00
|
|
|
return nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (!WarpPlaneSectorInfo(*sectnum, &sp_ceiling, &sp_floor))
|
2021-07-10 12:25:18 +00:00
|
|
|
return nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (sp_ceiling)
|
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
if (*z <= sp_ceiling->s().z)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
|
|
|
return WarpToArea(sp_ceiling, x, y, z, sectnum);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (sp_floor)
|
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
if (*z >= sp_floor->s().z)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
|
|
|
return WarpToArea(sp_floor, x, y, z, sectnum);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2021-07-10 12:25:18 +00:00
|
|
|
return nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
DSWActor* WarpToArea(DSWActor* sp_from, int32_t* x, int32_t* y, int32_t* z, int* sectnum)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
|
|
|
int xoff;
|
|
|
|
int yoff;
|
|
|
|
int zoff;
|
2021-11-03 15:51:38 +00:00
|
|
|
SPRITEp const sp = &sp_from->s();
|
2015-05-19 21:54:34 +00:00
|
|
|
short match;
|
|
|
|
short to_tag = 0;
|
|
|
|
short match_rand[16];
|
|
|
|
int z_adj = 0;
|
|
|
|
|
|
|
|
xoff = *x - sp->x;
|
|
|
|
yoff = *y - sp->y;
|
|
|
|
zoff = *z - sp->z;
|
|
|
|
match = sp->lotag;
|
|
|
|
|
|
|
|
#if 0
|
|
|
|
TAG 2 = match
|
|
|
|
TAG 3 = Type
|
|
|
|
Sprite - 0,32 always teleports you to the center at the angle the sprite is facing
|
|
|
|
Offset - 1 always teleports you by the offset.Does not touch the angle
|
|
|
|
TAG 4 = angle
|
|
|
|
TAG 5 to 8 = random match locations
|
|
|
|
#endif
|
|
|
|
|
|
|
|
memset(match_rand,0,sizeof(match_rand));
|
|
|
|
|
|
|
|
switch (sp->hitag)
|
|
|
|
{
|
|
|
|
case WARP_TELEPORTER:
|
|
|
|
to_tag = WARP_TELEPORTER;
|
|
|
|
|
|
|
|
// if tag 5 has something this is a random teleporter
|
|
|
|
if (SP_TAG5(sp))
|
|
|
|
{
|
|
|
|
short ndx = 0;
|
|
|
|
match_rand[ndx++] = SP_TAG2(sp);
|
|
|
|
match_rand[ndx++] = SP_TAG5(sp);
|
|
|
|
if (SP_TAG6(sp))
|
|
|
|
match_rand[ndx++] = SP_TAG6(sp);
|
|
|
|
if (SP_TAG7(sp))
|
|
|
|
match_rand[ndx++] = SP_TAG7(sp);
|
|
|
|
if (SP_TAG8(sp))
|
|
|
|
match_rand[ndx++] = SP_TAG8(sp);
|
|
|
|
|
|
|
|
// reset the match you are looking for
|
2021-09-20 06:59:54 +00:00
|
|
|
match = match_rand[RandomRange(ndx)];
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
break;
|
|
|
|
case WARP_CEILING_PLANE:
|
|
|
|
to_tag = WARP_FLOOR_PLANE;
|
|
|
|
// make sure you warp outside of warp plane
|
|
|
|
z_adj = -Z(2);
|
|
|
|
break;
|
|
|
|
case WARP_FLOOR_PLANE:
|
|
|
|
to_tag = WARP_CEILING_PLANE;
|
|
|
|
// make sure you warp outside of warp plane
|
|
|
|
z_adj = Z(2);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
SWStatIterator it(STAT_WARP);
|
|
|
|
while (auto actor = it.Next())
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
auto spi = &actor->s();
|
2015-05-19 21:54:34 +00:00
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
if (spi->lotag == match && actor != sp_from)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
|
|
|
// exp: WARP_CEILING or WARP_CEILING_PLANE
|
2021-11-03 15:51:38 +00:00
|
|
|
if (spi->hitag == to_tag)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
if (!validSectorIndex(spi->sectnum))
|
2020-05-22 05:17:32 +00:00
|
|
|
return nullptr;
|
|
|
|
|
2015-05-19 21:54:34 +00:00
|
|
|
// determine new x,y,z position
|
2021-11-03 15:51:38 +00:00
|
|
|
*x = spi->x + xoff;
|
|
|
|
*y = spi->y + yoff;
|
|
|
|
*z = spi->z + zoff;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
// make sure you warp outside of warp plane
|
|
|
|
*z += z_adj;
|
|
|
|
|
|
|
|
// get new sector
|
2021-11-03 15:51:38 +00:00
|
|
|
*sectnum = spi->sectnum;
|
2015-05-19 21:54:34 +00:00
|
|
|
updatesector(*x, *y, sectnum);
|
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
return actor;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2021-07-10 12:25:18 +00:00
|
|
|
return nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
//
|
|
|
|
// Warp - Teleporter style
|
|
|
|
//
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
bool WarpSectorInfo(short sectnum, DSWActor** sp_warp)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-07-10 12:25:18 +00:00
|
|
|
*sp_warp = nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (!TEST(sector[sectnum].extra, SECTFX_WARP_SECTOR))
|
2020-09-09 17:52:52 +00:00
|
|
|
return false;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
SWStatIterator it(STAT_WARP);
|
|
|
|
while (auto actor = it.Next())
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
auto sp = &actor->s();
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (sp->sectnum == sectnum)
|
|
|
|
{
|
|
|
|
// skip - don't teleport
|
|
|
|
if (SP_TAG10(sp) == 1)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
if (sp->hitag == WARP_TELEPORTER)
|
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
*sp_warp = actor;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2020-09-09 17:52:52 +00:00
|
|
|
return true;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
|
|
|
|
2021-11-03 15:51:38 +00:00
|
|
|
DSWActor* Warp(int32_t* x, int32_t* y, int32_t* z, int* sectnum)
|
2015-05-19 21:54:34 +00:00
|
|
|
{
|
2021-11-03 15:51:38 +00:00
|
|
|
DSWActor* sp_warp;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (Prediction)
|
2021-07-10 12:25:18 +00:00
|
|
|
return nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (!WarpSectorInfo(*sectnum, &sp_warp))
|
2021-07-10 12:25:18 +00:00
|
|
|
return nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
|
|
|
|
if (sp_warp)
|
|
|
|
{
|
|
|
|
return WarpToArea(sp_warp, x, y, z, sectnum);
|
|
|
|
}
|
|
|
|
|
2021-07-10 12:25:18 +00:00
|
|
|
return nullptr;
|
2015-05-19 21:54:34 +00:00
|
|
|
}
|
2019-10-09 16:09:05 +00:00
|
|
|
END_SW_NS
|