U2Weapons.WeaponInvTakkra

//=============================================================================
// WeaponInvTakkra.uc
// Created by: Mark Poesch
// Created on: 1/31/2001
// $Author: Aleiby $
// $Date: 12/11/02 1:59p $
// $Revision: 33 $
//=============================================================================
class WeaponInvTakkra extends U2Weapon;

#exec OBJ LOAD File=..\Meshes\GlmWeaponsG.ugx

var() Sound NoTargetSound;
var() Sound PickupSound;

var Pawn Target,FireTarget;					// cache result
var float TargetTimestamp;

// AI SUPPORT
var float DefensiveUseHealth;				// Health below which NPCs will use Takkra defensively
var float DefensiveUsePowerPct;				// Power armor % below which NPCs will use Takkra defensively
var float NextRatingCheckTime;				// time for next rating check (to possibly modify Takkra use)
var float TimeBetweenRatingChecks;


// UI SUPPORT
var() float DefaultWidth,DefaultHeight;
var() float MaxWidth,MaxHeight,MinWidth,MinHeight;
var Point PosA,PosB,PosC,PosD;
var float TweenRate;

function Point GetCrossPosA(){ return PosA; }
function Point GetCrossPosB(){ return PosB; }
function Point GetCrossPosC(){ return PosC; }
function Point GetCrossPosD(){ return PosD; }

simulated function HandleTargetDetails( Actor A, Canvas Canvas, vector ViewLoc, rotator ViewRot )
{
	local float CenterN,CenterS,CenterE,CenterW;
	local float CenterX,CenterY;
	local box Bbox;
	local vector Min, Max, Cur, Extent;
	local vector Verts[8];
	local int i;
	local float Unused;

	if (Pawn(A)? && ValidTarget(Pawn(A),Unused))
	{
		SetTarget( Pawn(A) );
	}
	else
	{
		FindTarget();
	}

	// calc new crosshair positions.
	if( !Target )
	{
		CenterX = Canvas.SizeX/2;
		CenterY = Canvas.SizeY/2;

		CenterN = CenterY - DefaultHeight;
		CenterS = CenterY + DefaultHeight;
		CenterE = CenterX + DefaultHeight;
		CenterW = CenterX - DefaultHeight;
	}
	else
	{
		// project all corners of the targets bounding box to the screen
		Bbox = Target.GetCollisionBoundingBox( Target );
		Extent = Bbox.Max - Bbox.Min;

		Verts[0] = Bbox.Min;
		Verts[1] = Bbox.Min + vect( 1, 0, 0 ) * Extent.X;
		Verts[2] = Bbox.Min + vect( 0, 1, 0 ) * Extent.Y;
		Verts[3] = Bbox.Min + vect( 0, 0, 1 ) * Extent.Z;
		Verts[4] = Bbox.Max - vect( 1, 0, 0 ) * Extent.X;
		Verts[5] = Bbox.Max - vect( 0, 1, 0 ) * Extent.Y;
		Verts[6] = Bbox.Max - vect( 0, 0, 1 ) * Extent.Z;
		Verts[7] = Bbox.Max;

		Min = Canvas.Project( Verts[0] );
		Max = Min;

		for( i=1; i<8; i++ )
		{
			Cur = Canvas.Project( Verts[i] );			
			Min.X = FMin( Cur.X, Min.X );
			Min.Y = FMin( Cur.Y, Min.Y );
			Max.X = FMax( Cur.X, Max.X );
			Max.Y = FMax( Cur.Y, Max.Y );
		}

		CenterN = Min.Y;
		CenterS = Max.Y;
		CenterE = Max.X;
		CenterW = Min.X;
	}

	TweenDesired(PosA.Y,CenterN);
	TweenDesired(PosA.X,CenterW);

	TweenDesired(PosB.Y,CenterN);
	TweenDesired(PosB.X,CenterE);

	TweenDesired(PosC.Y,CenterS);
	TweenDesired(PosC.X,CenterW);

	TweenDesired(PosD.Y,CenterS);
	TweenDesired(PosD.X,CenterE);

	TweenRate = FMin( TweenRate + 0.01, 1.0 );
}

simulated function TweenDesired( out float A, float Desired )
{
	A += (Desired - A) * TweenRate;	//!!arl framerate dependant
}

simulated function Fire()
{
	FindTarget();	// npcs don't call HandleTargetDetails
	FireTarget = Target;	// cache it in case the player looks away before the takkra is actually spawned.
	if( !Target )
		Pawn(Owner).PlaySound( NoTargetSound );
	else
		Super.Fire();
}

function bool PreSetAimingParameters( bool bAltFire, bool bInstant, float FireSpread, class<projectile> ProjClass, bool bWarnTarget, bool bTrySplash )
{
	return true;
}

function PostSetAimingParameters( bool bAltFire, bool bInstant, float FireSpread, class<projectile> ProjClass, bool bWarnTarget, bool bTrySplash )
{
	Super.PreSetAimingParameters( bAltFire, bInstant, FireSpread, ProjClass, bWarnTarget, bTrySplash );
}

