-- ****************************************************************************

-- **

-- ** File : /cdimage/lua/formations.lua

-- ** Author(s):

-- **

-- ** Summary :

-- **

-- ** Copyright © 2005 Gas Powered Games, Inc. All rights reserved.

-- ****************************************************************************

--

-- Basic create formation scripts

SurfaceFormations = {

'AttackFormation',

'GrowthFormation',

}

AirFormations = {

'AttackFormation',

'GrowthFormation',

}

ComboFormations = {

'AttackFormation',

'GrowthFormation',

}

local FormationPos = {} -- list to be returned

local FormationCache = {}

local MaxCacheSize = 30

function GetCachedResults(formationUnits, formationType)

local cache = FormationCache[formationType]

if not cache then

return false

end

local unitCount = table.getn(formationUnits)

for _, data in cache do

if data.UnitCount == unitCount then

local match = true

for i = 0, unitCount - 1, 1 do -- These indices are 0-based.

if data.Units[i] ~= formationUnits[i] then

match = false

break

end

end

if match then

return data.Results

end

end

end

return false

end

function CacheResults(results, formationUnits, formationType)

if not FormationCache[formationType] then

FormationCache[formationType] = {}

end

local cache = FormationCache[formationType]

if table.getn(cache) >= MaxCacheSize then

table.remove(cache)

end

table.insert(cache, 1, {Results = results, Units = formationUnits, UnitCount = table.getn(formationUnits)})

end

-- =========================================

-- ================ LAND DATA ==============

-- =========================================

local RemainingCategory = { 'RemainingCategory', }

-- === LAND CATEGORIES ===

local DirectFire = (categories.DIRECTFIRE - (categories.CONSTRUCTION + categories.SNIPER)) * categories.LAND

local Sniper = categories.SNIPER * categories.LAND

local Artillery = (categories.ARTILLERY + categories.INDIRECTFIRE - categories.SNIPER) * categories.LAND

local AntiAir = (categories.ANTIAIR - (categories.EXPERIMENTAL + categories.DIRECTFIRE + categories.SNIPER + Artillery)) * categories.LAND

local Construction = ((categories.COMMAND + categories.CONSTRUCTION + categories.ENGINEER) - (DirectFire + Sniper + Artillery)) * categories.LAND

local UtilityCat = (((categories.RADAR + categories.COUNTERINTELLIGENCE) - categories.DIRECTFIRE) + categories.SCOUT) * categories.LAND

local ShieldCat = categories.uel0307 + categories.ual0307 + categories.xsl0307

-- === TECH LEVEL LAND CATEGORIES ===

local LandCategories = {

Shields = ShieldCat,

Bot1 = (DirectFire * categories.TECH1) * categories.BOT - categories.SCOUT,

Bot2 = (DirectFire * categories.TECH2) * categories.BOT - categories.SCOUT,

Bot3 = (DirectFire * categories.TECH3) * categories.BOT - categories.SCOUT,

Bot4 = (DirectFire * categories.EXPERIMENTAL) * categories.BOT - categories.SCOUT,

Tank1 = (DirectFire * categories.TECH1) - categories.BOT - categories.SCOUT,

Tank2 = (DirectFire * categories.TECH2) - categories.BOT - categories.SCOUT,

Tank3 = (DirectFire * categories.TECH3) - categories.BOT - categories.SCOUT,

Tank4 = (DirectFire * categories.EXPERIMENTAL) - categories.BOT - categories.SCOUT,

Sniper1 = (Sniper * categories.TECH1) - categories.SCOUT,

Sniper2 = (Sniper * categories.TECH2) - categories.SCOUT,

Sniper3 = (Sniper * categories.TECH3) - categories.SCOUT,

Sniper4 = (Sniper * categories.EXPERIMENTAL) - categories.SCOUT,

Art1 = Artillery * categories.TECH1,

Art2 = Artillery * categories.TECH2,

Art3 = Artillery * categories.TECH3,

Art4 = Artillery * categories.EXPERIMENTAL,

AA1 = AntiAir * categories.TECH1,

AA2 = AntiAir * categories.TECH2,

AA3 = AntiAir * categories.TECH3,

Com1 = Construction * categories.TECH1,

Com2 = Construction * categories.TECH2,

Com3 = Construction - (categories.TECH1 + categories.TECH2 + categories.EXPERIMENTAL),

Com4 = Construction * categories.EXPERIMENTAL,

Util1 = (UtilityCat * categories.TECH1) + categories.OPERATION,

Util2 = UtilityCat * categories.TECH2,

Util3 = UtilityCat * categories.TECH3,

Util4 = UtilityCat * categories.EXPERIMENTAL,

RemainingCategory = categories.LAND - (DirectFire + Sniper + Construction + Artillery + AntiAir + UtilityCat + ShieldCat)

}

-- === SUB GROUP ORDERING ===

local Bots = { 'Bot4', 'Bot3', 'Bot2', 'Bot1', }

