ref: c2fb9dc5673b63e8f7286b9d0edbcd8a7865c8bd
dir: /src/hexen/p_pspr.c/
// Emacs style mode select -*- C++ -*-
//-----------------------------------------------------------------------------
//
// Copyright(C) 1993-1996 Id Software, Inc.
// Copyright(C) 1993-2008 Raven Software
//
// This program 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.
//
//-----------------------------------------------------------------------------
// HEADER FILES ------------------------------------------------------------
#include "h2def.h"
#include "p_local.h"
#include "s_sound.h"
// MACROS ------------------------------------------------------------------
#define LOWERSPEED FRACUNIT*6
#define RAISESPEED FRACUNIT*6
#define WEAPONBOTTOM 128*FRACUNIT
#define WEAPONTOP 32*FRACUNIT
// TYPES -------------------------------------------------------------------
// EXTERNAL FUNCTION PROTOTYPES --------------------------------------------
extern void P_ExplodeMissile(mobj_t * mo);
extern void A_UnHideThing(mobj_t * actor);
// PUBLIC FUNCTION PROTOTYPES ----------------------------------------------
// PRIVATE FUNCTION PROTOTYPES ---------------------------------------------
// EXTERNAL DATA DECLARATIONS ----------------------------------------------
extern fixed_t FloatBobOffsets[64];
// PUBLIC DATA DEFINITIONS -------------------------------------------------
fixed_t bulletslope;
weaponinfo_t WeaponInfo[NUMWEAPONS][NUMCLASSES] = {
{ // First Weapons
{ // Fighter First Weapon - Punch
MANA_NONE, // mana
S_PUNCHUP, // upstate
S_PUNCHDOWN, // downstate
S_PUNCHREADY, // readystate
S_PUNCHATK1_1, // atkstate
S_PUNCHATK1_1, // holdatkstate
S_NULL // flashstate
},
{ // Cleric First Weapon - Mace
MANA_NONE, // mana
S_CMACEUP, // upstate
S_CMACEDOWN, // downstate
S_CMACEREADY, // readystate
S_CMACEATK_1, // atkstate
S_CMACEATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Mage First Weapon - Wand
MANA_NONE,
S_MWANDUP,
S_MWANDDOWN,
S_MWANDREADY,
S_MWANDATK_1,
S_MWANDATK_1,
S_NULL},
{ // Pig - Snout
MANA_NONE, // mana
S_SNOUTUP, // upstate
S_SNOUTDOWN, // downstate
S_SNOUTREADY, // readystate
S_SNOUTATK1, // atkstate
S_SNOUTATK1, // holdatkstate
S_NULL // flashstate
}
},
{ // Second Weapons
{ // Fighter - Axe
MANA_NONE, // mana
S_FAXEUP, // upstate
S_FAXEDOWN, // downstate
S_FAXEREADY, // readystate
S_FAXEATK_1, // atkstate
S_FAXEATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Cleric - Serpent Staff
MANA_1, // mana
S_CSTAFFUP, // upstate
S_CSTAFFDOWN, // downstate
S_CSTAFFREADY, // readystate
S_CSTAFFATK_1, // atkstate
S_CSTAFFATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Mage - Cone of shards
MANA_1, // mana
S_CONEUP, // upstate
S_CONEDOWN, // downstate
S_CONEREADY, // readystate
S_CONEATK1_1, // atkstate
S_CONEATK1_3, // holdatkstate
S_NULL // flashstate
},
{ // Pig - Snout
MANA_NONE, // mana
S_SNOUTUP, // upstate
S_SNOUTDOWN, // downstate
S_SNOUTREADY, // readystate
S_SNOUTATK1, // atkstate
S_SNOUTATK1, // holdatkstate
S_NULL // flashstate
}
},
{ // Third Weapons
{ // Fighter - Hammer
MANA_NONE, // mana
S_FHAMMERUP, // upstate
S_FHAMMERDOWN, // downstate
S_FHAMMERREADY, // readystate
S_FHAMMERATK_1, // atkstate
S_FHAMMERATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Cleric - Flame Strike
MANA_2, // mana
S_CFLAMEUP, // upstate
S_CFLAMEDOWN, // downstate
S_CFLAMEREADY1, // readystate
S_CFLAMEATK_1, // atkstate
S_CFLAMEATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Mage - Lightning
MANA_2, // mana
S_MLIGHTNINGUP, // upstate
S_MLIGHTNINGDOWN, // downstate
S_MLIGHTNINGREADY, // readystate
S_MLIGHTNINGATK_1, // atkstate
S_MLIGHTNINGATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Pig - Snout
MANA_NONE, // mana
S_SNOUTUP, // upstate
S_SNOUTDOWN, // downstate
S_SNOUTREADY, // readystate
S_SNOUTATK1, // atkstate
S_SNOUTATK1, // holdatkstate
S_NULL // flashstate
}
},
{ // Fourth Weapons
{ // Fighter - Rune Sword
MANA_BOTH, // mana
S_FSWORDUP, // upstate
S_FSWORDDOWN, // downstate
S_FSWORDREADY, // readystate
S_FSWORDATK_1, // atkstate
S_FSWORDATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Cleric - Holy Symbol
MANA_BOTH, // mana
S_CHOLYUP, // upstate
S_CHOLYDOWN, // downstate
S_CHOLYREADY, // readystate
S_CHOLYATK_1, // atkstate
S_CHOLYATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Mage - Staff
MANA_BOTH, // mana
S_MSTAFFUP, // upstate
S_MSTAFFDOWN, // downstate
S_MSTAFFREADY, // readystate
S_MSTAFFATK_1, // atkstate
S_MSTAFFATK_1, // holdatkstate
S_NULL // flashstate
},
{ // Pig - Snout
MANA_NONE, // mana
S_SNOUTUP, // upstate
S_SNOUTDOWN, // downstate
S_SNOUTREADY, // readystate
S_SNOUTATK1, // atkstate
S_SNOUTATK1, // holdatkstate
S_NULL // flashstate
}
}
};
// PRIVATE DATA DEFINITIONS ------------------------------------------------
static int WeaponManaUse[NUMCLASSES][NUMWEAPONS] = {
{0, 2, 3, 14},
{0, 1, 4, 18},
{0, 3, 5, 15},
{0, 0, 0, 0}
};
// CODE --------------------------------------------------------------------
//---------------------------------------------------------------------------
//
// PROC P_SetPsprite
//
//---------------------------------------------------------------------------
void P_SetPsprite(player_t * player, int position, statenum_t stnum)
{
pspdef_t *psp;
state_t *state;
psp = &player->psprites[position];
do
{
if (!stnum)
{ // Object removed itself.
psp->state = NULL;
break;
}
state = &states[stnum];
psp->state = state;
psp->tics = state->tics; // could be 0
if (state->misc1)
{ // Set coordinates.
psp->sx = state->misc1 << FRACBITS;
}
if (state->misc2)
{
psp->sy = state->misc2 << FRACBITS;
}
if (state->action)
{ // Call action routine.
state->action(player, psp);
if (!psp->state)
{
break;
}
}
stnum = psp->state->nextstate;
}
while (!psp->tics); // An initial state of 0 could cycle through.
}
//---------------------------------------------------------------------------
//
// PROC P_SetPspriteNF
//
// Identical to P_SetPsprite, without calling the action function
//---------------------------------------------------------------------------
void P_SetPspriteNF(player_t * player, int position, statenum_t stnum)
{
pspdef_t *psp;
state_t *state;
psp = &player->psprites[position];
do
{
if (!stnum)
{ // Object removed itself.
psp->state = NULL;
break;
}
state = &states[stnum];
psp->state = state;
psp->tics = state->tics; // could be 0
if (state->misc1)
{ // Set coordinates.
psp->sx = state->misc1 << FRACBITS;
}
if (state->misc2)
{
psp->sy = state->misc2 << FRACBITS;
}
stnum = psp->state->nextstate;
}
while (!psp->tics); // An initial state of 0 could cycle through.
}
/*
=================
=
= P_CalcSwing
=
=================
*/
/*
fixed_t swingx, swingy;
void P_CalcSwing (player_t *player)
{
fixed_t swing;
int angle;
// OPTIMIZE: tablify this
swing = player->bob;
angle = (FINEANGLES/70*leveltime)&FINEMASK;
swingx = FixedMul ( swing, finesine[angle]);
angle = (FINEANGLES/70*leveltime+FINEANGLES/2)&FINEMASK;
swingy = -FixedMul ( swingx, finesine[angle]);
}
*/
//---------------------------------------------------------------------------
//
// PROC P_ActivateMorphWeapon
//
//---------------------------------------------------------------------------
void P_ActivateMorphWeapon(player_t * player)
{
player->pendingweapon = WP_NOCHANGE;
player->psprites[ps_weapon].sy = WEAPONTOP;
player->readyweapon = WP_FIRST; // Snout is the first weapon
P_SetPsprite(player, ps_weapon, S_SNOUTREADY);
}
//---------------------------------------------------------------------------
//
// PROC P_PostMorphWeapon
//
//---------------------------------------------------------------------------
void P_PostMorphWeapon(player_t * player, weapontype_t weapon)
{
player->pendingweapon = WP_NOCHANGE;
player->readyweapon = weapon;
player->psprites[ps_weapon].sy = WEAPONBOTTOM;
P_SetPsprite(player, ps_weapon,
WeaponInfo[weapon][player->class].upstate);
}
//---------------------------------------------------------------------------
//
// PROC P_BringUpWeapon
//
// Starts bringing the pending weapon up from the bottom of the screen.
//
//---------------------------------------------------------------------------
void P_BringUpWeapon(player_t * player)
{
statenum_t new;
if (player->pendingweapon == WP_NOCHANGE)
{
player->pendingweapon = player->readyweapon;
}
if (player->class == PCLASS_FIGHTER && player->pendingweapon == WP_SECOND
&& player->mana[MANA_1])
{
new = S_FAXEUP_G;
}
else
{
new = WeaponInfo[player->pendingweapon][player->class].upstate;
}
player->pendingweapon = WP_NOCHANGE;
player->psprites[ps_weapon].sy = WEAPONBOTTOM;
P_SetPsprite(player, ps_weapon, new);
}
//---------------------------------------------------------------------------
//
// FUNC P_CheckMana
//
// Returns true if there is enough mana to shoot. If not, selects the
// next weapon to use.
//
//---------------------------------------------------------------------------
boolean P_CheckMana(player_t * player)
{
manatype_t mana;
int count;
mana = WeaponInfo[player->readyweapon][player->class].mana;
count = WeaponManaUse[player->class][player->readyweapon];
if (mana == MANA_BOTH)
{
if (player->mana[MANA_1] >= count && player->mana[MANA_2] >= count)
{
return true;
}
}
else if (mana == MANA_NONE || player->mana[mana] >= count)
{
return (true);
}
// out of mana, pick a weapon to change to
do
{
if (player->weaponowned[WP_THIRD]
&& player->mana[MANA_2] >= WeaponManaUse[player->class][WP_THIRD])
{
player->pendingweapon = WP_THIRD;
}
else if (player->weaponowned[WP_SECOND]
&& player->mana[MANA_1] >=
WeaponManaUse[player->class][WP_SECOND])
{
player->pendingweapon = WP_SECOND;
}
else if (player->weaponowned[WP_FOURTH]
&& player->mana[MANA_1] >=
WeaponManaUse[player->class][WP_FOURTH]
&& player->mana[MANA_2] >=
WeaponManaUse[player->class][WP_FOURTH])
{
player->pendingweapon = WP_FOURTH;
}
else
{
player->pendingweapon = WP_FIRST;
}
}
while (player->pendingweapon == WP_NOCHANGE);
P_SetPsprite(player, ps_weapon,
WeaponInfo[player->readyweapon][player->class].downstate);
return (false);
}
//---------------------------------------------------------------------------
//
// PROC P_FireWeapon
//
//---------------------------------------------------------------------------
void P_FireWeapon(player_t * player)
{
statenum_t attackState;
if (!P_CheckMana(player))
{
return;
}
P_SetMobjState(player->mo, PStateAttack[player->class]); // S_PLAY_ATK1);
if (player->class == PCLASS_FIGHTER && player->readyweapon == WP_SECOND
&& player->mana[MANA_1] > 0)
{ // Glowing axe
attackState = S_FAXEATK_G1;
}
else
{
attackState = player->refire ?
WeaponInfo[player->readyweapon][player->class].holdatkstate
: WeaponInfo[player->readyweapon][player->class].atkstate;
}
P_SetPsprite(player, ps_weapon, attackState);
P_NoiseAlert(player->mo, player->mo);
}
//---------------------------------------------------------------------------
//
// PROC P_DropWeapon
//
// The player died, so put the weapon away.
//
//---------------------------------------------------------------------------
void P_DropWeapon(player_t * player)
{
P_SetPsprite(player, ps_weapon,
WeaponInfo[player->readyweapon][player->class].downstate);
}
//---------------------------------------------------------------------------
//
// PROC A_WeaponReady
//
// The player can fire the weapon or change to another weapon at this time.
//
//---------------------------------------------------------------------------
void A_WeaponReady(player_t * player, pspdef_t * psp)
{
int angle;
// Change player from attack state
if (player->mo->state >= &states[PStateAttack[player->class]]
&& player->mo->state <= &states[PStateAttackEnd[player->class]])
{
P_SetMobjState(player->mo, PStateNormal[player->class]);
}
// Put the weapon away if the player has a pending weapon or has
// died.
if (player->pendingweapon != WP_NOCHANGE || !player->health)
{
P_SetPsprite(player, ps_weapon,
WeaponInfo[player->readyweapon][player->class].
downstate);
return;
}
// Check for fire.
if (player->cmd.buttons & BT_ATTACK)
{
player->attackdown = true;
P_FireWeapon(player);
return;
}
else
{
player->attackdown = false;
}
if (!player->morphTics)
{
// Bob the weapon based on movement speed.
angle = (128 * leveltime) & FINEMASK;
psp->sx = FRACUNIT + FixedMul(player->bob, finecosine[angle]);
angle &= FINEANGLES / 2 - 1;
psp->sy = WEAPONTOP + FixedMul(player->bob, finesine[angle]);
}
}
//---------------------------------------------------------------------------
//
// PROC A_ReFire
//
// The player can re fire the weapon without lowering it entirely.
//
//---------------------------------------------------------------------------
void A_ReFire(player_t * player, pspdef_t * psp)
{
if ((player->cmd.buttons & BT_ATTACK)
&& player->pendingweapon == WP_NOCHANGE && player->health)
{
player->refire++;
P_FireWeapon(player);
}
else
{
player->refire = 0;
P_CheckMana(player);
}
}
//---------------------------------------------------------------------------
//
// PROC A_Lower
//
//---------------------------------------------------------------------------
void A_Lower(player_t * player, pspdef_t * psp)
{
if (player->morphTics)
{
psp->sy = WEAPONBOTTOM;
}
else
{
psp->sy += LOWERSPEED;
}
if (psp->sy < WEAPONBOTTOM)
{ // Not lowered all the way yet
return;
}
if (player->playerstate == PST_DEAD)
{ // Player is dead, so don't bring up a pending weapon
psp->sy = WEAPONBOTTOM;
return;
}
if (!player->health)
{ // Player is dead, so keep the weapon off screen
P_SetPsprite(player, ps_weapon, S_NULL);
return;
}
player->readyweapon = player->pendingweapon;
P_BringUpWeapon(player);
}
//---------------------------------------------------------------------------
//
// PROC A_Raise
//
//---------------------------------------------------------------------------
void A_Raise(player_t * player, pspdef_t * psp)
{
psp->sy -= RAISESPEED;
if (psp->sy > WEAPONTOP)
{ // Not raised all the way yet
return;
}
psp->sy = WEAPONTOP;
if (player->class == PCLASS_FIGHTER && player->readyweapon == WP_SECOND
&& player->mana[MANA_1])
{
P_SetPsprite(player, ps_weapon, S_FAXEREADY_G);
}
else
{
P_SetPsprite(player, ps_weapon,
WeaponInfo[player->readyweapon][player->class].
readystate);
}
}
/*
===============
=
= P_BulletSlope
=
= Sets a slope so a near miss is at aproximately the height of the
= intended target
=
===============
*/
/*
void P_BulletSlope (mobj_t *mo)
{
angle_t an;
//
// see which target is to be aimed at
//
an = mo->angle;
bulletslope = P_AimLineAttack (mo, an, 16*64*FRACUNIT);
if (!linetarget)
{
an += 1<<26;
bulletslope = P_AimLineAttack (mo, an, 16*64*FRACUNIT);
if (!linetarget)
{
an -= 2<<26;
bulletslope = P_AimLineAttack (mo, an, 16*64*FRACUNIT);
}
if (!linetarget)
{
an += 1<<26;
bulletslope = (mo->player->lookdir<<FRACBITS)/173;
}
}
}
*/
//
// WEAPON ATTACKS
//
//============================================================================
//
// AdjustPlayerAngle
//
//============================================================================
#define MAX_ANGADJUST (5*ANG1)
void AdjustPlayerAngle(mobj_t * pmo)
{
angle_t angle;
int difference;
angle = R_PointToAngle2(pmo->x, pmo->y, linetarget->x, linetarget->y);
difference = (int) angle - (int) pmo->angle;
if (abs(difference) > MAX_ANGADJUST)
{
pmo->angle += difference > 0 ? MAX_ANGADJUST : -MAX_ANGADJUST;
}
else
{
pmo->angle = angle;
}
}
//============================================================================
//
// A_SnoutAttack
//
//============================================================================
void A_SnoutAttack(player_t * player, pspdef_t * psp)
{
angle_t angle;
int damage;
int slope;
damage = 3 + (P_Random() & 3);
angle = player->mo->angle;
slope = P_AimLineAttack(player->mo, angle, MELEERANGE);
PuffType = MT_SNOUTPUFF;
PuffSpawned = NULL;
P_LineAttack(player->mo, angle, MELEERANGE, slope, damage);
S_StartSound(player->mo, SFX_PIG_ACTIVE1 + (P_Random() & 1));
if (linetarget)
{
AdjustPlayerAngle(player->mo);
// player->mo->angle = R_PointToAngle2(player->mo->x,
// player->mo->y, linetarget->x, linetarget->y);
if (PuffSpawned)
{ // Bit something
S_StartSound(player->mo, SFX_PIG_ATTACK);
}
}
}
//============================================================================
//
// A_FHammerAttack
//
//============================================================================
#define HAMMER_RANGE (MELEERANGE+MELEERANGE/2)
void A_FHammerAttack(player_t * player, pspdef_t * psp)
{
angle_t angle;
mobj_t *pmo = player->mo;
int damage;
fixed_t power;
int slope;
int i;
damage = 60 + (P_Random() & 63);
power = 10 * FRACUNIT;
PuffType = MT_HAMMERPUFF;
for (i = 0; i < 16; i++)
{
angle = pmo->angle + i * (ANG45 / 32);
slope = P_AimLineAttack(pmo, angle, HAMMER_RANGE);
if (linetarget)
{
P_LineAttack(pmo, angle, HAMMER_RANGE, slope, damage);
AdjustPlayerAngle(pmo);
if (linetarget->flags & MF_COUNTKILL || linetarget->player)
{
P_ThrustMobj(linetarget, angle, power);
}
pmo->special1 = false; // Don't throw a hammer
goto hammerdone;
}
angle = pmo->angle - i * (ANG45 / 32);
slope = P_AimLineAttack(pmo, angle, HAMMER_RANGE);
if (linetarget)
{
P_LineAttack(pmo, angle, HAMMER_RANGE, slope, damage);
AdjustPlayerAngle(pmo);
if (linetarget->flags & MF_COUNTKILL || linetarget->player)
{
P_ThrustMobj(linetarget, angle, power);
}
pmo->special1 = false; // Don't throw a hammer
goto hammerdone;
}
}
// didn't find any targets in meleerange, so set to throw out a hammer
PuffSpawned = NULL;
angle = pmo->angle;
slope = P_AimLineAttack(pmo, angle, HAMMER_RANGE);
P_LineAttack(pmo, angle, HAMMER_RANGE, slope, damage);
if (PuffSpawned)
{
pmo->special1 = false;
}
else
{
pmo->special1 = true;
}
hammerdone:
if (player->mana[MANA_2] <
WeaponManaUse[player->class][player->readyweapon])
{ // Don't spawn a hammer if the player doesn't have enough mana
pmo->special1 = false;
}
return;
}
//============================================================================
//
// A_FHammerThrow
//
//============================================================================
void A_FHammerThrow(player_t * player, pspdef_t * psp)
{
mobj_t *mo;
if (!player->mo->special1)
{
return;
}
player->mana[MANA_2] -= WeaponManaUse[player->class][player->readyweapon];
mo = P_SpawnPlayerMissile(player->mo, MT_HAMMER_MISSILE);
if (mo)
{
mo->special1 = 0;
}
}
//============================================================================
//
// A_FSwordAttack
//
//============================================================================
void A_FSwordAttack(player_t * player, pspdef_t * psp)
{
mobj_t *pmo;
player->mana[MANA_1] -= WeaponManaUse[player->class][player->readyweapon];
player->mana[MANA_2] -= WeaponManaUse[player->class][player->readyweapon];
pmo = player->mo;
P_SPMAngleXYZ(pmo, pmo->x, pmo->y, pmo->z - 10 * FRACUNIT,
MT_FSWORD_MISSILE, pmo->angle + ANG45 / 4);
P_SPMAngleXYZ(pmo, pmo->x, pmo->y, pmo->z - 5 * FRACUNIT,
MT_FSWORD_MISSILE, pmo->angle + ANG45 / 8);
P_SPMAngleXYZ(pmo, pmo->x, pmo->y, pmo->z, MT_FSWORD_MISSILE, pmo->angle);
P_SPMAngleXYZ(pmo, pmo->x, pmo->y, pmo->z + 5 * FRACUNIT,
MT_FSWORD_MISSILE, pmo->angle - ANG45 / 8);
P_SPMAngleXYZ(pmo, pmo->x, pmo->y, pmo->z + 10 * FRACUNIT,
MT_FSWORD_MISSILE, pmo->angle - ANG45 / 4);
S_StartSound(pmo, SFX_FIGHTER_SWORD_FIRE);
}
//============================================================================
//
// A_FSwordAttack2
//
//============================================================================
void A_FSwordAttack2(mobj_t * actor)
{
angle_t angle = actor->angle;
P_SpawnMissileAngle(actor, MT_FSWORD_MISSILE, angle + ANG45 / 4, 0);
P_SpawnMissileAngle(actor, MT_FSWORD_MISSILE, angle + ANG45 / 8, 0);
P_SpawnMissileAngle(actor, MT_FSWORD_MISSILE, angle, 0);
P_SpawnMissileAngle(actor, MT_FSWORD_MISSILE, angle - ANG45 / 8, 0);
P_SpawnMissileAngle(actor, MT_FSWORD_MISSILE, angle - ANG45 / 4, 0);
S_StartSound(actor, SFX_FIGHTER_SWORD_FIRE);
}
//============================================================================
//
// A_FSwordFlames
//
//============================================================================
void A_FSwordFlames(mobj_t * actor)
{
int i;
for (i = 1 + (P_Random() & 3); i; i--)
{
P_SpawnMobj(actor->x + ((P_Random() - 128) << 12), actor->y
+ ((P_Random() - 128) << 12),
actor->z + ((P_Random() - 128) << 11), MT_FSWORD_FLAME);
}
}
//============================================================================
//
// A_MWandAttack
//
//============================================================================
void A_MWandAttack(player_t * player, pspdef_t * psp)
{
mobj_t *mo;
mo = P_SpawnPlayerMissile(player->mo, MT_MWAND_MISSILE);
if (mo)
{
mo->thinker.function = P_BlasterMobjThinker;
}
S_StartSound(player->mo, SFX_MAGE_WAND_FIRE);
}
// ===== Mage Lightning Weapon =====
//============================================================================
//
// A_LightningReady
//
//============================================================================
void A_LightningReady(player_t * player, pspdef_t * psp)
{
A_WeaponReady(player, psp);
if (P_Random() < 160)
{
S_StartSound(player->mo, SFX_MAGE_LIGHTNING_READY);
}
}
//============================================================================
//
// A_LightningClip
//
//============================================================================
#define ZAGSPEED FRACUNIT
void A_LightningClip(mobj_t * actor)
{
mobj_t *cMo;
mobj_t *target = NULL;
int zigZag;
if (actor->type == MT_LIGHTNING_FLOOR)
{
actor->z = actor->floorz;
target = (mobj_t *) ((mobj_t *) actor->special2)->special1;
}
else if (actor->type == MT_LIGHTNING_CEILING)
{
actor->z = actor->ceilingz - actor->height;
target = (mobj_t *) actor->special1;
}
if (actor->type == MT_LIGHTNING_FLOOR)
{ // floor lightning zig-zags, and forces the ceiling lightning to mimic
cMo = (mobj_t *) actor->special2;
zigZag = P_Random();
if ((zigZag > 128 && actor->special1 < 2) || actor->special1 < -2)
{
P_ThrustMobj(actor, actor->angle + ANG90, ZAGSPEED);
if (cMo)
{
P_ThrustMobj(cMo, actor->angle + ANG90, ZAGSPEED);
}
actor->special1++;
}
else
{
P_ThrustMobj(actor, actor->angle - ANG90, ZAGSPEED);
if (cMo)
{
P_ThrustMobj(cMo, cMo->angle - ANG90, ZAGSPEED);
}
actor->special1--;
}
}
if (target)
{
if (target->health <= 0)
{
P_ExplodeMissile(actor);
}
else
{
actor->angle = R_PointToAngle2(actor->x, actor->y, target->x,
target->y);
actor->momx = 0;
actor->momy = 0;
P_ThrustMobj(actor, actor->angle, actor->info->speed >> 1);
}
}
}
//============================================================================
//
// A_LightningZap
//
//============================================================================
void A_LightningZap(mobj_t * actor)
{
mobj_t *mo;
fixed_t deltaZ;
A_LightningClip(actor);
actor->health -= 8;
if (actor->health <= 0)
{
P_SetMobjState(actor, actor->info->deathstate);
return;
}
if (actor->type == MT_LIGHTNING_FLOOR)
{
deltaZ = 10 * FRACUNIT;
}
else
{
deltaZ = -10 * FRACUNIT;
}
mo = P_SpawnMobj(actor->x + ((P_Random() - 128) * actor->radius / 256),
actor->y + ((P_Random() - 128) * actor->radius / 256),
actor->z + deltaZ, MT_LIGHTNING_ZAP);
if (mo)
{
mo->special2 = (int) actor;
mo->momx = actor->momx;
mo->momy = actor->momy;
mo->target = actor->target;
if (actor->type == MT_LIGHTNING_FLOOR)
{
mo->momz = 20 * FRACUNIT;
}
else
{
mo->momz = -20 * FRACUNIT;
}
}
/*
mo = P_SpawnMobj(actor->x+((P_Random()-128)*actor->radius/256),
actor->y+((P_Random()-128)*actor->radius/256),
actor->z+deltaZ, MT_LIGHTNING_ZAP);
if(mo)
{
mo->special2 = (int)actor;
mo->momx = actor->momx;
mo->momy = actor->momy;
mo->target = actor->target;
if(actor->type == MT_LIGHTNING_FLOOR)
{
mo->momz = 16*FRACUNIT;
}
else
{
mo->momz = -16*FRACUNIT;
}
}
*/
if (actor->type == MT_LIGHTNING_FLOOR && P_Random() < 160)
{
S_StartSound(actor, SFX_MAGE_LIGHTNING_CONTINUOUS);
}
}
//============================================================================
//
// A_MLightningAttack2
//
//============================================================================
void A_MLightningAttack2(mobj_t * actor)
{
mobj_t *fmo, *cmo;
fmo = P_SpawnPlayerMissile(actor, MT_LIGHTNING_FLOOR);
cmo = P_SpawnPlayerMissile(actor, MT_LIGHTNING_CEILING);
if (fmo)
{
fmo->special1 = 0;
fmo->special2 = (int) cmo;
A_LightningZap(fmo);
}
if (cmo)
{
cmo->special1 = 0; // mobj that it will track
cmo->special2 = (int) fmo;
A_LightningZap(cmo);
}
S_StartSound(actor, SFX_MAGE_LIGHTNING_FIRE);
}
//============================================================================
//
// A_MLightningAttack
//
//============================================================================
void A_MLightningAttack(player_t * player, pspdef_t * psp)
{
A_MLightningAttack2(player->mo);
player->mana[MANA_2] -= WeaponManaUse[player->class][player->readyweapon];
}
//============================================================================
//
// A_ZapMimic
//
//============================================================================
void A_ZapMimic(mobj_t * actor)
{
mobj_t *mo;
mo = (mobj_t *) actor->special2;
if (mo)
{
if (mo->state >= &states[mo->info->deathstate]
|| mo->state == &states[S_FREETARGMOBJ])
{
P_ExplodeMissile(actor);
}
else
{
actor->momx = mo->momx;
actor->momy = mo->momy;
}
}
}
//============================================================================
//
// A_LastZap
//
//============================================================================
void A_LastZap(mobj_t * actor)
{
mobj_t *mo;
mo = P_SpawnMobj(actor->x, actor->y, actor->z, MT_LIGHTNING_ZAP);
if (mo)
{
P_SetMobjState(mo, S_LIGHTNING_ZAP_X1);
mo->momz = 40 * FRACUNIT;
}
}
//============================================================================
//
// A_LightningRemove
//
//============================================================================
void A_LightningRemove(mobj_t * actor)
{
mobj_t *mo;
mo = (mobj_t *) actor->special2;
if (mo)
{
mo->special2 = 0;
P_ExplodeMissile(mo);
}
}
//============================================================================
//
// MStaffSpawn
//
//============================================================================
void MStaffSpawn(mobj_t * pmo, angle_t angle)
{
mobj_t *mo;
mo = P_SPMAngle(pmo, MT_MSTAFF_FX2, angle);
if (mo)
{
mo->target = pmo;
mo->special1 = (int) P_RoughMonsterSearch(mo, 10);
}
}
//============================================================================
//
// A_MStaffAttack
//
//============================================================================
void A_MStaffAttack(player_t * player, pspdef_t * psp)
{
angle_t angle;
mobj_t *pmo;
player->mana[MANA_1] -= WeaponManaUse[player->class][player->readyweapon];
player->mana[MANA_2] -= WeaponManaUse[player->class][player->readyweapon];
pmo = player->mo;
angle = pmo->angle;
MStaffSpawn(pmo, angle);
MStaffSpawn(pmo, angle - ANG1 * 5);
MStaffSpawn(pmo, angle + ANG1 * 5);
S_StartSound(player->mo, SFX_MAGE_STAFF_FIRE);
if (player == &players[consoleplayer])
{
player->damagecount = 0;
player->bonuscount = 0;
I_SetPalette((byte *) W_CacheLumpNum(W_GetNumForName("playpal"),
PU_CACHE) +
STARTSCOURGEPAL * 768);
}
}
//============================================================================
//
// A_MStaffPalette
//
//============================================================================
void A_MStaffPalette(player_t * player, pspdef_t * psp)
{
int pal;
if (player == &players[consoleplayer])
{
pal = STARTSCOURGEPAL + psp->state - (&states[S_MSTAFFATK_2]);
if (pal == STARTSCOURGEPAL + 3)
{ // reset back to original playpal
pal = 0;
}
I_SetPalette((byte *) W_CacheLumpNum(W_GetNumForName("playpal"),
PU_CACHE) + pal * 768);
}
}
//============================================================================
//
// A_MStaffWeave
//
//============================================================================
void A_MStaffWeave(mobj_t * actor)
{
fixed_t newX, newY;
int weaveXY, weaveZ;
int angle;
weaveXY = actor->special2 >> 16;
weaveZ = actor->special2 & 0xFFFF;
angle = (actor->angle + ANG90) >> ANGLETOFINESHIFT;
newX = actor->x - FixedMul(finecosine[angle],
FloatBobOffsets[weaveXY] << 2);
newY = actor->y - FixedMul(finesine[angle],
FloatBobOffsets[weaveXY] << 2);
weaveXY = (weaveXY + 6) & 63;
newX += FixedMul(finecosine[angle], FloatBobOffsets[weaveXY] << 2);
newY += FixedMul(finesine[angle], FloatBobOffsets[weaveXY] << 2);
P_TryMove(actor, newX, newY);
actor->z -= FloatBobOffsets[weaveZ] << 1;
weaveZ = (weaveZ + 3) & 63;
actor->z += FloatBobOffsets[weaveZ] << 1;
if (actor->z <= actor->floorz)
{
actor->z = actor->floorz + FRACUNIT;
}
actor->special2 = weaveZ + (weaveXY << 16);
}
//============================================================================
//
// A_MStaffTrack
//
//============================================================================
void A_MStaffTrack(mobj_t * actor)
{
if ((actor->special1 == 0) && (P_Random() < 50))
{
actor->special1 = (int) P_RoughMonsterSearch(actor, 10);
}
P_SeekerMissile(actor, ANG1 * 2, ANG1 * 10);
}
//============================================================================
//
// MStaffSpawn2 - for use by mage class boss
//
//============================================================================
void MStaffSpawn2(mobj_t * actor, angle_t angle)
{
mobj_t *mo;
mo = P_SpawnMissileAngle(actor, MT_MSTAFF_FX2, angle, 0);
if (mo)
{
mo->target = actor;
mo->special1 = (int) P_RoughMonsterSearch(mo, 10);
}
}
//============================================================================
//
// A_MStaffAttack2 - for use by mage class boss
//
//============================================================================
void A_MStaffAttack2(mobj_t * actor)
{
angle_t angle;
angle = actor->angle;
MStaffSpawn2(actor, angle);
MStaffSpawn2(actor, angle - ANG1 * 5);
MStaffSpawn2(actor, angle + ANG1 * 5);
S_StartSound(actor, SFX_MAGE_STAFF_FIRE);
}
//============================================================================
//
// A_FPunchAttack
//
//============================================================================
void A_FPunchAttack(player_t * player, pspdef_t * psp)
{
angle_t angle;
int damage;
int slope;
mobj_t *pmo = player->mo;
fixed_t power;
int i;
damage = 40 + (P_Random() & 15);
power = 2 * FRACUNIT;
PuffType = MT_PUNCHPUFF;
for (i = 0; i < 16; i++)
{
angle = pmo->angle + i * (ANG45 / 16);
slope = P_AimLineAttack(pmo, angle, 2 * MELEERANGE);
if (linetarget)
{
player->mo->special1++;
if (pmo->special1 == 3)
{
damage <<= 1;
power = 6 * FRACUNIT;
PuffType = MT_HAMMERPUFF;
}
P_LineAttack(pmo, angle, 2 * MELEERANGE, slope, damage);
if (linetarget->flags & MF_COUNTKILL || linetarget->player)
{
P_ThrustMobj(linetarget, angle, power);
}
AdjustPlayerAngle(pmo);
goto punchdone;
}
angle = pmo->angle - i * (ANG45 / 16);
slope = P_AimLineAttack(pmo, angle, 2 * MELEERANGE);
if (linetarget)
{
pmo->special1++;
if (pmo->special1 == 3)
{
damage <<= 1;
power = 6 * FRACUNIT;
PuffType = MT_HAMMERPUFF;
}
P_LineAttack(pmo, angle, 2 * MELEERANGE, slope, damage);
if (linetarget->flags & MF_COUNTKILL || linetarget->player)
{
P_ThrustMobj(linetarget, angle, power);
}
AdjustPlayerAngle(pmo);
goto punchdone;
}
}
// didn't find any creatures, so try to strike any walls
pmo->special1 = 0;
angle = pmo->angle;
slope = P_AimLineAttack(pmo, angle, MELEERANGE);
P_LineAttack(pmo, angle, MELEERANGE, slope, damage);
punchdone:
if (pmo->special1 == 3)
{
pmo->special1 = 0;
P_SetPsprite(player, ps_weapon, S_PUNCHATK2_1);
S_StartSound(pmo, SFX_FIGHTER_GRUNT);
}
return;
}
//============================================================================
//
// A_FAxeAttack
//
//============================================================================
#define AXERANGE 2.25*MELEERANGE
void A_FAxeAttack(player_t * player, pspdef_t * psp)
{
angle_t angle;
mobj_t *pmo = player->mo;
fixed_t power;
int damage;
int slope;
int i;
int useMana;
damage = 40 + (P_Random() & 15) + (P_Random() & 7);
power = 0;
if (player->mana[MANA_1] > 0)
{
damage <<= 1;
power = 6 * FRACUNIT;
PuffType = MT_AXEPUFF_GLOW;
useMana = 1;
}
else
{
PuffType = MT_AXEPUFF;
useMana = 0;
}
for (i = 0; i < 16; i++)
{
angle = pmo->angle + i * (ANG45 / 16);
slope = P_AimLineAttack(pmo, angle, AXERANGE);
if (linetarget)
{
P_LineAttack(pmo, angle, AXERANGE, slope, damage);
if (linetarget->flags & MF_COUNTKILL || linetarget->player)
{
P_ThrustMobj(linetarget, angle, power);
}
AdjustPlayerAngle(pmo);
useMana++;
goto axedone;
}
angle = pmo->angle - i * (ANG45 / 16);
slope = P_AimLineAttack(pmo, angle, AXERANGE);
if (linetarget)
{
P_LineAttack(pmo, angle, AXERANGE, slope, damage);
if (linetarget->flags & MF_COUNTKILL)
{
P_ThrustMobj(linetarget, angle, power);
}
AdjustPlayerAngle(pmo);
useMana++;
goto axedone;
}
}
// didn't find any creatures, so try to strike any walls
pmo->special1 = 0;
angle = pmo->angle;
slope = P_AimLineAttack(pmo, angle, MELEERANGE);
P_LineAttack(pmo, angle, MELEERANGE, slope, damage);
axedone:
if (useMana == 2)
{
player->mana[MANA_1] -=
WeaponManaUse[player->class][player->readyweapon];
if (player->mana[MANA_1] <= 0)
{
P_SetPsprite(player, ps_weapon, S_FAXEATK_5);
}
}
return;
}
//===========================================================================
//
// A_CMaceAttack
//
//===========================================================================
void A_CMaceAttack(player_t * player, pspdef_t * psp)
{
angle_t angle;
int damage;
int slope;
int i;
damage = 25 + (P_Random() & 15);
PuffType = MT_HAMMERPUFF;
for (i = 0; i < 16; i++)
{
angle = player->mo->angle + i * (ANG45 / 16);
slope = P_AimLineAttack(player->mo, angle, 2 * MELEERANGE);
if (linetarget)
{
P_LineAttack(player->mo, angle, 2 * MELEERANGE, slope, damage);
AdjustPlayerAngle(player->mo);
// player->mo->angle = R_PointToAngle2(player->mo->x,
// player->mo->y, linetarget->x, linetarget->y);
goto macedone;
}
angle = player->mo->angle - i * (ANG45 / 16);
slope = P_AimLineAttack(player->mo, angle, 2 * MELEERANGE);
if (linetarget)
{
P_LineAttack(player->mo, angle, 2 * MELEERANGE, slope, damage);
AdjustPlayerAngle(player->mo);
// player->mo->angle = R_PointToAngle2(player->mo->x,
// player->mo->y, linetarget->x, linetarget->y);
goto macedone;
}
}
// didn't find any creatures, so try to strike any walls
player->mo->special1 = 0;
angle = player->mo->angle;
slope = P_AimLineAttack(player->mo, angle, MELEERANGE);
P_LineAttack(player->mo, angle, MELEERANGE, slope, damage);
macedone:
return;
}
//============================================================================
//
// A_CStaffCheck
//
//============================================================================
void A_CStaffCheck(player_t * player, pspdef_t * psp)
{
mobj_t *pmo;
int damage;
int newLife;
angle_t angle;
int slope;
int i;
pmo = player->mo;
damage = 20 + (P_Random() & 15);
PuffType = MT_CSTAFFPUFF;
for (i = 0; i < 3; i++)
{
angle = pmo->angle + i * (ANG45 / 16);
slope = P_AimLineAttack(pmo, angle, 1.5 * MELEERANGE);
if (linetarget)
{
P_LineAttack(pmo, angle, 1.5 * MELEERANGE, slope, damage);
pmo->angle = R_PointToAngle2(pmo->x, pmo->y,
linetarget->x, linetarget->y);
if ((linetarget->player || linetarget->flags & MF_COUNTKILL)
&& (!(linetarget->flags2 & (MF2_DORMANT + MF2_INVULNERABLE))))
{
newLife = player->health + (damage >> 3);
newLife = newLife > 100 ? 100 : newLife;
pmo->health = player->health = newLife;
P_SetPsprite(player, ps_weapon, S_CSTAFFATK2_1);
}
player->mana[MANA_1] -=
WeaponManaUse[player->class][player->readyweapon];
break;
}
angle = pmo->angle - i * (ANG45 / 16);
slope = P_AimLineAttack(player->mo, angle, 1.5 * MELEERANGE);
if (linetarget)
{
P_LineAttack(pmo, angle, 1.5 * MELEERANGE, slope, damage);
pmo->angle = R_PointToAngle2(pmo->x, pmo->y,
linetarget->x, linetarget->y);
if (linetarget->player || linetarget->flags & MF_COUNTKILL)
{
newLife = player->health + (damage >> 4);
newLife = newLife > 100 ? 100 : newLife;
pmo->health = player->health = newLife;
P_SetPsprite(player, ps_weapon, S_CSTAFFATK2_1);
}
player->mana[MANA_1] -=
WeaponManaUse[player->class][player->readyweapon];
break;
}
}
}
//============================================================================
//
// A_CStaffAttack
//
//============================================================================
void A_CStaffAttack(player_t * player, pspdef_t * psp)
{
mobj_t *mo;
mobj_t *pmo;
player->mana[MANA_1] -= WeaponManaUse[player->class][player->readyweapon];
pmo = player->mo;
mo = P_SPMAngle(pmo, MT_CSTAFF_MISSILE, pmo->angle - (ANG45 / 15));
if (mo)
{
mo->special2 = 32;
}
mo = P_SPMAngle(pmo, MT_CSTAFF_MISSILE, pmo->angle + (ANG45 / 15));
if (mo)
{
mo->special2 = 0;
}
S_StartSound(player->mo, SFX_CLERIC_CSTAFF_FIRE);
}
//============================================================================
//
// A_CStaffMissileSlither
//
//============================================================================
void A_CStaffMissileSlither(mobj_t * actor)
{
fixed_t newX, newY;
int weaveXY;
int angle;
weaveXY = actor->special2;
angle = (actor->angle + ANG90) >> ANGLETOFINESHIFT;
newX = actor->x - FixedMul(finecosine[angle], FloatBobOffsets[weaveXY]);
newY = actor->y - FixedMul(finesine[angle], FloatBobOffsets[weaveXY]);
weaveXY = (weaveXY + 3) & 63;
newX += FixedMul(finecosine[angle], FloatBobOffsets[weaveXY]);
newY += FixedMul(finesine[angle], FloatBobOffsets[weaveXY]);
P_TryMove(actor, newX, newY);
actor->special2 = weaveXY;
}
//============================================================================
//
// A_CStaffInitBlink
//
//============================================================================
void A_CStaffInitBlink(player_t * player, pspdef_t * psp)
{
player->mo->special1 = (P_Random() >> 1) + 20;
}
//============================================================================
//
// A_CStaffCheckBlink
//
//============================================================================
void A_CStaffCheckBlink(player_t * player, pspdef_t * psp)
{
if (!--player->mo->special1)
{
P_SetPsprite(player, ps_weapon, S_CSTAFFBLINK1);
player->mo->special1 = (P_Random() + 50) >> 2;
}
}
//============================================================================
//
// A_CFlameAttack
//
//============================================================================
#define FLAMESPEED (0.45*FRACUNIT)
#define CFLAMERANGE (12*64*FRACUNIT)
void A_CFlameAttack(player_t * player, pspdef_t * psp)
{
mobj_t *mo;
mo = P_SpawnPlayerMissile(player->mo, MT_CFLAME_MISSILE);
if (mo)
{
mo->thinker.function = P_BlasterMobjThinker;
mo->special1 = 2;
}
player->mana[MANA_2] -= WeaponManaUse[player->class][player->readyweapon];
S_StartSound(player->mo, SFX_CLERIC_FLAME_FIRE);
}
//============================================================================
//
// A_CFlamePuff
//
//============================================================================
void A_CFlamePuff(mobj_t * actor)
{
A_UnHideThing(actor);
actor->momx = 0;
actor->momy = 0;
actor->momz = 0;
S_StartSound(actor, SFX_CLERIC_FLAME_EXPLODE);
}
//============================================================================
//
// A_CFlameMissile
//
//============================================================================
void A_CFlameMissile(mobj_t * actor)
{
int i;
int an, an90;
fixed_t dist;
mobj_t *mo;
A_UnHideThing(actor);
S_StartSound(actor, SFX_CLERIC_FLAME_EXPLODE);
if (BlockingMobj && BlockingMobj->flags & MF_SHOOTABLE)
{ // Hit something, so spawn the flame circle around the thing
dist = BlockingMobj->radius + 18 * FRACUNIT;
for (i = 0; i < 4; i++)
{
an = (i * ANG45) >> ANGLETOFINESHIFT;
an90 = (i * ANG45 + ANG90) >> ANGLETOFINESHIFT;
mo = P_SpawnMobj(BlockingMobj->x + FixedMul(dist, finecosine[an]),
BlockingMobj->y + FixedMul(dist, finesine[an]),
BlockingMobj->z + 5 * FRACUNIT, MT_CIRCLEFLAME);
if (mo)
{
mo->angle = an << ANGLETOFINESHIFT;
mo->target = actor->target;
mo->momx = mo->special1 =
FixedMul(FLAMESPEED, finecosine[an]);
mo->momy = mo->special2 = FixedMul(FLAMESPEED, finesine[an]);
mo->tics -= P_Random() & 3;
}
mo = P_SpawnMobj(BlockingMobj->x - FixedMul(dist, finecosine[an]),
BlockingMobj->y - FixedMul(dist, finesine[an]),
BlockingMobj->z + 5 * FRACUNIT, MT_CIRCLEFLAME);
if (mo)
{
mo->angle = ANG180 + (an << ANGLETOFINESHIFT);
mo->target = actor->target;
mo->momx = mo->special1 = FixedMul(-FLAMESPEED,
finecosine[an]);
mo->momy = mo->special2 = FixedMul(-FLAMESPEED, finesine[an]);
mo->tics -= P_Random() & 3;
}
}
P_SetMobjState(actor, S_FLAMEPUFF2_1);
}
}
/*
void A_CFlameAttack(player_t *player, pspdef_t *psp)
{
mobj_t *pmo;
angle_t angle;
int damage;
int i;
int an, an90;
fixed_t dist;
mobj_t *mo;
pmo = player->mo;
P_BulletSlope(pmo);
damage = 25+HITDICE(3);
angle = pmo->angle;
if(player->refire)
{
angle += (P_Random()-P_Random())<<17;
}
P_AimLineAttack(pmo, angle, CFLAMERANGE); // Correctly set linetarget
if(!linetarget)
{
angle += ANG1*2;
P_AimLineAttack(pmo, angle, CFLAMERANGE);
if(!linetarget)
{
angle -= ANG1*4;
P_AimLineAttack(pmo, angle, CFLAMERANGE);
if(!linetarget)
{
angle += ANG1*2;
}
}
}
if(linetarget)
{
PuffType = MT_FLAMEPUFF2;
}
else
{
PuffType = MT_FLAMEPUFF;
}
P_LineAttack(pmo, angle, CFLAMERANGE, bulletslope, damage);
if(linetarget)
{ // Hit something, so spawn the flame circle around the thing
dist = linetarget->radius+18*FRACUNIT;
for(i = 0; i < 4; i++)
{
an = (i*ANG45)>>ANGLETOFINESHIFT;
an90 = (i*ANG45+ANG90)>>ANGLETOFINESHIFT;
mo = P_SpawnMobj(linetarget->x+FixedMul(dist, finecosine[an]),
linetarget->y+FixedMul(dist, finesine[an]),
linetarget->z+5*FRACUNIT, MT_CIRCLEFLAME);
if(mo)
{
mo->angle = an<<ANGLETOFINESHIFT;
mo->target = pmo;
mo->momx = mo->special1 = FixedMul(FLAMESPEED, finecosine[an]);
mo->momy = mo->special2 = FixedMul(FLAMESPEED, finesine[an]);
mo->tics -= P_Random()&3;
}
mo = P_SpawnMobj(linetarget->x-FixedMul(dist, finecosine[an]),
linetarget->y-FixedMul(dist, finesine[an]),
linetarget->z+5*FRACUNIT, MT_CIRCLEFLAME);
if(mo)
{
mo->angle = ANG180+(an<<ANGLETOFINESHIFT);
mo->target = pmo;
mo->momx = mo->special1 = FixedMul(-FLAMESPEED,
finecosine[an]);
mo->momy = mo->special2 = FixedMul(-FLAMESPEED, finesine[an]);
mo->tics -= P_Random()&3;
}
}
}
// Create a line of flames from the player to the flame puff
CFlameCreateFlames(player->mo);
player->mana[MANA_2] -= WeaponManaUse[player->class][player->readyweapon];
S_StartSound(player->mo, SFX_CLERIC_FLAME_FIRE);
}
*/
//============================================================================
//
// A_CFlameRotate
//
//============================================================================
#define FLAMEROTSPEED 2*FRACUNIT
void A_CFlameRotate(mobj_t * actor)
{
int an;
an = (actor->angle + ANG90) >> ANGLETOFINESHIFT;
actor->momx = actor->special1 + FixedMul(FLAMEROTSPEED, finecosine[an]);
actor->momy = actor->special2 + FixedMul(FLAMEROTSPEED, finesine[an]);
actor->angle += ANG90 / 15;
}
//============================================================================
//
// A_CHolyAttack3
//
// Spawns the spirits
//============================================================================
void A_CHolyAttack3(mobj_t * actor)
{
P_SpawnMissile(actor, actor->target, MT_HOLY_MISSILE);
S_StartSound(actor, SFX_CHOLY_FIRE);
}
//============================================================================
//
// A_CHolyAttack2
//
// Spawns the spirits
//============================================================================
void A_CHolyAttack2(mobj_t * actor)
{
int j;
int i;
mobj_t *mo;
mobj_t *tail, *next;
for (j = 0; j < 4; j++)
{
mo = P_SpawnMobj(actor->x, actor->y, actor->z, MT_HOLY_FX);
if (!mo)
{
continue;
}
switch (j)
{ // float bob index
case 0:
mo->special2 = P_Random() & 7; // upper-left
break;
case 1:
mo->special2 = 32 + (P_Random() & 7); // upper-right
break;
case 2:
mo->special2 = (32 + (P_Random() & 7)) << 16; // lower-left
break;
case 3:
mo->special2 =
((32 + (P_Random() & 7)) << 16) + 32 + (P_Random() & 7);
break;
}
mo->z = actor->z;
mo->angle = actor->angle + (ANG45 + ANG45 / 2) - ANG45 * j;
P_ThrustMobj(mo, mo->angle, mo->info->speed);
mo->target = actor->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 (linetarget)
{
mo->special1 = (int) linetarget;
mo->flags |= MF_NOCLIP | MF_SKULLFLY;
mo->flags &= ~MF_MISSILE;
}
tail = P_SpawnMobj(mo->x, mo->y, mo->z, MT_HOLY_TAIL);
tail->special2 = (int) mo; // parent
for (i = 1; i < 3; i++)
{
next = P_SpawnMobj(mo->x, mo->y, mo->z, MT_HOLY_TAIL);
P_SetMobjState(next, next->info->spawnstate + 1);
tail->special1 = (int) next;
tail = next;
}
tail->special1 = 0; // last tail bit
}
}
//============================================================================
//
// A_CHolyAttack
//
//============================================================================
void A_CHolyAttack(player_t * player, pspdef_t * psp)
{
mobj_t *mo;
player->mana[MANA_1] -= WeaponManaUse[player->class][player->readyweapon];
player->mana[MANA_2] -= WeaponManaUse[player->class][player->readyweapon];
mo = P_SpawnPlayerMissile(player->mo, MT_HOLY_MISSILE);
if (player == &players[consoleplayer])
{
player->damagecount = 0;
player->bonuscount = 0;
I_SetPalette((byte *) W_CacheLumpNum(W_GetNumForName("playpal"),
PU_CACHE) + STARTHOLYPAL * 768);
}
S_StartSound(player->mo, SFX_CHOLY_FIRE);
}
//============================================================================
//
// A_CHolyPalette
//
//============================================================================
void A_CHolyPalette(player_t * player, pspdef_t * psp)
{
int pal;
if (player == &players[consoleplayer])
{
pal = STARTHOLYPAL + psp->state - (&states[S_CHOLYATK_6]);
if (pal == STARTHOLYPAL + 3)
{ // reset back to original playpal
pal = 0;
}
I_SetPalette((byte *) W_CacheLumpNum(W_GetNumForName("playpal"),
PU_CACHE) + pal * 768);
}
}
//============================================================================
//
// CHolyFindTarget
//
//============================================================================
static void CHolyFindTarget(mobj_t * actor)
{
mobj_t *target;
target = P_RoughMonsterSearch(actor, 6);
if (target != NULL)
{
actor->special1 = (int) 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(mobj_t * actor, angle_t thresh,
angle_t turnMax)
{
int dir;
int dist;
angle_t delta;
angle_t angle;
mobj_t *target;
fixed_t newZ;
fixed_t deltaZ;
target = (mobj_t *) actor->special1;
if (target == NULL)
{
return;
}
if (!(target->flags & MF_SHOOTABLE)
|| (!(target->flags & MF_COUNTKILL) && !target->player))
{ // Target died/target isn't a player or creature
actor->special1 = 0;
actor->flags &= ~(MF_NOCLIP | MF_SKULLFLY);
actor->flags |= MF_MISSILE;
CHolyFindTarget(actor);
return;
}
dir = P_FaceMobj(actor, target, &delta);
if (delta > thresh)
{
delta >>= 1;
if (delta > turnMax)
{
delta = turnMax;
}
}
if (dir)
{ // Turn clockwise
actor->angle += delta;
}
else
{ // Turn counter clockwise
actor->angle -= delta;
}
angle = actor->angle >> ANGLETOFINESHIFT;
actor->momx = FixedMul(actor->info->speed, finecosine[angle]);
actor->momy = FixedMul(actor->info->speed, finesine[angle]);
if (!(leveltime & 15)
|| actor->z > target->z + (target->height)
|| actor->z + actor->height < target->z)
{
newZ = target->z + ((P_Random() * target->height) >> 8);
deltaZ = newZ - actor->z;
if (abs(deltaZ) > 15 * FRACUNIT)
{
if (deltaZ > 0)
{
deltaZ = 15 * FRACUNIT;
}
else
{
deltaZ = -15 * FRACUNIT;
}
}
dist = P_AproxDistance(target->x - actor->x, target->y - actor->y);
dist = dist / actor->info->speed;
if (dist < 1)
{
dist = 1;
}
actor->momz = deltaZ / dist;
}
return;
}
//============================================================================
//
// A_CHolyWeave
//
//============================================================================
static void CHolyWeave(mobj_t * actor)
{
fixed_t newX, newY;
int weaveXY, weaveZ;
int angle;
weaveXY = actor->special2 >> 16;
weaveZ = actor->special2 & 0xFFFF;
angle = (actor->angle + ANG90) >> ANGLETOFINESHIFT;
newX = actor->x - FixedMul(finecosine[angle],
FloatBobOffsets[weaveXY] << 2);
newY = actor->y - FixedMul(finesine[angle],
FloatBobOffsets[weaveXY] << 2);
weaveXY = (weaveXY + (P_Random() % 5)) & 63;
newX += FixedMul(finecosine[angle], FloatBobOffsets[weaveXY] << 2);
newY += FixedMul(finesine[angle], FloatBobOffsets[weaveXY] << 2);
P_TryMove(actor, newX, newY);
actor->z -= FloatBobOffsets[weaveZ] << 1;
weaveZ = (weaveZ + (P_Random() % 5)) & 63;
actor->z += FloatBobOffsets[weaveZ] << 1;
actor->special2 = weaveZ + (weaveXY << 16);
}
//============================================================================
//
// A_CHolySeek
//
//============================================================================
void A_CHolySeek(mobj_t * actor)
{
actor->health--;
if (actor->health <= 0)
{
actor->momx >>= 2;
actor->momy >>= 2;
actor->momz = 0;
P_SetMobjState(actor, actor->info->deathstate);
actor->tics -= P_Random() & 3;
return;
}
if (actor->special1)
{
CHolySeekerMissile(actor, actor->args[0] * ANG1,
actor->args[0] * ANG1 * 2);
if (!((leveltime + 7) & 15))
{
actor->args[0] = 5 + (P_Random() / 20);
}
}
CHolyWeave(actor);
}
//============================================================================
//
// CHolyTailFollow
//
//============================================================================
static void CHolyTailFollow(mobj_t * actor, fixed_t dist)
{
mobj_t *child;
int an;
fixed_t oldDistance, newDistance;
child = (mobj_t *) actor->special1;
if (child)
{
an = R_PointToAngle2(actor->x, actor->y, child->x,
child->y) >> ANGLETOFINESHIFT;
oldDistance =
P_AproxDistance(child->x - actor->x, child->y - actor->y);
if (P_TryMove
(child, actor->x + FixedMul(dist, finecosine[an]),
actor->y + FixedMul(dist, finesine[an])))
{
newDistance = P_AproxDistance(child->x - actor->x,
child->y - actor->y) - FRACUNIT;
if (oldDistance < FRACUNIT)
{
if (child->z < actor->z)
{
child->z = actor->z - dist;
}
else
{
child->z = actor->z + dist;
}
}
else
{
child->z = actor->z + FixedMul(FixedDiv(newDistance,
oldDistance),
child->z - actor->z);
}
}
CHolyTailFollow(child, dist - FRACUNIT);
}
}
//============================================================================
//
// CHolyTailRemove
//
//============================================================================
static void CHolyTailRemove(mobj_t * actor)
{
mobj_t *child;
child = (mobj_t *) actor->special1;
if (child)
{
CHolyTailRemove(child);
}
P_RemoveMobj(actor);
}
//============================================================================
//
// A_CHolyTail
//
//============================================================================
void A_CHolyTail(mobj_t * actor)
{
mobj_t *parent;
parent = (mobj_t *) actor->special2;
if (parent)
{
if (parent->state >= &states[parent->info->deathstate])
{ // Ghost removed, so remove all tail parts
CHolyTailRemove(actor);
return;
}
else if (P_TryMove(actor, parent->x - FixedMul(14 * FRACUNIT,
finecosine[parent->
angle >>
ANGLETOFINESHIFT]),
parent->y - FixedMul(14 * FRACUNIT,
finesine[parent->
angle >>
ANGLETOFINESHIFT])))
{
actor->z = parent->z - 5 * FRACUNIT;
}
CHolyTailFollow(actor, 10 * FRACUNIT);
}
}
//============================================================================
//
// A_CHolyCheckScream
//
//============================================================================
void A_CHolyCheckScream(mobj_t * actor)
{
A_CHolySeek(actor);
if (P_Random() < 20)
{
S_StartSound(actor, SFX_SPIRIT_ACTIVE);
}
if (!actor->special1)
{
CHolyFindTarget(actor);
}
}
//============================================================================
//
// A_CHolySpawnPuff
//
//============================================================================
void A_CHolySpawnPuff(mobj_t * actor)
{
P_SpawnMobj(actor->x, actor->y, actor->z, MT_HOLY_MISSILE_PUFF);
}
//----------------------------------------------------------------------------
//
// PROC A_FireConePL1
//
//----------------------------------------------------------------------------
#define SHARDSPAWN_LEFT 1
#define SHARDSPAWN_RIGHT 2
#define SHARDSPAWN_UP 4
#define SHARDSPAWN_DOWN 8
void A_FireConePL1(player_t * player, pspdef_t * psp)
{
angle_t angle;
int damage;
int slope;
int i;
mobj_t *pmo, *mo;
int conedone = false;
pmo = player->mo;
player->mana[MANA_1] -= WeaponManaUse[player->class][player->readyweapon];
S_StartSound(pmo, SFX_MAGE_SHARDS_FIRE);
damage = 90 + (P_Random() & 15);
for (i = 0; i < 16; i++)
{
angle = pmo->angle + i * (ANG45 / 16);
slope = P_AimLineAttack(pmo, angle, MELEERANGE);
if (linetarget)
{
pmo->flags2 |= MF2_ICEDAMAGE;
P_DamageMobj(linetarget, pmo, pmo, damage);
pmo->flags2 &= ~MF2_ICEDAMAGE;
conedone = true;
break;
}
}
// didn't find any creatures, so fire projectiles
if (!conedone)
{
mo = P_SpawnPlayerMissile(pmo, MT_SHARDFX1);
if (mo)
{
mo->special1 = SHARDSPAWN_LEFT | SHARDSPAWN_DOWN | SHARDSPAWN_UP
| SHARDSPAWN_RIGHT;
mo->special2 = 3; // Set sperm count (levels of reproductivity)
mo->target = pmo;
mo->args[0] = 3; // Mark Initial shard as super damage
}
}
}
void A_ShedShard(mobj_t * actor)
{
mobj_t *mo;
int spawndir = actor->special1;
int spermcount = actor->special2;
if (spermcount <= 0)
return; // No sperm left
actor->special2 = 0;
spermcount--;
// every so many calls, spawn a new missile in it's set directions
if (spawndir & SHARDSPAWN_LEFT)
{
mo = P_SpawnMissileAngleSpeed(actor, MT_SHARDFX1,
actor->angle + (ANG45 / 9), 0,
(20 + 2 * spermcount) << FRACBITS);
if (mo)
{
mo->special1 = SHARDSPAWN_LEFT;
mo->special2 = spermcount;
mo->momz = actor->momz;
mo->target = actor->target;
mo->args[0] = (spermcount == 3) ? 2 : 0;
}
}
if (spawndir & SHARDSPAWN_RIGHT)
{
mo = P_SpawnMissileAngleSpeed(actor, MT_SHARDFX1,
actor->angle - (ANG45 / 9), 0,
(20 + 2 * spermcount) << FRACBITS);
if (mo)
{
mo->special1 = SHARDSPAWN_RIGHT;
mo->special2 = spermcount;
mo->momz = actor->momz;
mo->target = actor->target;
mo->args[0] = (spermcount == 3) ? 2 : 0;
}
}
if (spawndir & SHARDSPAWN_UP)
{
mo = P_SpawnMissileAngleSpeed(actor, MT_SHARDFX1, actor->angle,
0, (15 + 2 * spermcount) << FRACBITS);
if (mo)
{
mo->momz = actor->momz;
mo->z += 8 * FRACUNIT;
if (spermcount & 1) // Every other reproduction
mo->special1 =
SHARDSPAWN_UP | SHARDSPAWN_LEFT | SHARDSPAWN_RIGHT;
else
mo->special1 = SHARDSPAWN_UP;
mo->special2 = spermcount;
mo->target = actor->target;
mo->args[0] = (spermcount == 3) ? 2 : 0;
}
}
if (spawndir & SHARDSPAWN_DOWN)
{
mo = P_SpawnMissileAngleSpeed(actor, MT_SHARDFX1, actor->angle,
0, (15 + 2 * spermcount) << FRACBITS);
if (mo)
{
mo->momz = actor->momz;
mo->z -= 4 * FRACUNIT;
if (spermcount & 1) // Every other reproduction
mo->special1 =
SHARDSPAWN_DOWN | SHARDSPAWN_LEFT | SHARDSPAWN_RIGHT;
else
mo->special1 = SHARDSPAWN_DOWN;
mo->special2 = spermcount;
mo->target = actor->target;
mo->args[0] = (spermcount == 3) ? 2 : 0;
}
}
}
//----------------------------------------------------------------------------
//
// PROC A_HideInCeiling
//
//----------------------------------------------------------------------------
/*
void A_HideInCeiling(mobj_t *actor)
{
actor->z = actor->ceilingz+4*FRACUNIT;
}
*/
//----------------------------------------------------------------------------
//
// PROC A_FloatPuff
//
//----------------------------------------------------------------------------
/*
void A_FloatPuff(mobj_t *puff)
{
puff->momz += 1.8*FRACUNIT;
}
*/
void A_Light0(player_t * player, pspdef_t * psp)
{
player->extralight = 0;
}
/*
void A_Light1(player_t *player, pspdef_t *psp)
{
player->extralight = 1;
}
*/
/*
void A_Light2(player_t *player, pspdef_t *psp)
{
player->extralight = 2;
}
*/
//------------------------------------------------------------------------
//
// PROC P_SetupPsprites
//
// Called at start of level for each player
//
//------------------------------------------------------------------------
void P_SetupPsprites(player_t * player)
{
int i;
// Remove all psprites
for (i = 0; i < NUMPSPRITES; i++)
{
player->psprites[i].state = NULL;
}
// Spawn the ready weapon
player->pendingweapon = player->readyweapon;
P_BringUpWeapon(player);
}
//------------------------------------------------------------------------
//
// PROC P_MovePsprites
//
// Called every tic by player thinking routine
//
//------------------------------------------------------------------------
void P_MovePsprites(player_t * player)
{
int i;
pspdef_t *psp;
state_t *state;
psp = &player->psprites[0];
for (i = 0; i < NUMPSPRITES; i++, psp++)
{
if ((state = psp->state) != 0) // a null state means not active
{
// drop tic count and possibly change state
if (psp->tics != -1) // a -1 tic count never changes
{
psp->tics--;
if (!psp->tics)
{
P_SetPsprite(player, i, psp->state->nextstate);
}
}
}
}
player->psprites[ps_flash].sx = player->psprites[ps_weapon].sx;
player->psprites[ps_flash].sy = player->psprites[ps_weapon].sy;
}