function AuthorityFire(){}
simulated function EverywhereFire()
{
	GotoState('DelayFire');
}

simulated state DelayFire
{
ignores Fire, AltFire;
Begin:
	PlayAnimEx('PreFire');
	Sleep(0.313);
	if (Role == ROLE_Authority)
		Super.AuthorityFire();
	Super.EverywhereFire();
}

function AuthorityAltFire(){}
simulated function EverywhereAltFire()
{
	GotoState('DelayAltFire');
}

simulated state DelayAltFire
{
ignores Fire, AltFire;
Begin:
	PlayAnimEx('PreFire');
	Sleep(0.313);
	if (Role == ROLE_Authority)
		Super.AuthorityAltFire();
	Super.EverywhereAltFire();
}

function Projectile ProjectileFire( class<projectile> ProjClass )
{
	local projectileTakkra T;

	T = projectileTakkra( Super.ProjectileFire( ProjClass ) );
	if( T? )
	{
		if( ProjClass==ProjectileClass )
		{
			if( FireTarget? )
			{
				T.SetTarget( FireTarget );
				Pawn(Owner).PlaySound( FireSound, SLOT_Misc );
			}
			else warn("ProjectileFire called without proper target!");
		}
		else
		{
			T.SetTarget( Instigator );	// target Instigator (for protection) -- launch defensive Takkra
			Pawn(Owner).PlaySound( AltFireSound, SLOT_Misc );
		}
	}
	else Pawn(Owner).PlaySound( PickupSound );	//FAILURE!!

	return T;
}

function SetTarget( Pawn NewTarget )
{
	if( Target!=NewTarget )
		TweenRate = 0.1;

	Target = NewTarget;
	TargetTimestamp = Level.TimeSeconds;
}

function FindTarget()
{
	local Controller C;
	local Pawn P;
	local float InView;
	local float BestInView;
	local Pawn BestTarget;

	if( !Target || (Level.TimeSeconds - TargetTimestamp)>0.2 || Target.bDeleteMe || Target.Health<=0 )
	{
		for( C=Level.ControllerList; C!=None; C=C.NextController )
		{
			P = C.Pawn;

			if( ValidTarget( P, InView ) )
			{
				if( InView > BestInView )
				{
					BestTarget = P;
					BestInView = InView;
				}
			}
		}

		SetTarget(BestTarget);
	}
}


function bool ValidTarget( Pawn P, out float InView )
{
	// not visible to us?
	if( P == Instigator || P.bHidden || !FastTrace( P.Location, Instigator.Location ) )
		return false;

	// is it already dead?
	if( P.Health <= 0 )
		return false;

	if( P.Controller == None || P.Controller.GetAttitudeTo( Instigator ) == ATTITUDE_Friend )
		return false; // otherwise takkra will shoot friend forever since friendly damage is filtered
		
	// outside our field of view?
	InView = Normal( P.Location - Instigator.Location ) dot vector( Instigator.GetViewRotation() );
	if( InView < 0.9 )	// targetting threshold angle (cos theta)
		return false;

	return true;
}


/*
	AI SUPPORT
*/


function bool ShouldUseDefensively()
{
	return( Instigator.Health <= DefensiveUseHealth && U2Pawn(Instigator).GetPowerSuitPct() < DefensiveUsePowerPct );
}

/*
function float GetWeaponRating( Actor Target, out byte bUseAltMode, bool bSupportsFire, bool bSupportsAltFire )
{
	local float InView;
	local float ReturnedRating;
	local bool bOnOffense;
	local Actor.CheckResult	Hit;

	#debugbegin
	DMW( "GetWeaponRating check in: " $ NextRatingCheckTime - Level.TimeSeconds );
	if( ActiveProjectile != None )
		DMW( "GetWeaponRating -- ActiveProjectile: " $ ActiveProjectile $ " bReturningToPlayer: " $ ActiveProjectile.bReturningToPlayer );
	else
		DMW( "GetWeaponRating -- no active projectile" );
	#debugend

	if( ActiveProjectile == None )
	{
		// no projectile -- insist that owner use it
		if( Target == None || ShouldUseDefensively() || !ValidTarget( Pawn(Target), InView ) )
		{
			// mdf-tbd: low skill ==> less likely to use
			// use defensively if no valid Target
			bUseAltMode = 1;
			#debug DMW( "  use defensively now" );
			ReturnedRating = RatingFireNow; // fire immediately (even if no Target)
		}
		else
		{
			// use offensively 80% of time (mdf-tbd -- what's best?)
			bUseAltMode = byte( FRand() < 0.20 );
			#debug DMW( "  highly recommend use offensively now" );
			ReturnedRating = RatingHighest; // use unless some other weapon returns an equally high rating
		}

		NextRatingCheckTime = Level.TimeSeconds + TimeBetweenRatingChecks;
	}
	else if( !ActiveProjectile.bReturningToPlayer )
	{
		// default to blocking use by returning a crappy rating so status quo maintained
		ReturnedRating = RatingDisabled;

		if( Level.TimeSeconds >= NextRatingCheckTime )
		{
			#debug DMW( "Maybe change use?" );

			class'Util'.static.RSLC( Hit, Instigator, Instigator.Location, Instigator.Location - ActiveProjectile.Location,,, TRACE_AllColliding );

			if( Hit.Actor == ActiveProjectile )
			{						
				#debug DMW( "Can see owner" );

				// owner can see projectile -- maybe change use?
				bOnOffense = (projectileTakkraDefensive(ActiveProjectile) == None);
				if( bOnOffense )
				{
					#debug DMW( " on offense" );

					// currently on offense
					if( ShouldUseDefensively() && (Target == None || !Instigator.Controller.CanSee( Target )) )
					{
						#debug DMW( " recall it" );
						ReturnedRating = RatingFireNow; // recall it
					}
				}
				else if( false )
				{
					// currently on defense
					//mdf-tbd: problem is this will recall it, but more than likely code above will put 
					// it back on defense because the Target might not be in view
					//if( Target != None && !ShouldUseDefensively )
					//	ReturnedRating = RatingFireNow; // recall it
				}
				else
				{
					// if projectile recalled, don't reset NextRatingCheckTime so re-deployed asap on return
					#debug DMW( " check again in 15 secs" );
					NextRatingCheckTime = Level.TimeSeconds + TimeBetweenRatingChecks;
				}
			}
			else
			{
				#debug DMW( "Can't see owner" );
				// allow check again in a bit
				NextRatingCheckTime = Level.TimeSeconds + 1.0;
			}
		}				
	}

	#debug DMW( "GetWeaponRating -- ReturnedRating: " $ ReturnedRating );
	return ReturnedRating;
}
*/

