Add AR2

dlls/Android.mk

@@ -126,6 +126,7 @@ LOCAL_SRC_FILES := agrunt.cpp airtank.cpp \
            zombie.cpp \
            prop.cpp \
            gravgun.cpp \
+           ar2.cpp \
 	   ../pm_shared/pm_debug.c \
 	   ../pm_shared/pm_math.c \
 	   ../pm_shared/pm_shared.c

dlls/ar2.cpp

@@ -0,0 +1,465 @@
+/***
+*AR2 Impulse Rifle from HALF-LIFE 2 , rewritten to hlsdk by Solexid.
+*Uses custom models and sounds
+*
+****/
+
+#include "extdll.h"
+#include "util.h"
+#include "customentity.h"
+#include "cbase.h"
+#include "monsters.h"
+#include "weapons.h"
+#include "nodes.h"
+#include "player.h"
+#include "soundent.h"
+#include "gamerules.h"
+
+#define AR2_BEAM_SPRITE		"sprites/xbeam1.spr"
+#define WEAPON_AR2			19
+enum AR2_e
+{
+	AR2_LONGIDLE = 0,
+	AR2_IDLE1,
+	AR2_LAUNCH,
+	AR2_RELOAD,
+	AR2_DEPLOY,
+	AR2_FIRE1,
+	AR2_FIRE2,
+	AR2_FIRE3,
+};
+
+class CAR2 : public CBasePlayerWeapon
+{
+public:
+	void Spawn(void);
+	void Precache(void);
+	int iItemSlot(void) { return 3; }
+	int GetItemInfo(ItemInfo *p);
+	int AddToPlayer(CBasePlayer *pPlayer);
+	CBeam* m_pBeam1;
+	void PrimaryAttack(void);
+	void Cleaner(void);
+	void SecondaryAttack(void);
+	int SecondaryAmmoIndex(void);
+	BOOL Deploy(void);
+	void Holster(int skiplocal);
+	void MyAnim(int iAnim);
+	void Reload(void);
+	void WeaponIdle(void);
+	float m_flNextAnimTime;
+	int m_iShell;
+
+	virtual BOOL UseDecrement(void)
+	{
+		return false;
+
+	}
+
+};
+
+LINK_ENTITY_TO_CLASS(weapon_ar2, CAR2);
+class CAR2Ball: public CGrenade
+{
+public:
+	static CAR2Ball *AR2Shoot(entvars_t *pevOwner, Vector vecStart, Vector vecVelocity, float time);
+	void AR2Touch(CBaseEntity *pOther);
+	void Spawn();
+	virtual float TouchGravGun( CBaseEntity *attacker, int stage )
+	{
+		pev->owner = attacker->edict();
+
+		if( stage == 3 )
+			pev->dmgtime = gpGlobals->time + 5 ;
+
+		if( stage == 2 && gpGlobals->time - pev->dmgtime > 15 )
+			pev->dmgtime = gpGlobals->time + 15 ;
+
+		if( stage == 1 )
+			pev->dmgtime = gpGlobals->time + 15 ;
+
+		return 1600;
+	}
+};
+
+LINK_ENTITY_TO_CLASS(ar2grenade, CAR2Ball);
+//=========================================================
+//=========================================================
+int CAR2::SecondaryAmmoIndex(void)
+{
+	return m_iSecondaryAmmoType;
+}
+
+void CAR2::Spawn()
+{
+	pev->classname = MAKE_STRING("weapon_ar2"); // hack to allow for old names
+	Precache();
+	SET_MODEL(ENT(pev), "models/w_ar2.mdl");
+	m_iId = WEAPON_AR2;
+
+	m_iDefaultAmmo = 30;
+
+	FallInit();// get ready to fall down.
+}
+
+
+void CAR2::Precache(void)
+{
+	PRECACHE_MODEL("models/v_ar2.mdl");
+	PRECACHE_MODEL("models/w_ar2.mdl");
+	PRECACHE_MODEL("models/p_ar2.mdl");
+
+	m_iShell = PRECACHE_MODEL("models/shell.mdl");// brass shellTE_MODEL
+
+	PRECACHE_MODEL("models/ar2grenade.mdl");	// grenade
+
+	PRECACHE_MODEL("models/w_9mmARclip.mdl");
+	PRECACHE_SOUND("items/9mmclip1.wav");
+
+	PRECACHE_SOUND("items/clipinsert1.wav");
+	PRECACHE_SOUND("items/cliprelease1.wav");
+
+	PRECACHE_SOUND("ar2s1.wav");// H to the K
+
+	PRECACHE_SOUND("ar2launch.wav");
+
+	PRECACHE_SOUND("weapons/357_cock1.wav");
+
+}
+
+int CAR2::GetItemInfo(ItemInfo *p)
+{
+	p->pszName = STRING(pev->classname);
+	p->pszAmmo1 = "9mm";
+	p->iMaxAmmo1 = _9MM_MAX_CARRY;
+	p->pszAmmo2 = "ARgrenades";
+	p->iMaxAmmo2 = M203_GRENADE_MAX_CARRY;
+	p->iMaxClip = 30;
+	p->iSlot = 2;
+	p->iPosition = 3;
+	p->iFlags = 0;
+	p->iId = m_iId = WEAPON_AR2;
+	p->iWeight = 25;
+
+	return 1;
+}
+
+int CAR2::AddToPlayer(CBasePlayer *pPlayer)
+{
+	if (CBasePlayerWeapon::AddToPlayer(pPlayer))
+	{
+		MESSAGE_BEGIN(MSG_ONE, gmsgWeapPickup, NULL, pPlayer->pev);
+		WRITE_BYTE(m_iId);
+		MESSAGE_END();
+		return TRUE;
+	}
+	return FALSE;
+}
+
+BOOL CAR2::Deploy()
+{
+	return DefaultDeploy("models/v_ar2.mdl", "models/p_ar2.mdl", AR2_DEPLOY, "MP5");
+}
+void CAR2::Holster(int skiplocal /* = 0 */)
+{
+
+	MyAnim(AR2_DEPLOY);
+}
+void CAR2::MyAnim(int iAnim)
+{
+
+	m_pPlayer->pev->weaponanim = iAnim;
+
+
+
+	MESSAGE_BEGIN(MSG_ONE, SVC_WEAPONANIM, NULL, m_pPlayer->pev);
+	WRITE_BYTE(iAnim); // sequence number
+	WRITE_BYTE(pev->body); // weaponmodel bodygroup.
+	MESSAGE_END();
+}
+void CAR2::PrimaryAttack()
+{
+	// don't fire underwater
+	if (m_pPlayer->pev->waterlevel == 3)
+	{
+		PlayEmptySound();
+		m_flNextPrimaryAttack =gpGlobals->time+0.15;
+		return;
+	}
+
+	if (m_iClip <= 0)
+	{
+		PlayEmptySound();
+		m_flNextPrimaryAttack = gpGlobals->time + 0.15;
+		return;
+	}
+
+	m_pPlayer->m_iWeaponVolume = NORMAL_GUN_VOLUME;
+	m_pPlayer->m_iWeaponFlash = NORMAL_GUN_FLASH;
+
+	m_iClip--;
+
+
+	m_pPlayer->pev->effects = (int)(m_pPlayer->pev->effects) | EF_MUZZLEFLASH;
+
+	// player "shoot" animation
+	m_pPlayer->SetAnimation(PLAYER_ATTACK1);
+
+	Vector vecSrc = m_pPlayer->GetGunPosition();
+	Vector vecAiming = m_pPlayer->GetAutoaimVector(AUTOAIM_10DEGREES);
+	Vector vecDir;
+
+#ifdef CLIENT_DLL
+	if (!bIsMultiplayer())
+#else
+	if (!g_pGameRules->IsMultiplayer())
+#endif
+	{
+		// optimized multiplayer. Widened to make it easier to hit a moving player
+		vecDir = m_pPlayer->FireBulletsPlayer(25, vecSrc, vecAiming, VECTOR_CONE_3DEGREES, 8192, BULLET_PLAYER_MP5, 0, 1, m_pPlayer->pev, m_pPlayer->random_seed);
+	}
+	else
+	{
+		// single player spread
+		vecDir = m_pPlayer->FireBulletsPlayer(20, vecSrc, vecAiming, VECTOR_CONE_1DEGREES, 8192, BULLET_PLAYER_MP5, 0, 1, m_pPlayer->pev, m_pPlayer->random_seed);
+	}
+
+	int iAnim;
+	switch (RANDOM_LONG(0, 2))
+	{
+	case 0:
+		iAnim = AR2_FIRE1;
+		break;
+
+	default:
+	case 1:
+		iAnim = AR2_FIRE2;
+		break;
+	case 2:
+		iAnim = AR2_FIRE3;
+		break;
+	}
+
+	MyAnim(iAnim);
+
+	m_pBeam1 = CBeam::BeamCreate(AR2_BEAM_SPRITE, 40);
+	m_pBeam1->SetFlags(BEAM_FSINE);
+	m_pBeam1->pev->spawnflags |= SF_BEAM_TEMPORARY;
+	m_pBeam1->pev->owner = m_pPlayer->edict();
+	m_pBeam1->SetEndAttachment(1);
+	m_pBeam1->SetStartPos(this->pev->origin + this->pev->view_ofs + gpGlobals->v_forward * 1000 + gpGlobals->v_up * 20 + gpGlobals->v_right * 5 + gpGlobals->v_forward * 30);
+	m_pBeam1->SetEndPos(this->pev->origin + pev->view_ofs +gpGlobals->v_up*20+gpGlobals->v_right*5+gpGlobals->v_forward*30);
+	m_pBeam1->SetWidth(15);
+	m_pBeam1->SetBrightness(255);
+	EMIT_SOUND(ENT(pev), CHAN_VOICE, "ar2s1.wav", 1, ATTN_NORM);
+
+	if (!m_iClip && m_pPlayer->m_rgAmmo[m_iPrimaryAmmoType] <= 0)
+		// HEV suit - indicate out of ammo condition
+		m_pPlayer->SetSuitUpdate("!HEV_AMO0", FALSE, 0);
+	SetThink(&CAR2::Cleaner);
+	pev->nextthink = gpGlobals->time + 0.03;
+	m_flNextPrimaryAttack = gpGlobals->time + (0.08);
+
+	if (m_flNextPrimaryAttack < gpGlobals->time  )
+		m_flNextPrimaryAttack = gpGlobals->time +  0.02;
+
+	m_flTimeWeaponIdle = gpGlobals->time  + UTIL_SharedRandomFloat(m_pPlayer->random_seed, 10, 15);
+}
+
+void CAR2::Cleaner(void) {
+
+	UTIL_Remove(m_pBeam1);
+}
+
+void CAR2::SecondaryAttack(void)
+{
+	// don't fire underwater
+	if (m_pPlayer->pev->waterlevel == 3)
+	{
+		PlayEmptySound();
+		m_flNextPrimaryAttack = gpGlobals->time + 0.15;
+		return;
+	}
+
+	if (m_pPlayer->m_rgAmmo[m_iSecondaryAmmoType] == 0)
+	{
+		PlayEmptySound();
+		return;
+	}
+
+	m_pPlayer->m_iWeaponVolume = NORMAL_GUN_VOLUME;
+	m_pPlayer->m_iWeaponFlash = BRIGHT_GUN_FLASH;
+
+	m_pPlayer->m_iExtraSoundTypes = bits_SOUND_DANGER;
+	m_pPlayer->m_flStopExtraSoundTime = gpGlobals->time + 0.7;
+
+	m_pPlayer->m_rgAmmo[m_iSecondaryAmmoType]--;
+
+	// player "shoot" animation
+	m_pPlayer->SetAnimation(PLAYER_ATTACK1);
+
+	UTIL_MakeVectors(m_pPlayer->pev->v_angle + m_pPlayer->pev->punchangle);
+
+	CAR2Ball::AR2Shoot(m_pPlayer->pev,
+		m_pPlayer->pev->origin + m_pPlayer->pev->view_ofs + gpGlobals->v_forward * 16,
+		gpGlobals->v_forward * 1600,5);
+
+
+	EMIT_SOUND(ENT(pev), CHAN_VOICE, "ar2launch.wav", 0.75, ATTN_NORM);
+	MyAnim(AR2_LAUNCH);
+
+	m_flNextPrimaryAttack = gpGlobals->time + 1;
+	m_flNextSecondaryAttack = gpGlobals->time + 2;
+	m_flTimeWeaponIdle = gpGlobals->time + + 5;// idle pretty soon after shooting.
+
+	if (!m_pPlayer->m_rgAmmo[m_iSecondaryAmmoType])
+		// HEV suit - indicate out of ammo condition
+		m_pPlayer->SetSuitUpdate("!HEV_AMO0", FALSE, 0);
+}
+
+void CAR2::Reload(void)
+{
+	;
+
+	if (m_pPlayer->ammo_9mm <= 0)
+		return;
+
+	DefaultReload(30, AR2_RELOAD, 1.0);
+
+}
+
+
+void CAR2::WeaponIdle(void)
+{
+	ResetEmptySound();
+
+	m_pPlayer->GetAutoaimVector(AUTOAIM_5DEGREES);
+
+	if (m_flTimeWeaponIdle >gpGlobals->time)
+		return;
+
+	int iAnim;
+	switch (RANDOM_LONG(0, 1))
+	{
+	case 0:
+		iAnim = AR2_LONGIDLE;
+		break;
+
+	default:
+	case 1:
+		iAnim = AR2_IDLE1;
+		break;
+	}
+
+	MyAnim(iAnim);
+
+	m_flTimeWeaponIdle = gpGlobals->time+UTIL_SharedRandomFloat(m_pPlayer->random_seed, 10, 15); // how long till we do this again.
+}
+
+void CAR2Ball::Spawn()
+{
+	pev->movetype = MOVETYPE_BOUNCE;
+	pev->solid = SOLID_SLIDEBOX;
+	UTIL_SetOrigin(pev, pev->origin);
+	SetTouch(&CAR2Ball::AR2Touch);	// Bounce if touched
+
+	SetThink(&CAR2Ball::TumbleThink);
+	pev->nextthink = gpGlobals->time + 0.1;
+	pev->dmgtime = gpGlobals->time + 99999;
+	pev->sequence = RANDOM_LONG(3, 6);
+	pev->framerate = 1.0;
+	pev->effects = EF_LIGHT;
+	pev->rendermode = kRenderTransAdd;
+	pev->renderamt = 256;
+
+	pev->gravity = 0.0005;
+	pev->friction = 0;
+
+	SET_MODEL(ENT(pev), "models/ar2grenade.mdl");
+	pev->dmg = 30;
+	m_fRegisteredSound = FALSE;
+	UTIL_SetSize(pev, Vector(-16, -16, -16), Vector(16, 16, 16));
+	UTIL_SetOrigin(pev, pev->origin);
+	pev->avelocity.x = RANDOM_LONG(-1000, 1000);
+	pev->avelocity.y = RANDOM_LONG(-1000, 1000);
+
+}
+
+CAR2Ball * CAR2Ball::AR2Shoot(entvars_t *pevOwner, Vector vecStart, Vector vecVelocity, float time)
+{
+	CAR2Ball *pGrenade = (CAR2Ball *)CBaseEntity::Create( "ar2grenade", vecStart, vecVelocity, ENT(pevOwner) );
+	pGrenade->Spawn();
+	UTIL_SetOrigin(pGrenade->pev, vecStart);
+	pGrenade->pev->velocity = vecVelocity;
+
+	pGrenade->pev->angles = UTIL_VecToAngles(pGrenade->pev->velocity);
+	pGrenade->pev->owner = ENT(pevOwner);
+
+	pGrenade->pev->dmgtime = gpGlobals->time + time;
+
+	if (time < 0.1)
+	{
+		pGrenade->pev->nextthink = gpGlobals->time;
+		pGrenade->pev->velocity = Vector(0, 0, 0);
+	}
+
+	return pGrenade;
+}
+
+void CAR2Ball::AR2Touch(CBaseEntity *pOther)
+{
+	// don't hit the guy that launched this sphere
+	if (pOther->edict() == pev->owner)
+		return;
+
+	if( ( pev->velocity.Length() >= 500 ) && (pev->dmgtime - gpGlobals->time > 5 ) )
+	{
+		ALERT( at_console, "Slow detonate\n");
+		pev->dmgtime = gpGlobals->time + 5 ;
+	}
+
+	if( pev->velocity.Length() >= 100 )
+	{
+		ALERT( at_console, "Decreasing dmgtime %f\n", pev->dmg - gpGlobals->time );
+		pev->dmgtime -= pev->velocity.Length() / 3000;
+	}
+
+	// only do damage if we're moving fairly fast
+	if (m_flNextAttack < gpGlobals->time )
+	{
+		entvars_t *pevOwner = VARS(pev->owner);
+		if( !pevOwner )
+			pevOwner = pev;
+		TraceResult tr = UTIL_GetGlobalTrace();
+		ClearMultiDamage();
+		pOther->TraceAttack(pevOwner, 250, gpGlobals->v_forward, &tr, DMG_CLUB);
+		if( pOther->IsPlayer() || pOther->IsMoving() )
+			pev->velocity = gpGlobals->v_forward.Normalize() * 1600;
+		ApplyMultiDamage(pev, pevOwner);
+		m_flNextAttack = gpGlobals->time + 0.03; // debounce
+	}
+
+	if( !pev->velocity.Length() )
+		pev->velocity.z += 100;
+
+	Vector vecTestVelocity;
+	vecTestVelocity = pev->velocity;
+
+	if (!m_fRegisteredSound && vecTestVelocity.Length() <= 60)
+	{
+		CSoundEnt::InsertSound(bits_SOUND_DANGER, pev->origin, pev->dmg / 0.4, 0.3);
+		m_fRegisteredSound = TRUE;
+	}
+
+	{
+		// play bounce sound
+		switch (RANDOM_LONG(0, 2))
+		{
+		case 0:	EMIT_SOUND(ENT(pev), CHAN_VOICE, "weapons/grenade_hit1.wav", 0.25, ATTN_NORM);	break;
+		case 1:	EMIT_SOUND(ENT(pev), CHAN_VOICE, "weapons/grenade_hit2.wav", 0.25, ATTN_NORM);	break;
+		case 2:	EMIT_SOUND(ENT(pev), CHAN_VOICE, "weapons/grenade_hit3.wav", 0.25, ATTN_NORM);	break;
+		}
+	}
+	pev->framerate = pev->velocity.Length() / 200.0;
+
+}

dlls/weapons.cpp

@@ -385,6 +385,7 @@ void W_Precache(void)
 #endif
 
 	UTIL_PrecacheOtherWeapon( "weapon_gravgun" );
+	UTIL_PrecacheOtherWeapon( "weapon_ar2" );
 
 #if !defined( OEM_BUILD ) && !defined( HLDEMO_BUILD )
 	if ( g_pGameRules->IsDeathmatch() )