RuneI
Class RuneOfStrength

Core.Object
   |
   +--Engine.Actor
      |
      +--Engine.Inventory
         |
         +--Engine.Pickup
            |
            +--RuneI.Runes
               |
               +--RuneI.RuneOfStrength

00001	//=============================================================================
00002	// RuneOfStrength.
00003	// Boost strength (berserk) to instantly bloodlust
00004	//=============================================================================
00005	class RuneOfStrength extends Runes;
00006	
00007	function PickupFunction(Pawn Other)
00008	{
00009		Other.BoostStrength(Other.MaxStrength);
00010	
00011		// Cure eater of any ailments
00012		if(Other.Fatness != 128)
00013			Other.DesiredFatness = 128;
00014		if(Other.ScaleGlow != 1.0)
00015			Other.ScaleGlow = 1.0;
00016		if(Other.BodyPartMissing(BODYPART_LARM1))
00017			Other.RestoreBodyPart(BODYPART_LARM1);
00018		if(Other.BodyPartMissing(BODYPART_RARM1))
00019			Other.RestoreBodyPart(BODYPART_RARM1);
00020	
00021		Destroy();
00022	}
00023	
00024	function bool PawnWantsRune(Pawn Other)
00025	{// return whether the pawn should currently want this rune
00026		if (PlayerPawn(Other)!=None && !PlayerPawn(Other).bBloodLust)
00027			return true;
00028		return (Other.BodyPartMissing(BODYPART_LARM1) ||
00029				Other.BodyPartMissing(BODYPART_RARM1));
00030	}
00031	
00032	defaultproperties
00033	{
00034	     RunePower=10.000000
00035	     SpheresClass=Class'RuneI.RuneSpheresBerserker'
00036	     PickupMessage="You possess a Rune of Bloodlust"
00037	     PickupSound=Sound'OtherSnd.Pickups.grab03'
00038	     SoundRadius=21
00039	     SoundVolume=130
00040	     SoundPitch=88
00041	     AmbientSound=Sound'WeaponsSnd.PowerUps.power03L'
00042	     CollisionRadius=11.000000
00043	     CollisionHeight=13.000000
00044	     Skeletal=SkelModel'objects.Rune2'
00045	}