mirror of
https://github.com/DrBeef/Raze.git
synced 2024-12-02 17:11:51 +00:00
1228 lines
28 KiB
C++
1228 lines
28 KiB
C++
//-------------------------------------------------------------------------
|
|
/*
|
|
Copyright (C) 1996, 2003 - 3D Realms Entertainment
|
|
Copyright (C) 2000, 2003 - Matt Saettler (EDuke Enhancements)
|
|
Copyright (C) 2020 - Christoph Oelckers
|
|
|
|
This file is part of Enhanced Duke Nukem 3D version 1.5 - Atomic Edition
|
|
|
|
Duke Nukem 3D 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
Original Source: 1996 - Todd Replogle
|
|
Prepared for public release: 03/21/2003 - Charlie Wiederhold, 3D Realms
|
|
|
|
EDuke enhancements integrated: 04/13/2003 - Matt Saettler
|
|
|
|
Note: EDuke source was in transition. Changes are in-progress in the
|
|
source as it is released.
|
|
|
|
*/
|
|
//-------------------------------------------------------------------------
|
|
|
|
#include <utility>
|
|
#include "ns.h"
|
|
#include "global.h"
|
|
#include "sounds.h"
|
|
#include "automap.h"
|
|
#include "dukeactor.h"
|
|
#include "interpolate.h"
|
|
|
|
BEGIN_DUKE_NS
|
|
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DDukeActor* EGS(sectortype* whatsectp, int s_x, int s_y, int s_z, int s_pn, int8_t s_s, int8_t s_xr, int8_t s_yr, int s_a, int s_ve, int s_zv, DDukeActor* s_ow, int8_t s_ss)
|
|
{
|
|
// sector pointer must be strictly validated here or the engine will crash.
|
|
if (whatsectp == nullptr || !validSectorIndex(sectnum(whatsectp))) return nullptr;
|
|
auto act = static_cast<DDukeActor*>(::InsertActor(RUNTIME_CLASS(DDukeActor), whatsectp, s_ss));
|
|
|
|
if (act == nullptr) return nullptr;
|
|
act->s = &act->spr;
|
|
SetupGameVarsForActor(act);
|
|
|
|
|
|
auto s = act->s;
|
|
|
|
s->x = s_x;
|
|
s->y = s_y;
|
|
s->z = s_z;
|
|
s->cstat = 0;
|
|
s->picnum = s_pn;
|
|
s->shade = s_s;
|
|
s->xrepeat = s_xr;
|
|
s->yrepeat = s_yr;
|
|
s->pal = 0;
|
|
|
|
s->ang = s_a;
|
|
s->xvel = s_ve;
|
|
s->zvel = s_zv;
|
|
s->xoffset = 0;
|
|
s->yoffset = 0;
|
|
s->yvel = 0;
|
|
s->clipdist = 0;
|
|
s->pal = 0;
|
|
s->lotag = 0;
|
|
s->backuploc();
|
|
|
|
act->lastvx = 0;
|
|
act->lastvy = 0;
|
|
|
|
act->timetosleep = 0;
|
|
act->actorstayput = nullptr;
|
|
act->extra = -1;
|
|
act->cgg = 0;
|
|
act->movflag = 0;
|
|
act->tempang = 0;
|
|
act->dispicnum = 0;
|
|
act->SetHitOwner(s_ow);
|
|
act->SetOwner(s_ow);
|
|
|
|
if (s_ow)
|
|
{
|
|
act->picnum = s_ow->spr.picnum;
|
|
act->floorz = s_ow->floorz;
|
|
act->ceilingz = s_ow->ceilingz;
|
|
}
|
|
else
|
|
{
|
|
|
|
}
|
|
|
|
memset(act->temp_data, 0, sizeof(act->temp_data));
|
|
if (gs.actorinfo[s_pn].scriptaddress)
|
|
{
|
|
auto sa = &ScriptCode[gs.actorinfo[s_pn].scriptaddress];
|
|
s->extra = sa[0];
|
|
act->temp_data[4] = sa[1];
|
|
act->temp_data[1] = sa[2];
|
|
s->hitag = sa[3];
|
|
}
|
|
else
|
|
{
|
|
s->extra = 0;
|
|
s->hitag = 0;
|
|
}
|
|
|
|
if (show2dsector[s->sectno()]) act->spr.cstat2 |= CSTAT2_SPRITE_MAPPED;
|
|
else act->spr.cstat2 &= ~CSTAT2_SPRITE_MAPPED;
|
|
|
|
act->sx() = {};
|
|
act->sm() = {};
|
|
|
|
return act;
|
|
}
|
|
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
bool initspriteforspawn(DDukeActor* act, const std::initializer_list<int> &excludes)
|
|
{
|
|
auto sp = act->s;
|
|
auto t = act->temp_data;
|
|
|
|
act->picnum = sp->picnum;
|
|
act->timetosleep = 0;
|
|
act->extra = -1;
|
|
|
|
sp->backuppos();
|
|
|
|
act->SetOwner(act);
|
|
act->SetHitOwner(act);
|
|
act->cgg = 0;
|
|
act->movflag = 0;
|
|
act->tempang = 0;
|
|
act->dispicnum = 0;
|
|
act->floorz = sp->sector()->floorz;
|
|
act->ceilingz = sp->sector()->ceilingz;
|
|
|
|
act->lastvx = 0;
|
|
act->lastvy = 0;
|
|
act->actorstayput = nullptr;
|
|
|
|
t[0] = t[1] = t[2] = t[3] = t[4] = t[5] = 0;
|
|
act->temp_actor = nullptr;
|
|
|
|
if (sp->cstat & CSTAT_SPRITE_ALIGNMENT_MASK)
|
|
if (!isIn(sp->picnum, excludes) && (sp->cstat & CSTAT_SPRITE_ALIGNMENT_MASK))
|
|
{
|
|
if (sp->shade == 127) return false;
|
|
if (wallswitchcheck(act) && (sp->cstat & CSTAT_SPRITE_ALIGNMENT_WALL))
|
|
{
|
|
if (sp->picnum != TILE_ACCESSSWITCH && sp->picnum != TILE_ACCESSSWITCH2 && sp->pal)
|
|
{
|
|
if ((ud.multimode < 2) || (ud.multimode > 1 && ud.coop == 1))
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 0;
|
|
sp->cstat = 0;
|
|
sp->lotag = sp->hitag = 0;
|
|
return false;
|
|
}
|
|
}
|
|
sp->cstat |= CSTAT_SPRITE_BLOCK_ALL;
|
|
if (sp->pal && sp->picnum != TILE_ACCESSSWITCH && sp->picnum != TILE_ACCESSSWITCH2)
|
|
sp->pal = 0;
|
|
return false;
|
|
}
|
|
|
|
if (sp->hitag)
|
|
{
|
|
ChangeActorStat(act, 12);
|
|
sp->cstat |= CSTAT_SPRITE_BLOCK_ALL;
|
|
sp->extra = gs.impact_damage;
|
|
return false;
|
|
}
|
|
}
|
|
|
|
int s = sp->picnum;
|
|
|
|
if (sp->cstat & CSTAT_SPRITE_BLOCK) sp->cstat |= CSTAT_SPRITE_BLOCK_HITSCAN;
|
|
|
|
if (gs.actorinfo[s].scriptaddress)
|
|
{
|
|
sp->extra = ScriptCode[gs.actorinfo[s].scriptaddress];
|
|
t[4] = ScriptCode[gs.actorinfo[s].scriptaddress+1];
|
|
t[1] = ScriptCode[gs.actorinfo[s].scriptaddress+2];
|
|
int s3 = ScriptCode[gs.actorinfo[s].scriptaddress+3];
|
|
if (s3 && sp->hitag == 0)
|
|
sp->hitag = s3;
|
|
}
|
|
else t[1] = t[4] = 0;
|
|
return true;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
DDukeActor* spawn(DDukeActor* actj, int pn)
|
|
{
|
|
if (actj)
|
|
{
|
|
auto spawned = EGS(actj->spr.sector(), actj->spr.x, actj->spr.y, actj->spr.z, pn, 0, 0, 0, 0, 0, 0, actj, 0);
|
|
if (spawned)
|
|
{
|
|
spawned->picnum = actj->spr.picnum;
|
|
return fi.spawninit(actj, spawned, nullptr);
|
|
}
|
|
}
|
|
return nullptr;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void spawninitdefault(DDukeActor* actj, DDukeActor *act)
|
|
{
|
|
auto sp = act->s;
|
|
|
|
if (gs.actorinfo[sp->picnum].scriptaddress)
|
|
{
|
|
if (actj == nullptr && sp->lotag > ud.player_skill)
|
|
{
|
|
// make it go away...
|
|
sp->xrepeat = sp->yrepeat = 0;
|
|
ChangeActorStat(act, STAT_MISC);
|
|
return;
|
|
}
|
|
|
|
// Init the size
|
|
if (sp->xrepeat == 0 || sp->yrepeat == 0)
|
|
sp->xrepeat = sp->yrepeat = 1;
|
|
|
|
if (actorflag(act, SFLAG_BADGUY))
|
|
{
|
|
if (ud.monsters_off == 1)
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 0;
|
|
ChangeActorStat(act, STAT_MISC);
|
|
return;
|
|
}
|
|
|
|
makeitfall(act);
|
|
|
|
if (actorflag(act, SFLAG_BADGUYSTAYPUT))
|
|
act->actorstayput = sp->sector();
|
|
|
|
if (!isRR() || actorflag(act, SFLAG_KILLCOUNT)) // Duke is just like Doom - Bad guys always count as kill.
|
|
ps[myconnectindex].max_actors_killed++;
|
|
|
|
sp->clipdist = 80;
|
|
if (actj)
|
|
{
|
|
if (actj->spr.picnum == RESPAWN)
|
|
act->tempang = sp->pal = actj->spr.pal;
|
|
ChangeActorStat(act, STAT_ACTOR);
|
|
}
|
|
else ChangeActorStat(act, STAT_ZOMBIEACTOR);
|
|
}
|
|
else
|
|
{
|
|
sp->clipdist = 40;
|
|
act->SetOwner(act);
|
|
ChangeActorStat(act, STAT_ACTOR);
|
|
}
|
|
|
|
act->timetosleep = 0;
|
|
|
|
if (actj)
|
|
sp->ang = actj->spr.ang;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void spawntransporter(DDukeActor *actj, DDukeActor* acti, bool beam)
|
|
{
|
|
if (actj == nullptr) return;
|
|
auto sp = acti->s;
|
|
auto spj = actj->s;
|
|
if (beam)
|
|
{
|
|
sp->xrepeat = 31;
|
|
sp->yrepeat = 1;
|
|
sp->z = spj->sector()->floorz - (isRR() ? PHEIGHT_RR : PHEIGHT_DUKE);
|
|
}
|
|
else
|
|
{
|
|
if (spj->statnum == 4)
|
|
{
|
|
sp->xrepeat = 8;
|
|
sp->yrepeat = 8;
|
|
}
|
|
else
|
|
{
|
|
sp->xrepeat = 48;
|
|
sp->yrepeat = 64;
|
|
if (spj->statnum == 10 || badguy(spj))
|
|
sp->z -= (32 << 8);
|
|
}
|
|
}
|
|
|
|
sp->shade = -127;
|
|
sp->cstat = CSTAT_SPRITE_YCENTER | CSTAT_SPRITE_TRANSLUCENT;
|
|
sp->ang = spj->ang;
|
|
|
|
sp->xvel = 128;
|
|
ChangeActorStat(acti, STAT_MISC);
|
|
ssp(acti, CLIPMASK0);
|
|
SetActor(acti, sp->pos);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int spawnbloodpoolpart1(DDukeActor* acti)
|
|
{
|
|
auto sp = acti->s;
|
|
auto s1 = sp->sector();
|
|
|
|
updatesector(sp->x + 108, sp->y + 108, &s1);
|
|
if (s1 && s1->floorz == sp->sector()->floorz)
|
|
{
|
|
updatesector(sp->x - 108, sp->y - 108, &s1);
|
|
if (s1 && s1->floorz == sp->sector()->floorz)
|
|
{
|
|
updatesector(sp->x + 108, sp->y - 108, &s1);
|
|
if (s1 && s1->floorz == sp->sector()->floorz)
|
|
{
|
|
updatesector(sp->x - 108, sp->y + 108, &s1);
|
|
if (s1 && s1->floorz != sp->sector()->floorz)
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 0; ChangeActorStat(acti, STAT_MISC); return true;
|
|
}
|
|
}
|
|
else { sp->xrepeat = sp->yrepeat = 0; ChangeActorStat(acti, STAT_MISC); return true; }
|
|
}
|
|
else { sp->xrepeat = sp->yrepeat = 0; ChangeActorStat(acti, STAT_MISC); return true; }
|
|
}
|
|
else { sp->xrepeat = sp->yrepeat = 0; ChangeActorStat(acti, STAT_MISC); return true; }
|
|
|
|
if (sp->sector()->lotag == 1)
|
|
{
|
|
ChangeActorStat(acti, STAT_MISC);
|
|
return true;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void initfootprint(DDukeActor* actj, DDukeActor* acti)
|
|
{
|
|
auto sp = acti->s;
|
|
auto sect = sp->sector();
|
|
if (actj)
|
|
{
|
|
auto s1 = sp->sector();
|
|
|
|
updatesector(sp->x + 84, sp->y + 84, &s1);
|
|
if (s1 && s1->floorz == sp->sector()->floorz)
|
|
{
|
|
updatesector(sp->x - 84, sp->y - 84, &s1);
|
|
if (s1 && s1->floorz == sp->sector()->floorz)
|
|
{
|
|
updatesector(sp->x + 84, sp->y - 84, &s1);
|
|
if (s1 && s1->floorz == sp->sector()->floorz)
|
|
{
|
|
updatesector(sp->x - 84, sp->y + 84, &s1);
|
|
if (s1 && s1->floorz != sp->sector()->floorz)
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 0; ChangeActorStat(acti, STAT_MISC); return;
|
|
}
|
|
}
|
|
else { sp->xrepeat = sp->yrepeat = 0; return; }
|
|
}
|
|
else { sp->xrepeat = sp->yrepeat = 0; return; }
|
|
}
|
|
else { sp->xrepeat = sp->yrepeat = 0; return; }
|
|
|
|
sp->cstat = CSTAT_SPRITE_ALIGNMENT_FLOOR;
|
|
if ((ps[actj->spr.yvel].footprintcount & 1)) sp->cstat |= CSTAT_SPRITE_XFLIP;
|
|
sp->ang = actj->spr.ang;
|
|
}
|
|
|
|
sp->z = sect->floorz;
|
|
if (sect->lotag != 1 && sect->lotag != 2)
|
|
sp->xrepeat = sp->yrepeat = 32;
|
|
|
|
insertspriteq(acti);
|
|
ChangeActorStat(acti, STAT_MISC);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void initshell(DDukeActor* actj, DDukeActor* acti, bool isshell)
|
|
{
|
|
auto sp = acti->s;
|
|
auto t = acti->temp_data;
|
|
if (actj)
|
|
{
|
|
auto spj = actj->s;
|
|
int snum, a;
|
|
|
|
if (spj->picnum == TILE_APLAYER)
|
|
{
|
|
snum = spj->yvel;
|
|
a = ps[snum].angle.ang.asbuild() - (krand() & 63) + 8; //Fine tune
|
|
|
|
t[0] = krand() & 1;
|
|
sp->z = (3 << 8) + ps[snum].pyoff + ps[snum].pos.z - (ps[snum].horizon.sum().asq16() >> 12) + (!isshell ? (3 << 8) : 0);
|
|
sp->zvel = -(krand() & 255);
|
|
}
|
|
else
|
|
{
|
|
a = sp->ang;
|
|
sp->z = spj->z - gs.playerheight + (3 << 8);
|
|
}
|
|
|
|
sp->x = spj->x + bcos(a, -7);
|
|
sp->y = spj->y + bsin(a, -7);
|
|
|
|
sp->shade = -8;
|
|
|
|
if (isNamWW2GI())
|
|
{
|
|
// to the right, with feeling
|
|
sp->ang = a + 512;
|
|
sp->xvel = 30;
|
|
}
|
|
else
|
|
{
|
|
sp->ang = a - 512;
|
|
sp->xvel = 20;
|
|
}
|
|
|
|
sp->xrepeat = sp->yrepeat = isRR() && isshell? 2 : 4;
|
|
|
|
ChangeActorStat(acti, STAT_MISC);
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void initcrane(DDukeActor* actj, DDukeActor* acti, int CRANEPOLE)
|
|
{
|
|
auto sp = acti->s;
|
|
auto sect = sp->sector();
|
|
auto t = acti->temp_data;
|
|
sp->cstat |= CSTAT_SPRITE_BLOCK_ALL | CSTAT_SPRITE_ONE_SIDE;
|
|
|
|
sp->picnum += 2;
|
|
sp->z = sect->ceilingz + (48 << 8);
|
|
t[4] = cranes.Reserve(1);
|
|
|
|
auto& apt = cranes[t[4]];
|
|
apt.x = sp->x;
|
|
apt.y = sp->y;
|
|
apt.z = sp->z;
|
|
apt.poleactor = nullptr;
|
|
|
|
DukeStatIterator it(STAT_DEFAULT);
|
|
while (auto act = it.Next())
|
|
{
|
|
auto ss = act->s;
|
|
if (ss->picnum == CRANEPOLE && sp->hitag == (ss->hitag))
|
|
{
|
|
apt.poleactor = act;
|
|
|
|
acti->temp_sect = ss->sector();
|
|
|
|
ss->xrepeat = 48;
|
|
ss->yrepeat = 128;
|
|
|
|
apt.polex = ss->x;
|
|
apt.poley = ss->y;
|
|
|
|
ss->x = sp->x;
|
|
ss->y = sp->y;
|
|
ss->z = sp->z;
|
|
ss->shade = sp->shade;
|
|
|
|
SetActor(act, ss->pos);
|
|
break;
|
|
}
|
|
}
|
|
|
|
acti->SetOwner(nullptr);
|
|
sp->extra = 8;
|
|
ChangeActorStat(acti, STAT_STANDABLE);
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void initwaterdrip(DDukeActor* actj, DDukeActor* actor)
|
|
{
|
|
auto sp = actor->s;
|
|
auto t = actor->temp_data;
|
|
if (actj && (actj->spr.statnum == 10 || actj->spr.statnum == 1))
|
|
{
|
|
sp->shade = 32;
|
|
if (actj->spr.pal != 1)
|
|
{
|
|
sp->pal = 2;
|
|
sp->z -= (18 << 8);
|
|
}
|
|
else sp->z -= (13 << 8);
|
|
sp->ang = getangle(ps[connecthead].pos.x - sp->x, ps[connecthead].pos.y - sp->y);
|
|
sp->xvel = 48 - (krand() & 31);
|
|
ssp(actor, CLIPMASK0);
|
|
}
|
|
else if (!actj)
|
|
{
|
|
sp->z += (4 << 8);
|
|
t[0] = sp->z;
|
|
if (!isRR()) t[1] = krand() & 127;
|
|
}
|
|
sp->xrepeat = 24;
|
|
sp->yrepeat = 24;
|
|
ChangeActorStat(actor, STAT_STANDABLE);
|
|
}
|
|
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
int initreactor(DDukeActor* actj, DDukeActor* actor, bool isrecon)
|
|
{
|
|
auto sp = actor->s;
|
|
if (isrecon)
|
|
{
|
|
if (sp->lotag > ud.player_skill)
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 0;
|
|
ChangeActorStat(actor, STAT_MISC);
|
|
return true;
|
|
}
|
|
if (!isRR() || actorflag(actor, SFLAG_KILLCOUNT)) // Duke is just like Doom - Bad guys always count as kill.
|
|
ps[myconnectindex].max_actors_killed++;
|
|
actor->temp_data[5] = 0;
|
|
if (ud.monsters_off == 1)
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 0;
|
|
ChangeActorStat(actor, STAT_MISC);
|
|
return false;
|
|
}
|
|
sp->extra = 130;
|
|
}
|
|
else
|
|
sp->extra = gs.impact_damage;
|
|
|
|
sp->cstat |= CSTAT_SPRITE_BLOCK_ALL; // Make it hitable
|
|
|
|
if (ud.multimode < 2 && sp->pal != 0)
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 0;
|
|
ChangeActorStat(actor, STAT_MISC);
|
|
return false;
|
|
}
|
|
sp->pal = 0;
|
|
sp->shade = -17;
|
|
|
|
ChangeActorStat(actor, 2);
|
|
return false;
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void spawneffector(DDukeActor* actor, TArray<DDukeActor*>* actors)
|
|
{
|
|
auto sp = actor->s;
|
|
auto sectp = sp->sector();
|
|
auto t = actor->temp_data;
|
|
int d, clostest = 0;
|
|
|
|
sp->yvel = sectp->extra;
|
|
sp->cstat |= CSTAT_SPRITE_INVISIBLE;
|
|
sp->xrepeat = sp->yrepeat = 0;
|
|
|
|
switch (sp->lotag)
|
|
{
|
|
case SE_28_LIGHTNING:
|
|
if (!isRR()) t[5] = 65;// Delay for lightning
|
|
break;
|
|
case SE_7_TELEPORT: // Transporters!!!!
|
|
case SE_23_ONE_WAY_TELEPORT:// XPTR END
|
|
if (sp->lotag != SE_23_ONE_WAY_TELEPORT && actors)
|
|
{
|
|
|
|
for(auto act2 : *actors)
|
|
{
|
|
if (act2->spr.statnum < MAXSTATUS && act2->spr.picnum == SECTOREFFECTOR && (act2->spr.lotag == SE_7_TELEPORT || act2->spr.lotag == SE_23_ONE_WAY_TELEPORT) &&
|
|
actor != act2 && act2->spr.hitag == sp->hitag)
|
|
{
|
|
actor->SetOwner(act2);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
else actor->SetOwner(actor);
|
|
|
|
t[4] = sectp->floorz == sp->z;
|
|
sp->cstat = 0;
|
|
ChangeActorStat(actor, STAT_TRANSPORT);
|
|
return;
|
|
case SE_1_PIVOT:
|
|
actor->SetOwner(nullptr);
|
|
t[0] = 1;
|
|
break;
|
|
case SE_18_INCREMENTAL_SECTOR_RISE_FALL:
|
|
|
|
if (sp->ang == 512)
|
|
{
|
|
t[1] = sectp->ceilingz;
|
|
if (sp->pal)
|
|
sectp->ceilingz = sp->z;
|
|
}
|
|
else
|
|
{
|
|
t[1] = sectp->floorz;
|
|
if (sp->pal)
|
|
sectp->floorz = sp->z;
|
|
}
|
|
|
|
sp->hitag <<= 2;
|
|
break;
|
|
|
|
case SE_19_EXPLOSION_LOWERS_CEILING:
|
|
actor->SetOwner(nullptr);
|
|
break;
|
|
case SE_25_PISTON: // Pistons
|
|
if (!isRR())
|
|
{
|
|
t[3] = sectp->ceilingz;
|
|
t[4] = 1;
|
|
}
|
|
else
|
|
t[4] = sectp->ceilingz;
|
|
|
|
sectp->ceilingz = sp->z;
|
|
StartInterpolation(sectp, Interp_Sect_Ceilingz);
|
|
break;
|
|
case SE_35:
|
|
sectp->ceilingz = sp->z;
|
|
break;
|
|
case SE_27_DEMO_CAM:
|
|
if (ud.recstat == 1)
|
|
{
|
|
sp->xrepeat = sp->yrepeat = 64;
|
|
sp->cstat &= ~CSTAT_SPRITE_INVISIBLE;
|
|
}
|
|
break;
|
|
case SE_47_LIGHT_SWITCH:
|
|
case SE_48_LIGHT_SWITCH:
|
|
if (!isRRRA()) break;
|
|
[[fallthrough]];
|
|
case SE_12_LIGHT_SWITCH:
|
|
|
|
t[1] = sectp->floorshade;
|
|
t[2] = sectp->ceilingshade;
|
|
break;
|
|
|
|
case SE_13_EXPLOSIVE:
|
|
{
|
|
t[0] = sectp->ceilingz;
|
|
t[1] = sectp->floorz;
|
|
|
|
bool ceiling = (abs(t[0] - sp->z) < abs(t[1] - sp->z));
|
|
actor->spriteextra = ceiling;
|
|
|
|
if (sp->ang == 512)
|
|
{
|
|
if (ceiling)
|
|
sectp->ceilingz = sp->z;
|
|
else
|
|
sectp->floorz = sp->z;
|
|
}
|
|
else
|
|
sectp->ceilingz = sectp->floorz = sp->z;
|
|
|
|
if (sectp->ceilingstat & CSTAT_SECTOR_SKY)
|
|
{
|
|
sectp->ceilingstat ^= CSTAT_SECTOR_SKY;
|
|
t[3] = 1;
|
|
|
|
if (!ceiling && sp->ang == 512)
|
|
{
|
|
sectp->ceilingstat ^= CSTAT_SECTOR_SKY;
|
|
t[3] = 0;
|
|
}
|
|
|
|
sectp->ceilingshade =
|
|
sectp->floorshade;
|
|
|
|
if (sp->ang == 512)
|
|
{
|
|
for (auto& wl : wallsofsector(sectp))
|
|
{
|
|
if (wl.twoSided())
|
|
{
|
|
auto nsec = wl.nextSector();
|
|
if (!(nsec->ceilingstat & CSTAT_SECTOR_SKY))
|
|
{
|
|
sectp->ceilingpicnum = nsec->ceilingpicnum;
|
|
sectp->ceilingshade = nsec->ceilingshade;
|
|
break; //Leave early
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
break;
|
|
}
|
|
case SE_17_WARP_ELEVATOR:
|
|
{
|
|
t[2] = sectp->floorz; //Stopping loc
|
|
t[3] = safenextsectorneighborzptr(sectp, sectp->floorz, -1, -1)->ceilingz;
|
|
t[4] = safenextsectorneighborzptr(sectp, sectp->ceilingz, 1, 1)->floorz;
|
|
|
|
if (numplayers < 2)
|
|
{
|
|
StartInterpolation(sectp, Interp_Sect_Floorz);
|
|
StartInterpolation(sectp, Interp_Sect_Ceilingz);
|
|
}
|
|
|
|
break;
|
|
}
|
|
case 156:
|
|
break;
|
|
|
|
case 34:
|
|
StartInterpolation(sectp, Interp_Sect_FloorPanX);
|
|
break;
|
|
|
|
case SE_24_CONVEYOR:
|
|
StartInterpolation(sectp, Interp_Sect_FloorPanX);
|
|
sp->yvel <<= 1;
|
|
case SE_36_PROJ_SHOOTER:
|
|
break;
|
|
|
|
case SE_20_STRETCH_BRIDGE:
|
|
{
|
|
int q;
|
|
walltype* closewall = nullptr;
|
|
|
|
//find the two most clostest wall x's and y's
|
|
q = 0x7fffffff;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
{
|
|
d = FindDistance2D(sp->x - wal.x, sp->y - wal.y);
|
|
if (d < q)
|
|
{
|
|
q = d;
|
|
closewall = &wal;
|
|
}
|
|
}
|
|
|
|
actor->temp_walls[0] = closewall;
|
|
|
|
q = 0x7fffffff;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
{
|
|
d = FindDistance2D(sp->x - wal.x, sp->y - wal.y);
|
|
if (d < q && &wal != actor->temp_walls[0])
|
|
{
|
|
q = d;
|
|
closewall = &wal;
|
|
}
|
|
}
|
|
|
|
actor->temp_walls[1] = closewall;
|
|
StartInterpolation(sectp, Interp_Sect_FloorPanX);
|
|
StartInterpolation(sectp, Interp_Sect_FloorPanY);
|
|
break;
|
|
}
|
|
|
|
|
|
case SE_3_RANDOM_LIGHTS_AFTER_SHOT_OUT:
|
|
|
|
t[3] = sectp->floorshade;
|
|
|
|
sectp->floorshade = sp->shade;
|
|
sectp->ceilingshade = sp->shade;
|
|
|
|
actor->palvals = (sectp->ceilingpal << 8) | sectp->floorpal;
|
|
|
|
//fix all the walls;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
{
|
|
if (!(wal.hitag & 1))
|
|
wal.shade = sp->shade;
|
|
if ((wal.cstat & CSTAT_WALL_BOTTOM_SWAP) && wal.twoSided())
|
|
wal.nextWall()->shade = sp->shade;
|
|
}
|
|
break;
|
|
|
|
case SE_31_FLOOR_RISE_FALL:
|
|
t[1] = sectp->floorz;
|
|
// t[2] = sp->hitag;
|
|
if (sp->ang != 1536) sectp->floorz = sp->z;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
if (wal.hitag == 0) wal.hitag = 9999;
|
|
|
|
StartInterpolation(sectp, Interp_Sect_Floorz);
|
|
|
|
break;
|
|
case SE_32_CEILING_RISE_FALL:
|
|
t[1] = sectp->ceilingz;
|
|
t[2] = sp->hitag;
|
|
if (sp->ang != 1536) sectp->ceilingz = sp->z;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
if (wal.hitag == 0) wal.hitag = 9999;
|
|
|
|
StartInterpolation(sectp, Interp_Sect_Ceilingz);
|
|
|
|
break;
|
|
|
|
case SE_4_RANDOM_LIGHTS: //Flashing lights
|
|
|
|
t[2] = sectp->floorshade;
|
|
|
|
actor->palvals = (sectp->ceilingpal << 8) | sectp->floorpal;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
if (wal.shade > t[3])
|
|
t[3] = wal.shade;
|
|
|
|
break;
|
|
|
|
case SE_9_DOWN_OPEN_DOOR_LIGHTS:
|
|
if (sectp->lotag &&
|
|
labs(sectp->ceilingz - sp->z) > 1024)
|
|
sectp->lotag |= 32768; //If its open
|
|
[[fallthrough]];
|
|
case SE_8_UP_OPEN_DOOR_LIGHTS:
|
|
//First, get the ceiling-floor shade
|
|
|
|
t[0] = sectp->floorshade;
|
|
t[1] = sectp->ceilingshade;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
if (wal.shade > t[2])
|
|
t[2] = wal.shade;
|
|
|
|
t[3] = 1; //Take Out;
|
|
|
|
break;
|
|
|
|
case 88:
|
|
//First, get the ceiling-floor shade
|
|
if (!isRR()) break;
|
|
|
|
t[0] = sectp->floorshade;
|
|
t[1] = sectp->ceilingshade;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
if (wal.shade > t[2])
|
|
t[2] = wal.shade;
|
|
|
|
t[3] = 1; //Take Out;
|
|
break;
|
|
|
|
case SE_11_SWINGING_DOOR://Pivitor rotater
|
|
if (sp->ang > 1024) t[3] = 2;
|
|
else t[3] = -2;
|
|
[[fallthrough]];
|
|
case SE_0_ROTATING_SECTOR:
|
|
case SE_2_EARTHQUAKE://Earthquakemakers
|
|
case SE_5_BOSS://Boss Creature
|
|
case SE_6_SUBWAY://Subway
|
|
case SE_14_SUBWAY_CAR://Caboos
|
|
case SE_15_SLIDING_DOOR://Subwaytype sliding door
|
|
case SE_16_REACTOR://That rotating blocker reactor thing
|
|
case SE_26://ESCELATOR
|
|
case SE_30_TWO_WAY_TRAIN://No rotational subways
|
|
|
|
if (sp->lotag == 0)
|
|
{
|
|
if (sectp->lotag == 30)
|
|
{
|
|
if (sp->pal) sp->clipdist = 1;
|
|
else sp->clipdist = 0;
|
|
t[3] = sectp->floorz;
|
|
sectp->hitagactor = actor;
|
|
}
|
|
|
|
|
|
bool found = false;
|
|
if (actors) for(auto act2 : *actors)
|
|
{
|
|
auto spr = act2->s;
|
|
if (spr->statnum < MAXSTATUS)
|
|
if (spr->picnum == SECTOREFFECTOR &&
|
|
spr->lotag == SE_1_PIVOT &&
|
|
spr->hitag == sp->hitag)
|
|
{
|
|
if (sp->ang == 512)
|
|
{
|
|
sp->x = spr->x;
|
|
sp->y = spr->y;
|
|
}
|
|
found = true;
|
|
actor->SetOwner(act2);
|
|
break;
|
|
}
|
|
}
|
|
if (!found)
|
|
{
|
|
sp->picnum = 0;
|
|
sp->cstat2 = CSTAT2_SPRITE_NOFIND;
|
|
sp->cstat = CSTAT_SPRITE_INVISIBLE;
|
|
ChangeActorStat(actor, STAT_REMOVED);
|
|
Printf("Found lonely Sector Effector (lotag 0) at (%d,%d)\n", sp->x, sp->y);
|
|
return;
|
|
}
|
|
}
|
|
|
|
t[1] = tempwallptr;
|
|
for (auto& wal : wallsofsector(sectp))
|
|
{
|
|
msx[tempwallptr] = wal.x - sp->x;
|
|
msy[tempwallptr] = wal.y - sp->y;
|
|
tempwallptr++;
|
|
if (tempwallptr > 2047)
|
|
{
|
|
I_Error("Too many moving sectors at (%d,%d).\n", wal.x, wal.y);
|
|
}
|
|
}
|
|
if (sp->lotag == SE_30_TWO_WAY_TRAIN || sp->lotag == SE_6_SUBWAY || sp->lotag == SE_14_SUBWAY_CAR || sp->lotag == SE_5_BOSS)
|
|
{
|
|
|
|
if (sectp->hitag == -1)
|
|
sp->extra = 0;
|
|
else sp->extra = 1;
|
|
|
|
sectp->hitagactor = actor;
|
|
|
|
sectortype* s = nullptr;
|
|
for (auto& wal : wallsofsector(sectp))
|
|
{
|
|
if (wal.twoSided() &&
|
|
wal.nextSector()->hitag == 0 &&
|
|
(wal.nextSector()->lotag < 3 || (isRRRA() && wal.nextSector()->lotag == 160)))
|
|
{
|
|
s = wal.nextSector();
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (s == nullptr)
|
|
{
|
|
I_Error("Subway found no zero'd sectors with locators\nat (%d,%d).\n", sp->x, sp->y);
|
|
}
|
|
|
|
actor->SetOwner(nullptr);
|
|
actor->temp_sect = s;
|
|
|
|
if (sp->lotag != SE_30_TWO_WAY_TRAIN)
|
|
t[3] = sp->hitag;
|
|
}
|
|
|
|
else if (sp->lotag == SE_16_REACTOR)
|
|
t[3] = sectp->ceilingz;
|
|
|
|
else if (sp->lotag == SE_26)
|
|
{
|
|
t[3] = sp->x;
|
|
t[4] = sp->y;
|
|
if (sp->shade == sectp->floorshade) //UP
|
|
sp->zvel = -256;
|
|
else
|
|
sp->zvel = 256;
|
|
|
|
sp->shade = 0;
|
|
}
|
|
else if (sp->lotag == SE_2_EARTHQUAKE)
|
|
{
|
|
t[5] = sp->sector()->floorheinum;
|
|
sp->sector()->setfloorslope(0);
|
|
}
|
|
}
|
|
|
|
switch (sp->lotag)
|
|
{
|
|
case SE_6_SUBWAY:
|
|
case SE_14_SUBWAY_CAR:
|
|
{
|
|
int j = callsound(sectp, actor);
|
|
if (j == -1)
|
|
{
|
|
if (!isRR()) j = SUBWAY; // Duke
|
|
else if (sp->sector()->floorpal == 7) j = 456;
|
|
else j = 75;
|
|
}
|
|
actor->lastvx = j;
|
|
}
|
|
[[fallthrough]];
|
|
case SE_30_TWO_WAY_TRAIN:
|
|
if (numplayers > 1) break;
|
|
[[fallthrough]];
|
|
case SE_0_ROTATING_SECTOR:
|
|
case SE_1_PIVOT:
|
|
case SE_5_BOSS:
|
|
case SE_11_SWINGING_DOOR:
|
|
case SE_15_SLIDING_DOOR:
|
|
case SE_16_REACTOR:
|
|
case SE_26:
|
|
setsectinterpolate(actor->spr.sector());
|
|
break;
|
|
|
|
case SE_29_WAVES:
|
|
StartInterpolation(actor->spr.sector(), Interp_Sect_Floorheinum);
|
|
StartInterpolation(actor->spr.sector(), Interp_Sect_Floorz);
|
|
break;
|
|
}
|
|
|
|
if ((!isRR() && actor->spr.lotag >= 40 && actor->spr.lotag <= 45) ||
|
|
(isRRRA() && actor->spr.lotag >= 150 && actor->spr.lotag <= 155))
|
|
ChangeActorStat(actor, STAT_RAROR);
|
|
else
|
|
ChangeActorStat(actor, STAT_EFFECTOR);
|
|
}
|
|
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void lotsofglass(DDukeActor *actor, walltype* wal, int n)
|
|
{
|
|
int j, z, a;
|
|
sectortype* sect = nullptr;
|
|
auto sp = actor->s;
|
|
|
|
if (wal == nullptr)
|
|
{
|
|
for (j = n - 1; j >= 0; j--)
|
|
{
|
|
a = sp->ang - 256 + (krand() & 511) + 1024;
|
|
EGS(sp->sector(), sp->x, sp->y, sp->z, TILE_GLASSPIECES + (j % 3), -32, 36, 36, a, 32 + (krand() & 63), 1024 - (krand() & 1023), actor, 5);
|
|
}
|
|
return;
|
|
}
|
|
|
|
int x1 = wal->x;
|
|
int y1 = wal->y;
|
|
auto delta = wal->delta() / (n + 1);
|
|
|
|
x1 -= Sgn(delta.y);
|
|
y1 += Sgn(delta.x);
|
|
|
|
|
|
for (j = n; j > 0; j--)
|
|
{
|
|
x1 += delta.x;
|
|
y1 += delta.y;
|
|
|
|
updatesector(x1, y1, §);
|
|
if (sect)
|
|
{
|
|
z = sect->floorz - (krand() & (abs(sect->ceilingz - sect->floorz)));
|
|
if (z < -(32 << 8) || z >(32 << 8))
|
|
z = sp->z - (32 << 8) + (krand() & ((64 << 8) - 1));
|
|
a = sp->ang - 1024;
|
|
EGS(sp->sector(), x1, y1, z, TILE_GLASSPIECES + (j % 3), -32, 36, 36, a, 32 + (krand() & 63), -(krand() & 1023), actor, 5);
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void spriteglass(DDukeActor* actor, int n)
|
|
{
|
|
auto sp = actor->s;
|
|
|
|
for (int j = n; j > 0; j--)
|
|
{
|
|
int a = krand() & 2047;
|
|
int z = sp->z - ((krand() & 16) << 8);
|
|
auto k = EGS(sp->sector(), sp->x, sp->y, z, TILE_GLASSPIECES + (j % 3), krand() & 15, 36, 36, a, 32 + (krand() & 63), -512 - (krand() & 2047), actor, 5);
|
|
if (k) k->spr.pal = sp->pal;
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void ceilingglass(DDukeActor* actor, sectortype* sectp, int n)
|
|
{
|
|
int j, z;
|
|
int a;
|
|
|
|
for (auto& wal : wallsofsector(sectp))
|
|
{
|
|
int x1 = wal.x;
|
|
int y1 = wal.y;
|
|
|
|
auto delta = wal.delta() / (n + 1);
|
|
|
|
for (j = n; j > 0; j--)
|
|
{
|
|
x1 += delta.x;
|
|
y1 += delta.y;
|
|
a = krand() & 2047;
|
|
z = sectp->ceilingz + ((krand() & 15) << 8);
|
|
EGS(sectp, x1, y1, z, TILE_GLASSPIECES + (j % 3), -32, 36, 36, a, (krand() & 31), 0, actor, 5);
|
|
}
|
|
}
|
|
}
|
|
|
|
//---------------------------------------------------------------------------
|
|
//
|
|
//
|
|
//
|
|
//---------------------------------------------------------------------------
|
|
|
|
void lotsofcolourglass(DDukeActor* actor, walltype* wal, int n)
|
|
{
|
|
int j, z;
|
|
sectortype* sect = nullptr;
|
|
int a;;
|
|
auto sp = actor->s;
|
|
|
|
if (wal == nullptr)
|
|
{
|
|
for (j = n - 1; j >= 0; j--)
|
|
{
|
|
a = krand() & 2047;
|
|
auto k = EGS(sp->sector(), sp->x, sp->y, sp->z - (krand() & (63 << 8)), TILE_GLASSPIECES + (j % 3), -32, 36, 36, a, 32 + (krand() & 63), 1024 - (krand() & 2047), actor, 5);
|
|
if (k) k->spr.pal = krand() & 15;
|
|
}
|
|
return;
|
|
}
|
|
|
|
int x1 = wal->x;
|
|
int y1 = wal->y;
|
|
|
|
auto delta = wal->delta() / (n + 1);
|
|
|
|
for (j = n; j > 0; j--)
|
|
{
|
|
x1 += delta.x;
|
|
y1 += delta.y;
|
|
|
|
updatesector(x1, y1, §);
|
|
z = sect->floorz - (krand() & (abs(sect->ceilingz - sect->floorz)));
|
|
if (z < -(32 << 8) || z >(32 << 8))
|
|
z = sp->z - (32 << 8) + (krand() & ((64 << 8) - 1));
|
|
a = sp->ang - 1024;
|
|
auto k = EGS(sp->sector(), x1, y1, z, TILE_GLASSPIECES + (j % 3), -32, 36, 36, a, 32 + (krand() & 63), -(krand() & 2047), actor, 5);
|
|
if (k) k->spr.pal = krand() & 7;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
END_DUKE_NS
|