raze/source/games/duke/src/actors.cpp
2021-12-30 09:57:33 +01:00

5211 lines
123 KiB
C++

//-------------------------------------------------------------------------
/*
Copyright (C) 1996, 2003 - 3D Realms Entertainment
Copyright (C) 2000, 2003 - Matt Saettler (EDuke Enhancements)
Copyright (C) 2017-2019 - Nuke.YKT
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.
This file is a combination of code from the following sources:
- EDuke 2 by Matt Saettler
- JFDuke by Jonathon Fowler (jf@jonof.id.au),
- DukeGDX and RedneckGDX by Alexander Makarov-[M210] (m210-2007@mail.ru)
- Redneck Rampage reconstructed source by Nuke.YKT
*/
//-------------------------------------------------------------------------
#include "ns.h"
#include "global.h"
#include "names.h"
#include "stats.h"
#include "constants.h"
#include "dukeactor.h"
BEGIN_DUKE_NS
int adjustfall(DDukeActor* s, int c);
//---------------------------------------------------------------------------
//
// this was once a macro
//
//---------------------------------------------------------------------------
void RANDOMSCRAP(DDukeActor* origin)
{
int r1 = krand(), r2 = krand(), r3 = krand(), r4 = krand(), r5 = krand(), r6 = krand(), r7 = krand();
int v = isRR() ? 16 : 48;
EGS(origin->spr.sector(),
origin->spr.pos.X + (r7 & 255) - 128, origin->spr.pos.Y + (r6 & 255) - 128, origin->spr.pos.Z - (8 << 8) - (r5 & 8191),
TILE_SCRAP6 + (r4 & 15), -8, v, v, r3 & 2047, (r2 & 63) + 64, -512 - (r1 & 2047), origin, 5);
}
//---------------------------------------------------------------------------
//
// wrapper to ensure that if a sound actor is killed, the sound is stopped as well.
//
//---------------------------------------------------------------------------
void deletesprite(DDukeActor *const actor)
{
if (actor->spr.picnum == MUSICANDSFX && actor->temp_data[0] == 1)
S_StopSound(actor->spr.lotag, actor);
actor->Destroy();
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void addammo(int weapon, struct player_struct* player, int amount)
{
player->ammo_amount[weapon] += amount;
if (player->ammo_amount[weapon] > gs.max_ammo_amount[weapon])
player->ammo_amount[weapon] = gs.max_ammo_amount[weapon];
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void checkavailinven(struct player_struct* player)
{
if (player->firstaid_amount > 0)
player->inven_icon = ICON_FIRSTAID;
else if (player->steroids_amount > 0)
player->inven_icon = ICON_STEROIDS;
else if (player->holoduke_amount > 0)
player->inven_icon = ICON_HOLODUKE;
else if (player->jetpack_amount > 0)
player->inven_icon = ICON_JETPACK;
else if (player->heat_amount > 0)
player->inven_icon = ICON_HEATS;
else if (player->scuba_amount > 0)
player->inven_icon = ICON_SCUBA;
else if (player->boot_amount > 0)
player->inven_icon = ICON_BOOTS;
else player->inven_icon = ICON_NONE;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void checkavailweapon(struct player_struct* player)
{
int i, snum;
int weap;
if (player->wantweaponfire >= 0)
{
weap = player->wantweaponfire;
player->wantweaponfire = -1;
if (weap == player->curr_weapon) return;
else if (player->gotweapon[weap] && player->ammo_amount[weap] > 0)
{
fi.addweapon(player, weap);
return;
}
}
weap = player->curr_weapon;
if (player->gotweapon[weap] && player->ammo_amount[weap] > 0)
return;
snum = player->GetPlayerNum();
int max = MAX_WEAPON;
for (i = 0; i <= max; i++)
{
weap = ud.wchoice[snum][i];
if ((g_gameType & GAMEFLAG_SHAREWARE) && weap > 6) continue;
if (weap == 0) weap = max;
else weap--;
if (weap == MIN_WEAPON || (player->gotweapon[weap] && player->ammo_amount[weap] > 0))
break;
}
if (i == MAX_WEAPON) weap = MIN_WEAPON;
// Found the weapon
player->last_weapon = player->curr_weapon;
player->random_club_frame = 0;
player->curr_weapon = weap;
if (isWW2GI())
{
SetGameVarID(g_iWeaponVarID, player->curr_weapon, player->GetActor(), snum); // snum is player index!
if (player->curr_weapon >= 0)
{
SetGameVarID(g_iWorksLikeVarID, aplWeaponWorksLike(player->curr_weapon, snum), player->GetActor(), snum);
}
else
{
SetGameVarID(g_iWorksLikeVarID, -1, player->GetActor(), snum);
}
OnEvent(EVENT_CHANGEWEAPON, snum, player->GetActor(), -1);
}
player->okickback_pic = player->kickback_pic = 0;
if (player->holster_weapon == 1)
{
player->holster_weapon = 0;
player->weapon_pos = 10;
}
else player->weapon_pos = -1;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void clearcamera(player_struct* ps)
{
ps->newOwner = nullptr;
ps->pos.X = ps->opos.X;
ps->pos.Y = ps->opos.Y;
ps->pos.Z = ps->opos.Z;
ps->angle.restore();
updatesector(ps->pos.X, ps->pos.Y, &ps->cursector);
DukeStatIterator it(STAT_ACTOR);
while (auto k = it.Next())
{
if (k->spr.picnum == TILE_CAMERA1)
k->spr.yvel = 0;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
int ssp(DDukeActor* const actor, unsigned int cliptype) //The set sprite function
{
Collision c;
return movesprite_ex(actor,
MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14),
MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14), actor->spr.zvel,
cliptype, c) == kHitNone;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void insertspriteq(DDukeActor* const actor)
{
if (spriteqamount > 0)
{
if (spriteq[spriteqloc] != nullptr)
{
// todo: Make list size a CVAR.
spriteq[spriteqloc]->spr.xrepeat = 0;
deletesprite(spriteq[spriteqloc]);
}
spriteq[spriteqloc] = actor;
spriteqloc = (spriteqloc + 1) % spriteqamount;
}
else actor->spr.xrepeat = actor->spr.yrepeat = 0;
}
//---------------------------------------------------------------------------
//
// consolidation of several nearly identical functions
//
//---------------------------------------------------------------------------
void lotsofstuff(DDukeActor* actor, int n, int spawntype)
{
for (int i = n; i > 0; i--)
{
int r1 = krand(), r2 = krand(); // using the RANDCORRECT version from RR.
auto j = EGS(actor->spr.sector(), actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (r2 % (47 << 8)), spawntype, -32, 8, 8, r1 & 2047, 0, 0, actor, 5);
if (j) j->spr.cstat = randomFlip();
}
}
//---------------------------------------------------------------------------
//
// movesector - why is this in actors.cpp?
//
//---------------------------------------------------------------------------
void ms(DDukeActor* const actor)
{
//T1,T2 and T3 are used for all the sector moving stuff!!!
actor->spr.pos.X += MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
actor->spr.pos.Y += MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
int j = actor->temp_data[1];
int k = actor->temp_data[2];
for(auto& wal : wallsofsector(actor->sector()))
{
vec2_t t;
rotatepoint({ 0, 0 }, { msx[j], msy[j] }, k & 2047, &t);
dragpoint(&wal, actor->spr.pos.X + t.X, actor->spr.pos.Y + t.Y);
j++;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movecyclers(void)
{
for (int q = numcyclers - 1; q >= 0; q--)
{
Cycler* c = &cyclers[q];
auto sect = c->sector;
int shade = c->shade2;
int j = shade + bsin(c->lotag, -10);
int cshade = c->shade1;
if (j < cshade) j = cshade;
else if (j > shade) j = shade;
c->lotag += sect->extra;
if (c->state)
{
for (auto& wal : wallsofsector(sect))
{
if (wal.hitag != 1)
{
wal.shade = j;
if ((wal.cstat & CSTAT_WALL_BOTTOM_SWAP) && wal.twoSided())
wal.nextWall()->shade = j;
}
}
sect->floorshade = sect->ceilingshade = j;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movedummyplayers(void)
{
int p;
DukeStatIterator iti(STAT_DUMMYPLAYER);
while (auto act = iti.Next())
{
if (!act->GetOwner()) continue;
p = act->GetOwner()->PlayerIndex();
if ((!isRR() && ps[p].on_crane != nullptr) || !ps[p].insector() || ps[p].cursector->lotag != 1 || ps->GetActor()->spr.extra <= 0)
{
ps[p].dummyplayersprite = nullptr;
deletesprite(act);
continue;
}
else
{
if (ps[p].on_ground && ps[p].on_warping_sector == 1 && ps[p].cursector->lotag == 1)
{
act->spr.cstat = CSTAT_SPRITE_BLOCK_ALL;
act->spr.pos.Z = act->spr.sector()->ceilingz + (27 << 8);
act->spr.ang = ps[p].angle.ang.asbuild();
if (act->temp_data[0] == 8)
act->temp_data[0] = 0;
else act->temp_data[0]++;
}
else
{
if (act->spr.sector()->lotag != 2) act->spr.pos.Z = act->spr.sector()->floorz;
act->spr.cstat = CSTAT_SPRITE_INVISIBLE;
}
}
act->spr.pos.X += (ps[p].pos.X - ps[p].opos.X);
act->spr.pos.Y += (ps[p].pos.Y - ps[p].opos.Y);
SetActor(act, act->spr.pos);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void moveplayers(void)
{
int otherx;
DukeStatIterator iti(STAT_PLAYER);
while (auto act = iti.Next())
{
int pn = act->PlayerIndex();
auto p = &ps[pn];
if (act->GetOwner())
{
if (p->newOwner != nullptr) //Looking thru the camera
{
act->spr.pos.X = p->opos.X;
act->spr.pos.Y = p->opos.Y;
act->spr.pos.Z = p->opos.Z + gs.playerheight;
act->spr.backupz();
act->spr.ang = p->angle.oang.asbuild();
SetActor(act, act->spr.pos);
}
else
{
if (ud.multimode > 1)
otherp = findotherplayer(pn, &otherx);
else
{
otherp = pn;
otherx = 0;
}
execute(act, pn, otherx);
if (ud.multimode > 1)
{
auto psp = ps[otherp].GetActor();
if (psp->spr.extra > 0)
{
if (act->spr.yrepeat > 32 && psp->spr.yrepeat < 32)
{
if (otherx < 1400 && p->knee_incs == 0)
{
p->knee_incs = 1;
p->weapon_pos = -1;
p->actorsqu = ps[otherp].GetActor();
}
}
}
}
if (ud.god)
{
act->spr.extra = gs.max_player_health;
act->spr.cstat = CSTAT_SPRITE_BLOCK_ALL;
if (!isWW2GI() && !isRR())
p->jetpack_amount = 1599;
}
if (p->actorsqu != nullptr)
{
p->angle.addadjustment(getincanglebam(p->angle.ang, bvectangbam(p->actorsqu->spr.pos.X - p->pos.X, p->actorsqu->spr.pos.Y - p->pos.Y)) >> 2);
}
if (act->spr.extra > 0)
{
// currently alive...
act->SetHitOwner(act);
if (ud.god == 0)
if (fi.ceilingspace(act->spr.sector()) || fi.floorspace(act->spr.sector()))
quickkill(p);
}
else
{
p->pos.X = act->spr.pos.X;
p->pos.Y = act->spr.pos.Y;
p->pos.Z = act->spr.pos.Z - (20 << 8);
p->newOwner = nullptr;
if (p->wackedbyactor != nullptr && p->wackedbyactor->spr.statnum < MAXSTATUS)
{
p->angle.addadjustment(getincanglebam(p->angle.ang, bvectangbam(p->wackedbyactor->spr.pos.X - p->pos.X, p->wackedbyactor->spr.pos.Y - p->pos.Y)) >> 1);
}
}
act->spr.ang = p->angle.ang.asbuild();
}
}
else
{
if (p->holoduke_on == nullptr)
{
deletesprite(act);
continue;
}
act->spr.cstat = 0;
if (act->spr.xrepeat < 42)
{
act->spr.xrepeat += 4;
act->spr.cstat |= CSTAT_SPRITE_TRANSLUCENT;
}
else act->spr.xrepeat = 42;
if (act->spr.yrepeat < 36)
act->spr.yrepeat += 4;
else
{
act->spr.yrepeat = 36;
if (act->spr.sector()->lotag != ST_2_UNDERWATER)
makeitfall(act);
if (act->spr.zvel == 0 && act->spr.sector()->lotag == ST_1_ABOVE_WATER)
act->spr.pos.Z += (32 << 8);
}
if (act->spr.extra < 8)
{
act->spr.xvel = 128;
act->spr.ang = p->angle.ang.asbuild();
act->spr.extra++;
ssp(act, CLIPMASK0);
}
else
{
act->spr.ang = 2047 - (p->angle.ang.asbuild());
SetActor(act, act->spr.pos);
}
}
if (act->spr.insector())
{
if (act->spr.sector()->ceilingstat & CSTAT_SECTOR_SKY)
act->spr.shade += (act->spr.sector()->ceilingshade - act->spr.shade) >> 1;
else
act->spr.shade += (act->spr.sector()->floorshade - act->spr.shade) >> 1;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movefx(void)
{
int p;
int x, ht;
DukeStatIterator iti(STAT_FX);
while (auto act = iti.Next())
{
switch (act->spr.picnum)
{
case RESPAWN:
if (act->spr.extra == 66)
{
auto j = spawn(act, act->spr.hitag);
if (isRRRA() && j)
{
respawn_rrra(act, j);
}
else
{
deletesprite(act);
}
}
else if (act->spr.extra > (66 - 13))
act->spr.extra++;
break;
case MUSICANDSFX:
ht = act->spr.hitag;
if (act->temp_data[1] != (int)SoundEnabled())
{
act->temp_data[1] = SoundEnabled();
act->temp_data[0] = 0;
}
if (act->spr.lotag >= 1000 && act->spr.lotag < 2000)
{
x = ldist(ps[screenpeek].GetActor(), act);
if (x < ht && act->temp_data[0] == 0)
{
FX_SetReverb(act->spr.lotag - 1100);
act->temp_data[0] = 1;
}
if (x >= ht && act->temp_data[0] == 1)
{
FX_SetReverb(0);
FX_SetReverbDelay(0);
act->temp_data[0] = 0;
}
}
else if (act->spr.lotag < 999 && (unsigned)act->spr.sector()->lotag < ST_9_SLIDING_ST_DOOR && snd_ambience && act->spr.sector()->floorz != act->spr.sector()->ceilingz)
{
int flags = S_GetUserFlags(act->spr.lotag);
if (flags & SF_MSFX)
{
int distance = dist(ps[screenpeek].GetActor(), act);
if (distance < ht && act->temp_data[0] == 0)
{
// Start playing an ambience sound.
S_PlayActorSound(act->spr.lotag, act, CHAN_AUTO, CHANF_LOOP);
act->temp_data[0] = 1; // AMBIENT_SFX_PLAYING
}
else if (distance >= ht && act->temp_data[0] == 1)
{
// Stop playing ambience sound because we're out of its range.
S_StopSound(act->spr.lotag, act);
}
}
if ((flags & (SF_GLOBAL | SF_DTAG)) == SF_GLOBAL)
{
if (act->temp_data[4] > 0) act->temp_data[4]--;
else for (p = connecthead; p >= 0; p = connectpoint2[p])
if (p == myconnectindex && ps[p].cursector == act->spr.sector())
{
S_PlaySound(act->spr.lotag + (unsigned)global_random % (act->spr.hitag + 1));
act->temp_data[4] = 26 * 40 + (global_random % (26 * 40));
}
}
}
break;
}
}
}
//---------------------------------------------------------------------------
//
// split out of movestandables
//
//---------------------------------------------------------------------------
void movecrane(DDukeActor *actor, int crane)
{
auto sectp = actor->spr.sector();
int x;
auto& cpt = cranes[actor->temp_data[4]];
//actor->temp_data[0] = state
//actor->temp_data[1] = checking sector number
if (actor->spr.xvel) getglobalz(actor);
if (actor->temp_data[0] == 0) //Waiting to check the sector
{
DukeSectIterator it(actor->temp_sect);
while (auto a2 = it.Next())
{
switch (a2->spr.statnum)
{
case STAT_ACTOR:
case STAT_ZOMBIEACTOR:
case STAT_STANDABLE:
case STAT_PLAYER:
actor->spr.ang = getangle(cpt.polex - actor->spr.pos.X, cpt.poley - actor->spr.pos.Y);
SetActor(a2, { cpt.polex, cpt.poley, a2->spr.pos.Z });
actor->temp_data[0]++;
return;
}
}
}
else if (actor->temp_data[0] == 1)
{
if (actor->spr.xvel < 184)
{
actor->spr.picnum = crane + 1;
actor->spr.xvel += 8;
}
//IFMOVING; // JBF 20040825: see my rant above about this
ssp(actor, CLIPMASK0);
if (actor->spr.sector() == actor->temp_sect)
actor->temp_data[0]++;
}
else if (actor->temp_data[0] == 2 || actor->temp_data[0] == 7)
{
actor->spr.pos.Z += (1024 + 512);
if (actor->temp_data[0] == 2)
{
if ((sectp->floorz - actor->spr.pos.Z) < (64 << 8))
if (actor->spr.picnum > crane) actor->spr.picnum--;
if ((sectp->floorz - actor->spr.pos.Z) < (4096 + 1024))
actor->temp_data[0]++;
}
if (actor->temp_data[0] == 7)
{
if ((sectp->floorz - actor->spr.pos.Z) < (64 << 8))
{
if (actor->spr.picnum > crane) actor->spr.picnum--;
else
{
if (actor->IsActiveCrane())
{
int p = findplayer(actor, &x);
S_PlayActorSound(isRR() ? 390 : DUKE_GRUNT, ps[p].GetActor());
if (ps[p].on_crane == actor)
ps[p].on_crane = nullptr;
}
actor->temp_data[0]++;
actor->SetActiveCrane(false);
}
}
}
}
else if (actor->temp_data[0] == 3)
{
actor->spr.picnum++;
if (actor->spr.picnum == (crane + 2))
{
int p = checkcursectnums(actor->temp_sect);
if (p >= 0 && ps[p].on_ground)
{
actor->SetActiveCrane(true);
ps[p].on_crane = actor;
S_PlayActorSound(isRR() ? 390 : DUKE_GRUNT, ps[p].GetActor());
ps[p].angle.settarget(actor->spr.ang + 1024);
}
else
{
DukeSectIterator it(actor->temp_sect);
while (auto a2 = it.Next())
{
switch (a2->spr.statnum)
{
case 1:
case 6:
actor->SetOwner(a2);
break;
}
}
}
actor->temp_data[0]++;//Grabbed the sprite
actor->temp_data[2] = 0;
return;
}
}
else if (actor->temp_data[0] == 4) //Delay before going up
{
actor->temp_data[2]++;
if (actor->temp_data[2] > 10)
actor->temp_data[0]++;
}
else if (actor->temp_data[0] == 5 || actor->temp_data[0] == 8)
{
if (actor->temp_data[0] == 8 && actor->spr.picnum < (crane + 2))
if ((sectp->floorz - actor->spr.pos.Z) > 8192)
actor->spr.picnum++;
if (actor->spr.pos.Z < cpt.z)
{
actor->temp_data[0]++;
actor->spr.xvel = 0;
}
else
actor->spr.pos.Z -= (1024 + 512);
}
else if (actor->temp_data[0] == 6)
{
if (actor->spr.xvel < 192)
actor->spr.xvel += 8;
actor->spr.ang = getangle(cpt.x - actor->spr.pos.X, cpt.y - actor->spr.pos.Y);
ssp(actor, CLIPMASK0);
if (((actor->spr.pos.X - cpt.x) * (actor->spr.pos.X - cpt.x) + (actor->spr.pos.Y - cpt.y) * (actor->spr.pos.Y - cpt.y)) < (128 * 128))
actor->temp_data[0]++;
}
else if (actor->temp_data[0] == 9)
actor->temp_data[0] = 0;
if (cpt.poleactor)
SetActor(cpt.poleactor, { actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (34 << 8) });
auto Owner = actor->GetOwner();
if (Owner != nullptr || actor->IsActiveCrane())
{
int p = findplayer(actor, &x);
int j = fi.ifhitbyweapon(actor);
if (j >= 0)
{
if (actor->IsActiveCrane())
if (ps[p].on_crane == actor)
ps[p].on_crane = nullptr;
actor->SetActiveCrane(false);
actor->spr.picnum = crane;
return;
}
if (Owner != nullptr)
{
SetActor(Owner, actor->spr.pos);
Owner->spr.opos = actor->spr.pos;
actor->spr.zvel = 0;
}
else if (actor->IsActiveCrane())
{
auto ang = ps[p].angle.ang.asbuild();
ps[p].opos.X = ps[p].pos.X;
ps[p].opos.Y = ps[p].pos.Y;
ps[p].opos.Z = ps[p].pos.Z;
ps[p].pos.X = actor->spr.pos.X - bcos(ang, -6);
ps[p].pos.Y = actor->spr.pos.Y - bsin(ang, -6);
ps[p].pos.Z = actor->spr.pos.Z + (2 << 8);
SetActor(ps[p].GetActor(), ps[p].pos);
ps[p].setCursector(ps[p].GetActor()->spr.sector());
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movefountain(DDukeActor *actor, int fountain)
{
int x;
if (actor->temp_data[0] > 0)
{
if (actor->temp_data[0] < 20)
{
actor->temp_data[0]++;
actor->spr.picnum++;
if (actor->spr.picnum == fountain + 3)
actor->spr.picnum = fountain + 1;
}
else
{
findplayer(actor, &x);
if (x > 512)
{
actor->temp_data[0] = 0;
actor->spr.picnum = fountain;
}
else actor->temp_data[0] = 1;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void moveflammable(DDukeActor* actor, int tire, int box, int pool)
{
int j;
if (actor->temp_data[0] == 1)
{
actor->temp_data[1]++;
if ((actor->temp_data[1] & 3) > 0) return;
if (!isRR() && actor->spr.picnum == tire && actor->temp_data[1] == 32)
{
actor->spr.cstat = 0;
auto spawned = spawn(actor, pool);
if (spawned) spawned->spr.shade = 127;
}
else
{
if (actor->spr.shade < 64) actor->spr.shade++;
else
{
deletesprite(actor);
return;
}
}
j = actor->spr.xrepeat - (krand() & 7);
if (j < 10)
{
deletesprite(actor);
return;
}
actor->spr.xrepeat = j;
j = actor->spr.yrepeat - (krand() & 7);
if (j < 4)
{
deletesprite(actor);
return;
}
actor->spr.yrepeat = j;
}
if (box >= 0 && actor->spr.picnum == box)
{
makeitfall(actor);
actor->ceilingz = actor->spr.sector()->ceilingz;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void detonate(DDukeActor *actor, int explosion)
{
earthquaketime = 16;
DukeStatIterator itj(STAT_EFFECTOR);
while (auto effector = itj.Next())
{
if (actor->spr.hitag == effector->spr.hitag)
{
if (effector->spr.lotag == SE_13_EXPLOSIVE)
{
if (effector->temp_data[2] == 0)
effector->temp_data[2] = 1;
}
else if (effector->spr.lotag == SE_8_UP_OPEN_DOOR_LIGHTS)
effector->temp_data[4] = 1;
else if (effector->spr.lotag == SE_18_INCREMENTAL_SECTOR_RISE_FALL)
{
if (effector->temp_data[0] == 0)
effector->temp_data[0] = 1;
}
else if (effector->spr.lotag == SE_21_DROP_FLOOR)
effector->temp_data[0] = 1;
}
}
actor->spr.pos.Z -= (32 << 8);
if ((actor->temp_data[3] == 1 && actor->spr.xrepeat) || actor->spr.lotag == -99)
{
int x = actor->spr.extra;
spawn(actor, explosion);
fi.hitradius(actor, gs.seenineblastradius, x >> 2, x - (x >> 1), x - (x >> 2), x);
S_PlayActorSound(PIPEBOMB_EXPLODE, actor);
}
if (actor->spr.xrepeat)
for (int x = 0; x < 8; x++) RANDOMSCRAP(actor);
deletesprite(actor);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movemasterswitch(DDukeActor *actor, int spectype1, int spectype2)
{
if (actor->spr.yvel == 1)
{
actor->spr.hitag--;
if (actor->spr.hitag <= 0)
{
operatesectors(actor->spr.sector(), actor);
DukeSectIterator it(actor->sector());
while (auto effector = it.Next())
{
if (effector->spr.statnum == STAT_EFFECTOR)
{
switch (effector->spr.lotag)
{
case SE_2_EARTHQUAKE:
case SE_21_DROP_FLOOR:
case SE_31_FLOOR_RISE_FALL:
case SE_32_CEILING_RISE_FALL:
case SE_36_PROJ_SHOOTER:
effector->temp_data[0] = 1;
break;
case SE_3_RANDOM_LIGHTS_AFTER_SHOT_OUT:
effector->temp_data[4] = 1;
break;
}
}
else if (effector->spr.statnum == STAT_STANDABLE)
{
if (effector->spr.picnum == spectype1 || effector->spr.picnum == spectype2) // SEENINE and OOZFILTER
{
effector->spr.shade = -31;
}
}
}
// we cannot delete this because it may be used as a sound source.
// This originally depended on undefined behavior as the deleted sprite was still used for the sound
// with no checking if it got reused in the mean time.
actor->spr.picnum = 0; // give it a picnum without any behavior attached, just in case
actor->spr.cstat |= CSTAT_SPRITE_INVISIBLE;
actor->spr.cstat2 |= CSTAT2_SPRITE_NOFIND;
ChangeActorStat(actor, STAT_REMOVED);
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movetrash(DDukeActor *actor)
{
if (actor->spr.xvel == 0) actor->spr.xvel = 1;
if (ssp(actor, CLIPMASK0))
{
makeitfall(actor);
if (krand() & 1) actor->spr.zvel -= 256;
if (abs(actor->spr.xvel) < 48)
actor->spr.xvel += (krand() & 3);
}
else deletesprite(actor);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movewaterdrip(DDukeActor *actor, int drip)
{
if (actor->temp_data[1])
{
actor->temp_data[1]--;
if (actor->temp_data[1] == 0)
actor->spr.cstat &= ~CSTAT_SPRITE_INVISIBLE;
}
else
{
makeitfall(actor);
ssp(actor, CLIPMASK0);
if (actor->spr.xvel > 0) actor->spr.xvel -= 2;
if (actor->spr.zvel == 0)
{
actor->spr.cstat |= CSTAT_SPRITE_INVISIBLE;
if (actor->spr.pal != 2 && (isRR() || actor->spr.hitag == 0))
S_PlayActorSound(SOMETHING_DRIPPING, actor);
auto Owner = actor->GetOwner();
if (!Owner || Owner->spr.picnum != drip)
{
deletesprite(actor);
}
else
{
actor->spr.pos.Z = actor->temp_data[0];
actor->spr.backupz();
actor->temp_data[1] = 48 + (krand() & 31);
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movedoorshock(DDukeActor* actor)
{
auto sectp = actor->spr.sector();
int j = abs(sectp->ceilingz - sectp->floorz) >> 9;
actor->spr.yrepeat = j + 4;
actor->spr.xrepeat = 16;
actor->spr.pos.Z = sectp->floorz;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movetouchplate(DDukeActor* actor, int plate)
{
auto sectp = actor->spr.sector();
int x;
int p;
if (actor->temp_data[1] == 1 && actor->spr.hitag >= 0) //Move the sector floor
{
x = sectp->floorz;
if (actor->temp_data[3] == 1)
{
if (x >= actor->temp_data[2])
{
sectp->floorz = x;
actor->temp_data[1] = 0;
}
else
{
sectp->floorz += sectp->extra;
p = checkcursectnums(actor->spr.sector());
if (p >= 0) ps[p].pos.Z += sectp->extra;
}
}
else
{
if (x <= actor->spr.pos.Z)
{
sectp->floorz = actor->spr.pos.Z;
actor->temp_data[1] = 0;
}
else
{
sectp->floorz -= sectp->extra;
p = checkcursectnums(actor->spr.sector());
if (p >= 0)
ps[p].pos.Z -= sectp->extra;
}
}
return;
}
if (actor->temp_data[5] == 1) return;
p = checkcursectnums(actor->spr.sector());
if (p >= 0 && (ps[p].on_ground || actor->spr.ang == 512))
{
if (actor->temp_data[0] == 0 && !check_activator_motion(actor->spr.lotag))
{
actor->temp_data[0] = 1;
actor->temp_data[1] = 1;
actor->temp_data[3] = !actor->temp_data[3];
operatemasterswitches(actor->spr.lotag);
operateactivators(actor->spr.lotag, p);
if (actor->spr.hitag > 0)
{
actor->spr.hitag--;
if (actor->spr.hitag == 0) actor->temp_data[5] = 1;
}
}
}
else actor->temp_data[0] = 0;
if (actor->temp_data[1] == 1)
{
DukeStatIterator it(STAT_STANDABLE);
while (auto act2 = it.Next())
{
if (act2 != actor && act2->spr.picnum == plate && act2->spr.lotag == actor->spr.lotag)
{
act2->temp_data[1] = 1;
act2->temp_data[3] = actor->temp_data[3];
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void moveooz(DDukeActor* actor, int seenine, int seeninedead, int ooz, int explosion)
{
int j;
if (actor->spr.shade != -32 && actor->spr.shade != -33)
{
if (actor->spr.xrepeat)
j = (fi.ifhitbyweapon(actor) >= 0);
else
j = 0;
if (j || actor->spr.shade == -31)
{
if (j) actor->spr.lotag = 0;
actor->temp_data[3] = 1;
DukeStatIterator it(STAT_STANDABLE);
while (auto act2 = it.Next())
{
if (actor->spr.hitag == act2->spr.hitag && (act2->spr.picnum == seenine || act2->spr.picnum == ooz))
act2->spr.shade = -32;
}
}
}
else
{
if (actor->spr.shade == -32)
{
if (actor->spr.lotag > 0)
{
actor->spr.lotag -= 3;
if (actor->spr.lotag <= 0) actor->spr.lotag = -99;
}
else
actor->spr.shade = -33;
}
else
{
if (actor->spr.xrepeat > 0)
{
actor->temp_data[2]++;
if (actor->temp_data[2] == 3)
{
if (actor->spr.picnum == ooz)
{
actor->temp_data[2] = 0;
detonate(actor, explosion);
return;
}
if (actor->spr.picnum != (seeninedead + 1))
{
actor->temp_data[2] = 0;
if (actor->spr.picnum == seeninedead) actor->spr.picnum++;
else if (actor->spr.picnum == seenine)
actor->spr.picnum = seeninedead;
}
else
{
detonate(actor, explosion);
return;
}
}
return;
}
detonate(actor, explosion);
return;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void movecanwithsomething(DDukeActor* actor)
{
makeitfall(actor);
int j = fi.ifhitbyweapon(actor);
if (j >= 0)
{
S_PlayActorSound(VENT_BUST, actor);
for (j = 0; j < 10; j++)
RANDOMSCRAP(actor);
if (actor->spr.lotag) spawn(actor, actor->spr.lotag);
deletesprite(actor);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void bounce(DDukeActor* actor)
{
int xvect = MulScale(actor->spr.xvel, bcos(actor->spr.ang), 10);
int yvect = MulScale(actor->spr.xvel, bsin(actor->spr.ang), 10);
int zvect = actor->spr.zvel;
auto sectp = actor->spr.sector();
int daang = getangle(sectp->firstWall()->delta());
int k, l;
if (actor->spr.pos.Z < (actor->floorz + actor->ceilingz) >> 1)
k = sectp->ceilingheinum;
else
k = sectp->floorheinum;
int dax = MulScale(k, bsin(daang), 14);
int day = MulScale(k, -bcos(daang), 14);
int daz = 4096;
k = xvect * dax + yvect * day + zvect * daz;
l = dax * dax + day * day + daz * daz;
if ((abs(k) >> 14) < l)
{
k = DivScale(k, l, 17);
xvect -= MulScale(dax, k, 16);
yvect -= MulScale(day, k, 16);
zvect -= MulScale(daz, k, 16);
}
actor->spr.zvel = zvect;
actor->spr.xvel = ksqrt(DMulScale(xvect, xvect, yvect, yvect, 8));
actor->spr.ang = getangle(xvect, yvect);
}
//---------------------------------------------------------------------------
//
// taken out of moveweapon
//
//---------------------------------------------------------------------------
void movetongue(DDukeActor *actor, int tongue, int jaw)
{
actor->temp_data[0] = bsin(actor->temp_data[1], -9);
actor->temp_data[1] += 32;
if (actor->temp_data[1] > 2047)
{
deletesprite(actor);
return;
}
auto Owner = actor->GetOwner();
if (!Owner) return;
if (Owner->spr.statnum == MAXSTATUS)
if (badguy(Owner) == 0)
{
deletesprite(actor);
return;
}
actor->spr.ang = Owner->spr.ang;
actor->spr.pos.X = Owner->spr.pos.X;
actor->spr.pos.Y = Owner->spr.pos.Y;
if (Owner->spr.picnum == TILE_APLAYER)
actor->spr.pos.Z = Owner->spr.pos.Z - (34 << 8);
for (int k = 0; k < actor->temp_data[0]; k++)
{
auto q = EGS(actor->spr.sector(),
actor->spr.pos.X + MulScale(k, bcos(actor->spr.ang), 9),
actor->spr.pos.Y + MulScale(k, bsin(actor->spr.ang), 9),
actor->spr.pos.Z + ((k * Sgn(actor->spr.zvel)) * abs(actor->spr.zvel / 12)), tongue, -40 + (k << 1),
8, 8, 0, 0, 0, actor, 5);
if (q)
{
q->spr.cstat = CSTAT_SPRITE_YCENTER;
q->spr.pal = 8;
}
}
int k = actor->temp_data[0]; // do not depend on the above loop counter.
auto spawned = EGS(actor->spr.sector(),
actor->spr.pos.X + MulScale(k, bcos(actor->spr.ang), 9),
actor->spr.pos.Y + MulScale(k, bsin(actor->spr.ang), 9),
actor->spr.pos.Z + ((k * Sgn(actor->spr.zvel)) * abs(actor->spr.zvel / 12)), jaw, -40,
32, 32, 0, 0, 0, actor, 5);
if (spawned)
{
spawned->spr.cstat = CSTAT_SPRITE_YCENTER;
if (actor->temp_data[1] > 512 && actor->temp_data[1] < (1024))
spawned->spr.picnum = jaw + 1;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void rpgexplode(DDukeActor *actor, int hit, const vec3_t &pos, int EXPLOSION2, int EXPLOSION2BOT, int newextra, int playsound)
{
auto explosion = spawn(actor, EXPLOSION2);
if (!explosion) return;
explosion->spr.pos = pos;
if (actor->spr.xrepeat < 10)
{
explosion->spr.xrepeat = 6;
explosion->spr.yrepeat = 6;
}
else if (hit == kHitSector)
{
if (actor->spr.zvel > 0 && EXPLOSION2BOT >= 0)
spawn(actor, EXPLOSION2BOT);
else
{
explosion->spr.cstat |= CSTAT_SPRITE_YFLIP;
explosion->spr.pos.Z += (48 << 8);
}
}
if (newextra > 0) actor->spr.extra = newextra;
S_PlayActorSound(playsound, actor);
if (actor->spr.xrepeat >= 10)
{
int x = actor->spr.extra;
fi.hitradius(actor, gs.rpgblastradius, x >> 2, x >> 1, x - (x >> 2), x);
}
else
{
int x = actor->spr.extra + (global_random & 3);
fi.hitradius(actor, (gs.rpgblastradius >> 1), x >> 2, x >> 1, x - (x >> 2), x);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
bool respawnmarker(DDukeActor *actor, int yellow, int green)
{
actor->temp_data[0]++;
if (actor->temp_data[0] > gs.respawnitemtime)
{
deletesprite(actor);
return false;
}
if (actor->temp_data[0] >= (gs.respawnitemtime >> 1) && actor->temp_data[0] < ((gs.respawnitemtime >> 1) + (gs.respawnitemtime >> 2)))
actor->spr.picnum = yellow;
else if (actor->temp_data[0] > ((gs.respawnitemtime >> 1) + (gs.respawnitemtime >> 2)))
actor->spr.picnum = green;
makeitfall(actor);
return true;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
bool rat(DDukeActor* actor, bool makesound)
{
makeitfall(actor);
if (ssp(actor, CLIPMASK0))
{
if (makesound && (krand() & 255) == 0) S_PlayActorSound(RATTY, actor);
actor->spr.ang += (krand() & 31) - 15 + bsin(actor->temp_data[0] << 8, -11);
}
else
{
actor->temp_data[0]++;
if (actor->temp_data[0] > 1)
{
deletesprite(actor);
return false;
}
else actor->spr.ang = (krand() & 2047);
}
if (actor->spr.xvel < 128)
actor->spr.xvel += 2;
actor->spr.ang += (krand() & 3) - 6;
return true;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
bool queball(DDukeActor *actor, int pocket, int queball, int stripeball)
{
if (actor->spr.xvel)
{
DukeStatIterator it(STAT_DEFAULT);
while (auto aa = it.Next())
{
if (aa->spr.picnum == pocket && ldist(aa, actor) < 52)
{
deletesprite(actor);
return false;
}
}
Collision coll;
auto sect = actor->spr.sector();
int j = clipmove(actor->spr.pos, &sect,
(MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14) * TICSPERFRAME) << 11,
(MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14) * TICSPERFRAME) << 11,
24L, (4 << 8), (4 << 8), CLIPMASK1, coll);
actor->spr.setsector(sect);
if (j == kHitWall)
{
int k = getangle(coll.hitWall->delta());
actor->spr.ang = ((k << 1) - actor->spr.ang) & 2047;
}
else if (j == kHitSprite)
{
fi.checkhitsprite(actor, coll.actor());
}
actor->spr.xvel--;
if (actor->spr.xvel < 0) actor->spr.xvel = 0;
if (actor->spr.picnum == stripeball)
{
actor->spr.cstat = CSTAT_SPRITE_BLOCK_ALL;
actor->spr.cstat |= (CSTAT_SPRITE_XFLIP | CSTAT_SPRITE_YFLIP) & ESpriteFlags::FromInt(actor->spr.xvel);
}
}
else
{
int x;
int p = findplayer(actor, &x);
if (x < 1596)
{
// if(actor->spr.pal == 12)
{
int j = getincangle(ps[p].angle.ang.asbuild(), getangle(actor->spr.pos.X - ps[p].pos.X, actor->spr.pos.Y - ps[p].pos.Y));
if (j > -64 && j < 64 && PlayerInput(p, SB_OPEN))
if (ps[p].toggle_key_flag == 1)
{
DukeStatIterator it(STAT_ACTOR);
DDukeActor *act2;
while ((act2 = it.Next()))
{
if (act2->spr.picnum == queball || act2->spr.picnum == stripeball)
{
j = getincangle(ps[p].angle.ang.asbuild(), getangle(act2->spr.pos.X - ps[p].pos.X, act2->spr.pos.Y - ps[p].pos.Y));
if (j > -64 && j < 64)
{
int l;
findplayer(act2, &l);
if (x > l) break;
}
}
}
if (act2 == nullptr)
{
if (actor->spr.pal == 12)
actor->spr.xvel = 164;
else actor->spr.xvel = 140;
actor->spr.ang = ps[p].angle.ang.asbuild();
ps[p].toggle_key_flag = 2;
}
}
}
}
if (x < 512 && actor->spr.sector() == ps[p].cursector)
{
actor->spr.ang = getangle(actor->spr.pos.X - ps[p].pos.X, actor->spr.pos.Y - ps[p].pos.Y);
actor->spr.xvel = 48;
}
}
return true;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void forcesphere(DDukeActor* actor, int forcesphere)
{
auto sectp = actor->spr.sector();
if (actor->spr.yvel == 0)
{
actor->spr.yvel = 1;
for (int l = 512; l < (2048 - 512); l += 128)
for (int j = 0; j < 2048; j += 128)
{
auto k = spawn(actor, forcesphere);
if (k)
{
k->spr.cstat = CSTAT_SPRITE_BLOCK_ALL | CSTAT_SPRITE_YCENTER;
k->spr.clipdist = 64;
k->spr.ang = j;
k->spr.zvel = bsin(l, -5);
k->spr.xvel = bcos(l, -9);
k->SetOwner(actor);
}
}
}
if (actor->temp_data[3] > 0)
{
if (actor->spr.zvel < 6144)
actor->spr.zvel += 192;
actor->spr.pos.Z += actor->spr.zvel;
if (actor->spr.pos.Z > sectp->floorz)
actor->spr.pos.Z = sectp->floorz;
actor->temp_data[3]--;
if (actor->temp_data[3] == 0)
{
deletesprite(actor);
return;
}
else if (actor->temp_data[2] > 10)
{
DukeStatIterator it(STAT_MISC);
while (auto aa = it.Next())
{
if (aa->GetOwner() == actor && aa->spr.picnum == forcesphere)
aa->temp_data[1] = 1 + (krand() & 63);
}
actor->temp_data[3] = 64;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void recon(DDukeActor *actor, int explosion, int firelaser, int attacksnd, int painsnd, int roamsnd, int shift, int (*getspawn)(DDukeActor* i))
{
auto sectp = actor->spr.sector();
int a;
getglobalz(actor);
if (sectp->ceilingstat & CSTAT_SECTOR_SKY)
actor->spr.shade += (sectp->ceilingshade - actor->spr.shade) >> 1;
else actor->spr.shade += (sectp->floorshade - actor->spr.shade) >> 1;
if (actor->spr.pos.Z < sectp->ceilingz + (32 << 8))
actor->spr.pos.Z = sectp->ceilingz + (32 << 8);
if (ud.multimode < 2)
{
if (actor_tog == 1)
{
actor->spr.cstat = CSTAT_SPRITE_INVISIBLE;
return;
}
else if (actor_tog == 2) actor->spr.cstat = CSTAT_SPRITE_BLOCK_ALL;
}
if (fi.ifhitbyweapon(actor) >= 0)
{
if (actor->spr.extra < 0 && actor->temp_data[0] != -1)
{
actor->temp_data[0] = -1;
actor->spr.extra = 0;
}
if (painsnd >= 0) S_PlayActorSound(painsnd, actor);
RANDOMSCRAP(actor);
}
if (actor->temp_data[0] == -1)
{
actor->spr.pos.Z += 1024;
actor->temp_data[2]++;
if ((actor->temp_data[2] & 3) == 0) spawn(actor, explosion);
getglobalz(actor);
actor->spr.ang += 96;
actor->spr.xvel = 128;
int j = ssp(actor, CLIPMASK0);
if (j != 1 || actor->spr.pos.Z > actor->floorz)
{
for (int l = 0; l < 16; l++)
RANDOMSCRAP(actor);
S_PlayActorSound(LASERTRIP_EXPLODE, actor);
int sp = getspawn(actor);
if (sp >= 0) spawn(actor, sp);
ps[myconnectindex].actors_killed++;
deletesprite(actor);
}
return;
}
else
{
if (actor->spr.pos.Z > actor->floorz - (48 << 8))
actor->spr.pos.Z = actor->floorz - (48 << 8);
}
int x;
int p = findplayer(actor, &x);
auto Owner = actor->GetOwner();
// 3 = findplayerz, 4 = shoot
if (actor->temp_data[0] >= 4)
{
actor->temp_data[2]++;
if ((actor->temp_data[2] & 15) == 0)
{
a = actor->spr.ang;
actor->spr.ang = actor->tempang;
if (attacksnd >= 0) S_PlayActorSound(attacksnd, actor);
fi.shoot(actor, firelaser);
actor->spr.ang = a;
}
if (actor->temp_data[2] > (26 * 3) || !cansee(actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (16 << 8), actor->spr.sector(), ps[p].pos.X, ps[p].pos.Y, ps[p].pos.Z, ps[p].cursector))
{
actor->temp_data[0] = 0;
actor->temp_data[2] = 0;
}
else actor->tempang +=
getincangle(actor->tempang, getangle(ps[p].pos.X - actor->spr.pos.X, ps[p].pos.Y - actor->spr.pos.Y)) / 3;
}
else if (actor->temp_data[0] == 2 || actor->temp_data[0] == 3)
{
actor->temp_data[3] = 0;
if (actor->spr.xvel > 0) actor->spr.xvel -= 16;
else actor->spr.xvel = 0;
if (actor->temp_data[0] == 2)
{
int l = ps[p].pos.Z - actor->spr.pos.Z;
if (abs(l) < (48 << 8)) actor->temp_data[0] = 3;
else actor->spr.pos.Z += Sgn(ps[p].pos.Z - actor->spr.pos.Z) << shift; // The shift here differs between Duke and RR.
}
else
{
actor->temp_data[2]++;
if (actor->temp_data[2] > (26 * 3) || !cansee(actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (16 << 8), actor->spr.sector(), ps[p].pos.X, ps[p].pos.Y, ps[p].pos.Z, ps[p].cursector))
{
actor->temp_data[0] = 1;
actor->temp_data[2] = 0;
}
else if ((actor->temp_data[2] & 15) == 0 && attacksnd >= 0)
{
S_PlayActorSound(attacksnd, actor);
fi.shoot(actor, firelaser);
}
}
actor->spr.ang += getincangle(actor->spr.ang, getangle(ps[p].pos.X - actor->spr.pos.X, ps[p].pos.Y - actor->spr.pos.Y)) >> 2;
}
if (actor->temp_data[0] != 2 && actor->temp_data[0] != 3 && Owner)
{
int l = ldist(Owner, actor);
if (l <= 1524)
{
a = actor->spr.ang;
actor->spr.xvel >>= 1;
}
else a = getangle(Owner->spr.pos.X - actor->spr.pos.X, Owner->spr.pos.Y - actor->spr.pos.Y);
if (actor->temp_data[0] == 1 || actor->temp_data[0] == 4) // Found a locator and going with it
{
l = dist(Owner, actor);
if (l <= 1524) { if (actor->temp_data[0] == 1) actor->temp_data[0] = 0; else actor->temp_data[0] = 5; }
else
{
// Control speed here
if (l > 1524) { if (actor->spr.xvel < 256) actor->spr.xvel += 32; }
else
{
if (actor->spr.xvel > 0) actor->spr.xvel -= 16;
else actor->spr.xvel = 0;
}
}
if (actor->temp_data[0] < 2) actor->temp_data[2]++;
if (x < 6144 && actor->temp_data[0] < 2 && actor->temp_data[2] > (26 * 4))
{
actor->temp_data[0] = 2 + (krand() & 2);
actor->temp_data[2] = 0;
actor->tempang = actor->spr.ang;
}
}
if (actor->temp_data[0] == 0 || actor->temp_data[0] == 5)
{
if (actor->temp_data[0] == 0)
actor->temp_data[0] = 1;
else actor->temp_data[0] = 4;
auto NewOwner = LocateTheLocator(actor->spr.hitag, nullptr);
if (!NewOwner)
{
actor->spr.hitag = actor->temp_data[5];
NewOwner = LocateTheLocator(actor->spr.hitag, nullptr);
if (!NewOwner)
{
deletesprite(actor);
return;
}
}
else actor->spr.hitag++;
actor->SetOwner(NewOwner);
}
actor->temp_data[3] = getincangle(actor->spr.ang, a);
actor->spr.ang += actor->temp_data[3] >> 3;
if (actor->spr.pos.Z < Owner->spr.pos.Z)
actor->spr.pos.Z += 1024;
else actor->spr.pos.Z -= 1024;
}
if (roamsnd >= 0 && S_CheckActorSoundPlaying(actor, roamsnd) < 1)
S_PlayActorSound(roamsnd, actor);
ssp(actor, CLIPMASK0);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void ooz(DDukeActor *actor)
{
getglobalz(actor);
int j = (actor->floorz - actor->ceilingz) >> 9;
if (j > 255) j = 255;
int x = 25 - (j >> 1);
if (x < 8) x = 8;
else if (x > 48) x = 48;
actor->spr.yrepeat = j;
actor->spr.xrepeat = x;
actor->spr.pos.Z = actor->floorz;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void reactor(DDukeActor* const actor, int REACTOR, int REACTOR2, int REACTORBURNT, int REACTOR2BURNT, int REACTORSPARK, int REACTOR2SPARK)
{
auto sectp = actor->spr.sector();
if (actor->temp_data[4] == 1)
{
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum == SECTOREFFECTOR)
{
if (a2->spr.lotag == 1)
{
a2->spr.lotag = -1;
a2->spr.hitag = -1;
}
}
else if (a2->spr.picnum == REACTOR)
{
a2->spr.picnum = REACTORBURNT;
}
else if (a2->spr.picnum == REACTOR2)
{
a2->spr.picnum = REACTOR2BURNT;
}
else if (a2->spr.picnum == REACTORSPARK || a2->spr.picnum == REACTOR2SPARK)
{
a2->spr.cstat = CSTAT_SPRITE_INVISIBLE;
}
}
return;
}
if (actor->temp_data[1] >= 20)
{
actor->temp_data[4] = 1;
return;
}
int x;
int p = findplayer(actor, &x);
actor->temp_data[2]++;
if (actor->temp_data[2] == 4) actor->temp_data[2] = 0;
if (x < 4096)
{
if ((krand() & 255) < 16)
{
if (!S_CheckSoundPlaying(DUKE_LONGTERM_PAIN))
S_PlayActorSound(DUKE_LONGTERM_PAIN, ps[p].GetActor());
S_PlayActorSound(SHORT_CIRCUIT, actor);
ps[p].GetActor()->spr.extra--;
SetPlayerPal(&ps[p], PalEntry(32, 32, 0, 0));
}
actor->temp_data[0] += 128;
if (actor->temp_data[3] == 0)
actor->temp_data[3] = 1;
}
else actor->temp_data[3] = 0;
if (actor->temp_data[1])
{
actor->temp_data[1]++;
actor->temp_data[4] = actor->spr.pos.Z;
actor->spr.pos.Z = sectp->floorz - (krand() % (sectp->floorz - sectp->ceilingz));
switch (actor->temp_data[1])
{
case 3:
{
//Turn on all of those flashing sectoreffector.
fi.hitradius(actor, 4096,
gs.impact_damage << 2,
gs.impact_damage << 2,
gs.impact_damage << 2,
gs.impact_damage << 2);
DukeStatIterator it(STAT_STANDABLE);
while (auto a2 = it.Next())
{
if (a2->spr.picnum == MASTERSWITCH)
if (a2->spr.hitag == actor->spr.hitag)
if (a2->spr.yvel == 0)
a2->spr.yvel = 1;
}
break;
}
case 4:
case 7:
case 10:
case 15:
{
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2 != actor)
{
deletesprite(a2);
break;
}
}
break;
}
}
for (x = 0; x < 16; x++)
RANDOMSCRAP(actor);
actor->spr.pos.Z = actor->temp_data[4];
actor->temp_data[4] = 0;
}
else
{
int j = fi.ifhitbyweapon(actor);
if (j >= 0)
{
for (x = 0; x < 32; x++)
RANDOMSCRAP(actor);
if (actor->spr.extra < 0)
actor->temp_data[1] = 1;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void camera(DDukeActor *actor)
{
if (actor->temp_data[0] == 0)
{
if (gs.camerashitable)
{
int j = fi.ifhitbyweapon(actor);
if (j >= 0)
{
actor->temp_data[0] = 1; // static
actor->spr.cstat = CSTAT_SPRITE_INVISIBLE;
for (int x = 0; x < 5; x++)
RANDOMSCRAP(actor);
return;
}
}
if (actor->spr.hitag > 0)
{
// alias our temp_data array indexes.
auto& increment = actor->temp_data[1];
auto& minimum = actor->temp_data[2];
auto& maximum = actor->temp_data[3];
auto& setupflag = actor->temp_data[4];
// set up camera if already not.
if (setupflag != 1)
{
increment = 8;
minimum = actor->spr.ang - actor->spr.hitag - increment;
maximum = actor->spr.ang + actor->spr.hitag - increment;
setupflag = 1;
}
// update angle accordingly.
if (actor->spr.ang == minimum || actor->spr.ang == maximum)
{
increment = -increment;
actor->spr.ang += increment;
}
else if (actor->spr.ang + increment < minimum)
{
actor->spr.ang = minimum;
}
else if (actor->spr.ang + increment > maximum)
{
actor->spr.ang = maximum;
}
else
{
actor->spr.ang += increment;
}
}
}
}
//---------------------------------------------------------------------------
//
// taken out of moveexplosion
//
//---------------------------------------------------------------------------
void forcesphereexplode(DDukeActor *actor)
{
int l = actor->spr.xrepeat;
if (actor->temp_data[1] > 0)
{
actor->temp_data[1]--;
if (actor->temp_data[1] == 0)
{
deletesprite(actor);
return;
}
}
auto Owner = actor->GetOwner();
if (!Owner) return;
if (Owner->temp_data[1] == 0)
{
if (actor->temp_data[0] < 64)
{
actor->temp_data[0]++;
l += 3;
}
}
else
if (actor->temp_data[0] > 64)
{
actor->temp_data[0]--;
l -= 3;
}
actor->spr.pos.X = Owner->spr.pos.X;
actor->spr.pos.Y = Owner->spr.pos.Y;
actor->spr.pos.Z = Owner->spr.pos.Z;
actor->spr.ang += Owner->temp_data[0];
if (l > 64) l = 64;
else if (l < 1) l = 1;
actor->spr.xrepeat = l;
actor->spr.yrepeat = l;
actor->spr.shade = (l >> 1) - 48;
for (int j = actor->temp_data[0]; j > 0; j--)
ssp(actor, CLIPMASK0);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void watersplash2(DDukeActor* actor)
{
auto sectp = actor->sector();
actor->temp_data[0]++;
if (actor->temp_data[0] == 1)
{
if (sectp->lotag != 1 && sectp->lotag != 2)
{
deletesprite(actor);
return;
}
if (!S_CheckSoundPlaying(ITEM_SPLASH))
S_PlayActorSound(ITEM_SPLASH, actor);
}
if (actor->temp_data[0] == 3)
{
actor->temp_data[0] = 0;
actor->temp_data[1]++;
}
if (actor->temp_data[1] == 5)
deletesprite(actor);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void frameeffect1(DDukeActor *actor)
{
auto Owner = actor->GetOwner();
if (Owner)
{
actor->temp_data[0]++;
if (actor->temp_data[0] > 7)
{
deletesprite(actor);
return;
}
else if (actor->temp_data[0] > 4) actor->spr.cstat |= CSTAT_SPRITE_TRANS_FLIP | CSTAT_SPRITE_TRANSLUCENT;
else if (actor->temp_data[0] > 2) actor->spr.cstat |= CSTAT_SPRITE_TRANSLUCENT;
actor->spr.xoffset = Owner->spr.xoffset;
actor->spr.yoffset = Owner->spr.yoffset;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
bool money(DDukeActor* actor, int BLOODPOOL)
{
auto sectp = actor->spr.sector();
actor->spr.xvel = (krand() & 7) + bsin(actor->temp_data[0], -9);
actor->temp_data[0] += (krand() & 63);
if ((actor->temp_data[0] & 2047) > 512 && (actor->temp_data[0] & 2047) < 1596)
{
if (sectp->lotag == 2)
{
if (actor->spr.zvel < 64)
actor->spr.zvel += (gs.gravity >> 5) + (krand() & 7);
}
else
if (actor->spr.zvel < 144)
actor->spr.zvel += (gs.gravity >> 5) + (krand() & 7);
}
ssp(actor, CLIPMASK0);
if ((krand() & 3) == 0)
SetActor(actor, actor->spr.pos);
if (!actor->spr.insector())
{
deletesprite(actor);
return false;
}
int l = getflorzofslopeptr(actor->spr.sector(), actor->spr.pos.X, actor->spr.pos.Y);
if (actor->spr.pos.Z > l)
{
actor->spr.pos.Z = l;
insertspriteq(actor);
actor->spr.picnum++;
DukeStatIterator it(STAT_MISC);
while (auto aa = it.Next())
{
if (aa->spr.picnum == BLOODPOOL)
if (ldist(actor, aa) < 348)
{
actor->spr.pal = 2;
break;
}
}
}
return true;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
bool jibs(DDukeActor *actor, int JIBS6, bool timeout, bool callsetsprite, bool floorcheck, bool zcheck1, bool zcheck2)
{
auto sectp = actor->spr.sector();
if (actor->spr.xvel > 0) actor->spr.xvel--;
else actor->spr.xvel = 0;
if (timeout)
{
if (actor->temp_data[5] < 30 * 10)
actor->temp_data[5]++;
else
{
deletesprite(actor);
return false;
}
}
if (actor->spr.zvel > 1024 && actor->spr.zvel < 1280)
{
SetActor(actor, actor->spr.pos);
sectp = actor->spr.sector();
}
if (callsetsprite) SetActor(actor, actor->spr.pos);
// this was after the slope calls, but we should avoid calling that for invalid sectors.
if (!actor->spr.insector())
{
deletesprite(actor);
return false;
}
int l = getflorzofslopeptr(sectp, actor->spr.pos.X, actor->spr.pos.Y);
int x = getceilzofslopeptr(sectp, actor->spr.pos.X, actor->spr.pos.Y);
if (x == l)
{
deletesprite(actor);
return false;
}
if (actor->spr.pos.Z < l - (2 << 8))
{
if (actor->temp_data[1] < 2) actor->temp_data[1]++;
else if (sectp->lotag != 2)
{
actor->temp_data[1] = 0;
if (zcheck1)
{
if (actor->temp_data[0] > 6) actor->temp_data[0] = 0;
else actor->temp_data[0]++;
}
else
{
if (actor->temp_data[0] > 2)
actor->temp_data[0] = 0;
else actor->temp_data[0]++;
}
}
if (actor->spr.zvel < 6144)
{
if (sectp->lotag == 2)
{
if (actor->spr.zvel < 1024)
actor->spr.zvel += 48;
else actor->spr.zvel = 1024;
}
else actor->spr.zvel += gs.gravity - 50;
}
actor->spr.pos.X += MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
actor->spr.pos.Y += MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
actor->spr.pos.Z += actor->spr.zvel;
if (floorcheck && actor->spr.pos.Z >= actor->spr.sector()->floorz)
{
deletesprite(actor);
return false;
}
}
else
{
if (zcheck2)
{
deletesprite(actor);
return false;
}
if (actor->temp_data[2] == 0)
{
if (!actor->spr.insector())
{
deletesprite(actor);
return false;
}
if ((actor->spr.sector()->floorstat & CSTAT_SECTOR_SLOPE))
{
deletesprite(actor);
return false;
}
actor->temp_data[2]++;
}
l = getflorzofslopeptr(actor->spr.sector(), actor->spr.pos.X, actor->spr.pos.Y);
actor->spr.pos.Z = l - (2 << 8);
actor->spr.xvel = 0;
if (actor->spr.picnum == JIBS6)
{
actor->temp_data[1]++;
if ((actor->temp_data[1] & 3) == 0 && actor->temp_data[0] < 7)
actor->temp_data[0]++;
if (actor->temp_data[1] > 20)
{
deletesprite(actor);
return false;
}
}
else { actor->spr.picnum = JIBS6; actor->temp_data[0] = 0; actor->temp_data[1] = 0; }
}
return true;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
bool bloodpool(DDukeActor* actor, bool puke, int TIRE)
{
auto sectp = actor->spr.sector();
if (actor->temp_data[0] == 0)
{
actor->temp_data[0] = 1;
if (sectp->floorstat & CSTAT_SECTOR_SLOPE)
{
deletesprite(actor);
return false;
}
else insertspriteq(actor);
}
makeitfall(actor);
int x;
int p = findplayer(actor, &x);
actor->spr.pos.Z = actor->floorz - (FOURSLEIGHT);
if (actor->temp_data[2] < 32)
{
actor->temp_data[2]++;
if (actor->picnum == TIRE)
{
if (actor->spr.xrepeat < 64 && actor->spr.yrepeat < 64)
{
actor->spr.xrepeat += krand() & 3;
actor->spr.yrepeat += krand() & 3;
}
}
else
{
if (actor->spr.xrepeat < 32 && actor->spr.yrepeat < 32)
{
actor->spr.xrepeat += krand() & 3;
actor->spr.yrepeat += krand() & 3;
}
}
}
if (x < 844 && actor->spr.xrepeat > 6 && actor->spr.yrepeat > 6)
{
if (actor->spr.pal == 0 && (krand() & 255) < 16 && !puke)
{
if (ps[p].boot_amount > 0)
ps[p].boot_amount--;
else
{
if (!S_CheckSoundPlaying(DUKE_LONGTERM_PAIN))
S_PlayActorSound(DUKE_LONGTERM_PAIN, ps[p].GetActor());
ps[p].GetActor()->spr.extra--;
SetPlayerPal(&ps[p], PalEntry(32, 16, 0, 0));
}
}
if (actor->temp_data[1] == 1) return false;
actor->temp_data[1] = 1;
if (actor->picnum == TIRE)
ps[p].footprintcount = 10;
else ps[p].footprintcount = 3;
ps[p].footprintpal = actor->spr.pal;
ps[p].footprintshade = actor->spr.shade;
if (actor->temp_data[2] == 32)
{
actor->spr.xrepeat -= 6;
actor->spr.yrepeat -= 6;
}
}
else actor->temp_data[1] = 0;
return true;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void shell(DDukeActor* actor, bool morecheck)
{
auto sectp = actor->spr.sector();
ssp(actor, CLIPMASK0);
if (!actor->spr.insector() || morecheck)
{
deletesprite(actor);
return;
}
if (sectp->lotag == 2)
{
actor->temp_data[1]++;
if (actor->temp_data[1] > 8)
{
actor->temp_data[1] = 0;
actor->temp_data[0]++;
actor->temp_data[0] &= 3;
}
if (actor->spr.zvel < 128) actor->spr.zvel += (gs.gravity / 13); // 8
else actor->spr.zvel -= 64;
if (actor->spr.xvel > 0)
actor->spr.xvel -= 4;
else actor->spr.xvel = 0;
}
else
{
actor->temp_data[1]++;
if (actor->temp_data[1] > 3)
{
actor->temp_data[1] = 0;
actor->temp_data[0]++;
actor->temp_data[0] &= 3;
}
if (actor->spr.zvel < 512) actor->spr.zvel += (gs.gravity / 3); // 52;
if (actor->spr.xvel > 0)
actor->spr.xvel--;
else
{
deletesprite(actor);
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void glasspieces(DDukeActor* actor)
{
auto sectp = actor->spr.sector();
makeitfall(actor);
if (actor->spr.zvel > 4096) actor->spr.zvel = 4096;
if (!actor->spr.insector())
{
deletesprite(actor);
return;
}
if (actor->spr.pos.Z == actor->floorz - (FOURSLEIGHT) && actor->temp_data[0] < 3)
{
actor->spr.zvel = -((3 - actor->temp_data[0]) << 8) - (krand() & 511);
if (sectp->lotag == 2)
actor->spr.zvel >>= 1;
actor->spr.xrepeat >>= 1;
actor->spr.yrepeat >>= 1;
if (rnd(96))
SetActor(actor, actor->spr.pos);
actor->temp_data[0]++;//Number of bounces
}
else if (actor->temp_data[0] == 3)
{
deletesprite(actor);
return;
}
if (actor->spr.xvel > 0)
{
actor->spr.xvel -= 2;
static const ESpriteFlags flips[] = { 0, CSTAT_SPRITE_XFLIP, CSTAT_SPRITE_YFLIP, CSTAT_SPRITE_XFLIP | CSTAT_SPRITE_YFLIP };
actor->spr.cstat = flips[actor->spr.xvel & 3];
}
else actor->spr.xvel = 0;
ssp(actor, CLIPMASK0);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void scrap(DDukeActor* actor, int SCRAP1, int SCRAP6)
{
auto sectp = actor->spr.sector();
if (actor->spr.xvel > 0)
actor->spr.xvel--;
else actor->spr.xvel = 0;
if (actor->spr.zvel > 1024 && actor->spr.zvel < 1280)
{
SetActor(actor, actor->spr.pos);
sectp = actor->spr.sector();
}
if (actor->spr.pos.Z < sectp->floorz - (2 << 8))
{
if (actor->temp_data[1] < 1) actor->temp_data[1]++;
else
{
actor->temp_data[1] = 0;
if (actor->spr.picnum < SCRAP6 + 8)
{
if (actor->temp_data[0] > 6)
actor->temp_data[0] = 0;
else actor->temp_data[0]++;
}
else
{
if (actor->temp_data[0] > 2)
actor->temp_data[0] = 0;
else actor->temp_data[0]++;
}
}
if (actor->spr.zvel < 4096) actor->spr.zvel += gs.gravity - 50;
actor->spr.pos.X += MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
actor->spr.pos.Y += MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
actor->spr.pos.Z += actor->spr.zvel;
}
else
{
if (actor->spr.picnum == SCRAP1 && actor->spr.yvel > 0)
{
auto spawned = spawn(actor, actor->spr.yvel);
if (spawned)
{
SetActor(spawned, actor->spr.pos);
getglobalz(spawned);
spawned->spr.hitag = spawned->spr.lotag = 0;
}
}
deletesprite(actor);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void gutsdir(DDukeActor* actor, int gtype, int n, int p)
{
int sx, sy;
if (badguy(actor) && actor->spr.xrepeat < 16)
sx = sy = 8;
else sx = sy = 32;
int gutz = actor->spr.pos.Z - (8 << 8);
int floorz = getflorzofslopeptr(actor->sector(), actor->spr.pos.X, actor->spr.pos.Y);
if (gutz > (floorz - (8 << 8)))
gutz = floorz - (8 << 8);
gutz += gs.actorinfo[actor->spr.picnum].gutsoffset;
for (int j = 0; j < n; j++)
{
int a = krand() & 2047;
int r1 = krand();
int r2 = krand();
// TRANSITIONAL: owned by a player???
EGS(actor->spr.sector(), actor->spr.pos.X, actor->spr.pos.Y, gutz, gtype, -32, sx, sy, a, 256 + (r2 & 127), -512 - (r1 & 2047), ps[p].GetActor(), 5);
}
}
//---------------------------------------------------------------------------
//
// taken out of moveeffectors
//
//---------------------------------------------------------------------------
void handle_se00(DDukeActor* actor, int LASERLINE)
{
sectortype *sect = actor->sector();
int zchange = 0;
auto Owner = actor->GetOwner();
if (!Owner || Owner->spr.lotag == -1)
{
deletesprite(actor);
return;
}
int q = sect->extra >> 3;
int l = 0;
if (sect->lotag == 30)
{
q >>= 2;
if (actor->spr.extra == 1)
{
if (actor->tempang < 256)
{
actor->tempang += 4;
if (actor->tempang >= 256)
callsound(actor->spr.sector(), actor);
if (actor->spr.clipdist) l = 1;
else l = -1;
}
else actor->tempang = 256;
if (sect->floorz > actor->spr.pos.Z) //z's are touching
{
sect->floorz -= 512;
zchange = -512;
if (sect->floorz < actor->spr.pos.Z)
sect->floorz = actor->spr.pos.Z;
}
else if (sect->floorz < actor->spr.pos.Z) //z's are touching
{
sect->floorz += 512;
zchange = 512;
if (sect->floorz > actor->spr.pos.Z)
sect->floorz = actor->spr.pos.Z;
}
}
else if (actor->spr.extra == 3)
{
if (actor->tempang > 0)
{
actor->tempang -= 4;
if (actor->tempang <= 0)
callsound(actor->spr.sector(), actor);
if (actor->spr.clipdist) l = -1;
else l = 1;
}
else actor->tempang = 0;
if (sect->floorz > actor->temp_data[3]) //z's are touching
{
sect->floorz -= 512;
zchange = -512;
if (sect->floorz < actor->temp_data[3])
sect->floorz = actor->temp_data[3];
}
else if (sect->floorz < actor->temp_data[3]) //z's are touching
{
sect->floorz += 512;
zchange = 512;
if (sect->floorz > actor->temp_data[3])
sect->floorz = actor->temp_data[3];
}
}
actor->spr.ang += (l * q);
actor->temp_data[2] += (l * q);
}
else
{
if (Owner->temp_data[0] == 0) return;
if (Owner->temp_data[0] == 2)
{
deletesprite(actor);
return;
}
if (Owner->spr.ang > 1024)
l = -1;
else l = 1;
if (actor->temp_data[3] == 0)
actor->temp_data[3] = ldist(actor, Owner);
actor->spr.xvel = actor->temp_data[3];
actor->spr.pos.X = Owner->spr.pos.X;
actor->spr.pos.Y = Owner->spr.pos.Y;
actor->spr.ang += (l * q);
actor->temp_data[2] += (l * q);
}
if (l && (sect->floorstat & CSTAT_SECTOR_ALIGN))
{
int p;
for (p = connecthead; p >= 0; p = connectpoint2[p])
{
if (ps[p].cursector == actor->spr.sector() && ps[p].on_ground == 1)
{
ps[p].angle.addadjustment(l * q);
ps[p].pos.Z += zchange;
vec2_t res;
rotatepoint(Owner->spr.pos.vec2, ps[p].pos.vec2, (q * l), &res);
ps[p].bobposx += res.X - ps[p].pos.X;
ps[p].bobposy += res.Y - ps[p].pos.Y;
ps[p].pos.vec2 = res;
auto psp = ps[p].GetActor();
if (psp->spr.extra <= 0)
{
psp->spr.pos.vec2 = res;
}
}
}
DukeSectIterator itp(actor->sector());
while (auto act2 = itp.Next())
{
if (act2->spr.statnum != 3 && act2->spr.statnum != 4)
if (LASERLINE < 0 || act2->spr.picnum != LASERLINE)
{
if (act2->spr.picnum == TILE_APLAYER && act2->GetOwner())
{
continue;
}
act2->spr.ang += (l * q);
act2->spr.ang &= 2047;
act2->spr.pos.Z += zchange;
rotatepoint(Owner->spr.pos.vec2, act2->spr.pos.vec2, (q* l), &act2->spr.pos.vec2);
}
}
}
ms(actor);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se01(DDukeActor *actor)
{
int sh = actor->spr.hitag;
if (actor->GetOwner() == nullptr) //Init
{
actor->SetOwner(actor);
DukeStatIterator it(STAT_EFFECTOR);
while (auto ac = it.Next())
{
if (ac->spr.lotag == 19 && ac->spr.hitag == sh)
{
actor->temp_data[0] = 0;
break;
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se14(DDukeActor* actor, bool checkstat, int RPG, int JIBS6)
{
auto sc = actor->sector();
int st = actor->spr.lotag;
if (actor->GetOwner() == nullptr)
{
auto NewOwner = LocateTheLocator(actor->temp_data[3], actor->temp_sect);
if (NewOwner == nullptr)
{
I_Error("Could not find any locators for SE# 6 and 14 with a hitag of %d.", actor->temp_data[3]);
}
actor->SetOwner(NewOwner);
}
auto Owner = actor->GetOwner();
int j = ldist(Owner, actor);
if (j < 1024)
{
if (st == 6)
if (Owner->spr.hitag & 1)
actor->temp_data[4] = sc->extra; //Slow it down
actor->temp_data[3]++;
auto NewOwner = LocateTheLocator(actor->temp_data[3], actor->temp_sect);
if (NewOwner == nullptr)
{
actor->temp_data[3] = 0;
NewOwner = LocateTheLocator(0, actor->temp_sect);
}
if (NewOwner) actor->SetOwner(NewOwner);
}
Owner = actor->GetOwner();
if (actor->spr.xvel)
{
int x = getangle(Owner->spr.pos.X - actor->spr.pos.X, Owner->spr.pos.Y - actor->spr.pos.Y);
int q = getincangle(actor->spr.ang, x) >> 3;
actor->temp_data[2] += q;
actor->spr.ang += q;
bool statstate = (!checkstat || ((sc->floorstat & CSTAT_SECTOR_SKY) == 0 && (sc->ceilingstat & CSTAT_SECTOR_SKY) == 0));
if (actor->spr.xvel == sc->extra)
{
if (statstate)
{
if (!S_CheckSoundPlaying(actor->lastvx))
S_PlayActorSound(actor->lastvx, actor);
}
if ((!checkstat || !statstate) && (ud.monsters_off == 0 && sc->floorpal == 0 && (sc->floorstat & CSTAT_SECTOR_SKY) && rnd(8)))
{
int p = findplayer(actor, &x);
if (x < 20480)
{
j = actor->spr.ang;
actor->spr.ang = getangle(actor->spr.pos.X - ps[p].pos.X, actor->spr.pos.Y - ps[p].pos.Y);
fi.shoot(actor, RPG);
actor->spr.ang = j;
}
}
}
if (actor->spr.xvel <= 64 && statstate)
S_StopSound(actor->lastvx, actor);
if ((sc->floorz - sc->ceilingz) < (108 << 8))
{
if (ud.clipping == 0 && actor->spr.xvel >= 192)
for (int p = connecthead; p >= 0; p = connectpoint2[p])
{
auto psp = ps[p].GetActor();
if (psp->spr.extra > 0)
{
auto k = ps[p].cursector;
updatesector(ps[p].pos.X, ps[p].pos.Y, &k);
if ((k == nullptr && ud.clipping == 0) || (k == actor->spr.sector() && ps[p].cursector != actor->spr.sector()))
{
ps[p].pos.X = actor->spr.pos.X;
ps[p].pos.Y = actor->spr.pos.Y;
ps[p].setCursector(actor->spr.sector());
SetActor(ps[p].GetActor(), actor->spr.pos);
quickkill(&ps[p]);
}
}
}
}
int m = MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
x = MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
for (int p = connecthead; p >= 0; p = connectpoint2[p])
{
auto psp = ps[p].GetActor();
if (ps[p].insector() && ps[p].cursector->lotag != 2)
{
if (po[p].os == actor->spr.sector())
{
po[p].ox += m;
po[p].oy += x;
}
if (actor->spr.sector() == psp->spr.sector())
{
rotatepoint(actor->spr.pos.vec2, ps[p].pos.vec2, q, &ps[p].pos.vec2);
ps[p].pos.X += m;
ps[p].pos.Y += x;
ps[p].bobposx += m;
ps[p].bobposy += x;
ps[p].angle.addadjustment(q);
if (numplayers > 1)
{
ps[p].opos.X = ps[p].pos.X;
ps[p].opos.Y = ps[p].pos.Y;
}
if (psp->spr.extra <= 0)
{
psp->spr.pos.X = ps[p].pos.X;
psp->spr.pos.Y = ps[p].pos.Y;
}
}
}
}
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.statnum != 10 && a2->spr.sector()->lotag != 2 && a2->spr.picnum != SECTOREFFECTOR && a2->spr.picnum != LOCATORS)
{
rotatepoint(actor->spr.pos.vec2, a2->spr.pos.vec2, q, &a2->spr.pos.vec2);
a2->spr.pos.X += m;
a2->spr.pos.Y += x;
a2->spr.ang += q;
if (numplayers > 1)
{
a2->spr.backupvec2();
}
}
}
ms(actor);
SetActor(actor, actor->spr.pos);
if ((sc->floorz - sc->ceilingz) < (108 << 8))
{
if (ud.clipping == 0 && actor->spr.xvel >= 192)
for (int p = connecthead; p >= 0; p = connectpoint2[p])
{
if (ps[p].GetActor()->spr.extra > 0)
{
auto k = ps[p].cursector;
updatesector(ps[p].pos.X, ps[p].pos.Y, &k);
if ((k == nullptr && ud.clipping == 0) || (k == actor->spr.sector() && ps[p].cursector != actor->spr.sector()))
{
ps[p].opos.X = ps[p].pos.X = actor->spr.pos.X;
ps[p].opos.Y = ps[p].pos.Y = actor->spr.pos.Y;
ps[p].setCursector(actor->spr.sector());
SetActor(ps[p].GetActor(), actor->spr.pos);
quickkill(&ps[p]);
}
}
}
auto actOwner = actor->GetOwner();
if (actOwner)
{
DukeSectIterator itr(actOwner->sector());
while (auto a2 = itr.Next())
{
if (a2->spr.statnum == 1 && badguy(a2) && a2->spr.picnum != SECTOREFFECTOR && a2->spr.picnum != LOCATORS)
{
auto k = a2->spr.sector();
updatesector(a2->spr.pos.X, a2->spr.pos.Y, &k);
if (a2->spr.extra >= 0 && k == actor->spr.sector())
{
gutsdir(a2, JIBS6, 72, myconnectindex);
S_PlayActorSound(SQUISHED, actor);
deletesprite(a2);
}
}
}
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se30(DDukeActor *actor, int JIBS6)
{
auto sc = actor->sector();
auto Owner = actor->GetOwner();
if (Owner == nullptr)
{
actor->temp_data[3] = !actor->temp_data[3];
Owner = LocateTheLocator(actor->temp_data[3], actor->temp_sect);
actor->SetOwner(Owner);
}
else
{
if (actor->temp_data[4] == 1) // Starting to go
{
if (ldist(Owner, actor) < (2048 - 128))
actor->temp_data[4] = 2;
else
{
if (actor->spr.xvel == 0)
operateactivators(actor->spr.hitag + (!actor->temp_data[3]), -1);
if (actor->spr.xvel < 256)
actor->spr.xvel += 16;
}
}
if (actor->temp_data[4] == 2)
{
int l = FindDistance2D(Owner->spr.pos.X - actor->spr.pos.X, Owner->spr.pos.Y - actor->spr.pos.Y);
if (l <= 128)
actor->spr.xvel = 0;
if (actor->spr.xvel > 0)
actor->spr.xvel -= 16;
else
{
actor->spr.xvel = 0;
operateactivators(actor->spr.hitag + (short)actor->temp_data[3], -1);
actor->SetOwner(nullptr);
actor->spr.ang += 1024;
actor->temp_data[4] = 0;
fi.operateforcefields(actor, actor->spr.hitag);
}
}
}
if (actor->spr.xvel)
{
int l = MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
int x = MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
if ((sc->floorz - sc->ceilingz) < (108 << 8))
if (ud.clipping == 0)
for (int p = connecthead; p >= 0; p = connectpoint2[p])
{
auto psp = ps[p].GetActor();
if (psp->spr.extra > 0)
{
auto k = ps[p].cursector;
updatesector(ps[p].pos.X, ps[p].pos.Y, &k);
if ((k == nullptr && ud.clipping == 0) || (k == actor->spr.sector() && ps[p].cursector != actor->spr.sector()))
{
ps[p].pos.X = actor->spr.pos.X;
ps[p].pos.Y = actor->spr.pos.Y;
ps[p].setCursector(actor->spr.sector());
SetActor(ps[p].GetActor(), actor->spr.pos);
quickkill(&ps[p]);
}
}
}
for (int p = connecthead; p >= 0; p = connectpoint2[p])
{
auto psp = ps[p].GetActor();
if (psp->spr.sector() == actor->spr.sector())
{
ps[p].pos.X += l;
ps[p].pos.Y += x;
if (numplayers > 1)
{
ps[p].opos.X = ps[p].pos.X;
ps[p].opos.Y = ps[p].pos.Y;
}
ps[p].bobposx += l;
ps[p].bobposy += x;
}
if (po[p].os == actor->spr.sector())
{
po[p].ox += l;
po[p].oy += x;
}
}
DukeSectIterator its(actor->spr.sector());
while (auto a2 = its.Next())
{
if (a2->spr.picnum != SECTOREFFECTOR && a2->spr.picnum != LOCATORS)
{
a2->spr.pos.X += l;
a2->spr.pos.Y += x;
if (numplayers > 1)
{
a2->spr.backupvec2();
}
}
}
ms(actor);
SetActor(actor, actor->spr.pos);
if ((sc->floorz - sc->ceilingz) < (108 << 8))
{
if (ud.clipping == 0)
for (int p = connecthead; p >= 0; p = connectpoint2[p])
if (ps[p].GetActor()->spr.extra > 0)
{
auto k = ps[p].cursector;
updatesector(ps[p].pos.X, ps[p].pos.Y, &k);
if ((k == nullptr && ud.clipping == 0) || (k == actor->spr.sector() && ps[p].cursector != actor->spr.sector()))
{
ps[p].pos.X = actor->spr.pos.X;
ps[p].pos.Y = actor->spr.pos.Y;
ps[p].opos.X = ps[p].pos.X;
ps[p].opos.Y = ps[p].pos.Y;
ps[p].setCursector(actor->spr.sector());
SetActor(ps[p].GetActor(), actor->spr.pos);
quickkill(&ps[p]);
}
}
if (Owner)
{
DukeSectIterator it(Owner->sector());
while (auto a2 = it.Next())
{
if (a2->spr.statnum == 1 && badguy(a2) && a2->spr.picnum != SECTOREFFECTOR && a2->spr.picnum != LOCATORS)
{
// if(a2->spr.sector != actor->spr.sector)
{
auto k = a2->spr.sector();
updatesector(a2->spr.pos.X, a2->spr.pos.Y, &k);
if (a2->spr.extra >= 0 && k == actor->spr.sector())
{
gutsdir(a2, JIBS6, 24, myconnectindex);
S_PlayActorSound(SQUISHED, a2);
deletesprite(a2);
}
}
}
}
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se02(DDukeActor* actor)
{
auto sc = actor->sector();
int sh = actor->spr.hitag;
if (actor->temp_data[4] > 0 && actor->temp_data[0] == 0)
{
if (actor->temp_data[4] < sh)
actor->temp_data[4]++;
else actor->temp_data[0] = 1;
}
if (actor->temp_data[0] > 0)
{
actor->temp_data[0]++;
actor->spr.xvel = 3;
if (actor->temp_data[0] > 96)
{
actor->temp_data[0] = -1; //Stop the quake
actor->temp_data[4] = -1;
deletesprite(actor);
return;
}
else
{
if ((actor->temp_data[0] & 31) == 8)
{
earthquaketime = 48;
S_PlayActorSound(EARTHQUAKE, ps[screenpeek].GetActor());
}
if (abs(sc->floorheinum - actor->temp_data[5]) < 8)
sc->floorheinum = actor->temp_data[5];
else sc->floorheinum += (Sgn(actor->temp_data[5] - sc->floorheinum) << 4);
}
int m = MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
int x = MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
for (int p = connecthead; p >= 0; p = connectpoint2[p])
if (ps[p].cursector == actor->spr.sector() && ps[p].on_ground)
{
ps[p].pos.X += m;
ps[p].pos.Y += x;
ps[p].bobposx += m;
ps[p].bobposy += x;
}
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum != SECTOREFFECTOR)
{
a2->spr.pos.X += m;
a2->spr.pos.Y += x;
SetActor(a2, a2->spr.pos);
}
}
ms(actor);
SetActor(actor, actor->spr.pos);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se03(DDukeActor *actor)
{
auto sc = actor->sector();
int sh = actor->spr.hitag;
if (actor->temp_data[4] == 0) return;
int x;
findplayer(actor, &x);
int palvals = actor->palvals;
// if(actor->temp_data[5] > 0) { actor->temp_data[5]--; break; }
if ((global_random / (sh + 1) & 31) < 4 && !actor->temp_data[2])
{
// actor->temp_data[5] = 4+(global_random&7);
sc->ceilingpal = palvals >> 8;
sc->floorpal = palvals & 0xff;
actor->temp_data[0] = actor->spr.shade + (global_random & 15);
}
else
{
// actor->temp_data[5] = 4+(global_random&3);
sc->ceilingpal = actor->spr.pal;
sc->floorpal = actor->spr.pal;
actor->temp_data[0] = actor->temp_data[3];
}
sc->ceilingshade = actor->temp_data[0];
sc->floorshade = actor->temp_data[0];
for(auto& wal : wallsofsector(sc))
{
if (wal.hitag != 1)
{
wal.shade = actor->temp_data[0];
if ((wal.cstat & CSTAT_WALL_BOTTOM_SWAP) && wal.twoSided())
{
wal.nextWall()->shade = wal.shade;
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se04(DDukeActor *actor)
{
auto sc = actor->sector();
int sh = actor->spr.hitag;
int j;
int palvals = actor->palvals;
if ((global_random / (sh + 1) & 31) < 4)
{
actor->temp_data[1] = actor->spr.shade + (global_random & 15);//Got really bright
actor->temp_data[0] = actor->spr.shade + (global_random & 15);
sc->ceilingpal = palvals >> 8;
sc->floorpal = palvals & 0xff;
j = 1;
}
else
{
actor->temp_data[1] = actor->temp_data[2];
actor->temp_data[0] = actor->temp_data[3];
sc->ceilingpal = actor->spr.pal;
sc->floorpal = actor->spr.pal;
j = 0;
}
sc->floorshade = actor->temp_data[1];
sc->ceilingshade = actor->temp_data[1];
for (auto& wal : wallsofsector(sc))
{
if (j) wal.pal = (palvals & 0xff);
else wal.pal = actor->spr.pal;
if (wal.hitag != 1)
{
wal.shade = actor->temp_data[0];
if ((wal.cstat & CSTAT_WALL_BOTTOM_SWAP) && wal.twoSided())
wal.nextWall()->shade = wal.shade;
}
}
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.cstat & CSTAT_SPRITE_ALIGNMENT_WALL)
{
if (sc->ceilingstat & CSTAT_SECTOR_SKY)
a2->spr.shade = sc->ceilingshade;
else a2->spr.shade = sc->floorshade;
}
}
if (actor->temp_data[4])
deletesprite(actor);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se05(DDukeActor* actor, int FIRELASER)
{
auto sc = actor->sector();
int j, l, m;
int x, p = findplayer(actor, &x);
if (x < 8192)
{
j = actor->spr.ang;
actor->spr.ang = getangle(actor->spr.pos.X - ps[p].pos.X, actor->spr.pos.Y - ps[p].pos.Y);
fi.shoot(actor, FIRELASER);
actor->spr.ang = j;
}
auto Owner = actor->GetOwner();
if (Owner == nullptr) //Start search
{
actor->temp_data[4] = 0;
l = 0x7fffffff;
while (1) //Find the shortest dist
{
auto NewOwner = LocateTheLocator(actor->temp_data[4], nullptr);
if (NewOwner == nullptr) break;
m = ldist(ps[p].GetActor(), NewOwner);
if (l > m)
{
Owner = NewOwner;
l = m;
}
actor->temp_data[4]++;
}
actor->SetOwner(Owner);
if (!Owner) return; // Undefined case - was not checked.
actor->spr.zvel = Sgn(Owner->spr.pos.Z - actor->spr.pos.Z) << 4;
}
if (ldist(Owner, actor) < 1024)
{
auto ta = actor->spr.ang;
actor->spr.ang = getangle(ps[p].pos.X - actor->spr.pos.X, ps[p].pos.Y - actor->spr.pos.Y);
actor->spr.ang = ta;
actor->SetOwner(nullptr);
return;
}
else actor->spr.xvel = 256;
x = getangle(Owner->spr.pos.X - actor->spr.pos.X, Owner->spr.pos.Y - actor->spr.pos.Y);
int q = getincangle(actor->spr.ang, x) >> 3;
actor->spr.ang += q;
if (rnd(32))
{
actor->temp_data[2] += q;
sc->ceilingshade = 127;
}
else
{
actor->temp_data[2] +=
getincangle(actor->temp_data[2] + 512, getangle(ps[p].pos.X - actor->spr.pos.X, ps[p].pos.Y - actor->spr.pos.Y)) >> 2;
sc->ceilingshade = 0;
}
j = fi.ifhitbyweapon(actor);
if (j >= 0)
{
actor->temp_data[3]++;
if (actor->temp_data[3] == 5)
{
actor->spr.zvel += 1024;
FTA(7, &ps[myconnectindex]);
}
}
actor->spr.pos.Z += actor->spr.zvel;
sc->ceilingz += actor->spr.zvel;
actor->temp_sect->ceilingz += actor->spr.zvel;
ms(actor);
SetActor(actor, actor->spr.pos);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se08(DDukeActor *actor, bool checkhitag1)
{
// work only if its moving
auto sc = actor->sector();
int st = actor->spr.lotag;
int sh = actor->spr.hitag;
int x, j = -1;
if (actor->temp_data[4])
{
actor->temp_data[4]++;
if (actor->temp_data[4] > 8)
{
deletesprite(actor);
return;
}
j = 1;
}
else j = getanimationgoal(anim_ceilingz, actor->spr.sector());
if (j >= 0)
{
if ((sc->lotag & 0x8000) || actor->temp_data[4])
x = -actor->temp_data[3];
else
x = actor->temp_data[3];
if (st == 9) x = -x;
DukeStatIterator it(STAT_EFFECTOR);
while (auto ac = it.Next())
{
if (((ac->spr.lotag) == st) && (ac->spr.hitag) == sh)
{
auto sect = ac->sector();
int m = ac->spr.shade;
for (auto& wal : wallsofsector(sect))
{
if (wal.hitag != 1)
{
wal.shade += x;
if (wal.shade < m)
wal.shade = m;
else if (wal.shade > ac->temp_data[2])
wal.shade = ac->temp_data[2];
if (wal.twoSided())
if (wal.nextWall()->hitag != 1)
wal.nextWall()->shade = wal.shade;
}
}
sect->floorshade += x;
sect->ceilingshade += x;
if (sect->floorshade < m)
sect->floorshade = m;
else if (sect->floorshade > ac->temp_data[0])
sect->floorshade = ac->temp_data[0];
if (sect->ceilingshade < m)
sect->ceilingshade = m;
else if (sect->ceilingshade > ac->temp_data[1])
sect->ceilingshade = ac->temp_data[1];
if (checkhitag1 && sect->hitag == 1)
sect->ceilingshade = ac->temp_data[1];
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se10(DDukeActor* actor, const int* specialtags)
{
auto sc = actor->sector();
int sh = actor->spr.hitag;
if ((sc->lotag & 0xff) == 27 || (sc->floorz > sc->ceilingz && (sc->lotag & 0xff) != 23) || sc->lotag == 32791 - 65536)
{
int j = 1;
if ((sc->lotag & 0xff) != 27)
for (int p = connecthead; p >= 0; p = connectpoint2[p])
if (sc->lotag != 30 && sc->lotag != 31 && sc->lotag != 0)
if (actor->spr.sector() == ps[p].GetActor()->spr.sector())
j = 0;
if (j == 1)
{
if (actor->temp_data[0] > sh)
{
if (specialtags) for (int i = 0; specialtags[i]; i++)
{
if (actor->spr.sector()->lotag == specialtags[i] && getanimationgoal(anim_ceilingz, actor->spr.sector()) >= 0)
{
return;
}
}
fi.activatebysector(actor->spr.sector(), actor);
actor->temp_data[0] = 0;
}
else actor->temp_data[0]++;
}
}
else actor->temp_data[0] = 0;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se11(DDukeActor *actor)
{
auto sc = actor->sector();
if (actor->temp_data[5] > 0)
{
actor->temp_data[5]--;
return;
}
if (actor->temp_data[4])
{
for(auto& wal : wallsofsector(sc))
{
DukeStatIterator it(STAT_ACTOR);
while (auto ac = it.Next())
{
if (ac->spr.extra > 0 && badguy(ac) && clipinsidebox(ac->spr.pos.X, ac->spr.pos.Y, wallnum(&wal), 256) == 1)
return;
}
}
int k = (actor->spr.yvel >> 3) * actor->temp_data[3];
actor->temp_data[2] += k;
actor->temp_data[4] += k;
ms(actor);
SetActor(actor, actor->spr.pos);
for(auto& wal : wallsofsector(sc))
{
DukeStatIterator it(STAT_PLAYER);
while (auto ac = it.Next())
{
if (ac->GetOwner() && clipinsidebox(ac->spr.pos.X, ac->spr.pos.Y, wallnum(&wal), 144) == 1)
{
actor->temp_data[5] = 8; // Delay
actor->temp_data[2] -= k;
actor->temp_data[4] -= k;
ms(actor);
SetActor(actor, actor->spr.pos);
return;
}
}
}
if (actor->temp_data[4] <= -511 || actor->temp_data[4] >= 512)
{
actor->temp_data[4] = 0;
actor->temp_data[2] &= 0xffffff00;
ms(actor);
SetActor(actor, actor->spr.pos);
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se12(DDukeActor *actor, int planeonly)
{
auto sc = actor->sector();
if (actor->temp_data[0] == 3 || actor->temp_data[3] == 1) //Lights going off
{
sc->floorpal = 0;
sc->ceilingpal = 0;
for (auto& wal : wallsofsector(sc))
{
if (wal.hitag != 1)
{
wal.shade = actor->temp_data[1];
wal.pal = 0;
}
}
sc->floorshade = actor->temp_data[1];
sc->ceilingshade = actor->temp_data[2];
actor->temp_data[0] = 0;
DukeSectIterator it(sc);
while (auto a2 = it.Next())
{
if (a2->spr.cstat & CSTAT_SPRITE_ALIGNMENT_WALL)
{
if (sc->ceilingstat & CSTAT_SECTOR_SKY)
a2->spr.shade = sc->ceilingshade;
else a2->spr.shade = sc->floorshade;
}
}
if (actor->temp_data[3] == 1)
{
deletesprite(actor);
return;
}
}
if (actor->temp_data[0] == 1) //Lights flickering on
{
// planeonly 1 is RRRA SE47, planeonly 2 is SE48
int compshade = planeonly == 2 ? sc->ceilingshade : sc->floorshade;
if (compshade > actor->spr.shade)
{
if (planeonly != 2) sc->floorpal = actor->spr.pal;
if (planeonly != 1) sc->ceilingpal = actor->spr.pal;
if (planeonly != 2) sc->floorshade -= 2;
if (planeonly != 1) sc->ceilingshade -= 2;
for (auto& wal : wallsofsector(sc))
{
if (wal.hitag != 1)
{
wal.pal = actor->spr.pal;
wal.shade -= 2;
}
}
}
else actor->temp_data[0] = 2;
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.cstat & CSTAT_SPRITE_ALIGNMENT_WALL)
{
if (sc->ceilingstat & CSTAT_SECTOR_SKY)
a2->spr.shade = sc->ceilingshade;
else a2->spr.shade = sc->floorshade;
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se13(DDukeActor* actor)
{
auto sc = actor->sector();
if (actor->temp_data[2])
{
int j = (actor->spr.yvel << 5) | 1;
if (actor->spr.ang == 512)
{
if (actor->spriteextra)
{
if (abs(actor->temp_data[0] - sc->ceilingz) >= j)
sc->ceilingz += Sgn(actor->temp_data[0] - sc->ceilingz) * j;
else sc->ceilingz = actor->temp_data[0];
}
else
{
if (abs(actor->temp_data[1] - sc->floorz) >= j)
sc->floorz += Sgn(actor->temp_data[1] - sc->floorz) * j;
else sc->floorz = actor->temp_data[1];
}
}
else
{
if (abs(actor->temp_data[1] - sc->floorz) >= j)
sc->floorz += Sgn(actor->temp_data[1] - sc->floorz) * j;
else sc->floorz = actor->temp_data[1];
if (abs(actor->temp_data[0] - sc->ceilingz) >= j)
sc->ceilingz += Sgn(actor->temp_data[0] - sc->ceilingz) * j;
sc->ceilingz = actor->temp_data[0];
}
if (actor->temp_data[3] == 1)
{
//Change the shades
actor->temp_data[3]++;
sc->ceilingstat ^= CSTAT_SECTOR_SKY;
if (actor->spr.ang == 512)
{
for (auto& wal : wallsofsector(sc))
wal.shade = actor->spr.shade;
sc->floorshade = actor->spr.shade;
if (ps[0].one_parallax_sectnum != nullptr)
{
sc->ceilingpicnum = ps[0].one_parallax_sectnum->ceilingpicnum;
sc->ceilingshade = ps[0].one_parallax_sectnum->ceilingshade;
}
}
}
actor->temp_data[2]++;
if (actor->temp_data[2] > 256)
{
deletesprite(actor);
return;
}
}
if (actor->temp_data[2] == 4 && actor->spr.ang != 512)
for (int x = 0; x < 7; x++) RANDOMSCRAP(actor);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se15(DDukeActor* actor)
{
if (actor->temp_data[4])
{
actor->spr.xvel = 16;
if (actor->temp_data[4] == 1) //Opening
{
if (actor->temp_data[3] >= (actor->spr.yvel >> 3))
{
actor->temp_data[4] = 0; //Turn off the sliders
callsound(actor->spr.sector(), actor);
return;
}
actor->temp_data[3]++;
}
else if (actor->temp_data[4] == 2)
{
if (actor->temp_data[3] < 1)
{
actor->temp_data[4] = 0;
callsound(actor->spr.sector(), actor);
return;
}
actor->temp_data[3]--;
}
ms(actor);
SetActor(actor, actor->spr.pos);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se16(DDukeActor* actor, int REACTOR, int REACTOR2)
{
auto sc = actor->sector();
actor->temp_data[2] += 32;
if (sc->floorz < sc->ceilingz) actor->spr.shade = 0;
else if (sc->ceilingz < actor->temp_data[3])
{
//The following code check to see if
//there is any other sprites in the sector.
//If there isn't, then kill this sectoreffector
//itself.....
DukeSectIterator it(actor->sector());
DDukeActor* a2;
while ((a2 = it.Next()))
{
if (a2->spr.picnum == REACTOR || a2->spr.picnum == REACTOR2)
return;
}
if (a2 == nullptr)
{
deletesprite(actor);
return;
}
else actor->spr.shade = 1;
}
if (actor->spr.shade) sc->ceilingz += 1024;
else sc->ceilingz -= 512;
ms(actor);
SetActor(actor, actor->spr.pos);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se17(DDukeActor* actor)
{
auto sc = actor->sector();
int sh = actor->spr.hitag;
int q = actor->temp_data[0] * (actor->spr.yvel << 2);
sc->ceilingz += q;
sc->floorz += q;
DukeSectIterator it(actor->sector());
while (auto act1 = it.Next())
{
if (act1->spr.statnum == STAT_PLAYER && act1->GetOwner())
{
int p = act1->spr.yvel;
if (numplayers < 2) ps[p].opos.Z = ps[p].pos.Z;
ps[p].pos.Z += q;
ps[p].truefz += q;
ps[p].truecz += q;
if (numplayers > 1) ps[p].opos.Z = ps[p].pos.Z;
}
if (act1->spr.statnum != STAT_EFFECTOR)
{
act1->spr.backupz();
act1->spr.pos.Z += q;
}
act1->floorz = sc->floorz;
act1->ceilingz = sc->ceilingz;
}
if (actor->temp_data[0]) //If in motion
{
if (abs(sc->floorz - actor->temp_data[2]) <= actor->spr.yvel)
{
activatewarpelevators(actor, 0);
return;
}
if (actor->temp_data[0] == -1)
{
if (sc->floorz > actor->temp_data[3])
return;
}
else if (sc->ceilingz < actor->temp_data[4]) return;
if (actor->temp_data[1] == 0) return;
actor->temp_data[1] = 0;
DDukeActor* act2;
DukeStatIterator itr(STAT_EFFECTOR);
while ((act2 = itr.Next()))
{
if (actor != act2 && (act2->spr.lotag) == 17)
if ((sc->hitag - actor->temp_data[0]) == (act2->sector()->hitag) && sh == (act2->spr.hitag))
break;
}
if (act2 == nullptr) return;
DukeSectIterator its(actor->sector());
while (auto act3 = its.Next())
{
if (act3->spr.statnum == STAT_PLAYER && act3->GetOwner())
{
int p = act3->spr.yvel;
ps[p].pos.X += act2->spr.pos.X - actor->spr.pos.X;
ps[p].pos.Y += act2->spr.pos.Y - actor->spr.pos.Y;
ps[p].pos.Z = act2->spr.sector()->floorz - (sc->floorz - ps[p].pos.Z);
act3->floorz = act2->spr.sector()->floorz;
act3->ceilingz = act2->spr.sector()->ceilingz;
ps[p].bobposx = ps[p].opos.X = ps[p].pos.X;
ps[p].bobposy = ps[p].opos.Y = ps[p].pos.Y;
ps[p].opos.Z = ps[p].pos.Z;
ps[p].truefz = act3->floorz;
ps[p].truecz = act3->ceilingz;
ps[p].bobcounter = 0;
ChangeActorSect(act3, act2->spr.sector());
ps[p].setCursector(act2->spr.sector());
}
else if (act3->spr.statnum != STAT_EFFECTOR)
{
act3->spr.pos.X += act2->spr.pos.X - actor->spr.pos.X;
act3->spr.pos.Y += act2->spr.pos.Y - actor->spr.pos.Y;
act3->spr.pos.Z = act2->spr.sector()->floorz - (sc->floorz - act3->spr.pos.Z);
act3->spr.backupz();
ChangeActorSect(act3, act2->spr.sector());
SetActor(act3, act3->spr.pos);
act3->floorz = act2->spr.sector()->floorz;
act3->ceilingz = act2->spr.sector()->ceilingz;
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se18(DDukeActor *actor, bool morecheck)
{
auto sc = actor->sector();
if (actor->temp_data[0])
{
if (actor->spr.pal)
{
if (actor->spr.ang == 512)
{
sc->ceilingz -= sc->extra;
if (sc->ceilingz <= actor->temp_data[1])
{
sc->ceilingz = actor->temp_data[1];
deletesprite(actor);
return;
}
}
else
{
sc->floorz += sc->extra;
if (morecheck)
{
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum == TILE_APLAYER && a2->GetOwner())
if (ps[a2->PlayerIndex()].on_ground == 1) ps[a2->PlayerIndex()].pos.Z += sc->extra;
if (a2->spr.zvel == 0 && a2->spr.statnum != STAT_EFFECTOR && a2->spr.statnum != STAT_PROJECTILE)
{
a2->spr.pos.Z += sc->extra;
a2->floorz = sc->floorz;
}
}
}
if (sc->floorz >= actor->temp_data[1])
{
sc->floorz = actor->temp_data[1];
deletesprite(actor);
return;
}
}
}
else
{
if (actor->spr.ang == 512)
{
sc->ceilingz += sc->extra;
if (sc->ceilingz >= actor->spr.pos.Z)
{
sc->ceilingz = actor->spr.pos.Z;
deletesprite(actor);
return;
}
}
else
{
sc->floorz -= sc->extra;
if (morecheck)
{
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum == TILE_APLAYER && a2->GetOwner())
if (ps[a2->PlayerIndex()].on_ground == 1) ps[a2->PlayerIndex()].pos.Z -= sc->extra;
if (a2->spr.zvel == 0 && a2->spr.statnum != STAT_EFFECTOR && a2->spr.statnum != STAT_PROJECTILE)
{
a2->spr.pos.Z -= sc->extra;
a2->floorz = sc->floorz;
}
}
}
if (sc->floorz <= actor->spr.pos.Z)
{
sc->floorz = actor->spr.pos.Z;
deletesprite(actor);
return;
}
}
}
actor->temp_data[2]++;
if (actor->temp_data[2] >= actor->spr.hitag)
{
actor->temp_data[2] = 0;
actor->temp_data[0] = 0;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se19(DDukeActor *actor, int BIGFORCE)
{
auto sc = actor->sector();
int sh = actor->spr.hitag;
if (actor->temp_data[0])
{
if (actor->temp_data[0] == 1)
{
actor->temp_data[0]++;
for (auto& wal : wallsofsector(sc))
{
if (wal.overpicnum == BIGFORCE)
{
wal.cstat &= (CSTAT_WALL_TRANSLUCENT | CSTAT_WALL_1WAY | CSTAT_WALL_XFLIP | CSTAT_WALL_ALIGN_BOTTOM | CSTAT_WALL_BOTTOM_SWAP);
wal.overpicnum = 0;
auto nextwal = wal.nextWall();
if (nextwal != nullptr)
{
nextwal->overpicnum = 0;
nextwal->cstat &= (CSTAT_WALL_TRANSLUCENT | CSTAT_WALL_1WAY | CSTAT_WALL_XFLIP | CSTAT_WALL_ALIGN_BOTTOM | CSTAT_WALL_BOTTOM_SWAP);
}
}
}
}
if (sc->ceilingz < sc->floorz)
sc->ceilingz += actor->spr.yvel;
else
{
sc->ceilingz = sc->floorz;
DukeStatIterator it(STAT_EFFECTOR);
while (auto a2 = it.Next())
{
auto a2Owner = a2->GetOwner();
if (a2->spr.lotag == 0 && a2->spr.hitag == sh && a2Owner)
{
auto sectp = a2Owner->sector();
a2->sector()->floorpal = a2->sector()->ceilingpal = sectp->floorpal;
a2->sector()->floorshade = a2->sector()->ceilingshade = sectp->floorshade;
a2Owner->temp_data[0] = 2;
}
}
deletesprite(actor);
return;
}
}
else //Not hit yet
{
auto hitter = fi.ifhitsectors(actor->sector());
if (hitter)
{
FTA(8, &ps[myconnectindex]);
DukeStatIterator it(STAT_EFFECTOR);
while (auto ac = it.Next())
{
int x = ac->spr.lotag & 0x7fff;
switch (x)
{
case 0:
if (ac->spr.hitag == sh && ac->GetOwner())
{
auto sectp = ac->sector();
sectp->floorshade = sectp->ceilingshade = ac->GetOwner()->spr.shade;
sectp->floorpal = sectp->ceilingpal = ac->GetOwner()->spr.pal;
}
break;
case 1:
case 12:
//case 18:
case 19:
if (sh == ac->spr.hitag)
if (ac->temp_data[0] == 0)
{
ac->temp_data[0] = 1; //Shut them all on
ac->SetOwner(actor);
}
break;
}
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se20(DDukeActor* actor)
{
auto sc = actor->sector();
if (actor->temp_data[0] == 0) return;
if (actor->temp_data[0] == 1) actor->spr.xvel = 8;
else actor->spr.xvel = -8;
if (actor->spr.xvel) //Moving
{
int x = MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
int l = MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
actor->temp_data[3] += actor->spr.xvel;
actor->spr.pos.X += x;
actor->spr.pos.Y += l;
if (actor->temp_data[3] <= 0 || (actor->temp_data[3] >> 6) >= (actor->spr.yvel >> 6))
{
actor->spr.pos.X -= x;
actor->spr.pos.Y -= l;
actor->temp_data[0] = 0;
callsound(actor->spr.sector(), actor);
return;
}
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.statnum != 3 && a2->spr.zvel == 0)
{
a2->spr.pos.X += x;
a2->spr.pos.Y += l;
SetActor(a2, a2->spr.pos);
if (a2->sector()->floorstat & CSTAT_SECTOR_SLOPE)
if (a2->spr.statnum == 2)
makeitfall(a2);
}
}
auto& wal = actor->temp_walls;
dragpoint(wal[0], wal[0]->pos.X + x, wal[0]->pos.Y + l);
dragpoint(wal[1], wal[1]->pos.X + x, wal[1]->pos.Y + l);
for (int p = connecthead; p >= 0; p = connectpoint2[p])
if (ps[p].cursector == actor->spr.sector() && ps[p].on_ground)
{
ps[p].pos.X += x;
ps[p].pos.Y += l;
ps[p].opos.X = ps[p].pos.X;
ps[p].opos.Y = ps[p].pos.Y;
SetActor(ps[p].GetActor(), { ps[p].pos.X, ps[p].pos.Y, ps[p].pos.Z + gs.playerheight });
}
sc->addfloorxpan(-x / 8.f);
sc->addfloorypan(-l / 8.f);
sc->addceilingxpan(-x / 8.f);
sc->addceilingypan(-l / 8.f);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se21(DDukeActor* actor)
{
auto sc = actor->sector();
int* lp;
if (actor->temp_data[0] == 0) return;
if (actor->spr.ang == 1536)
lp = &sc->ceilingz;
else
lp = &sc->floorz;
if (actor->temp_data[0] == 1) //Decide if the sector should go up or down
{
actor->spr.zvel = Sgn(actor->spr.pos.Z - *lp) * (actor->spr.yvel << 4);
actor->temp_data[0]++;
}
if (sc->extra == 0)
{
*lp += actor->spr.zvel;
if (abs(*lp - actor->spr.pos.Z) < 1024)
{
*lp = actor->spr.pos.Z;
deletesprite(actor);
}
}
else sc->extra--;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se22(DDukeActor* actor)
{
auto sc = actor->sector();
if (actor->temp_data[1])
{
if (getanimationgoal(anim_ceilingz, actor->temp_sect) >= 0)
sc->ceilingz += sc->extra * 9;
else actor->temp_data[1] = 0;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se26(DDukeActor* actor)
{
auto sc = actor->sector();
int x, l;
actor->spr.xvel = 32;
l = MulScale(actor->spr.xvel, bcos(actor->spr.ang), 14);
x = MulScale(actor->spr.xvel, bsin(actor->spr.ang), 14);
actor->spr.shade++;
if (actor->spr.shade > 7)
{
actor->spr.pos.X = actor->temp_data[3];
actor->spr.pos.Y = actor->temp_data[4];
sc->floorz -= ((actor->spr.zvel * actor->spr.shade) - actor->spr.zvel);
actor->spr.shade = 0;
}
else
sc->floorz += actor->spr.zvel;
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.statnum != 3 && a2->spr.statnum != 10)
{
a2->spr.pos.X += l;
a2->spr.pos.Y += x;
a2->spr.pos.Z += actor->spr.zvel;
SetActor(a2, a2->spr.pos);
}
}
for (int p = connecthead; p >= 0; p = connectpoint2[p])
if (ps[p].GetActor()->sector() == actor->spr.sector() && ps[p].on_ground)
{
ps[p].fric.X += l << 5;
ps[p].fric.Y += x << 5;
ps[p].pos.Z += actor->spr.zvel;
}
ms(actor);
SetActor(actor, actor->spr.pos);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se27(DDukeActor* actor)
{
int sh = actor->spr.hitag;
int x, p;
if (ud.recstat == 0) return;
actor->tempang = actor->spr.ang;
p = findplayer(actor, &x);
if (ps[p].GetActor()->spr.extra > 0 && myconnectindex == screenpeek)
{
if (actor->temp_data[0] < 0)
{
ud.cameraactor = actor;
actor->temp_data[0]++;
}
else if (ud.recstat == 2 && ps[p].newOwner == nullptr)
{
if (cansee(actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z, actor->spr.sector(), ps[p].pos.X, ps[p].pos.Y, ps[p].pos.Z, ps[p].cursector))
{
if (x < sh)
{
ud.cameraactor = actor;
actor->temp_data[0] = 999;
actor->spr.ang += getincangle(actor->spr.ang, getangle(ps[p].pos.X - actor->spr.pos.X, ps[p].pos.Y - actor->spr.pos.Y)) >> 3;
actor->spr.yvel = 100 + ((actor->spr.pos.Z - ps[p].pos.Z) / 257);
}
else if (actor->temp_data[0] == 999)
{
if (ud.cameraactor == actor)
actor->temp_data[0] = 0;
else actor->temp_data[0] = -10;
ud.cameraactor = actor;
}
}
else
{
actor->spr.ang = getangle(ps[p].pos.X - actor->spr.pos.X, ps[p].pos.Y - actor->spr.pos.Y);
if (actor->temp_data[0] == 999)
{
if (ud.cameraactor == actor)
actor->temp_data[0] = 0;
else actor->temp_data[0] = -20;
ud.cameraactor = actor;
}
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se24(DDukeActor *actor, const int16_t *list1, const int16_t *list2, bool scroll, int TRIPBOMB, int LASERLINE, int CRANE, int shift)
{
auto testlist = [](const int16_t* list, int val) { for (int i = 0; list[i] > 0; i++) if (list[i] == val) return true; return false; };
if (actor->temp_data[4]) return;
int x = MulScale(actor->spr.yvel, bcos(actor->spr.ang), 18);
int l = MulScale(actor->spr.yvel, bsin(actor->spr.ang), 18);
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.zvel >= 0)
{
switch (a2->spr.statnum)
{
case 5:
if (testlist(list1, a2->spr.picnum))
{
a2->spr.xrepeat = a2->spr.yrepeat = 0;
continue;
}
if (a2->spr.picnum == LASERLINE)
{
continue;
}
[[fallthrough]];
case 6:
if (a2->spr.picnum == TRIPBOMB) break;
[[fallthrough]];
case 1:
case 0:
if (testlist(list2, a2->spr.picnum) ||
wallswitchcheck(a2))
break;
if (!(a2->spr.picnum >= CRANE && a2->spr.picnum <= (CRANE + 3)))
{
if (a2->spr.pos.Z > (a2->floorz - (16 << 8)))
{
a2->spr.pos.X += x >> shift;
a2->spr.pos.Y += l >> shift;
SetActor(a2, a2->spr.pos);
if (a2->spr.sector()->floorstat & CSTAT_SECTOR_SLOPE)
if (a2->spr.statnum == 2)
makeitfall(a2);
}
}
break;
}
}
}
for (auto p = connecthead; p >= 0; p = connectpoint2[p])
{
if (ps[p].cursector == actor->spr.sector() && ps[p].on_ground)
{
if (abs(ps[p].pos.Z - ps[p].truefz) < gs.playerheight + (9 << 8))
{
ps[p].fric.X += x << 3;
ps[p].fric.Y += l << 3;
}
}
}
if (scroll) actor->sector()->addfloorxpan(actor->spr.yvel / 128.f);
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se25(DDukeActor* actor, int t_index, int snd1, int snd2)
{
auto sec = actor->sector();
if (sec->floorz <= sec->ceilingz)
actor->spr.shade = 0;
else if (sec->ceilingz <= actor->temp_data[t_index])
actor->spr.shade = 1;
if (actor->spr.shade)
{
sec->ceilingz += actor->spr.yvel << 4;
if (sec->ceilingz > sec->floorz)
{
sec->ceilingz = sec->floorz;
if (pistonsound && snd1 >= 0)
S_PlayActorSound(snd1, actor);
}
}
else
{
sec->ceilingz -= actor->spr.yvel << 4;
if (sec->ceilingz < actor->temp_data[t_index])
{
sec->ceilingz = actor->temp_data[t_index];
if (pistonsound && snd2 >= 0)
S_PlayActorSound(snd2, actor);
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se32(DDukeActor *actor)
{
auto sc = actor->sector();
if (actor->temp_data[0] == 1)
{
// Choose dir
if (actor->temp_data[2] == 1) // Retract
{
if (actor->spr.ang != 1536)
{
if (abs(sc->ceilingz - actor->spr.pos.Z) < (actor->spr.yvel << 1))
{
sc->ceilingz = actor->spr.pos.Z;
callsound(actor->spr.sector(), actor);
actor->temp_data[2] = 0;
actor->temp_data[0] = 0;
}
else sc->ceilingz += Sgn(actor->spr.pos.Z - sc->ceilingz) * actor->spr.yvel;
}
else
{
if (abs(sc->ceilingz - actor->temp_data[1]) < (actor->spr.yvel << 1))
{
sc->ceilingz = actor->temp_data[1];
callsound(actor->spr.sector(), actor);
actor->temp_data[2] = 0;
actor->temp_data[0] = 0;
}
else sc->ceilingz += Sgn(actor->temp_data[1] - sc->ceilingz) * actor->spr.yvel;
}
return;
}
if ((actor->spr.ang & 2047) == 1536)
{
if (abs(sc->ceilingz - actor->spr.pos.Z) < (actor->spr.yvel << 1))
{
actor->temp_data[0] = 0;
actor->temp_data[2] = !actor->temp_data[2];
callsound(actor->spr.sector(), actor);
sc->ceilingz = actor->spr.pos.Z;
}
else sc->ceilingz += Sgn(actor->spr.pos.Z - sc->ceilingz) * actor->spr.yvel;
}
else
{
if (abs(sc->ceilingz - actor->temp_data[1]) < (actor->spr.yvel << 1))
{
actor->temp_data[0] = 0;
actor->temp_data[2] = !actor->temp_data[2];
callsound(actor->spr.sector(), actor);
}
else sc->ceilingz -= Sgn(actor->spr.pos.Z - actor->temp_data[1]) * actor->spr.yvel;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se35(DDukeActor *actor, int SMALLSMOKE, int EXPLOSION2)
{
auto sc = actor->sector();
if (sc->ceilingz > actor->spr.pos.Z)
for (int j = 0; j < 8; j++)
{
actor->spr.ang += krand() & 511;
auto spawned = spawn(actor, SMALLSMOKE);
if (spawned)
{
spawned->spr.xvel = 96 + (krand() & 127);
ssp(spawned, CLIPMASK0);
SetActor(spawned, spawned->spr.pos);
if (rnd(16))
spawn(actor, EXPLOSION2);
}
}
switch (actor->temp_data[0])
{
case 0:
sc->ceilingz += actor->spr.yvel;
if (sc->ceilingz > sc->floorz)
sc->floorz = sc->ceilingz;
if (sc->ceilingz > actor->spr.pos.Z + (32 << 8))
actor->temp_data[0]++;
break;
case 1:
sc->ceilingz -= (actor->spr.yvel << 2);
if (sc->ceilingz < actor->temp_data[4])
{
sc->ceilingz = actor->temp_data[4];
actor->temp_data[0] = 0;
}
break;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se128(DDukeActor *actor)
{
auto wal = actor->temp_walls[0];
if (!wal) return; // E4L1 contains an uninitialized SE128 which would crash without this.
//if (wal->cstat | 32) // this has always been bugged, the condition can never be false.
{
wal->cstat &= ~CSTAT_WALL_1WAY;
wal->cstat |= CSTAT_WALL_MASKED;
if (wal->twoSided())
{
wal->nextWall()->cstat &= ~CSTAT_WALL_1WAY;
wal->nextWall()->cstat |= CSTAT_WALL_MASKED;
}
}
// else return;
wal->overpicnum++;
auto nextwal = wal->nextWall();
if (nextwal)
nextwal->overpicnum++;
if (actor->temp_data[0] < actor->temp_data[1]) actor->temp_data[0]++;
else
{
wal->cstat &= (CSTAT_WALL_TRANSLUCENT | CSTAT_WALL_1WAY | CSTAT_WALL_XFLIP | CSTAT_WALL_ALIGN_BOTTOM | CSTAT_WALL_BOTTOM_SWAP);
if (nextwal)
nextwal->cstat &= (CSTAT_WALL_TRANSLUCENT | CSTAT_WALL_1WAY | CSTAT_WALL_XFLIP | CSTAT_WALL_ALIGN_BOTTOM | CSTAT_WALL_BOTTOM_SWAP);
deletesprite(actor);
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se130(DDukeActor *actor, int countmax, int EXPLOSION2)
{
auto sc = actor->sector();
if (actor->temp_data[0] > countmax)
{
deletesprite(actor);
return;
}
else actor->temp_data[0]++;
int x = sc->floorz - sc->ceilingz;
if (rnd(64))
{
auto k = spawn(actor, EXPLOSION2);
if (k)
{
k->spr.xrepeat = k->spr.yrepeat = 2 + (krand() & 7);
k->spr.pos.Z = sc->floorz - (krand() % x);
k->spr.ang += 256 - (krand() % 511);
k->spr.xvel = krand() & 127;
ssp(k, CLIPMASK0);
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void handle_se31(DDukeActor* actor, bool choosedir)
{
auto sec = actor->sector();
if (actor->temp_data[0] == 1)
{
// Choose dir
if (choosedir && actor->temp_data[3] > 0)
{
actor->temp_data[3]--;
return;
}
if (actor->temp_data[2] == 1) // Retract
{
if (actor->spr.ang != 1536)
{
if (abs(sec->floorz - actor->spr.pos.Z) < actor->spr.yvel)
{
sec->floorz = actor->spr.pos.Z;
actor->temp_data[2] = 0;
actor->temp_data[0] = 0;
if (choosedir) actor->temp_data[3] = actor->spr.hitag;
callsound(actor->spr.sector(), actor);
}
else
{
int l = Sgn(actor->spr.pos.Z - sec->floorz) * actor->spr.yvel;
sec->floorz += l;
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum == TILE_APLAYER && a2->GetOwner())
if (ps[a2->PlayerIndex()].on_ground == 1)
ps[a2->PlayerIndex()].pos.Z += l;
if (a2->spr.zvel == 0 && a2->spr.statnum != STAT_EFFECTOR && (!choosedir || a2->spr.statnum != STAT_PROJECTILE))
{
a2->spr.pos.Z += l;
a2->floorz = sec->floorz;
}
}
}
}
else
{
if (abs(sec->floorz - actor->temp_data[1]) < actor->spr.yvel)
{
sec->floorz = actor->temp_data[1];
callsound(actor->spr.sector(), actor);
actor->temp_data[2] = 0;
actor->temp_data[0] = 0;
if (choosedir) actor->temp_data[3] = actor->spr.hitag;
}
else
{
int l = Sgn(actor->temp_data[1] - sec->floorz) * actor->spr.yvel;
sec->floorz += l;
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum == TILE_APLAYER && a2->GetOwner())
if (ps[a2->PlayerIndex()].on_ground == 1)
ps[a2->PlayerIndex()].pos.Z += l;
if (a2->spr.zvel == 0 && a2->spr.statnum != STAT_EFFECTOR && (!choosedir || a2->spr.statnum != STAT_PROJECTILE))
{
a2->spr.pos.Z += l;
a2->floorz = sec->floorz;
}
}
}
}
return;
}
if ((actor->spr.ang & 2047) == 1536)
{
if (abs(actor->spr.pos.Z - sec->floorz) < actor->spr.yvel)
{
callsound(actor->spr.sector(), actor);
actor->temp_data[0] = 0;
actor->temp_data[2] = 1;
if (choosedir) actor->temp_data[3] = actor->spr.hitag;
}
else
{
int l = Sgn(actor->spr.pos.Z - sec->floorz) * actor->spr.yvel;
sec->floorz += l;
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum == TILE_APLAYER && a2->GetOwner())
if (ps[a2->PlayerIndex()].on_ground == 1)
ps[a2->PlayerIndex()].pos.Z += l;
if (a2->spr.zvel == 0 && a2->spr.statnum != STAT_EFFECTOR && (!choosedir || a2->spr.statnum != STAT_PROJECTILE))
{
a2->spr.pos.Z += l;
a2->floorz = sec->floorz;
}
}
}
}
else
{
if (abs(sec->floorz - actor->temp_data[1]) < actor->spr.yvel)
{
actor->temp_data[0] = 0;
callsound(actor->spr.sector(), actor);
actor->temp_data[2] = 1;
actor->temp_data[3] = actor->spr.hitag;
}
else
{
int l = Sgn(actor->spr.pos.Z - actor->temp_data[1]) * actor->spr.yvel;
sec->floorz -= l;
DukeSectIterator it(actor->sector());
while (auto a2 = it.Next())
{
if (a2->spr.picnum ==TILE_APLAYER && a2->GetOwner())
if (ps[a2->PlayerIndex()].on_ground == 1)
ps[a2->PlayerIndex()].pos.Z -= l;
if (a2->spr.zvel == 0 && a2->spr.statnum != STAT_EFFECTOR && (!choosedir || a2->spr.statnum != STAT_PROJECTILE))
{
a2->spr.pos.Z -= l;
a2->floorz = sec->floorz;
}
}
}
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void getglobalz(DDukeActor* actor)
{
int zr;
Collision hz, lz;
if( actor->spr.statnum == STAT_PLAYER || actor->spr.statnum == STAT_STANDABLE || actor->spr.statnum == STAT_ZOMBIEACTOR || actor->spr.statnum == STAT_ACTOR || actor->spr.statnum == STAT_PROJECTILE)
{
if(actor->spr.statnum == STAT_PROJECTILE)
zr = 4;
else zr = 127;
auto cc = actor->spr.cstat2;
actor->spr.cstat2 |= CSTAT2_SPRITE_NOFIND; // don't clip against self. getzrange cannot detect this because it only receives a coordinate.
getzrange({ actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (FOURSLEIGHT) }, actor->spr.sector(), &actor->ceilingz, hz, &actor->floorz, lz, zr, CLIPMASK0);
actor->spr.cstat2 = cc;
if( lz.type == kHitSprite && (lz.actor()->spr.cstat & CSTAT_SPRITE_ALIGNMENT_MASK) == 0 )
{
if( badguy(lz.actor()) && lz.actor()->spr.pal != 1)
{
if( actor->spr.statnum != STAT_PROJECTILE)
{
actor->aflags |= SFLAG_NOFLOORSHADOW;
//actor->dispicnum = -4; // No shadows on actors
actor->spr.xvel = -256;
ssp(actor, CLIPMASK0);
}
}
else if(lz.actor()->spr.picnum == TILE_APLAYER && badguy(actor) )
{
actor->aflags |= SFLAG_NOFLOORSHADOW;
//actor->dispicnum = -4; // No shadows on actors
actor->spr.xvel = -256;
ssp(actor, CLIPMASK0);
}
else if(actor->spr.statnum == STAT_PROJECTILE && lz.actor()->spr.picnum == TILE_APLAYER && actor->GetOwner() == actor)
{
actor->ceilingz = actor->spr.sector()->ceilingz;
actor->floorz = actor->spr.sector()->floorz;
}
}
}
else
{
actor->ceilingz = actor->spr.sector()->ceilingz;
actor->floorz = actor->spr.sector()->floorz;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void makeitfall(DDukeActor* actor)
{
int c;
if( fi.floorspace(actor->spr.sector()) )
c = 0;
else
{
if( fi.ceilingspace(actor->spr.sector()) || actor->spr.sector()->lotag == ST_2_UNDERWATER)
c = gs.gravity/6;
else c = gs.gravity;
}
if (isRRRA())
{
c = adjustfall(actor, c); // this accesses sprite indices and cannot be in shared code. Should be done better.
}
if ((actor->spr.statnum == STAT_ACTOR || actor->spr.statnum == STAT_PLAYER || actor->spr.statnum == STAT_ZOMBIEACTOR || actor->spr.statnum == STAT_STANDABLE))
{
Collision coll;
getzrange({ actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (FOURSLEIGHT) }, actor->spr.sector(), &actor->ceilingz, coll, &actor->floorz, coll, 127, CLIPMASK0);
}
else
{
actor->ceilingz = actor->spr.sector()->ceilingz;
actor->floorz = actor->spr.sector()->floorz;
}
if( actor->spr.pos.Z < actor->floorz-(FOURSLEIGHT) )
{
if( actor->spr.sector()->lotag == 2 && actor->spr.zvel > 3122 )
actor->spr.zvel = 3144;
if(actor->spr.zvel < 6144)
actor->spr.zvel += c;
else actor->spr.zvel = 6144;
actor->spr.pos.Z += actor->spr.zvel;
}
if( actor->spr.pos.Z >= actor->floorz-(FOURSLEIGHT) )
{
actor->spr.pos.Z = actor->floorz - FOURSLEIGHT;
actor->spr.zvel = 0;
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
int dodge(DDukeActor* actor)
{
int bx, by, mx, my, bxvect, byvect, d;
mx = actor->spr.pos.X;
my = actor->spr.pos.Y;
DukeStatIterator it(STAT_PROJECTILE);
while (auto ac = it.Next())
{
if (ac->GetOwner() == ac || ac->spr.sector() != actor->spr.sector())
continue;
bx = ac->spr.pos.X - mx;
by = ac->spr.pos.Y - my;
bxvect = bcos(ac->spr.ang);
byvect = bsin(ac->spr.ang);
if (bcos(actor->spr.ang) * bx + bsin(actor->spr.ang) * by >= 0)
if (bxvect * bx + byvect * by < 0)
{
d = bxvect * by - byvect * bx;
if (abs(d) < 65536 * 64)
{
actor->spr.ang -= 512 + (krand() & 1024);
return 1;
}
}
}
return 0;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
int furthestangle(DDukeActor *actor, int angs)
{
int j, furthest_angle = 0, angincs;
int d, greatestd;
HitInfo hit{};
greatestd = -(1 << 30);
angincs = 2048 / angs;
if (actor->spr.picnum != TILE_APLAYER)
if ((actor->temp_data[0] & 63) > 2) return(actor->spr.ang + 1024);
for (j = actor->spr.ang; j < (2048 + actor->spr.ang); j += angincs)
{
hitscan({ actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (8 << 8) }, actor->spr.sector(), { bcos(j), bsin(j), 0 }, hit, CLIPMASK1);
d = abs(hit.hitpos.X - actor->spr.pos.X) + abs(hit.hitpos.Y - actor->spr.pos.Y);
if (d > greatestd)
{
greatestd = d;
furthest_angle = j;
}
}
return (furthest_angle & 2047);
}
//---------------------------------------------------------------------------
//
// return value was changed to what its only caller really expects
//
//---------------------------------------------------------------------------
int furthestcanseepoint(DDukeActor *actor, DDukeActor* tosee, int* dax, int* day)
{
int j, angincs;
int d, da;//, d, cd, ca,tempx,tempy,cx,cy;
HitInfo hit{};
if ((actor->temp_data[0] & 63)) return -1;
if (ud.multimode < 2 && ud.player_skill < 3)
angincs = 2048 / 2;
else angincs = 2048 / (1 + (krand() & 1));
for (j = tosee->spr.ang; j < (2048 + tosee->spr.ang); j += (angincs - (krand() & 511)))
{
hitscan({ tosee->spr.pos.X, tosee->spr.pos.Y, tosee->spr.pos.Z - (16 << 8) }, tosee->spr.sector(), { bcos(j), bsin(j), 16384 - (krand() & 32767) }, hit, CLIPMASK1);
d = abs(hit.hitpos.X - tosee->spr.pos.X) + abs(hit.hitpos.Y - tosee->spr.pos.Y);
da = abs(hit.hitpos.X - actor->spr.pos.X) + abs(hit.hitpos.Y - actor->spr.pos.Y);
if (d < da && hit.hitSector)
if (cansee(hit.hitpos.X, hit.hitpos.Y, hit.hitpos.Z, hit.hitSector, actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z - (16 << 8), actor->spr.sector()))
{
*dax = hit.hitpos.X;
*day = hit.hitpos.Y;
return 1;
}
}
return 0;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void alterang(int ang, DDukeActor* actor, int playernum)
{
int aang, angdif, goalang, j;
int ticselapsed;
auto moveptr = &ScriptCode[actor->temp_data[1]];
ticselapsed = (actor->temp_data[0]) & 31;
aang = actor->spr.ang;
actor->spr.xvel += (*moveptr - actor->spr.xvel) / 5;
if (actor->spr.zvel < 648) actor->spr.zvel += ((*(moveptr + 1) << 4) - actor->spr.zvel) / 5;
if (isRRRA() && (ang & windang))
actor->spr.ang = WindDir;
else if (ang & seekplayer)
{
DDukeActor* holoduke = !isRR()? ps[playernum].holoduke_on.Get() : nullptr;
// NOTE: looks like 'Owner' is set to target sprite ID...
if (holoduke && cansee(holoduke->spr.pos.X, holoduke->spr.pos.Y, holoduke->spr.pos.Z, holoduke->spr.sector(), actor->spr.pos.X, actor->spr.pos.Y, actor->spr.pos.Z, actor->spr.sector()))
actor->SetOwner(holoduke);
else actor->SetOwner(ps[playernum].GetActor());
auto Owner = actor->GetOwner();
if (Owner->spr.picnum == TILE_APLAYER)
goalang = getangle(actor->lastvx - actor->spr.pos.X, actor->lastvy - actor->spr.pos.Y);
else
goalang = getangle(Owner->spr.pos.X - actor->spr.pos.X, Owner->spr.pos.Y - actor->spr.pos.Y);
if (actor->spr.xvel && actor->spr.picnum != TILE_DRONE)
{
angdif = getincangle(aang, goalang);
if (ticselapsed < 2)
{
if (abs(angdif) < 256)
{
j = 128 - (krand() & 256);
actor->spr.ang += j;
if (hits(actor) < 844)
actor->spr.ang -= j;
}
}
else if (ticselapsed > 18 && ticselapsed < 26) // choose
{
if (abs(angdif >> 2) < 128) actor->spr.ang = goalang;
else actor->spr.ang += angdif >> 2;
}
}
else actor->spr.ang = goalang;
}
if (ticselapsed < 1)
{
j = 2;
if (ang & furthestdir)
{
goalang = furthestangle(actor, j);
actor->spr.ang = goalang;
actor->SetOwner(ps[playernum].GetActor());
}
if (ang & fleeenemy)
{
goalang = furthestangle(actor, j);
actor->spr.ang = goalang; // += angdif; // = getincangle(aang,goalang)>>1;
}
}
}
//---------------------------------------------------------------------------
//
// the indirections here are to keep this core function free of game references
//
//---------------------------------------------------------------------------
void fall_common(DDukeActor *actor, int playernum, int JIBS6, int DRONE, int BLOODPOOL, int SHOTSPARK1, int squished, int thud, int(*fallspecial)(DDukeActor*, int))
{
actor->spr.xoffset = 0;
actor->spr.yoffset = 0;
// if(!gotz)
{
int c;
int sphit = fallspecial? fallspecial(actor, playernum) : 0;
if (fi.floorspace(actor->spr.sector()))
c = 0;
else
{
if (fi.ceilingspace(actor->spr.sector()) || actor->spr.sector()->lotag == 2)
c = gs.gravity / 6;
else c = gs.gravity;
}
if (actor->cgg <= 0 || (actor->spr.sector()->floorstat & CSTAT_SECTOR_SLOPE))
{
getglobalz(actor);
actor->cgg = 6;
}
else actor->cgg--;
if (actor->spr.pos.Z < (actor->floorz - FOURSLEIGHT))
{
actor->spr.zvel += c;
actor->spr.pos.Z += actor->spr.zvel;
if (actor->spr.zvel > 6144) actor->spr.zvel = 6144;
}
else
{
actor->spr.pos.Z = actor->floorz - FOURSLEIGHT;
if (badguy(actor) || (actor->spr.picnum == TILE_APLAYER && actor->GetOwner()))
{
if (actor->spr.zvel > 3084 && actor->spr.extra <= 1)
{
if (actor->spr.pal != 1 && actor->spr.picnum != DRONE)
{
if (actor->spr.picnum == TILE_APLAYER && actor->spr.extra > 0)
goto SKIPJIBS;
if (sphit)
{
fi.guts(actor, JIBS6, 5, playernum);
S_PlayActorSound(squished, actor);
}
else
{
fi.guts(actor, JIBS6, 15, playernum);
S_PlayActorSound(squished, actor);
spawn(actor, BLOODPOOL);
}
}
SKIPJIBS:
actor->picnum = SHOTSPARK1;
actor->extra = 1;
actor->spr.zvel = 0;
}
else if (actor->spr.zvel > 2048 && actor->spr.sector()->lotag != 1)
{
auto sect = actor->spr.sector();
pushmove(&actor->spr.pos, &sect, 128, (4 << 8), (4 << 8), CLIPMASK0);
if (sect != actor->spr.sector() && sect != nullptr)
ChangeActorSect(actor, sect);
S_PlayActorSound(thud, actor);
}
}
if (actor->spr.sector()->lotag == 1)
actor->spr.pos.Z += gs.actorinfo[actor->spr.picnum].falladjustz;
else actor->spr.zvel = 0;
}
}
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
DDukeActor *LocateTheLocator(int n, sectortype* sect)
{
DukeStatIterator it(STAT_LOCATOR);
while (auto ac = it.Next())
{
if ((sect == nullptr || sect == ac->spr.sector()) && n == ac->spr.lotag)
return ac;
}
return nullptr;
}
//---------------------------------------------------------------------------
//
//
//
//---------------------------------------------------------------------------
void recordoldspritepos()
{
for (int statNum = 0; statNum < MAXSTATUS; statNum++)
{
DukeStatIterator it(statNum);
while (auto ac = it.Next())
{
ac->spr.backuploc();
}
}
}
END_DUKE_NS