local Tanks = { 'Tank4', 'Tank3', 'Tank2', 'Tank1', }

local DF = { 'Tank4', 'Bot4', 'Tank3', 'Bot3', 'Tank2', 'Bot2', 'Tank1', 'Bot1', }

local Art = { 'Art4', 'Sniper4', 'Art3', 'Sniper3', 'Art2', 'Sniper2', 'Art1', 'Sniper1', }

local T1Art = { 'Sniper1', 'Art1', 'Sniper2', 'Art2', 'Sniper3', 'Art3', 'Sniper4', 'Art4', }

local AA = { 'AA3', 'AA2', 'AA1', }

local Util = { 'Util4', 'Util3', 'Util2', 'Util1', }

local Com = { 'Com4', 'Com3', 'Com2', 'Com1', }

local Shield = { 'Shields', }

-- === LAND BLOCK TYPES =

local DFFirst = { DF, T1Art, AA, Shield, Com, Util, RemainingCategory }

local ShieldFirst = { Shield, AA, DF, T1Art, Com, Util, RemainingCategory }

local AAFirst = { AA, DF, T1Art, Shield, Com, Util, RemainingCategory }

local ArtFirst = { Art, DF, AA, Shield, Com, Util, RemainingCategory }

local T1ArtFirst = { T1Art, DF, AA, Shield, Com, Util, RemainingCategory }

local UtilFirst = { Util, AA, Shield, DF, T1Art, Com, RemainingCategory }

-- === LAND BLOCKS ===

-- === 3 Wide Attack Block / 3 Units ===

local ThreeWideAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, },

}

-- === 4 Wide Attack Block / 12 Units ===

local FourWideAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, },

-- second row

{ UtilFirst, ShieldFirst, ShieldFirst, UtilFirst, },

-- third Row

{ AAFirst, ArtFirst, ArtFirst, AAFirst, },

}

-- === 5 Wide Attack Block ===

local FiveWideAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, },

-- second row

{ DFFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, },

-- third row

{ UtilFirst, ShieldFirst, DFFirst, ShieldFirst, UtilFirst, },

-- fourth row

{ AAFirst, DFFirst, ArtFirst, DFFirst, AAFirst, },

}

-- === 6 Wide Attack Block ===

local SixWideAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, },

-- second row

{ DFFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, DFFirst, },

-- third row

{ UtilFirst, AAFirst, DFFirst, DFFirst, AAFirst, UtilFirst, },

-- fourth row

{ AAFirst, ShieldFirst, ArtFirst, ArtFirst, ShieldFirst, AAFirst, },

-- fifth row

{ DFFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, DFFirst, },

}

-- === 7 Wide Attack Block ===

local SevenWideAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, },

-- second Row

{ DFFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, },

-- third row

{ DFFirst, UtilFirst, AAFirst, DFFirst, AAFirst, UtilFirst, DFFirst, },

-- fourth row

{ DFFirst, ShieldFirst, AAFirst, T1ArtFirst, AAFirst, ShieldFirst, DFFirst, },

-- fifth row

{ DFFirst, T1ArtFirst, AAFirst, ShieldFirst, AAFirst, T1ArtFirst, DFFirst, },

-- sixth row

{ ArtFirst, UtilFirst, ArtFirst, AAFirst, ArtFirst, UtilFirst, ArtFirst, },

}

-- === 8 Wide Attack Block ===

local EightWideAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, },

-- second Row

{ DFFirst, ShieldFirst, DFFirst, ShieldFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, },

-- third row

{ DFFirst, UtilFirst, AAFirst, DFFirst, DFFirst, AAFirst, UtilFirst, DFFirst, },

-- fourth row

{ DFFirst, ShieldFirst, T1ArtFirst, AAFirst, AAFirst, T1ArtFirst, ShieldFirst, DFFirst, },

-- fifth row

{ DFFirst, T1ArtFirst, AAFirst, T1ArtFirst, T1ArtFirst, AAFirst, T1ArtFirst, DFFirst, },

-- sixth row

{ DFFirst, ShieldFirst, UtilFirst, ShieldFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, },

-- seventh row

{ DFFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, DFFirst, },

}

-- === 2 Row Attack Block - 8 units wide ===

local TwoRowAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst },

-- second row

{ AAFirst, UtilFirst, ShieldFirst, ArtFirst, ArtFirst, ShieldFirst, UtilFirst, AAFirst },

}

-- === 3 Row Attack Block - 10 units wide ===

local ThreeRowAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst },

-- second row

{ AAFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, AAFirst },

-- third row

{ DFFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, DFFirst },

}

-- === 4 Row Attack Block - 12 units wide ===

local FourRowAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst },

-- second row

{ DFFirst, ShieldFirst, DFFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, DFFirst, ShieldFirst, DFFirst },

-- third row

{ DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst },

-- fourth row

