XIIIMP
Class Regeneration

Core.Object
   |
   +--Engine.Actor
      |
      +--Engine.Inventory
         |
         +--XIIIMP.MarioSuperBonus
            |
            +--XIIIMP.Regeneration

//__________________________________________________________________________

00001	//-----------------------------------------------------------
00002	//
00003	//-----------------------------------------------------------
00004	class Regeneration extends MarioSuperBonus;
00005	
00006	var Pawn MyPawn;
00007	var sound SoundLoop;
00008	
00009	
00010	simulated event Destroyed()
00011	{
00012	    RemoveIconInPlayerHud();
00013	    super.Destroyed();
00014	}
00015	
00016	//__________________________________________________________________________
00017	
00018	simulated function GiveTo( pawn Other )
00019	{
00020	    Super.GiveTo(other);
00021	    MyPawn = Other;
00022	    AddIconInPlayerHud( Other );
00023	    SetTimer(0.1,true);
00024	    SetTimer2(15.0,false);
00025	}
00026	
00027	//__________________________________________________________________________
00028	
00029	event Timer()
00030	{
00031	    MyPawn.Health += 2.5;
00032	
00033	    if( MyPawn.Health > MyPawn.default.Health )
00034	       MyPawn.Health = MyPawn.default.Health;
00035	}
00036	
00037	//__________________________________________________________________________
00038	
00039	event Timer2()
00040	{
00041	    SetTimer( 0.0,false );
00042	    SetTimer2( 0.0,false );
00043	
00044	    Destroy();
00045	}
00046	
00047	//__________________________________________________________________________
00048	
00049	
00050	
00051	defaultproperties
00052	{
00053	     BonusIconId=8
00054	}