Grenade throwing

// ============================================================
// Project      :   Torque scripts
// File         :   ..\..\..\torque\SDK\example\starter.fps\server\scripts\Grenades.cs
// Copyright    :   © 2005
// Author       :   
// Editor       :   TorqueDev 1.2.2085.14342
// 
// Description  :   
//              :   
//              :   
// ============================================================
datablock ItemData(Grenade)
{ 

category = "Grenades"; 
shapeFile = "starter.fps/data/shapes/items/healthkit.dts"; 
mass = 0.7; 
friction = 1; 
elasticity = 0.3; //how much bounce 0.1 = none, 1 = funny 

repairAmount = 50; 
maxDamage = 0.2; 
directDamage = 30; 
damageRadius = 20; 
radiusDamage = 20; 
areaImpulse = 200; 
dynamicType = $TypeMasks::DamagableItemObjectType; 
explosion = CrossbowExplosion;
fadeIn = 0;

};


function Grenade::Explode(%dataBlock, %obj)
{ 

echo("Grenade::Explode called"); 

%obj.ExplodeEventID = 0;

%obj.setDamageState(Destroyed); 
%obj.schedule(99, "delete"); 

}


function Grenade::Damage(%this,%obj,%sourceObject, %position, %damage, %damageType)
{ 
echo("Grenade::Damage called");

if (%obj.ExplodeEventID)
{
cancel(%obj.ExplodeEventID);
%obj.ExplodeEventID=0;

%obj.setDamageState(Destroyed); 
%obj.schedule(99, "delete"); 
}

}

function Grenade::onDestroyed(%data,%obj)
{ 

echo("Grenade::onDestroyed called");

%pos = %obj.getPosition();
radiusDamage(%obj,%pos,%data.damageRadius,%data.radiusDamage,"Grenade",%data.area
impulse);

}

function ShapeBase::throwGrenadeDB(%this,%GrenadeTypeDB,%client,%DelayToExplode)
{
//%GrenadeTypeDB = the datablock type for this grenade
//%client = client object
//%time = time in milliseconds before explode

//Check time is not silly or negative
if (%DelayToExplode < 1)
%DelayToExplode = 500;

echo("ShapeBase::throwGrenade grenade, creating item");
%item = new Item()
{
dataBlock = %GrenadeTypeDB;
rotation = "1 0 0 " @ (getRandom() * 360);
sourceObject= %client.player;
client = %client;
ExplodeEventID=0;
};
//call the more general throwObject
%this.throwObject(%item);
//set detonantion delay
%item.ExplodeEventID = %GrenadeTypeDB.schedule(%DelayToExplode, "Explode",%item);
//make sure we tidy up :)
MissionCleanup.add(%item);
}

function ShapeBase::throwObject(%this,%obj){
// Throw the given object in the direction the shape is
// looking. The force values are hardcoded...
echo("ShapeBase::throwObject grenade, getting direction");
%eye = %this.getEyeVector();
%vec = vectorScale(%eye, 20);
// Add a vertical component to give the item a better arc
%dot = vectorDot("0 0 1",%eye);
if (%dot < 0)
%dot = -%dot;
%vec = vectorAdd(%vec,vectorScale("0 0 7",1 - %dot));
// Add the shapes velocity
%vec = vectorAdd(%vec,%this.getVelocity());
// Set the objects position and initial velocity
%pos = getBoxCenter(%this.getWorldBox());
%obj.setTransform(%pos);
echo("ShapeBase::throwObject grenade, Applying impulse");
// Since the object is thrown from the center of the
// shape, the object needs to avoid colliding with it's
// thrower.
%obj.setCollisionTimeout(%this); 
%obj.applyImpulse(%pos,%vec);
}
moveMap.bindCmd(keyboard, "g", "commandToServer(\'throwGrenadeNow\');", "");

moveMap.bindCmd(keyboard, "g", "commandToServer(\'throwGrenadeNow\');", "");