{ AAFirst, ShieldFirst, DFFirst, ArtFirst, ShieldFirst, ArtFirst, ArtFirst, ShieldFirst, ArtFirst, DFFirst, ShieldFirst, AAFirst },

}

-- === 5 Row Attack Block - 14 units wide ===

local FiveRowAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst },

-- second row

{ UtilFirst, ShieldFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, ShieldFirst, UtilFirst },

-- third row

{ DFFirst, AAFirst, DFFirst, AAFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, AAFirst, DFFirst, AAFirst, DFFirst },

-- fourth row

{ AAFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, ShieldFirst, AAFirst, AAFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, ShieldFirst, AAFirst },

-- five row

{ ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst },

}

-- === 6 Row Attack Block - 16 units wide ===

local SixRowAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst },

-- second row

{ UtilFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, DFFirst, ShieldFirst, DFFirst, ShieldFirst, UtilFirst },

-- third row

{ DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst },

-- fourth row

{ AAFirst, ShieldFirst, AAFirst, DFFirst, AAFirst, AAFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, AAFirst, AAFirst, DFFirst, AAFirst, ShieldFirst, AAFirst },

-- fifth row

{ DFFirst, AAFirst, DFFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, AAFirst, AAFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, DFFirst, AAFirst, DFFirst },

-- sixth row

{ AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst },

}

-- === 7 Row Attack Block - 18 units wide ===

local SevenRowAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst },

-- second row

{ UtilFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, ShieldFirst, DFFirst, ShieldFirst, UtilFirst },

-- third row

{ DFFirst, DFFirst, AAFirst, DFFirst, AAFirst, DFFirst, DFFirst, DFFirst, AAFirst, AAFirst, DFFirst, DFFirst, DFFirst, AAFirst, DFFirst, AAFirst, DFFirst, DFFirst },

-- fourth row

{ DFFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, DFFirst, AAFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, AAFirst, DFFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, DFFirst },

-- fifth row

{ UtilFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, UtilFirst },

-- sixth row

{ DFFirst, ShieldFirst, AAFirst, DFFirst, ShieldFirst, UtilFirst, DFFirst, ShieldFirst, AAFirst, AAFirst, ShieldFirst, DFFirst, UtilFirst, ShieldFirst, DFFirst, AAFirst, ShieldFirst, DFFirst },

-- seventh row

{ ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst },

}

-- === 8 Row Attack Block - 20 units wide ===

local EightRowAttackFormationBlock = {

-- first row

{ DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst, DFFirst },

-- second row

{ DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, UtilFirst, ShieldFirst, DFFirst },

-- third row

{ DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst },

-- fourth row

{ DFFirst, ShieldFirst, DFFirst, AAFirst, ShieldFirst, DFFirst, ShieldFirst, AAFirst, ShieldFirst, DFFirst, DFFirst, ShieldFirst, AAFirst, ShieldFirst, DFFirst, ShieldFirst, AAFirst, DFFirst, ShieldFirst, DFFirst },

-- fifth row

{ DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, AAFirst, AAFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst, DFFirst, AAFirst, DFFirst },

-- sixth row

{ UtilFirst, ShieldFirst, ArtFirst, ShieldFirst, ArtFirst, UtilFirst, ShieldFirst, ArtFirst, ShieldFirst, AAFirst, AAFirst, ShieldFirst, ArtFirst, ShieldFirst, UtilFirst, ArtFirst, ShieldFirst, ArtFirst, ShieldFirst, UtilFirst },

-- seventh row

{ DFFirst, AAFirst, DFFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, ArtFirst, ArtFirst, AAFirst, ArtFirst, DFFirst, AAFirst, DFFirst },

-- eight row

{ AAFirst, ShieldFirst, ArtFirst, AAFirst, ShieldFirst, ArtFirst, ShieldFirst, AAFirst, ShieldFirst, ArtFirst, ArtFirst, ShieldFirst, AAFirst, ShieldFirst, ArtFirst, ShieldFirst, AAFirst, ArtFirst, ShieldFirst, AAFirst },

}

-- =========================================

-- ================ AIR DATA ===============

-- =========================================

-- === AIR CATEGORIES ===

local GroundAttackAir = (categories.AIR * categories.GROUNDATTACK) - categories.ANTIAIR

local TransportationAir = categories.AIR * categories.TRANSPORTATION - categories.GROUNDATTACK

local BomberAir = categories.AIR * categories.BOMBER

local AAAir = categories.AIR * categories.ANTIAIR

local AntiNavyAir = categories.AIR * categories.ANTINAVY

local IntelAir = categories.AIR * (categories.SCOUT + categories.RADAR)

local ExperimentalAir = categories.AIR * categories.EXPERIMENTAL

local EngineerAir = categories.AIR * categories.ENGINEER

-- === TECH LEVEL AIR CATEGORIES ===

