Initial commit
This commit is contained in:
93
DATA/SCRIPTS/AI/PATHBONUSFORDISTANTTARGETS.LUA
Normal file
93
DATA/SCRIPTS/AI/PATHBONUSFORDISTANTTARGETS.LUA
Normal file
@@ -0,0 +1,93 @@
|
||||
-- $Id: //depot/Projects/StarWars_Steam/FOC/Run/Data/Scripts/AI/PathBonusForDistantTargets.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/AI/PathBonusForDistantTargets.lua $
|
||||
--
|
||||
-- Original Author: Steve_Copeland
|
||||
--
|
||||
-- $Author: Brian_Hayes $
|
||||
--
|
||||
-- $Change: 637819 $
|
||||
--
|
||||
-- $DateTime: 2017/03/22 10:16:16 $
|
||||
--
|
||||
-- $Revision: #1 $
|
||||
--
|
||||
--/////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
require("pgevents")
|
||||
|
||||
-- Tell the script pooling system to pre-cache this number of scripts.
|
||||
ScriptPoolCount = 1
|
||||
|
||||
--
|
||||
--
|
||||
--
|
||||
|
||||
function Definitions()
|
||||
DebugMessage("%s -- In Definitions", tostring(Script))
|
||||
|
||||
Category = "Distant_System_Path_Bonus"
|
||||
IgnoreTarget = true
|
||||
TaskForce =
|
||||
{
|
||||
{
|
||||
"EmptyForce"
|
||||
, "TaskForceRequired"
|
||||
}
|
||||
}
|
||||
|
||||
DebugMessage("%s -- Done Definitions", tostring(Script))
|
||||
|
||||
planet_list = nil
|
||||
markup_table = {}
|
||||
end
|
||||
|
||||
function EmptyForce_Thread()
|
||||
|
||||
EmptyForce.Set_As_Goal_System_Removable(false)
|
||||
planet_list = FindPlanet.Get_All_Planets()
|
||||
|
||||
while true do
|
||||
for i,planet in pairs(planet_list) do
|
||||
|
||||
if TestValid(planet) then
|
||||
path_start = _FindStageArea(PlayerObject, planet, EmptyForce)
|
||||
if path_start then
|
||||
path = Find_Path(PlayerObject, path_start, planet)
|
||||
value = (EvaluatePerception("GenericPlanetValue", PlayerObject, planet)
|
||||
+ EvaluatePerception("Is_Neglected_By_My_Opponent_Space", PlayerObject, planet)) / 2
|
||||
markup_table[planet] = Apply_Markup(PlayerObject, path, value, markup_table[planet])
|
||||
end
|
||||
else
|
||||
planet_list[i] = nil
|
||||
end
|
||||
Sleep(1)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
Reference in New Issue
Block a user