defaultproperties
{
	NoTargetSound=Sound'U2WeaponsA.Takkra.T_NoTarget'
	PickupSound=Sound'U2WeaponsA.Takkra.T_Pickup'
	DefensiveUseHealth=30.000000
	DefensiveUsePowerPct=0.250000
	TimeBetweenRatingChecks=15.000000
	DefaultWidth=32.000000
	DefaultHeight=24.000000
	MaxWidth=64.000000
	MaxHeight=48.000000
	MinWidth=16.000000
	MinHeight=12.000000
	FireTime=1.375000
	AltFireTime=1.375000
	FireLastDownTime=1.625000
	AltFireLastDownTime=1.625000
	FireLastReloadTime=1.625000
	AltFireLastReloadTime=1.625000
	ReloadTime=1.181000
     GunButtSounds(0)=Sound'U2WeaponsA.GunButt.GunButt01'
     GunButtSounds(1)=Sound'U2WeaponsA.GunButt.GunButt02'
     GunButtSounds(2)=Sound'U2WeaponsA.GunButt.GunButt03'
     GunButtSounds(3)=Sound'U2WeaponsA.GunButt.GunButt04'
	FirstPersonOffset=(X=-14.000000,Y=26.000000,Z=-8.000000)
	bCrosshairGlows=true
	WeaponAnimationType=AT_Small
	AltShakeMag=0.000000
	AltShakeTime=0.000000
     TargetableTypes(0)='Pawn'
	CrosshairName="Takkra_Cross"
	bAimAltFire=false
	AIRatingFire=0.050000
	AIRatingAltFire=0.050000
	AmmoName=Class'U2Weapons.ammoInvTakkra'
	PickupAmmoCount=1
	FiringSpeed=1.000000
	FireOffset=(X=46.000000,Y=6.000000,Z=-8.000000)
	ProjectileClass=Class'U2Weapons.projectileTakkra'
	AltProjectileClass=Class'U2Weapons.projectileTakkraDefensive'
	MyDamageType=Class'U2.DamageTypeTakkra'
	ShakeMag=0.000000
	ShakeTime=0.000000
	bWarnTarget=true
	AIRating=0.500000
	RefireRate=1.000000
	AltRefireRate=1.000000
	FireSound=Sound'U2WeaponsA.Takkra.T_Fire'
	AltFireSound=Sound'U2WeaponsA.Takkra.T_AltFire'
	SelectSound=Sound'U2WeaponsA.Takkra.T_Select'
	InstFlash=-0.400000
	InstFog=(X=650.000000,Y=450.000000,Z=190.000000)
	InventoryGroup=5
	GroupOffset=1
	PickupClass=Class'U2Weapons.weaponTakkra'
	PlayerViewOffset=(X=41.799999,Y=13.400000,Z=-12.600000)
	BobDamping=0.972000
	ThirdPersonMesh=LegendMesh'GlmWeaponsG.T_TP'
	ItemName="Takkra"
	ItemID="T"
	IconIndex=6
	Mesh=LegendMesh'GlmWeaponsG.T_FP'
     UseReticleOnEvents(0)="UseReticleText"
     UseReticleOnEvents(1)="UseReticleCorners"
     UseReticleOnEvents(2)="UseReticleTopBars"
     ProximityReticleOnEvents(0)="ProximityReticleCorners"
     ProximityReticleOnEvents(1)="ProximityReticleTopBars"
}