local AirCategories = {

Ground1 = GroundAttackAir * categories.TECH1,

Ground2 = GroundAttackAir * categories.TECH2,

Ground3 = GroundAttackAir * categories.TECH3,

Trans1 = TransportationAir * categories.TECH1,

Trans2 = TransportationAir * categories.TECH2,

Trans3 = TransportationAir* categories.TECH3,

Bomb1 = BomberAir * categories.TECH1,

Bomb2 = BomberAir * categories.TECH2,

Bomb3 = BomberAir * categories.TECH3,

AA1 = AAAir * categories.TECH1,

AA2 = AAAir * categories.TECH2,

AA3 = AAAir * categories.TECH3,

AN1 = AntiNavyAir * categories.TECH1,

AN2 = AntiNavyAir * categories.TECH2,

AN3 = AntiNavyAir * categories.TECH3,

AIntel1 = IntelAir * categories.TECH1,

AIntel2 = IntelAir * categories.TECH2,

AIntel3 = IntelAir * categories.TECH3,

AExper = ExperimentalAir,

AEngineer = EngineerAir,

RemainingCategory = categories.AIR - (GroundAttackAir + TransportationAir + BomberAir + AAAir + AntiNavyAir + IntelAir + ExperimentalAir + EngineerAir)

}

-- === SUB GROUP ORDERING ===

local GroundAttack = { 'Ground3', 'Ground2', 'Ground1', }

local Transports = { 'Trans3', 'Trans2', 'Trans1', }

local Bombers = { 'Bomb3', 'Bomb2', 'Bomb1', }

local T3Bombers = {'Bomb3',}

local AntiAir = { 'AA3', 'AA2', 'AA1', }

local AntiNavy = { 'AN3', 'AN2', 'AN1', }

local Intel = { 'AIntel3', 'AIntel2', 'AIntel1', }

local ExperAir = { 'AExper', }

local EngAir = { 'AEngineer', }

-- === Air Block Arrangement ===

local ChevronSlot = { AntiAir, ExperAir, AntiNavy, GroundAttack, Bombers, Intel, Transports, EngAir, RemainingCategory }

local StratSlot = { T3Bombers }

local AttackChevronBlock = {

RepeatAllRows = false,

HomogenousBlocks = true,

{ ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, }, -- 1 -> 3 at 20 units

{ ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, }, -- 3 -> 5 at 60 units

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, }, -- 5 -> 7 at 170 units

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, }, -- 7 -> 9 at 390 units

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, }, -- 9 -> 11 at 760 units

}

local GrowthChevronBlock = {

RepeatAllRows = false,

HomogenousBlocks = true,

{ ChevronSlot, },

{ ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, }, -- 1 -> 3 at 25 units

{ ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, }, -- 3 -> 5 at 95 units

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, }, -- 5 -> 7 at 255 units

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, },

{ ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, ChevronSlot, }, -- 7 -> 9 at 545 units

}

-- =========================================

-- ============== NAVAL DATA ===============

-- =========================================

local LightAttackNaval = categories.LIGHTBOAT

local FrigateNaval = categories.FRIGATE

local SubNaval = categories.T1SUBMARINE + categories.T2SUBMARINE + (categories.NUKESUB * categories.ANTINAVY - categories.NUKE)

local DestroyerNaval = categories.DESTROYER

local CruiserNaval = categories.CRUISER

local BattleshipNaval = categories.BATTLESHIP

local CarrierNaval = categories.NAVALCARRIER

local NukeSubNaval = categories.NUKESUB - SubNaval

local MobileSonar = categories.MOBILESONAR

local DefensiveBoat = categories.DEFENSIVEBOAT

local RemainingNaval = categories.NAVAL - (LightAttackNaval + FrigateNaval + SubNaval + DestroyerNaval + CruiserNaval + BattleshipNaval +

CarrierNaval + NukeSubNaval + DefensiveBoat + MobileSonar)

-- === TECH LEVEL LAND CATEGORIES ===

local NavalCategories = {

LightCount = LightAttackNaval,

FrigateCount = FrigateNaval,

CruiserCount = CruiserNaval,

DestroyerCount = DestroyerNaval,

BattleshipCount = BattleshipNaval,

CarrierCount = CarrierNaval,

NukeSubCount = NukeSubNaval,

MobileSonarCount = MobileSonar + DefensiveBoat,

RemainingCategory = RemainingNaval,

}

local SubCategories = {

SubCount = SubNaval,

}

-- === SUB GROUP ORDERING ===

local Frigates = { 'FrigateCount', 'LightCount', }

local Destroyers = { 'DestroyerCount', }

local Cruisers = { 'CruiserCount', }

local Battleships = { 'BattleshipCount', }

local Subs = { 'SubCount', }

local NukeSubs = { 'NukeSubCount', }

local Carriers = { 'CarrierCount', }

local Sonar = {'MobileSonarCount', }

-- === NAVAL BLOCK TYPES =

