XIDMaps
Class SMarin01

source: C:\XIII\XIDMaps\Classes\SMarin01.uc 
Core.Object
   |
   +--Engine.Actor
      |
      +--Engine.Info
         |
         +--XIII.MapInfo
            |
            +--XIDMaps.Map11_SousMarin
               |
               +--XIDMaps.SMarin01
Direct Known Subclasses:None
class SMarin01
extends XIDMaps.Map11_SousMarin

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

Function Summary
 void FirstFrame()
     
//_____________________________________________________________________________
 void SetGoalComplete(int N)
     
//_____________________________________________________________________________


Source Code 

00001	//-----------------------------------------------------------
00002	//
00003	//-----------------------------------------------------------
00004	class SMarin01 extends Map11_SousMarin;
00005	
00006	var(SMarin01SetUp) XIIIPawn Garde;
00007	var(SMarin01SetUp) localized string sClefPorte;
00008	var(SMarin01SetUp) Volume vVolumeGoal99;
00009	var(SMarin01SetUp) name EventClefPorte;
00010	
00011	//_____________________________________________________________________________
00012	function FirstFrame()
00013	{
00014	    local inventory Inv;
00015	
00016	    Super.FirstFrame();
00017	
00018		if ( Garde != none )
00019		{
00020		    Inv = GiveSomething(class'Keys', Garde);
00021		    Inv.Event = 'ClefPorte';
00022		    Keys(Inv).KeyCodeName = "ClefPorte";
00023		    Inv.ItemName = sClefPorte;
00024			XIIIItems(Inv).EventCausedOnPick = EventClefPorte;
00025		}
00026	}
00027	
00028	//_____________________________________________________________________________
00029	function SetGoalComplete(int N)
00030	{
00031	  Super.SetGoalComplete(N);
00032	
00033	  if ( N == 99 )
00034	  {
00035	    if ( vVolumeGoal99.Encompasses( XIIIPawn ) )
00036	      TriggerEvent('Inside', self, XIIIPawn);
00037	    else
00038	      TriggerEvent('Outside', self, XIIIPawn);
00039	  }
00040	}
00041	
00042	
00043	
00044	defaultproperties
00045	{
00046	     EndMapVideo="cine11"
00047	}
End Source Code