XIII
Class WBallFlying

source: C:\XIII\XIII\Classes\WBallFlying.uc 
Core.Object
   |
   +--Engine.Actor
      |
      +--Engine.Projectile
         |
         +--XIII.XIIIProjectile
            |
            +--XIII.WBallFlying
Direct Known Subclasses:None
class WBallFlying
extends XIII.XIIIProjectile

//----------------------------------------------------------- // //-----------------------------------------------------------

Function Summary
 
simulated		 Explode(vector HitLocation, vector HitNormal)
     
//_____________________________________________________________________________
 
simulated		 PostBeginPlay()
     
//_____________________________________________________________________________
// Set up speed
 
simulated		 Timer()
     
//_____________________________________________________________________________


Source Code 

00001	//-----------------------------------------------------------
00002	//
00003	//-----------------------------------------------------------
00004	class WBallFlying extends XIIIProjectile;
00005	
00006	//_____________________________________________________________________________
00007	// Set up speed
00008	simulated function PostBeginPlay()
00009	{
00010	    Super.PostBeginPlay();
00011	    Velocity = Vector(Rotation) * Speed;
00012	    RotationRate.Pitch = 80000; // Around Y
00013	    RotationRate.Roll = 10000; // Around Z
00014	    SetTimer(0.5, false);
00015	}
00016	
00017	//_____________________________________________________________________________
00018	simulated function Timer()
00019	{
00020	    SetPhysics(PHYS_Falling);
00021	}
00022	
00023	//_____________________________________________________________________________
00024	simulated function Explode(vector HitLocation, vector HitNormal)
00025	{
00026	    Spawn(class'XIII.DecoThrowBottleImpactEmitter',self,, Location, Rotation);
00027	    PlaySound(hExploSound, 0, 1, 2 );
00028	    Destroy();
00029	}
00030	
00031	
00032	
00033	defaultproperties
00034	{
00035	     bSpawnDecal=False
00036	     HitSoundType=5
00037	     hExploSound=Sound'XIIIsound.Items__BilliardsBallFire.BilliardsBallFire__hBilliardExplo'
00038	     StaticMeshName="StatiPalace.BouleBlanche"
00039	     iStunning=1
00040	     Speed=1000.000000
00041	     Damage=50.000000
00042	     MomentumTransfer=10000.000000
00043	     MyDamageType=Class'XIII.DTStunned'
00044	     bUnlit=True
00045	     bBounce=True
00046	     bFixedRotationDir=True
00047	     DrawType=DT_StaticMesh
00048	     LifeSpan=6.000000
00049	}
End Source Code