local FrigatesFirst = { Frigates, Destroyers, Battleships, Cruisers, Carriers, NukeSubs, Sonar, RemainingCategory }

local DestroyersFirst = { Destroyers, Frigates, Battleships, Cruisers, Carriers, NukeSubs, Sonar, RemainingCategory }

local CruisersFirst = { Cruisers, Carriers, Battleships, Destroyers, Frigates, NukeSubs, Sonar, RemainingCategory }

local LargestFirstDF = { Battleships, Carriers, Destroyers, Cruisers, Frigates, NukeSubs, Sonar, RemainingCategory }

local SmallestFirstDF = { Frigates, Destroyers, Cruisers, Sonar, Battleships, Carriers, NukeSubs, RemainingCategory }

local LargestFirstAA = { Carriers, Battleships, Cruisers, Destroyers, Frigates, NukeSubs, Sonar, RemainingCategory }

local SmallestFirstAA = { Cruisers, Frigates, Destroyers, Sonar, Carriers, Battleships, NukeSubs, RemainingCategory }

local Subs = { Subs, NukeSubs, RemainingCategory }

local SonarFirst = { Sonar, Carriers, Cruisers, Battleships, Destroyers, Frigates, NukeSubs, Sonar, RemainingCategory }

-- === NAVAL BLOCKS ===

-- === Three Naval Growth Formation Block ==

local ThreeNavalGrowthFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst },

-- second row

{ LargestFirstDF, SonarFirst, LargestFirstDF },

-- third row

{ DestroyersFirst, CruisersFirst, DestroyersFirst },

}

-- === Five Naval Growth Formation Block ==

local FiveNavalGrowthFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst },

-- second row

{ FrigatesFirst, LargestFirstDF, DestroyersFirst, LargestFirstDF, FrigatesFirst },

-- third row

{ DestroyersFirst, SmallestFirstDF, SonarFirst, SmallestFirstDF, DestroyersFirst },

-- fourth row

{ DestroyersFirst, LargestFirstAA, CruisersFirst, LargestFirstAA, DestroyersFirst },

-- fifth row

{ DestroyersFirst, SmallestFirstAA, CruisersFirst, SmallestFirstAA, DestroyersFirst },

}

-- === Seven Naval Growth Formation Block ==

local SevenNavalGrowthFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst },

-- second row

{ FrigatesFirst, SmallestFirstDF, DestroyersFirst, DestroyersFirst, DestroyersFirst, SmallestFirstDF, FrigatesFirst },

-- third row

{ DestroyersFirst, DestroyersFirst, LargestFirstDF, SonarFirst, LargestFirstDF, DestroyersFirst, DestroyersFirst },

-- fourth row

{ DestroyersFirst, SmallestFirstAA, SmallestFirstAA, CruisersFirst, SmallestFirstAA, SmallestFirstAA, DestroyersFirst },

-- fifth row

{ DestroyersFirst, CruisersFirst, LargestFirstAA, DestroyersFirst, LargestFirstAA, CruisersFirst, DestroyersFirst },

-- sixth row

{ DestroyersFirst, SmallestFirstAA, SmallestFirstAA, SonarFirst, SmallestFirstAA, SmallestFirstAA, DestroyersFirst },

-- seventh row

{ DestroyersFirst, CruisersFirst, LargestFirstDF, CruisersFirst, LargestFirstDF, CruisersFirst, DestroyersFirst },

}

-- === Nine Naval Growth Formation Block ==

local NineNavalGrowthFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst },

-- second row

{ FrigatesFirst, LargestFirstDF, SonarFirst, LargestFirstDF, DestroyersFirst, LargestFirstDF, SonarFirst, LargestFirstDF, FrigatesFirst },

-- third row

{ SmallestFirstDF, DestroyersFirst, SmallestFirstAA, SmallestFirstAA, SonarFirst, SmallestFirstAA, SmallestFirstAA, DestroyersFirst, SmallestFirstDF },

-- fourth row

{ DestroyersFirst, LargestFirstAA, CruisersFirst, LargestFirstAA, CruisersFirst, LargestFirstAA, CruisersFirst, LargestFirstAA, DestroyersFirst },

-- fifth row

{ DestroyersFirst, DestroyersFirst, SmallestFirstAA, SmallestFirstAA, CruisersFirst, SmallestFirstAA, SmallestFirstAA, DestroyersFirst, DestroyersFirst },

}

-- ==============================================

-- ============ Naval Attack Formation===========

-- ==============================================

-- === Five Wide Naval Attack Formation Block ==

local FiveWideNavalAttackFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst},

-- second row

{ DestroyersFirst, LargestFirstDF, CruisersFirst, LargestFirstDF, DestroyersFirst},

}

-- === Seven Wide Naval Attack Formation Block ==

local SevenWideNavalAttackFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst },

-- second row

{ DestroyersFirst, SonarFirst, LargestFirstDF, DestroyersFirst, LargestFirstDF, SonarFirst, DestroyersFirst },

