/*
-------------------------
Howler_Patrol
-------------------------
*/
static void Howler_Patrol( void )
{
NPCInfo->localState = LSTATE_CLEAR;
//If we have somewhere to go, then do that
if ( UpdateGoal() )
{
NPC_Howler_Move( 100 );
}
vec3_t dif;
VectorSubtract( g_entities[0].currentOrigin, NPC->currentOrigin, dif );
if ( VectorLengthSquared( dif ) < 256 * 256 )
{
G_SetEnemy( NPC, &g_entities[0] );
}
if ( NPC_CheckEnemyExt( qtrue ) == qfalse )
{
Howler_Idle();
return;
}
Howler_Attack( 0.0f, qtrue );
}
//[CoOp]
//Replaced with SP version
static void Howler_Patrol( void )
{
gentity_t *ClosestPlayer = FindClosestPlayer(NPC->r.currentOrigin, NPC->client->enemyTeam);
NPCInfo->localState = LSTATE_CLEAR;
//If we have somewhere to go, then do that
if ( UpdateGoal() )
{
NPC_Howler_Move( 100 );
}
if(ClosestPlayer)
{//attack enemy players that are close.
if(Distance(ClosestPlayer->r.currentOrigin, NPC->r.currentOrigin) < 256 * 256)
{
G_SetEnemy( NPC, ClosestPlayer );
}
}
if ( NPC_CheckEnemyExt( qtrue ) == qfalse )
{
Howler_Idle();
return;
}
Howler_Attack( 0.0f, qtrue );
}
//----------------------------------
void Howler_Combat( void )
{
float distance;
qboolean advance;
// If we cannot see our target or we have somewhere to go, then do that
if ( !NPC_ClearLOS4( NPC->enemy ) || UpdateGoal( ))
{
NPCInfo->combatMove = qtrue;
NPCInfo->goalEntity = NPC->enemy;
NPCInfo->goalRadius = MAX_DISTANCE; // just get us within combat range
NPC_MoveToGoal( qtrue );
return;
}
// Sometimes I have problems with facing the enemy I'm attacking, so force the issue so I don't look dumb
NPC_FaceEnemy( qtrue );
distance = DistanceHorizontalSquared( &NPC->r.currentOrigin, &NPC->enemy->r.currentOrigin );
advance = (qboolean)( distance > MIN_DISTANCE_SQR ? qtrue : qfalse );
if (( advance || NPCInfo->localState == LSTATE_WAITING ) && TIMER_Done( NPC, "attacking" )) // waiting monsters can't attack
{
if ( TIMER_Done2( NPC, "takingPain", qtrue ))
{
NPCInfo->localState = LSTATE_CLEAR;
}
else
{
Howler_Move( qtrue );
}
}
else
{
Howler_Attack();
}
}
//replaced with SP version.
void NPC_BSHowler_Default( void )
{
if ( NPC->client->ps.legsAnim != BOTH_GESTURE1 )
{
NPC->count = 0;
}
//FIXME: if in jump, do damage in front and maybe knock them down?
if ( !TIMER_Done( NPC, "attacking" ) )
{
if ( NPC->enemy )
{
//NPC_FaceEnemy( qfalse );
Howler_Attack( Distance( NPC->enemy->r.currentOrigin, NPC->r.currentOrigin ), qfalse );
}
else
{
//NPC_UpdateAngles( qfalse, qtrue );
Howler_Attack( 0.0f, qfalse );
}
NPC_UpdateAngles( qfalse, qtrue );
return;
}
if ( NPC->enemy )
{
if ( NPCInfo->stats.aggression > 0 )
{
if ( TIMER_Done( NPC, "aggressionDecay" ) )
{
NPCInfo->stats.aggression--;
TIMER_Set( NPC, "aggressionDecay", 500 );
}
}
//RAFIXME - No fleeing, need to fix this at some point.
/*
if ( !TIMER_Done( NPC, "flee" )
&& NPC_BSFlee() ) //this can clear ENEMY
{//successfully trying to run away
return;
}
*/
if ( NPC->enemy == NULL)
{
NPC_UpdateAngles( qfalse, qtrue );
return;
}
if ( NPCInfo->localState == LSTATE_FLEE )
{//we were fleeing, now done (either timer ran out or we cannot flee anymore
if ( NPC_ClearLOS4( NPC->enemy ) )
{//if enemy is still around, go berzerk
NPCInfo->localState = LSTATE_BERZERK;
}
else
{//otherwise, lick our wounds?
NPCInfo->localState = LSTATE_CLEAR;
TIMER_Set( NPC, "standing", Q_irand( 3000, 10000 ) );
}
}
else if ( NPCInfo->localState == LSTATE_BERZERK )
{//go nuts!
}
else if ( NPCInfo->stats.aggression >= Q_irand( 75, 125 ) )
{//that's it, go nuts!
NPCInfo->localState = LSTATE_BERZERK;
}
else if ( !TIMER_Done( NPC, "retreating" ) )
{//trying to back off
NPC_FaceEnemy( qtrue );
if ( NPC->client->ps.speed > NPCInfo->stats.walkSpeed )
{
NPC->client->ps.speed = NPCInfo->stats.walkSpeed;
}
ucmd.buttons |= BUTTON_WALKING;
if ( Distance( NPC->enemy->r.currentOrigin, NPC->r.currentOrigin ) < HOWLER_RETREAT_DIST )
{//enemy is close
vec3_t moveDir;
AngleVectors( NPC->r.currentAngles, moveDir, NULL, NULL );
VectorScale( moveDir, -1, moveDir );
if ( !NAV_DirSafe( NPC, moveDir, 8 ) )
{//enemy is backing me up against a wall or ledge! Start to get really mad!
NPCInfo->stats.aggression += 2;
}
else
{//back off
ucmd.forwardmove = -127;
}
//enemy won't leave me alone, get mad...
NPCInfo->stats.aggression++;
}
return;
}
else if ( TIMER_Done( NPC, "standing" ) )
{//not standing around
if ( !(NPCInfo->last_ucmd.forwardmove)
&& !(NPCInfo->last_ucmd.rightmove) )
{//stood last frame
if ( TIMER_Done( NPC, "walking" )
&& TIMER_Done( NPC, "running" ) )
{//not walking or running
if ( Q_irand( 0, 2 ) )
{//run for a while
TIMER_Set( NPC, "walking", Q_irand( 4000, 8000 ) );
}
else
{//walk for a bit
TIMER_Set( NPC, "running", Q_irand( 2500, 5000 ) );
}
}
}
else if ( (NPCInfo->last_ucmd.buttons&BUTTON_WALKING) )
{//walked last frame
if ( TIMER_Done( NPC, "walking" ) )
{//just finished walking
if ( Q_irand( 0, 5 ) || DistanceSquared( NPC->enemy->r.currentOrigin, NPC->r.currentOrigin ) < MAX_DISTANCE_SQR )
{//run for a while
TIMER_Set( NPC, "running", Q_irand( 4000, 20000 ) );
}
else
{//stand for a bit
TIMER_Set( NPC, "standing", Q_irand( 2000, 6000 ) );
}
}
}
else
{//ran last frame
if ( TIMER_Done( NPC, "running" ) )
{//just finished running
if ( Q_irand( 0, 8 ) || DistanceSquared( NPC->enemy->r.currentOrigin, NPC->r.currentOrigin ) < MAX_DISTANCE_SQR )
{//walk for a while
TIMER_Set( NPC, "walking", Q_irand( 3000, 10000 ) );
}
else
{//stand for a bit
TIMER_Set( NPC, "standing", Q_irand( 2000, 6000 ) );
}
}
}
}
if ( NPC_ValidEnemy( NPC->enemy ) == qfalse )
{
TIMER_Remove( NPC, "lookForNewEnemy" );//make them look again right now
if ( !NPC->enemy->inuse || level.time - NPC->enemy->s.time > Q_irand( 10000, 15000 ) )
{//it's been a while since the enemy died, or enemy is completely gone, get bored with him
NPC->enemy = NULL;
Howler_Patrol();
NPC_UpdateAngles( qtrue, qtrue );
return;
}
}
if ( TIMER_Done( NPC, "lookForNewEnemy" ) )
{
gentity_t *sav_enemy = NPC->enemy;//FIXME: what about NPC->lastEnemy?
gentity_t *newEnemy;
NPC->enemy = NULL;
newEnemy = NPC_CheckEnemy( (qboolean)(NPCInfo->confusionTime < level.time), qfalse, qfalse );
NPC->enemy = sav_enemy;
if ( newEnemy && newEnemy != sav_enemy )
{//picked up a new enemy!
NPC->lastEnemy = NPC->enemy;
G_SetEnemy( NPC, newEnemy );
if ( NPC->enemy != NPC->lastEnemy )
{//clear this so that we only sniff the player the first time we pick them up
//RACC - this doesn't appear to get used for Howlers
//NPC->useDebounceTime = 0;
}
//hold this one for at least 5-15 seconds
TIMER_Set( NPC, "lookForNewEnemy", Q_irand( 5000, 15000 ) );
}
else
{//look again in 2-5 secs
TIMER_Set( NPC, "lookForNewEnemy", Q_irand( 2000, 5000 ) );
}
}
Howler_Combat();
if ( TIMER_Done( NPC, "speaking" ) )
{
if ( !TIMER_Done( NPC, "standing" )
|| !TIMER_Done( NPC, "retreating" ))
{
G_SoundOnEnt( NPC, CHAN_VOICE, va( "sound/chars/howler/idle_hiss%d.mp3", Q_irand( 1, 2 ) ) );
}
else if ( !TIMER_Done( NPC, "walking" )
|| NPCInfo->localState == LSTATE_FLEE )
{
G_SoundOnEnt( NPC, CHAN_VOICE, va( "sound/chars/howler/howl_talk%d.mp3", Q_irand( 1, 5 ) ) );
}
else
{
G_SoundOnEnt( NPC, CHAN_VOICE, va( "sound/chars/howler/howl_yell%d.mp3", Q_irand( 1, 5 ) ) );
}
if ( NPCInfo->localState == LSTATE_BERZERK
|| NPCInfo->localState == LSTATE_FLEE )
{
TIMER_Set( NPC, "speaking", Q_irand( 1000, 4000 ) );
}
else
{
TIMER_Set( NPC, "speaking", Q_irand( 3000, 8000 ) );
}
}
return;
}
else
{
if ( TIMER_Done( NPC, "speaking" ) )
{
if ( !Q_irand( 0, 3 ) )
{
G_SoundOnEnt( NPC, CHAN_VOICE, va( "sound/chars/howler/idle_hiss%d.mp3", Q_irand( 1, 2 ) ) );
}
else
{
G_SoundOnEnt( NPC, CHAN_VOICE, va( "sound/chars/howler/howl_talk%d.mp3", Q_irand( 1, 5 ) ) );
}
TIMER_Set( NPC, "speaking", Q_irand( 4000, 12000 ) );
}
if ( NPCInfo->stats.aggression > 0 )
{
if ( TIMER_Done( NPC, "aggressionDecay" ) )
{
NPCInfo->stats.aggression--;
TIMER_Set( NPC, "aggressionDecay", 200 );
}
}
if ( TIMER_Done( NPC, "standing" ) )
{//not standing around
if ( !(NPCInfo->last_ucmd.forwardmove)
&& !(NPCInfo->last_ucmd.rightmove) )
{//stood last frame
if ( TIMER_Done( NPC, "walking" )
&& TIMER_Done( NPC, "running" ) )
{//not walking or running
if ( NPCInfo->goalEntity )
{//have somewhere to go
if ( Q_irand( 0, 2 ) )
{//walk for a while
TIMER_Set( NPC, "walking", Q_irand( 3000, 10000 ) );
}
else
{//run for a bit
TIMER_Set( NPC, "running", Q_irand( 2500, 5000 ) );
}
}
}
}
else if ( (NPCInfo->last_ucmd.buttons&BUTTON_WALKING) )
{//walked last frame
if ( TIMER_Done( NPC, "walking" ) )
{//just finished walking
if ( Q_irand( 0, 3 ) )
{//run for a while
TIMER_Set( NPC, "running", Q_irand( 3000, 6000 ) );
}
else
{//stand for a bit
TIMER_Set( NPC, "standing", Q_irand( 2500, 5000 ) );
}
}
}
else
{//ran last frame
if ( TIMER_Done( NPC, "running" ) )
{//just finished running
if ( Q_irand( 0, 2 ) )
{//walk for a while
TIMER_Set( NPC, "walking", Q_irand( 6000, 15000 ) );
}
else
{//stand for a bit
TIMER_Set( NPC, "standing", Q_irand( 4000, 6000 ) );
}
}
}
}
if ( NPCInfo->scriptFlags & SCF_LOOK_FOR_ENEMIES )
{
Howler_Patrol();
}
else
{
Howler_Idle();
}
}
NPC_UpdateAngles( qfalse, qtrue );
}
//----------------------------------
//replaced with SP version.
static void Howler_Combat( void )
{
qboolean faced = qfalse;
float distance;
qboolean advance = qfalse;
if ( NPC->client->ps.groundEntityNum == ENTITYNUM_NONE )
{//not on the ground
if ( NPC->client->ps.legsAnim == BOTH_JUMP1
|| NPC->client->ps.legsAnim == BOTH_INAIR1 )
{//flying through the air with the greatest of ease, etc
Howler_TryDamage( 10, qfalse, qfalse );
}
}
else
{//not in air, see if we should attack or advance
// If we cannot see our target or we have somewhere to go, then do that
if ( !NPC_ClearLOS4( NPC->enemy ) )//|| UpdateGoal( ))
{
NPCInfo->goalEntity = NPC->enemy;
NPCInfo->goalRadius = MAX_DISTANCE; // just get us within combat range
if ( NPCInfo->localState == LSTATE_BERZERK )
{
NPC_Howler_Move( 3 );
}
else
{
NPC_Howler_Move( 10 );
}
NPC_UpdateAngles( qfalse, qtrue );
return;
}
distance = DistanceHorizontal( NPC->r.currentOrigin, NPC->enemy->r.currentOrigin );
if ( NPC->enemy && NPC->enemy->client && PM_InKnockDown( &NPC->enemy->client->ps ) )
{//get really close to knocked down enemies
advance = (qboolean)( distance > MIN_DISTANCE ? qtrue : qfalse );
}
else
{
advance = (qboolean)( distance > MAX_DISTANCE ? qtrue : qfalse );//MIN_DISTANCE
}
if (( advance || NPCInfo->localState == LSTATE_WAITING ) && TIMER_Done( NPC, "attacking" )) // waiting monsters can't attack
{
if ( TIMER_Done2( NPC, "takingPain", qtrue ))
{
NPCInfo->localState = LSTATE_CLEAR;
}
else if ( TIMER_Done( NPC, "standing" ) )
{
faced = Howler_Move( qtrue );
}
}
else
{
Howler_Attack( distance, qfalse );
}
}
if ( !faced )
{
if ( //TIMER_Done( NPC, "standing" ) //not just standing there
//!advance //not moving
TIMER_Done( NPC, "attacking" ) )// not attacking
{//not standing around
// Sometimes I have problems with facing the enemy I'm attacking, so force the issue so I don't look dumb
NPC_FaceEnemy( qtrue );
}
else
{
NPC_UpdateAngles( qfalse, qtrue );
}
}
}
