a4f5846c7c
- for quakes, making a distinction between circular and elliptic thrust is pointless, so the checks were removed and both paths consolidated. The elliptic code will do exactly the same for circles and there isn't even a performance difference.
551 lines
12 KiB
C++
551 lines
12 KiB
C++
/*
|
|
#include "actor.h"
|
|
#include "info.h"
|
|
#include "p_local.h"
|
|
#include "m_random.h"
|
|
#include "s_sound.h"
|
|
#include "a_hexenglobal.h"
|
|
#include "gstrings.h"
|
|
#include "a_weaponpiece.h"
|
|
#include "thingdef/thingdef.h"
|
|
#include "g_level.h"
|
|
#include "doomstat.h"
|
|
*/
|
|
|
|
#define BLAST_FULLSTRENGTH 255
|
|
|
|
static FRandom pr_holyatk2 ("CHolyAtk2");
|
|
static FRandom pr_holyseeker ("CHolySeeker");
|
|
static FRandom pr_holyweave ("CHolyWeave");
|
|
static FRandom pr_holyseek ("CHolySeek");
|
|
static FRandom pr_checkscream ("CCheckScream");
|
|
static FRandom pr_spiritslam ("CHolySlam");
|
|
static FRandom pr_wraithvergedrop ("WraithvergeDrop");
|
|
|
|
void SpawnSpiritTail (AActor *spirit);
|
|
|
|
//==========================================================================
|
|
// Cleric's Wraithverge (Holy Symbol?) --------------------------------------
|
|
|
|
class ACWeapWraithverge : public AClericWeapon
|
|
{
|
|
DECLARE_CLASS (ACWeapWraithverge, AClericWeapon)
|
|
public:
|
|
void Serialize (FArchive &arc)
|
|
{
|
|
Super::Serialize (arc);
|
|
arc << CHolyCount;
|
|
}
|
|
PalEntry GetBlend ()
|
|
{
|
|
if (paletteflash & PF_HEXENWEAPONS)
|
|
{
|
|
if (CHolyCount == 3)
|
|
return PalEntry(128, 70, 70, 70);
|
|
else if (CHolyCount == 2)
|
|
return PalEntry(128, 100, 100, 100);
|
|
else if (CHolyCount == 1)
|
|
return PalEntry(128, 130, 130, 130);
|
|
else
|
|
return PalEntry(0, 0, 0, 0);
|
|
}
|
|
else
|
|
{
|
|
return PalEntry (CHolyCount * 128 / 3, 131, 131, 131);
|
|
}
|
|
}
|
|
BYTE CHolyCount;
|
|
};
|
|
|
|
IMPLEMENT_CLASS (ACWeapWraithverge)
|
|
|
|
// Holy Spirit --------------------------------------------------------------
|
|
|
|
IMPLEMENT_CLASS (AHolySpirit)
|
|
|
|
bool AHolySpirit::Slam (AActor *thing)
|
|
{
|
|
if (thing->flags&MF_SHOOTABLE && thing != target)
|
|
{
|
|
if (multiplayer && !deathmatch && thing->player && target->player)
|
|
{ // don't attack other co-op players
|
|
return true;
|
|
}
|
|
if (thing->flags2&MF2_REFLECTIVE
|
|
&& (thing->player || thing->flags2&MF2_BOSS))
|
|
{
|
|
tracer = target;
|
|
target = thing;
|
|
return true;
|
|
}
|
|
if (thing->flags3&MF3_ISMONSTER || thing->player)
|
|
{
|
|
tracer = thing;
|
|
}
|
|
if (pr_spiritslam() < 96)
|
|
{
|
|
int dam = 12;
|
|
if (thing->player || thing->flags2&MF2_BOSS)
|
|
{
|
|
dam = 3;
|
|
// ghost burns out faster when attacking players/bosses
|
|
health -= 6;
|
|
}
|
|
P_DamageMobj (thing, this, target, dam, NAME_Melee);
|
|
if (pr_spiritslam() < 128)
|
|
{
|
|
Spawn ("HolyPuff", Pos(), ALLOW_REPLACE);
|
|
S_Sound (this, CHAN_WEAPON, "SpiritAttack", 1, ATTN_NORM);
|
|
if (thing->flags3&MF3_ISMONSTER && pr_spiritslam() < 128)
|
|
{
|
|
thing->Howl ();
|
|
}
|
|
}
|
|
}
|
|
if (thing->health <= 0)
|
|
{
|
|
tracer = NULL;
|
|
}
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool AHolySpirit::SpecialBlastHandling (AActor *source, fixed_t strength)
|
|
{
|
|
if (tracer == source)
|
|
{
|
|
tracer = target;
|
|
target = source;
|
|
GC::WriteBarrier(this, source);
|
|
}
|
|
return true;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_CHolyAttack2
|
|
//
|
|
// Spawns the spirits
|
|
//============================================================================
|
|
|
|
DEFINE_ACTION_FUNCTION(AActor, A_CHolyAttack2)
|
|
{
|
|
PARAM_ACTION_PROLOGUE;
|
|
|
|
int j;
|
|
int i;
|
|
AActor *mo;
|
|
|
|
for (j = 0; j < 4; j++)
|
|
{
|
|
mo = Spawn<AHolySpirit> (self->Pos(), ALLOW_REPLACE);
|
|
if (!mo)
|
|
{
|
|
continue;
|
|
}
|
|
switch (j)
|
|
{ // float bob index
|
|
case 0:
|
|
mo->special2 = pr_holyatk2(8 << BOBTOFINESHIFT); // upper-left
|
|
break;
|
|
case 1:
|
|
mo->special2 = FINEANGLES/2 + pr_holyatk2(8 << BOBTOFINESHIFT); // upper-right
|
|
break;
|
|
case 2:
|
|
mo->special2 = (FINEANGLES/2 + pr_holyatk2(8 << BOBTOFINESHIFT)) << 16; // lower-left
|
|
break;
|
|
case 3:
|
|
i = pr_holyatk2(8 << BOBTOFINESHIFT);
|
|
mo->special2 = ((FINEANGLES/2 + i) << 16) + FINEANGLES/2 + pr_holyatk2(8 << BOBTOFINESHIFT);
|
|
break;
|
|
}
|
|
mo->_f_SetZ(self->_f_Z());
|
|
mo->Angles.Yaw = self->Angles.Yaw + 67.5 - 45.*j;
|
|
mo->Thrust();
|
|
mo->target = self->target;
|
|
mo->args[0] = 10; // initial turn value
|
|
mo->args[1] = 0; // initial look angle
|
|
if (deathmatch)
|
|
{ // Ghosts last slightly less longer in DeathMatch
|
|
mo->health = 85;
|
|
}
|
|
if (self->tracer)
|
|
{
|
|
mo->tracer = self->tracer;
|
|
mo->flags |= MF_NOCLIP|MF_SKULLFLY;
|
|
mo->flags &= ~MF_MISSILE;
|
|
}
|
|
SpawnSpiritTail (mo);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// SpawnSpiritTail
|
|
//
|
|
//============================================================================
|
|
|
|
void SpawnSpiritTail (AActor *spirit)
|
|
{
|
|
AActor *tail, *next;
|
|
int i;
|
|
|
|
tail = Spawn ("HolyTail", spirit->Pos(), ALLOW_REPLACE);
|
|
tail->target = spirit; // parent
|
|
for (i = 1; i < 3; i++)
|
|
{
|
|
next = Spawn ("HolyTailTrail", spirit->Pos(), ALLOW_REPLACE);
|
|
tail->tracer = next;
|
|
tail = next;
|
|
}
|
|
tail->tracer = NULL; // last tail bit
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_CHolyAttack
|
|
//
|
|
//============================================================================
|
|
|
|
DEFINE_ACTION_FUNCTION(AActor, A_CHolyAttack)
|
|
{
|
|
PARAM_ACTION_PROLOGUE;
|
|
|
|
player_t *player;
|
|
FTranslatedLineTarget t;
|
|
|
|
if (NULL == (player = self->player))
|
|
{
|
|
return 0;
|
|
}
|
|
ACWeapWraithverge *weapon = static_cast<ACWeapWraithverge *> (self->player->ReadyWeapon);
|
|
if (weapon != NULL)
|
|
{
|
|
if (!weapon->DepleteAmmo (weapon->bAltFire))
|
|
return 0;
|
|
}
|
|
AActor *missile = P_SpawnPlayerMissile (self, 0,0,0, PClass::FindActor("HolyMissile"), self->Angles.Yaw, &t);
|
|
if (missile != NULL && !t.unlinked)
|
|
{
|
|
missile->tracer = t.linetarget;
|
|
}
|
|
|
|
weapon->CHolyCount = 3;
|
|
S_Sound (self, CHAN_WEAPON, "HolySymbolFire", 1, ATTN_NORM);
|
|
return 0;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_CHolyPalette
|
|
//
|
|
//============================================================================
|
|
|
|
DEFINE_ACTION_FUNCTION(AActor, A_CHolyPalette)
|
|
{
|
|
PARAM_ACTION_PROLOGUE;
|
|
|
|
if (self->player != NULL)
|
|
{
|
|
ACWeapWraithverge *weapon = static_cast<ACWeapWraithverge *> (self->player->ReadyWeapon);
|
|
if (weapon != NULL && weapon->CHolyCount != 0)
|
|
{
|
|
weapon->CHolyCount--;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// CHolyTailFollow
|
|
//
|
|
//============================================================================
|
|
|
|
static void CHolyTailFollow (AActor *actor, fixed_t dist)
|
|
{
|
|
AActor *child;
|
|
int an;
|
|
fixed_t oldDistance, newDistance;
|
|
|
|
while (actor)
|
|
{
|
|
child = actor->tracer;
|
|
if (child)
|
|
{
|
|
an = actor->__f_AngleTo(child) >> ANGLETOFINESHIFT;
|
|
oldDistance = child->AproxDistance (actor);
|
|
if (P_TryMove (child, actor->_f_X()+FixedMul(dist, finecosine[an]),
|
|
actor->_f_Y()+FixedMul(dist, finesine[an]), true))
|
|
{
|
|
newDistance = child->AproxDistance (actor)-FRACUNIT;
|
|
if (oldDistance < FRACUNIT)
|
|
{
|
|
if (child->Z() < actor->Z())
|
|
{
|
|
child->_f_SetZ(actor->_f_Z()-dist);
|
|
}
|
|
else
|
|
{
|
|
child->_f_SetZ(actor->_f_Z()+dist);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
child->_f_SetZ(actor->_f_Z() + Scale (newDistance, child->_f_Z()-actor->_f_Z(), oldDistance));
|
|
}
|
|
}
|
|
}
|
|
actor = child;
|
|
dist -= FRACUNIT;
|
|
}
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// CHolyTailRemove
|
|
//
|
|
//============================================================================
|
|
|
|
static void CHolyTailRemove (AActor *actor)
|
|
{
|
|
AActor *next;
|
|
|
|
while (actor)
|
|
{
|
|
next = actor->tracer;
|
|
actor->Destroy ();
|
|
actor = next;
|
|
}
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_CHolyTail
|
|
//
|
|
//============================================================================
|
|
|
|
DEFINE_ACTION_FUNCTION(AActor, A_CHolyTail)
|
|
{
|
|
PARAM_ACTION_PROLOGUE;
|
|
|
|
AActor *parent;
|
|
|
|
parent = self->target;
|
|
|
|
if (parent == NULL || parent->health <= 0) // better check for health than current state - it's safer!
|
|
{ // Ghost removed, so remove all tail parts
|
|
CHolyTailRemove (self);
|
|
return 0;
|
|
}
|
|
else
|
|
{
|
|
if (P_TryMove (self,
|
|
parent->_f_X() - 14*finecosine[parent->_f_angle()>>ANGLETOFINESHIFT],
|
|
parent->_f_Y() - 14*finesine[parent->_f_angle()>>ANGLETOFINESHIFT], true))
|
|
{
|
|
self->_f_SetZ(parent->_f_Z()-5*FRACUNIT);
|
|
}
|
|
CHolyTailFollow (self, 10*FRACUNIT);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// CHolyFindTarget
|
|
//
|
|
//============================================================================
|
|
|
|
static void CHolyFindTarget (AActor *actor)
|
|
{
|
|
AActor *target;
|
|
|
|
if ( (target = P_RoughMonsterSearch (actor, 6, true)) )
|
|
{
|
|
actor->tracer = target;
|
|
actor->flags |= MF_NOCLIP|MF_SKULLFLY;
|
|
actor->flags &= ~MF_MISSILE;
|
|
}
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// CHolySeekerMissile
|
|
//
|
|
// Similar to P_SeekerMissile, but seeks to a random Z on the target
|
|
//============================================================================
|
|
|
|
static void CHolySeekerMissile (AActor *actor, DAngle thresh, DAngle turnMax)
|
|
{
|
|
int dir;
|
|
int dist;
|
|
DAngle delta;
|
|
AActor *target;
|
|
fixed_t newZ;
|
|
fixed_t deltaZ;
|
|
|
|
target = actor->tracer;
|
|
if (target == NULL)
|
|
{
|
|
return;
|
|
}
|
|
if(!(target->flags&MF_SHOOTABLE)
|
|
|| (!(target->flags3&MF3_ISMONSTER) && !target->player))
|
|
{ // Target died/target isn't a player or creature
|
|
actor->tracer = NULL;
|
|
actor->flags &= ~(MF_NOCLIP|MF_SKULLFLY);
|
|
actor->flags |= MF_MISSILE;
|
|
CHolyFindTarget (actor);
|
|
return;
|
|
}
|
|
dir = P_FaceMobj (actor, target, &delta);
|
|
if (delta > thresh)
|
|
{
|
|
delta /= 2;
|
|
if (delta > turnMax)
|
|
{
|
|
delta = turnMax;
|
|
}
|
|
}
|
|
if (dir)
|
|
{ // Turn clockwise
|
|
actor->Angles.Yaw += delta;
|
|
}
|
|
else
|
|
{ // Turn counter clockwise
|
|
actor->Angles.Yaw -= delta;
|
|
}
|
|
actor->VelFromAngle();
|
|
|
|
if (!(level.time&15)
|
|
|| actor->Z() > target->Top()
|
|
|| actor->Top() < target->Z())
|
|
{
|
|
newZ = target->_f_Z()+((pr_holyseeker()*target->height)>>8);
|
|
deltaZ = newZ - actor->_f_Z();
|
|
if (abs(deltaZ) > 15*FRACUNIT)
|
|
{
|
|
if (deltaZ > 0)
|
|
{
|
|
deltaZ = 15*FRACUNIT;
|
|
}
|
|
else
|
|
{
|
|
deltaZ = -15*FRACUNIT;
|
|
}
|
|
}
|
|
dist = actor->AproxDistance (target);
|
|
dist = dist / actor->_f_speed();
|
|
if (dist < 1)
|
|
{
|
|
dist = 1;
|
|
}
|
|
actor->Vel.Z = FIXED2DBL(deltaZ / dist);
|
|
}
|
|
return;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_CHolyWeave
|
|
//
|
|
//============================================================================
|
|
|
|
void CHolyWeave (AActor *actor, FRandom &pr_random)
|
|
{
|
|
fixed_t newX, newY, newZ;
|
|
int weaveXY, weaveZ;
|
|
int angle;
|
|
|
|
weaveXY = actor->special2 >> 16;
|
|
weaveZ = actor->special2 & FINEMASK;
|
|
angle = (actor->_f_angle() + ANG90) >> ANGLETOFINESHIFT;
|
|
newX = actor->_f_X() - FixedMul(finecosine[angle], finesine[weaveXY] * 32);
|
|
newY = actor->_f_Y() - FixedMul(finesine[angle], finesine[weaveXY] * 32);
|
|
weaveXY = (weaveXY + pr_random(5 << BOBTOFINESHIFT)) & FINEMASK;
|
|
newX += FixedMul(finecosine[angle], finesine[weaveXY] * 32);
|
|
newY += FixedMul(finesine[angle], finesine[weaveXY] * 32);
|
|
P_TryMove(actor, newX, newY, true);
|
|
newZ = actor->_f_Z();
|
|
newZ -= finesine[weaveZ] * 16;
|
|
weaveZ = (weaveZ + pr_random(5 << BOBTOFINESHIFT)) & FINEMASK;
|
|
newZ += finesine[weaveZ] * 16;
|
|
actor->_f_SetZ(newZ);
|
|
actor->special2 = weaveZ + (weaveXY << 16);
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_CHolySeek
|
|
//
|
|
//============================================================================
|
|
|
|
DEFINE_ACTION_FUNCTION(AActor, A_CHolySeek)
|
|
{
|
|
PARAM_ACTION_PROLOGUE;
|
|
|
|
self->health--;
|
|
if (self->health <= 0)
|
|
{
|
|
self->Vel.X /= 4;
|
|
self->Vel.Y /= 4;
|
|
self->Vel.Z = 0;
|
|
self->SetState (self->FindState(NAME_Death));
|
|
self->tics -= pr_holyseek()&3;
|
|
return 0;
|
|
}
|
|
if (self->tracer)
|
|
{
|
|
CHolySeekerMissile (self, (double)self->args[0], self->args[0]*2.);
|
|
if (!((level.time+7)&15))
|
|
{
|
|
self->args[0] = 5+(pr_holyseek()/20);
|
|
}
|
|
}
|
|
CHolyWeave (self, pr_holyweave);
|
|
return 0;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_CHolyCheckScream
|
|
//
|
|
//============================================================================
|
|
|
|
DEFINE_ACTION_FUNCTION(AActor, A_CHolyCheckScream)
|
|
{
|
|
PARAM_ACTION_PROLOGUE;
|
|
|
|
CALL_ACTION(A_CHolySeek, self);
|
|
if (pr_checkscream() < 20)
|
|
{
|
|
S_Sound (self, CHAN_VOICE, "SpiritActive", 1, ATTN_NORM);
|
|
}
|
|
if (!self->tracer)
|
|
{
|
|
CHolyFindTarget(self);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
//============================================================================
|
|
//
|
|
// A_ClericAttack
|
|
// (for the ClericBoss)
|
|
//
|
|
//============================================================================
|
|
|
|
DEFINE_ACTION_FUNCTION(AActor, A_ClericAttack)
|
|
{
|
|
PARAM_ACTION_PROLOGUE;
|
|
|
|
if (!self->target) return 0;
|
|
|
|
AActor * missile = P_SpawnMissileZ (self, self->_f_Z() + 40*FRACUNIT, self->target, PClass::FindActor ("HolyMissile"));
|
|
if (missile != NULL) missile->tracer = NULL; // No initial target
|
|
S_Sound (self, CHAN_WEAPON, "HolySymbolFire", 1, ATTN_NORM);
|
|
return 0;
|
|
}
|
|
|