-- third row

{ SmallestFirstDF, SmallestFirstAA, SmallestFirstDF, CruisersFirst, SmallestFirstDF, SmallestFirstAA, SmallestFirstDF },

}

-- === Nine Wide Naval Attack Formation Block ==

local NineWideNavalAttackFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst },

-- second row

{ DestroyersFirst, LargestFirstDF, SonarFirst, LargestFirstDF, DestroyersFirst, LargestFirstDF, SonarFirst, LargestFirstDF, DestroyersFirst },

-- third row

{ SmallestFirstDF, DestroyersFirst, SmallestFirstAA, SmallestFirstAA, SonarFirst, SmallestFirstAA, SmallestFirstAA, DestroyersFirst, SmallestFirstDF },

-- fourth row

{ DestroyersFirst, SmallestFirstDF, CruisersFirst, LargestFirstAA, CruisersFirst, LargestFirstAA, CruisersFirst, SmallestFirstDF, DestroyersFirst },

}

-- === Eleven Wide Naval Attack Formation Block ==

local ElevenWideNavalAttackFormation = {

LineBreak = 0.5,

-- first row

{ FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst, FrigatesFirst },

-- second row

{ DestroyersFirst, DestroyersFirst, LargestFirstDF, SmallestFirstDF, LargestFirstDF, DestroyersFirst, LargestFirstDF, SmallestFirstDF, LargestFirstDF, DestroyersFirst, DestroyersFirst },

-- third row

{ SmallestFirstDF, DestroyersFirst, SmallestFirstAA, SmallestFirstAA, SmallestFirstAA, SonarFirst, SmallestFirstAA, SmallestFirstAA, SmallestFirstAA, DestroyersFirst, SmallestFirstDF },

-- fourth row

{ DestroyersFirst, SmallestFirstAA, LargestFirstDF, SonarFirst, LargestFirstAA, CruisersFirst, LargestFirstAA, SonarFirst, LargestFirstDF, SmallestFirstAA, DestroyersFirst },

}

-- ==============================================

-- ============ Sub Growth Formation===========

-- ==============================================

-- === Four Wide Growth Subs Formation ===

local FourWideSubGrowthFormation = {

LineBreak = 0.5,

{ Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs },

}

-- === Six Wide Subs Formation ===

local SixWideSubGrowthFormation = {

LineBreak = 0.5,

{ Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs },

}

-- === Eight Wide Subs Formation ===

local EightWideSubGrowthFormation = {

LineBreak = 0.5,

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

}

-- ==============================================

-- ============ Sub Attack Formation===========

-- ==============================================

-- === Four Wide Subs Formation ===

local FourWideSubAttackFormation = {

LineBreak = 0.5,

{ Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs },

}

-- === Six Wide Subs Formation ===

local SixWideSubAttackFormation = {

LineBreak = 0.5,

{ Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs },

}

-- === Eight Wide Subs Formation ===

local EightWideSubAttackFormation = {

LineBreak = 0.5,

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

}

-- === Ten Wide Subs Formation ===

local TenWideSubAttackFormation = {

LineBreak = 0.5,

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

{ Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs, Subs },

}

-- ============ Formation Pickers ============

function PickBestTravelFormationIndex(typeName, distance)

if typeName == 'AirFormations' then

return 0;

else

return 1;

end

end

function PickBestFinalFormationIndex(typeName, distance)

return -1;

end

-- ================ THE GUTS ====================

-- ============ Formation Functions =============

-- ==============================================

function AttackFormation(formationUnits)

local cachedResults = GetCachedResults(formationUnits, 'AttackFormation')

if cachedResults then

return cachedResults

end

FormationPos = {}

local unitsList = CategorizeUnits(formationUnits)

local landUnitsList = unitsList.Land

local landBlock

if landUnitsList.AreaTotal <= 16 then -- 8 wide

landBlock = TwoRowAttackFormationBlock

elseif landUnitsList.AreaTotal <= 30 then -- 10 wide

landBlock = ThreeRowAttackFormationBlock

elseif landUnitsList.AreaTotal <= 48 then -- 12 wide

landBlock = FourRowAttackFormationBlock

elseif landUnitsList.AreaTotal <= 70 then -- 14 wide

landBlock = FiveRowAttackFormationBlock

elseif landUnitsList.AreaTotal <= 96 then -- 16 wide

landBlock = SixRowAttackFormationBlock

elseif landUnitsList.AreaTotal <= 126 then -- 18 wide

landBlock = SevenRowAttackFormationBlock

else -- 20 wide

landBlock = EightRowAttackFormationBlock

end

BlockBuilderLand(landUnitsList, landBlock, LandCategories, 1)

local seaUnitsList = unitsList.Naval

local subUnitsList = unitsList.Subs

local seaArea = seaUnitsList.AreaTotal

local subArea = subUnitsList.AreaTotal

local seaBlock

local subBlock

if seaArea <= 10 and subArea <= 8 then

