XIDMaps
Class SSH101b

Core.Object
   |
   +--Engine.Actor
      |
      +--Engine.Info
         |
         +--XIII.MapInfo
            |
            +--XIDMaps.Map16_SSH1
               |
               +--XIDMaps.SSH101b

//_____________________________________________________________________________

//_____________________________________________________________________________

00001	//-----------------------------------------------------------
00002	//
00003	//-----------------------------------------------------------
00004	class SSH101b extends Map16_SSH1;
00005	
00006	
00007	var(SSH101bSetup) Name KeyEvent;
00008	var(SSH101bSetup) XIIIPawn KeyKeeper;
00009	var(SSH101bSetup) Porte DoorToOpen;
00010	var(SSH101bSetup) name EventKeyPick;
00011	
00012	
00013	//_____________________________________________________________________________
00014	function FirstFrame()
00015	{
00016	    local inventory Inv;
00017	
00018	    Super.FirstFrame();
00019	
00020	    if ( KeyKeeper != none )
00021	    {
00022	      Inv = GiveSomething(class'Keys', KeyKeeper );
00023	      Inv.Event = KeyEvent;
00024	      Keys(Inv).KeyCodeName = DoorToOpen.UnlockItemCode;
00025	      //Inv.ItemName = DoorToOpen.UnlockItemCode;
00026		  XIIIItems(Inv).EventCausedOnPick = EventKeyPick;
00027	    }
00028	}
00029	
00030	
00031	//_____________________________________________________________________________
00032	function SetGoalComplete(int N)
00033	{
00034	    super.SetGoalComplete(N);
00035	
00036	    Switch(N)
00037	    {
00038	      Case 99:
00039	        SetPrimaryGoal(2);
00040	        break;
00041	      Case 2:
00042	        SetPrimaryGoal(3);
00043	        break;
00044	      Case 3:
00045	        SetPrimaryGoal(4);
00046	        break;
00047	    }
00048	}
00049	
00050	
00051	
00052	defaultproperties
00053	{
00054	}