About eldar entangle. Don't know if it works for you but I had to change the code to get it working for DoWpro.
I removed it from
--target ability table
InfantryTactic.TargetAbilities =
{
--{ nil, "eldar_entanglement",
-- Ability.Filters.CloseInfantryEnemyCC, 4, 0 },
and added it in DoAbilities like this
local entangle_id = cpu_manager.stats:GetAbilityID( "eldar_entanglement" )
if self.squad_ai:CanDoAbility( entangle_id ) then
local range = self.squad_ai:GetAbilityRange( entangle_id )
local squad_pos = self.squad_ai:GetPosition()
local target = nil
melee = function( squad )
local is_cc = false
if squad:GetMeleeStance() == SquadAI.MSTANCE_Assault then
is_cc = true
end
return is_cc and squad:GetNumTroopers() >= 4
end
local target = cpu_manager:FindClosestEnemy( squad_pos, range, melee )
if target ~= nil then
self.squad_ai:DoSpecialAbilitySquad( entangle_id, target:GetSquad() )
end
end
as Ability.Filters.CloseInfantryEnemyCC didn't work as intended.
Improving orks (and others). I added some basic code to switch ranged squads to CC if this will improve their chance to win. Shootas against spiders comes to mind. Perhaps you can use it.
It's called in function InfantryTactic:Update() like this
if self.squad_ai:IsAttached() then
self:CheckForDetach()
end
--special moves
self:CheckMeleeStance()
local stance = self.squad_ai:GetMeleeStance()
if self.stateID == Tactic.StateID.CloseOn and not self.squad_ai:IsInStateMove() then
cpu_manager:RemoveSubState( self.squad_ai:GetID(), self.stateID )
self.stateID = Tactic.StateID.NoState
dlg( "avd", "Stop Close On:"..tostring(self.squad_ai:GetID()) )
elseif stance == SquadAI.MSTANCE_Assault then
self:CloseOnEnemy()
elseif stance == SquadAI.MSTANCE_Ranged then
self:MoveToCover()
end
Note that the next code also puts cultists with full upgrades on ranged stance as I force them to only use GL in their tactics file.
function InfantryTactic:CheckMeleeStance()
local squad_name = self.stats:GetSquadName()
local stance = self.squad_ai:GetMeleeStance()
local set_stance = false
local threat = 0
--tier2 cultists with full heavy weapons set at ranged stance
if squad_name == "chaos_squad_cultist" and cpu_manager:GetTierLevel() > 1 and
stance == SquadAI.MSTANCE_Assault and not self.squad_ai:HasUpgradableTrooper() then
self.squad_ai:DoSetMeleeStance( SquadAI.MSTANCE_Ranged )
set_stance = true
end
--these squads may switch from ranged to CC
local melee_tbl_1 = {
"chaos_marine_squad",
"chaos_squad_cultists",
"space_marine_squad_tactical",
"ork_squad_shoota_boy"
}
--these are their respective CC targets
local melee_tbl_2 = {
{--chaos marines
"eldar_squad_dark_reapers", "eldar_guardian_squad",
"eldar_squad_rangers", "space_marine_squad_tactical",
"space_marine_squad_scout", "ork_squad_shoota_boy"
},
{--chaos cultists
"eldar_squad_warp_spider", "eldar_squad_rangers",
"space_marine_squad_tactical", "chaos_marine_squad",
},
{--space marines
"eldar_squad_dark_reapers", "eldar_guardian_squad",
"eldar_squad_rangers", "space_marine_squad_scout"
},
{--ork shoota
"eldar_squad_warp_spider"
},
}
for i = 1, table.getn(melee_tbl_1) do
if squad_name == melee_tbl_1[i] then
local num_troopers = self.squad_ai:GetNumTroopers()
if not self.squad_ai:HasSetupTime() and self.squad_ai:IsInCombat() and
not self.squad_ai:IsBroken() and not self.squad_ai:IsCapturing() and
not self.squad_ai:IsInStateMove() and num_troopers > 3 and
not cpu_manager:InSubState( self.squad_ai:GetID() ) then
local squad_pos = self.squad_ai:GetPosition()
local enemy = Ability.Filters.CloseInfantryEnemy( squad_pos, 25, num_troopers - 1 )
if enemy ~= nil and not enemy:IsBroken() and not enemy:IsInStateMove() then
local enemy_pos = enemy:GetPosition()
threat = cpu_manager.terrain_analyzer:GetThreatAtPos( enemy_pos, 30, false )
if threat <= 250 then
local stats = enemy:GetStats()
local name = stats:GetSquadName()
for j = 1, table.getn(melee_tbl_2[i]) do
if name == melee_tbl_2[i][j] then
if stance == SquadAI.MSTANCE_Ranged then
self.squad_ai:DoSetMeleeStance( SquadAI.MSTANCE_Assault )
end
dlg( "melee", squad_name.." melee against "..name )
set_stance = true
break
end
end
end
end
end
--reset stance
if set_stance == false and stance == SquadAI.MSTANCE_Assault then
self.squad_ai:DoSetMeleeStance( SquadAI.MSTANCE_Ranged )
dlg( "melee", squad_name.." reset stance to ranged "..tostring(enemy)..":"..tostring(threat) )
end
break
end
end
end
Last but not least I added code to prevent some squads to dance from cultists. It should be added to function InfantryTactic:CheckForDance() like this
local infantry = Ability.Filters.CloseInfantryEnemy( squad_pos, enemy_dist, 3 )
if infantry ~= nil and self:DontDance( self.squad_ai, infantry ) then
infantry = nil
end
It looks like this
function Tactic:DontDance( defender, attacker )
local d_stats = defender:GetStats()
local d_name = d_stats:GetSquadName()
local d_num = defender:GetNumTroopers()
local a_stats = attacker:GetStats()
local a_name = a_stats:GetSquadName()
local a_num = attacker:GetNumTroopers()
local a_stance = attacker:GetMeleeStance()
if a_stance == SquadAI.MSTANCE_Ranged or a_name == "ork_squad_grot" or
(d_num > a_num * 3) or attacker:IsInStateMove() then
return true
end
local dance_tbl = {
{ "chaos_marine_squad", "chaos_squad_cultist" },
{ "chaos_squad_obliterator", "chaos_squad_cultist" },
{ "ork_squad_shoota_boy", "chaos_squad_cultist" },
{ "ork_squad_tankbusta", "chaos_squad_cultist" },
{ "space_marine_squad_tactical", "chaos_squad_cultist" },
{ "space_marine_squad_terminator", "chaos_squad_cultist" },
}
for i = 1, table.getn(dance_tbl) do
if d_name == dance_tbl[i][1] and a_name == dance_tbl[i][2] then
dlg( "melee", d_name.." don't dance against "..a_name )
return true
end
end
return false
end
Perhaps some code is of interest for you.
Edited by LarkinVB, 07 February 2006 - 05:50 PM.