seaBlock = FiveWideNavalAttackFormation

subBlock = FourWideSubAttackFormation

elseif seaArea <= 21 and subArea <= 18 then

seaBlock = SevenWideNavalAttackFormation

subBlock = SixWideSubAttackFormation

elseif seaArea <= 36 and subArea <= 32 then

seaBlock = NineWideNavalAttackFormation

subBlock = EightWideSubAttackFormation

else

seaBlock = ElevenWideNavalAttackFormation

subBlock = TenWideSubAttackFormation

end

BlockBuilderLand(seaUnitsList, seaBlock, NavalCategories, 1)

BlockBuilderLand(subUnitsList, subBlock, SubCategories, 1)

BlockBuilderAir(unitsList.Air, AttackChevronBlock, 1)

CacheResults(FormationPos, formationUnits, 'AttackFormation')

return FormationPos

end

function GrowthFormation(formationUnits)

local cachedResults = GetCachedResults(formationUnits, 'GrowthFormation')

if cachedResults then

return cachedResults

end

FormationPos = {}

local unitsList = CategorizeUnits(formationUnits)

local landUnitsList = unitsList.Land

local landBlock

if landUnitsList.AreaTotal <= 3 then

landBlock = ThreeWideAttackFormationBlock

elseif landUnitsList.AreaTotal <= 12 then

landBlock = FourWideAttackFormationBlock

elseif landUnitsList.AreaTotal <= 20 then

landBlock = FiveWideAttackFormationBlock

elseif landUnitsList.AreaTotal <= 30 then

landBlock = SixWideAttackFormationBlock

elseif landUnitsList.AreaTotal <= 42 then

landBlock = SevenWideAttackFormationBlock

else

landBlock = EightWideAttackFormationBlock

end

BlockBuilderLand(landUnitsList, landBlock, LandCategories, 1)

local seaUnitsList = unitsList.Naval

local subUnitsList = unitsList.Subs

local seaArea = seaUnitsList.AreaTotal

local subArea = subUnitsList.AreaTotal

local seaBlock

local subBlock

if seaArea <= 9 and subArea <= 12 then

seaBlock = ThreeNavalGrowthFormation

subBlock = FourWideSubGrowthFormation

elseif seaArea <= 25 and subArea <= 20 then

seaBlock = FiveNavalGrowthFormation

subBlock = FourWideSubGrowthFormation

elseif seaArea <= 49 and subArea <= 42 then

seaBlock = SevenNavalGrowthFormation

subBlock = SixWideSubGrowthFormation

else

seaBlock = NineNavalGrowthFormation

subBlock = EightWideSubGrowthFormation

end

BlockBuilderLand(seaUnitsList, seaBlock, NavalCategories, 1)

BlockBuilderLand(subUnitsList, subBlock, SubCategories, 1)

if unitsList.Air.Bomb3[1] then

local count = unitsList.Air.Bomb3[1].Count

local oldAirArea = unitsList.Air.AreaTotal

local oldUnitTotal = unitsList.Air.UnitTotal

unitsList.Air.AreaTotal = count

unitsList.Air.UnitTotal = count

BlockBuilderAirT3Bombers(unitsList.Air, 1.5) --strats formation

--strats are already in formation so we remove them from table and adjust all parameters.

unitsList.Air.Bomb3 = {}

unitsList.Air.AreaTotal = oldAirArea - count

unitsList.Air.UnitTotal = oldUnitTotal - count

BlockBuilderAir(unitsList.Air, GrowthChevronBlock, 1)

else

BlockBuilderAir(unitsList.Air, GrowthChevronBlock, 1)

end

CacheResults(FormationPos, formationUnits, 'GrowthFormation')

return FormationPos

end

function GuardFormation(formationUnits)

-- Not worth caching GuardFormation because it's almost never called repeatedly with the same units.

local FormationPos = {}

local shieldCategory = ShieldCat

local nonShieldCategory = categories.ALLUNITS - shieldCategory

local footprintCounts = {}

local remainingUnits = table.getn(formationUnits)

local remainingShields = 0

for _, u in formationUnits do

if EntityCategoryContains(ShieldCat, u) then

remainingShields = remainingShields + 1

end

local fs = u:GetFootPrintSize()

footprintCounts[fs] = (footprintCounts[fs] or 0) + 1

end

local numSizes = 0

for _ in footprintCounts do

numSizes = numSizes + 1

end

local largestFootprint = 0

local smallestFootprint = 9999

local minCount = remainingUnits / numSizes -- This could theoretically divide by 0, but it wouldn't be a problem because the result would never be used.

for fs, count in footprintCounts do

largestFootprint = math.max(largestFootprint, fs)

if count >= minCount then

smallestFootprint = math.min(smallestFootprint, fs)

end

end

local ringSpacing = (smallestFootprint + 2) / (largestFootprint + 2) -- A distance of 1 in formation coordinates is translated to (largestFootprint + 2) world units.

