Initial commit.

codemp/game/NPC_AI_Howler.c

@@ -0,0 +1,218 @@
+#include "b_local.h"
+
+// These define the working combat range for these suckers
+#define MIN_DISTANCE		54
+#define MIN_DISTANCE_SQR	( MIN_DISTANCE * MIN_DISTANCE )
+
+#define MAX_DISTANCE		128
+#define MAX_DISTANCE_SQR	( MAX_DISTANCE * MAX_DISTANCE )
+
+#define LSTATE_CLEAR		0
+#define LSTATE_WAITING		1
+
+/*
+-------------------------
+NPC_Howler_Precache
+-------------------------
+*/
+void NPC_Howler_Precache( void )
+{
+}
+
+
+/*
+-------------------------
+Howler_Idle
+-------------------------
+*/
+void Howler_Idle( void )
+{
+}
+
+
+/*
+-------------------------
+Howler_Patrol
+-------------------------
+*/
+void Howler_Patrol( void )
+{
+	vec3_t dif;
+
+	NPCInfo->localState = LSTATE_CLEAR;
+
+	//If we have somewhere to go, then do that
+	if ( UpdateGoal() )
+	{
+		ucmd.buttons &= ~BUTTON_WALKING;
+		NPC_MoveToGoal( qtrue );
+	}
+	else
+	{
+		if ( TIMER_Done( NPC, "patrolTime" ))
+		{
+			TIMER_Set( NPC, "patrolTime", crandom() * 5000 + 5000 );
+		}
+	}
+
+	//rwwFIXMEFIXME: Care about all clients, not just client 0
+	VectorSubtract( g_entities[0].r.currentOrigin, NPC->r.currentOrigin, dif );
+
+	if ( VectorLengthSquared( dif ) < 256 * 256 )
+	{
+		G_SetEnemy( NPC, &g_entities[0] );
+	}
+
+	if ( NPC_CheckEnemyExt( qtrue ) == qfalse )
+	{
+		Howler_Idle();
+		return;
+	}
+}
+ 
+/*
+-------------------------
+Howler_Move
+-------------------------
+*/
+void Howler_Move( qboolean visible )
+{
+	if ( NPCInfo->localState != LSTATE_WAITING )
+	{
+		NPCInfo->goalEntity = NPC->enemy;
+		NPC_MoveToGoal( qtrue );
+		NPCInfo->goalRadius = MAX_DISTANCE;	// just get us within combat range
+	}
+}
+
+//---------------------------------------------------------
+void Howler_TryDamage( gentity_t *enemy, int damage )
+{
+	vec3_t	end, dir;
+	trace_t	tr;
+
+	if ( !enemy )
+	{
+		return;
+	}
+
+	AngleVectors( NPC->client->ps.viewangles, dir, NULL, NULL );
+	VectorMA( NPC->r.currentOrigin, MIN_DISTANCE, dir, end );
+
+	// Should probably trace from the mouth, but, ah well.
+	trap_Trace( &tr, NPC->r.currentOrigin, vec3_origin, vec3_origin, end, NPC->s.number, MASK_SHOT );
+
+	if ( tr.entityNum != ENTITYNUM_WORLD )
+	{
+		G_Damage( &g_entities[tr.entityNum], NPC, NPC, dir, tr.endpos, damage, DAMAGE_NO_KNOCKBACK, MOD_MELEE );
+	}
+}
+
+//------------------------------
+void Howler_Attack( void )
+{
+	if ( !TIMER_Exists( NPC, "attacking" ))
+	{
+		// Going to do ATTACK1
+		TIMER_Set( NPC, "attacking", 1700 + random() * 200 );
+		NPC_SetAnim( NPC, SETANIM_BOTH, BOTH_ATTACK1, SETANIM_FLAG_OVERRIDE | SETANIM_FLAG_HOLD );
+
+		TIMER_Set( NPC, "attack_dmg", 200 ); // level two damage
+	}
+
+	// Need to do delayed damage since the attack animations encapsulate multiple mini-attacks
+	if ( TIMER_Done2( NPC, "attack_dmg", qtrue ))
+	{
+		Howler_TryDamage( NPC->enemy, 5 );
+	}
+
+	// Just using this to remove the attacking flag at the right time
+	TIMER_Done2( NPC, "attacking", 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( 1 );
+		}
+	}
+	else
+	{
+		Howler_Attack();
+	}
+}
+
+/*
+-------------------------
+NPC_Howler_Pain
+-------------------------
+*/
+void NPC_Howler_Pain( gentity_t *self, gentity_t *attacker, int damage ) 
+{
+	if ( damage >= 10 )
+	{
+		TIMER_Remove( self, "attacking" );
+		TIMER_Set( self, "takingPain", 2900 );
+
+		VectorCopy( self->NPC->lastPathAngles, self->s.angles );
+
+		NPC_SetAnim( self, SETANIM_BOTH, BOTH_PAIN1, SETANIM_FLAG_OVERRIDE | SETANIM_FLAG_HOLD );
+
+		if ( self->NPC )
+		{
+			self->NPC->localState = LSTATE_WAITING;
+		}
+	}
+}
+
+
+/*
+-------------------------
+NPC_BSHowler_Default
+-------------------------
+*/
+void NPC_BSHowler_Default( void )
+{
+	if ( NPC->enemy )
+	{
+		Howler_Combat();
+	}
+	else if ( NPCInfo->scriptFlags & SCF_LOOK_FOR_ENEMIES )
+	{
+		Howler_Patrol();
+	}
+	else
+	{
+		Howler_Idle();
+	}
+
+	NPC_UpdateAngles( qtrue, qtrue );
+}