228 lines
7.3 KiB
Lua
228 lines
7.3 KiB
Lua
-- $Id: //depot/Projects/StarWars_Steam/FOC/Run/Data/Scripts/GameObject/Demo_Land_Controller_R.lua#1 $
|
|
--/////////////////////////////////////////////////////////////////////////////////////////////////
|
|
--
|
|
-- (C) Petroglyph Games, Inc.
|
|
--
|
|
--
|
|
-- ***** ** * *
|
|
-- * ** * * *
|
|
-- * * * * *
|
|
-- * * * * * * * *
|
|
-- * * *** ****** * ** **** *** * * * ***** * ***
|
|
-- * ** * * * ** * ** ** * * * * ** ** ** *
|
|
-- *** ***** * * * * * * * * ** * * * *
|
|
-- * * * * * * * * * * * * * * *
|
|
-- * * * * * * * * * * ** * * * *
|
|
-- * ** * * ** * ** * * ** * * * *
|
|
-- ** **** ** * **** ***** * ** *** * *
|
|
-- * * *
|
|
-- * * *
|
|
-- * * *
|
|
-- * * * *
|
|
-- **** * *
|
|
--
|
|
--/////////////////////////////////////////////////////////////////////////////////////////////////
|
|
-- C O N F I D E N T I A L S O U R C E C O D E -- D O N O T D I S T R I B U T E
|
|
--/////////////////////////////////////////////////////////////////////////////////////////////////
|
|
--
|
|
-- $File: //depot/Projects/StarWars_Steam/FOC/Run/Data/Scripts/GameObject/Demo_Land_Controller_R.lua $
|
|
--
|
|
-- Original Author: Dan Etter
|
|
--
|
|
-- $Author: Brian_Hayes $
|
|
--
|
|
-- $Change: 637819 $
|
|
--
|
|
-- $DateTime: 2017/03/22 10:16:16 $
|
|
--
|
|
-- $Revision: #1 $
|
|
--
|
|
--/////////////////////////////////////////////////////////////////////////////////////////////////
|
|
|
|
require("PGStateMachine")
|
|
require("PGStoryMode")
|
|
|
|
|
|
function Definitions()
|
|
|
|
-- Object isn't valid at this point so don't do any operations that
|
|
-- would require it. State_Init is the first chance you have to do
|
|
-- operations on Object
|
|
|
|
DebugMessage("%s -- In Definitions", tostring(Script))
|
|
|
|
Define_State("State_Init", State_Init);
|
|
|
|
empire_player = Find_Player("Empire")
|
|
rebel_player = Find_Player("Rebel")
|
|
underworld_player = Find_Player("Underworld")
|
|
|
|
move_command = true
|
|
|
|
controller = Find_First_Object("DEMO_CONTROLLER_LAND")
|
|
mptl = Find_Object_Type("MPTL")
|
|
t4b = Find_Object_Type("T4B_TANK")
|
|
t2b = Find_Object_Type("T2B_TANK")
|
|
luke = Find_Object_Type("LUKE_SKYWALKER_JEDI")
|
|
yoda = Find_Object_Type("YODA")
|
|
speeder = Find_Object_Type("SNOWSPEEDER")
|
|
r_infantry_squad = Find_Object_Type("REBEL_INFANTRY_SQUAD")
|
|
r_infantry = Find_Object_Type("SQUAD_REBEL_TROOPER")
|
|
|
|
destroyer_squad = Find_Object_Type("DESTROYER_DROID_COMPANY")
|
|
destroyer = Find_Object_Type("DESTROYER_DROID")
|
|
disruptor_squad = Find_Object_Type("UNDERWORLD_DISRUPTOR_MERC_SQUAD")
|
|
disruptor = Find_Object_Type("UNDERWORLD_DISRUPTOR_MERC")
|
|
merc_squad = Find_Object_Type("UNDERWORLD_MERC_SQUAD")
|
|
merc = Find_Object_Type("UNDERWORLD_MERC")
|
|
|
|
spmat = Find_Object_Type("SPMAT_WALKER")
|
|
juggernaut = Find_Object_Type("HAV_JUGGERNAUT")
|
|
dark_phase_1_squad = Find_Object_Type("DARKTROOPER_P1_COMPANY")
|
|
dark_phase_1 = Find_Object_Type("DARK_TROOPER_PHASEI")
|
|
dark_phase_2_squad = Find_Object_Type("DARKTROOPER_P2_COMPANY")
|
|
dark_phase_2 = Find_Object_Type("DARK_TROOPER_PHASEII")
|
|
dark_phase_3_squad = Find_Object_Type("DARKTROOPER_P3_COMPANY")
|
|
dark_phase_3 = Find_Object_Type("DARK_TROOPER_PHASEIII")
|
|
stormtrooper_squad = Find_Object_Type("IMPERIAL_STORMTROOPER_SQUAD")
|
|
stormtrooper = Find_Object_Type("SQUAD_STORMTROOPER")
|
|
lancet = Find_Object_Type("LANCET_AIR_ARTILLERY")
|
|
|
|
end
|
|
|
|
function State_Init(message)
|
|
|
|
if (move_command == true) then
|
|
|
|
empire_unit_list = Find_All_Objects_Of_Type(empire_player)
|
|
rebel_unit_list = Find_All_Objects_Of_Type(rebel_player)
|
|
underworld_unit_list = Find_All_Objects_Of_Type(underworld_player)
|
|
|
|
empire_reveal = FogOfWar.Reveal_All(empire_player)
|
|
rebel_reveal = FogOfWar.Reveal_All(rebel_player)
|
|
uw_reveal = FogOfWar.Reveal_All(underworld_player)
|
|
|
|
eg_list = Find_All_Objects_With_Hint("eg")
|
|
rg_list = Find_All_Objects_With_Hint("rg")
|
|
|
|
bossk = Find_First_Object("BOSSK")
|
|
ig88 = Find_First_Object("IG-88")
|
|
yoda = Find_First_Object("YODA")
|
|
|
|
speeder_list = Find_All_Objects_Of_Type("SNOWSPEEDER")
|
|
lancet_list = Find_All_Objects_Of_Type("LANCET_AIR_ARTILLERY")
|
|
|
|
dest0_list = Find_All_Objects_With_Hint("dest0")
|
|
dest0 = Find_Hint("STORY_TRIGGER_ZONE_00", "dest0")
|
|
dest1_list = Find_All_Objects_With_Hint("dest1")
|
|
dest1 = Find_Hint("STORY_TRIGGER_ZONE_00", "dest1")
|
|
|
|
Create_Thread("Move_IG88", ig88)
|
|
Create_Thread("Move_Bossk", bossk)
|
|
|
|
Create_Thread("Move_Destroyer_group", eg_list)
|
|
Create_Thread("Move_Destroyer_group1", rg_list)
|
|
|
|
Create_Thread("Guard_Self", empire_unit_list)
|
|
Create_Thread("Guard_Self", rebel_unit_list)
|
|
|
|
Create_Thread("Yoda_Attack", yoda)
|
|
|
|
--MessageBox("Fleets Defined")
|
|
|
|
move_command = false
|
|
end
|
|
|
|
end
|
|
|
|
function Yoda_Attack(unit)
|
|
while true do
|
|
if TestValid(unit) then
|
|
closest_enemy = Find_Nearest(unit, underworld_player, true)
|
|
if TestValid(closest_enemy) then
|
|
unit.Activate_Ability("BERSERKER", closest_enemy)
|
|
end
|
|
end
|
|
Sleep(1)
|
|
end
|
|
end
|
|
|
|
function Guard_Self(group)
|
|
for k, unit in pairs(group) do
|
|
if TestValid(unit) then
|
|
if unit.Is_Category("Infantry") or unit.Is_Category("Vehicle") then
|
|
if not (unit.Get_Type() == stormtrooper) and not (unit.Get_Type() == r_infantry) then
|
|
unit.Guard_Target(unit.Get_Position())
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
function Move_Air_Units(group)
|
|
for k, unit in pairs(group) do
|
|
if TestValid(unit) then
|
|
unit.Attack_Move(dest0.Get_Position())
|
|
end
|
|
end
|
|
end
|
|
|
|
function Move_Air_Units1(group)
|
|
for k, unit in pairs(group) do
|
|
if TestValid(unit) then
|
|
unit.Attack_Move(dest1.Get_Position())
|
|
end
|
|
end
|
|
end
|
|
|
|
function Move_IG88(unit)
|
|
rand_loc = GameRandom(1,3)
|
|
if TestValid(unit) then
|
|
unit.Attack_Move(dest0_list[rand_loc].Get_Position())
|
|
end
|
|
end
|
|
|
|
function Move_Bossk(unit)
|
|
rand_loc = GameRandom(1,3)
|
|
if TestValid(unit) then
|
|
unit.Attack_Move(dest1_list[rand_loc].Get_Position())
|
|
end
|
|
end
|
|
|
|
function Move_Destroyer_group(group)
|
|
rand_loc = GameRandom(1,3)
|
|
for k, unit in pairs(group) do
|
|
|
|
if TestValid(unit) then
|
|
unit.Attack_Move(dest0_list[rand_loc].Get_Position())
|
|
end
|
|
end
|
|
|
|
-- sleeptimer = GameRandom(8, 11)
|
|
-- Sleep(sleeptimer)
|
|
-- Deploy_Destroyer_group(group, dest0_list[rand_loc])
|
|
end
|
|
|
|
function Move_Destroyer_group1(group)
|
|
rand_loc = GameRandom(1,3)
|
|
for k, unit in pairs(group) do
|
|
|
|
if TestValid(unit) then
|
|
unit.Attack_Move(dest1_list[rand_loc].Get_Position())
|
|
end
|
|
end
|
|
|
|
-- sleeptimer = GameRandom(12, 14)
|
|
-- Sleep(sleeptimer)
|
|
-- Deploy_Destroyer_group(group, dest0_list[rand_loc])
|
|
end
|
|
|
|
--function Deploy_Destroyer_group(group, loc)
|
|
-- for k, unit in pairs(group) do
|
|
-- if TestValid(unit) then
|
|
-- unit.Activate_Ability("DEPLOY", true)
|
|
-- end
|
|
-- end
|
|
--
|
|
--end
|