local rotate = false

local sizeMult = 0

local ringChange = 0

local ringCount = 1

local unitCount = 1

local shieldsInRing = 0

local unitsPerShield = 0

local nextShield = 0

-- Form concentric circles around the assisted unit

-- Most of the numbers after this point are arbitrary. Don't go looking for the significance of 0.19 or the like because there is none.

while remainingUnits > 0 do

if unitCount > ringChange then

unitCount = 1

ringCount = ringCount + 1

sizeMult = ringCount * ringSpacing

ringChange = ringCount * 6

if remainingUnits < ringChange * 1.167 then

ringChange = remainingUnits -- It looks better to squeeze a few more units into the last ring than add a ring with only one or two units.

end

if ringCount == 2 or remainingShields >= (remainingUnits + ringChange + 6) * 0.19 then

shieldsInRing = math.min(ringChange / 2, remainingShields)

elseif remainingShields >= (remainingUnits + ringChange + 6) * 0.13 then

shieldsInRing = math.min(ringChange / 3, remainingShields)

else

shieldsInRing = 0

end

shieldsInRing = math.max(shieldsInRing, remainingShields - (remainingUnits - ringChange))

if shieldsInRing > 0 then

unitsPerShield = ringChange / shieldsInRing

nextShield = unitsPerShield - 0.01 -- Rounding error could result in missing a shield if nextShield is supposed to equal ringChange.

end

end

local ringPosition = unitCount / ringChange * math.pi * 2.0

offsetX = sizeMult * math.sin(ringPosition)

offsetY = -sizeMult * math.cos(ringPosition)

if shieldsInRing > 0 and unitCount >= nextShield then

table.insert(FormationPos, { offsetX, offsetY, shieldCategory, 0, rotate })

remainingShields = remainingShields - 1

nextShield = nextShield + unitsPerShield

else

table.insert(FormationPos, { offsetX, offsetY, nonShieldCategory, 0, rotate })

end

unitCount = unitCount + 1

remainingUnits = remainingUnits - 1

end

return FormationPos

end

-- =========== LAND BLOCK BUILDING =================

function BlockBuilderLand(unitsList, formationBlock, categoryTable, spacing)

spacing = (spacing or 1) * unitsList.Scale

local numRows = table.getn(formationBlock)

local rowNum = 1

local whichRow = 1

local whichCol = 1

local currRowLen = table.getn(formationBlock[whichRow])

local rowModifier = GetLandRowModifer(unitsList, categoryTable, currRowLen)

currRowLen = currRowLen - rowModifier

local evenRowLen = math.mod(currRowLen, 2) == 0

local rowType = false

local formationLength = 0

local inserted = false

local occupiedSpaces = {}

while unitsList.UnitTotal > 0 do

if whichCol > currRowLen then

rowNum = rowNum + 1

if whichRow == numRows then

whichRow = 1

else

whichRow = whichRow + 1

end

formationLength = formationLength + 1 + (formationBlock.LineBreak or 0)

whichCol = 1

rowType = false

currRowLen = table.getn(formationBlock[whichRow])

if occupiedSpaces[rowNum] then

rowModifier = 0

else

rowModifier = GetLandRowModifer(unitsList, categoryTable, currRowLen)

end

currRowLen = currRowLen - rowModifier

evenRowLen = math.mod(currRowLen, 2) == 0

end

if occupiedSpaces[rowNum] and occupiedSpaces[rowNum][whichCol] then

whichCol = whichCol + 1

continue

end

local currColSpot = GetColSpot(currRowLen + rowModifier, whichCol + rowModifier) -- Translate whichCol to correct spot in row

local currSlot = formationBlock[whichRow][currColSpot]

for _, type in currSlot do

if inserted then

break

end

for _, group in type do

if not formationBlock.HomogenousRows or (rowType == false or rowType == type) then

local fs = 0

local size = 0

local evenSize = true

local groupData = nil

for k, v in unitsList[group] do

size = unitsList.FootprintSizes[k]

evenSize = math.mod(size, 2) == 0

if v.Count > 0 then

if size > 1 and IsLandSpaceOccupied(occupiedSpaces, size, rowNum, whichCol, currRowLen, unitsList.UnitTotal) then

continue

end

fs = k

groupData = v

break

end

end

if groupData then

local offsetX = 0

local offsetY = 0

if size > 1 then

if whichCol == 1 and evenRowLen and evenSize then

offsetX = -0.5

else

offsetX = (size - 1) / 2

end

offsetY = (size - 1) / 2 * (1 + (formationBlock.LineBreak or 0))

OccupyLandSpace(occupiedSpaces, size, rowNum, whichCol, currRowLen)

end

local xPos

if evenRowLen then

xPos = math.ceil(whichCol/2) - .5 + offsetX

if not (math.mod(whichCol, 2) == 0) then

xPos = xPos * -1

end

else

if whichCol == 1 then