mirror of
https://github.com/FlightControl-Master/MOOSE.git
synced 2025-08-15 10:47:21 +00:00
52e66ae969
- AI_A2A_Gci Removed reference to SetEngageZone - Fixed link to #AI_A2G_SEAD.SetEngageRange #2025 - AI_Air_Engage removed reference to SetEngageZone. Does not seem to exist any more. - AI_Air_Patrol removed reference to SetEngageZone. Does not seem to exist any more or is passed as argument now. - AI_FORMATION Fixed DCSTypes#AI.Option.Air.val.ROE OptionROE #2029 - SETTINGS Fixed link to Message #2021 - Fixed wrong indent of "Developer Note" in various classes
590 lines
20 KiB
Lua
590 lines
20 KiB
Lua
--- **AI** - Models the intelligent transportation of infantry and other cargo.
|
|
--
|
|
-- ===
|
|
--
|
|
-- ### Author: **FlightControl**
|
|
--
|
|
-- ===
|
|
--
|
|
-- @module AI.AI_Cargo
|
|
-- @image Cargo.JPG
|
|
|
|
--- @type AI_CARGO
|
|
-- @extends Core.Fsm#FSM_CONTROLLABLE
|
|
|
|
|
|
--- Base class for the dynamic cargo handling capability for AI groups.
|
|
--
|
|
-- Carriers can be mobilized to intelligently transport infantry and other cargo within the simulation.
|
|
-- The AI_CARGO module uses the @{Cargo.Cargo} capabilities within the MOOSE framework.
|
|
-- CARGO derived objects must be declared within the mission to make the AI_CARGO object recognize the cargo.
|
|
-- Please consult the @{Cargo.Cargo} module for more information.
|
|
--
|
|
-- The derived classes from this module are:
|
|
--
|
|
-- * @{AI.AI_Cargo_APC} - Cargo transportation using APCs and other vehicles between zones.
|
|
-- * @{AI.AI_Cargo_Helicopter} - Cargo transportation using helicopters between zones.
|
|
-- * @{AI.AI_Cargo_Airplane} - Cargo transportation using airplanes to and from airbases.
|
|
--
|
|
-- # Developer Note
|
|
--
|
|
-- Note while this class still works, it is no longer supported as the original author stopped active development of MOOSE
|
|
-- Therefore, this class is considered to be deprecated
|
|
--
|
|
-- @field #AI_CARGO
|
|
AI_CARGO = {
|
|
ClassName = "AI_CARGO",
|
|
Coordinate = nil, -- Core.Point#COORDINATE,
|
|
Carrier_Cargo = {},
|
|
}
|
|
|
|
--- Creates a new AI_CARGO object.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier Cargo carrier group.
|
|
-- @param Core.Set#SET_CARGO CargoSet Set of cargo(s) to transport.
|
|
-- @return #AI_CARGO self
|
|
function AI_CARGO:New( Carrier, CargoSet )
|
|
|
|
local self = BASE:Inherit( self, FSM_CONTROLLABLE:New( Carrier ) ) -- #AI_CARGO
|
|
|
|
self.CargoSet = CargoSet -- Core.Set#SET_CARGO
|
|
self.CargoCarrier = Carrier -- Wrapper.Group#GROUP
|
|
|
|
self:SetStartState( "Unloaded" )
|
|
|
|
-- Board
|
|
self:AddTransition( "Unloaded", "Pickup", "Unloaded" )
|
|
self:AddTransition( "*", "Load", "*" )
|
|
self:AddTransition( "*", "Reload", "*" )
|
|
self:AddTransition( "*", "Board", "*" )
|
|
self:AddTransition( "*", "Loaded", "Loaded" )
|
|
self:AddTransition( "Loaded", "PickedUp", "Loaded" )
|
|
|
|
-- Unload
|
|
self:AddTransition( "Loaded", "Deploy", "*" )
|
|
self:AddTransition( "*", "Unload", "*" )
|
|
self:AddTransition( "*", "Unboard", "*" )
|
|
self:AddTransition( "*", "Unloaded", "Unloaded" )
|
|
self:AddTransition( "Unloaded", "Deployed", "Unloaded" )
|
|
|
|
|
|
--- Pickup Handler OnBefore for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] OnBeforePickup
|
|
-- @param #AI_CARGO self
|
|
-- @param #string From
|
|
-- @param #string Event
|
|
-- @param #string To
|
|
-- @param Core.Point#COORDINATE Coordinate
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
-- @return #boolean
|
|
|
|
--- Pickup Handler OnAfter for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] OnAfterPickup
|
|
-- @param #AI_CARGO self
|
|
-- @param #string From
|
|
-- @param #string Event
|
|
-- @param #string To
|
|
-- @param Core.Point#COORDINATE Coordinate
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
|
|
--- Pickup Trigger for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] Pickup
|
|
-- @param #AI_CARGO self
|
|
-- @param Core.Point#COORDINATE Coordinate
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
|
|
--- Pickup Asynchronous Trigger for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] __Pickup
|
|
-- @param #AI_CARGO self
|
|
-- @param #number Delay
|
|
-- @param Core.Point#COORDINATE Coordinate Pickup place. If not given, loading starts at the current location.
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
|
|
--- Deploy Handler OnBefore for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] OnBeforeDeploy
|
|
-- @param #AI_CARGO self
|
|
-- @param #string From
|
|
-- @param #string Event
|
|
-- @param #string To
|
|
-- @param Core.Point#COORDINATE Coordinate
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
-- @return #boolean
|
|
|
|
--- Deploy Handler OnAfter for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] OnAfterDeploy
|
|
-- @param #AI_CARGO self
|
|
-- @param #string From
|
|
-- @param #string Event
|
|
-- @param #string To
|
|
-- @param Core.Point#COORDINATE Coordinate
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
|
|
--- Deploy Trigger for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] Deploy
|
|
-- @param #AI_CARGO self
|
|
-- @param Core.Point#COORDINATE Coordinate
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
|
|
--- Deploy Asynchronous Trigger for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] __Deploy
|
|
-- @param #AI_CARGO self
|
|
-- @param #number Delay
|
|
-- @param Core.Point#COORDINATE Coordinate
|
|
-- @param #number Speed Speed in km/h. Default is 50% of max possible speed the group can do.
|
|
|
|
|
|
--- Loaded Handler OnAfter for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] OnAfterLoaded
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From
|
|
-- @param #string Event
|
|
-- @param #string To
|
|
|
|
--- Unloaded Handler OnAfter for AI_CARGO
|
|
-- @function [parent=#AI_CARGO] OnAfterUnloaded
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From
|
|
-- @param #string Event
|
|
-- @param #string To
|
|
|
|
--- On after Deployed event.
|
|
-- @function [parent=#AI_CARGO] OnAfterDeployed
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param Core.Zone#ZONE DeployZone The zone wherein the cargo is deployed. This can be any zone type, like a ZONE, ZONE_GROUP, ZONE_AIRBASE.
|
|
-- @param #boolean Defend Defend for APCs.
|
|
|
|
|
|
for _, CarrierUnit in pairs( Carrier:GetUnits() ) do
|
|
local CarrierUnit = CarrierUnit -- Wrapper.Unit#UNIT
|
|
CarrierUnit:SetCargoBayWeightLimit()
|
|
end
|
|
|
|
self.Transporting = false
|
|
self.Relocating = false
|
|
|
|
return self
|
|
end
|
|
|
|
|
|
|
|
function AI_CARGO:IsTransporting()
|
|
|
|
return self.Transporting == true
|
|
end
|
|
|
|
function AI_CARGO:IsRelocating()
|
|
|
|
return self.Relocating == true
|
|
end
|
|
|
|
|
|
--- On after Pickup event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP APC
|
|
-- @param From
|
|
-- @param Event
|
|
-- @param To
|
|
-- @param Core.Point#COORDINATE Coordinate of the pickup point.
|
|
-- @param #number Speed Speed in km/h to drive to the pickup coordinate. Default is 50% of max possible speed the unit can go.
|
|
-- @param #number Height Height in meters to move to the home coordinate.
|
|
-- @param Core.Zone#ZONE PickupZone (optional) The zone where the cargo will be picked up. The PickupZone can be nil, if there wasn't any PickupZoneSet provided.
|
|
function AI_CARGO:onafterPickup( APC, From, Event, To, Coordinate, Speed, Height, PickupZone )
|
|
|
|
self.Transporting = false
|
|
self.Relocating = true
|
|
|
|
end
|
|
|
|
|
|
--- On after Deploy event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP APC
|
|
-- @param From
|
|
-- @param Event
|
|
-- @param To
|
|
-- @param Core.Point#COORDINATE Coordinate Deploy place.
|
|
-- @param #number Speed Speed in km/h to drive to the depoly coordinate. Default is 50% of max possible speed the unit can go.
|
|
-- @param #number Height Height in meters to move to the deploy coordinate.
|
|
-- @param Core.Zone#ZONE DeployZone The zone where the cargo will be deployed.
|
|
function AI_CARGO:onafterDeploy( APC, From, Event, To, Coordinate, Speed, Height, DeployZone )
|
|
|
|
self.Relocating = false
|
|
self.Transporting = true
|
|
|
|
end
|
|
|
|
--- On before Load event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param Core.Zone#ZONE PickupZone (optional) The zone where the cargo will be picked up. The PickupZone can be nil, if there wasn't any PickupZoneSet provided.
|
|
function AI_CARGO:onbeforeLoad( Carrier, From, Event, To, PickupZone )
|
|
self:F( { Carrier, From, Event, To } )
|
|
|
|
local Boarding = false
|
|
|
|
local LoadInterval = 2
|
|
local LoadDelay = 1
|
|
local Carrier_List = {}
|
|
local Carrier_Weight = {}
|
|
|
|
if Carrier and Carrier:IsAlive() then
|
|
self.Carrier_Cargo = {}
|
|
for _, CarrierUnit in pairs( Carrier:GetUnits() ) do
|
|
local CarrierUnit = CarrierUnit -- Wrapper.Unit#UNIT
|
|
|
|
local CargoBayFreeWeight = CarrierUnit:GetCargoBayFreeWeight()
|
|
self:F({CargoBayFreeWeight=CargoBayFreeWeight})
|
|
|
|
Carrier_List[#Carrier_List+1] = CarrierUnit
|
|
Carrier_Weight[CarrierUnit] = CargoBayFreeWeight
|
|
end
|
|
|
|
local Carrier_Count = #Carrier_List
|
|
local Carrier_Index = 1
|
|
|
|
local Loaded = false
|
|
|
|
for _, Cargo in UTILS.spairs( self.CargoSet:GetSet(), function( t, a, b ) return t[a]:GetWeight() > t[b]:GetWeight() end ) do
|
|
local Cargo = Cargo -- Cargo.Cargo#CARGO
|
|
|
|
self:F( { IsUnLoaded = Cargo:IsUnLoaded(), IsDeployed = Cargo:IsDeployed(), Cargo:GetName(), Carrier:GetName() } )
|
|
|
|
-- Try all Carriers, but start from the one according the Carrier_Index
|
|
for Carrier_Loop = 1, #Carrier_List do
|
|
|
|
local CarrierUnit = Carrier_List[Carrier_Index] -- Wrapper.Unit#UNIT
|
|
|
|
-- This counters loop through the available Carriers.
|
|
Carrier_Index = Carrier_Index + 1
|
|
if Carrier_Index > Carrier_Count then
|
|
Carrier_Index = 1
|
|
end
|
|
|
|
if Cargo:IsUnLoaded() and not Cargo:IsDeployed() then
|
|
if Cargo:IsInLoadRadius( CarrierUnit:GetCoordinate() ) then
|
|
self:F( { "In radius", CarrierUnit:GetName() } )
|
|
|
|
local CargoWeight = Cargo:GetWeight()
|
|
local CarrierSpace=Carrier_Weight[CarrierUnit]
|
|
|
|
-- Only when there is space within the bay to load the next cargo item!
|
|
if CarrierSpace > CargoWeight then
|
|
Carrier:RouteStop()
|
|
--Cargo:Ungroup()
|
|
Cargo:__Board( -LoadDelay, CarrierUnit )
|
|
self:__Board( LoadDelay, Cargo, CarrierUnit, PickupZone )
|
|
|
|
LoadDelay = LoadDelay + Cargo:GetCount() * LoadInterval
|
|
|
|
-- So now this CarrierUnit has Cargo that is being loaded.
|
|
-- This will be used further in the logic to follow and to check cargo status.
|
|
self.Carrier_Cargo[Cargo] = CarrierUnit
|
|
Boarding = true
|
|
Carrier_Weight[CarrierUnit] = Carrier_Weight[CarrierUnit] - CargoWeight
|
|
Loaded = true
|
|
|
|
-- Ok, we loaded a cargo, now we can stop the loop.
|
|
break
|
|
else
|
|
self:T(string.format("WARNING: Cargo too heavy for carrier %s. Cargo=%.1f > %.1f free space", tostring(CarrierUnit:GetName()), CargoWeight, CarrierSpace))
|
|
end
|
|
end
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
if not Loaded == true then
|
|
-- No loading happened, so we need to pickup something else.
|
|
self.Relocating = false
|
|
end
|
|
end
|
|
|
|
return Boarding
|
|
|
|
end
|
|
|
|
|
|
--- On before Reload event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param Core.Zone#ZONE PickupZone (optional) The zone where the cargo will be picked up. The PickupZone can be nil, if there wasn't any PickupZoneSet provided.
|
|
function AI_CARGO:onbeforeReload( Carrier, From, Event, To )
|
|
self:F( { Carrier, From, Event, To } )
|
|
|
|
local Boarding = false
|
|
|
|
local LoadInterval = 2
|
|
local LoadDelay = 1
|
|
local Carrier_List = {}
|
|
local Carrier_Weight = {}
|
|
|
|
if Carrier and Carrier:IsAlive() then
|
|
for _, CarrierUnit in pairs( Carrier:GetUnits() ) do
|
|
local CarrierUnit = CarrierUnit -- Wrapper.Unit#UNIT
|
|
|
|
Carrier_List[#Carrier_List+1] = CarrierUnit
|
|
end
|
|
|
|
local Carrier_Count = #Carrier_List
|
|
local Carrier_Index = 1
|
|
|
|
local Loaded = false
|
|
|
|
for Cargo, CarrierUnit in pairs( self.Carrier_Cargo ) do
|
|
local Cargo = Cargo -- Cargo.Cargo#CARGO
|
|
|
|
self:F( { IsUnLoaded = Cargo:IsUnLoaded(), IsDeployed = Cargo:IsDeployed(), Cargo:GetName(), Carrier:GetName() } )
|
|
|
|
-- Try all Carriers, but start from the one according the Carrier_Index
|
|
for Carrier_Loop = 1, #Carrier_List do
|
|
|
|
local CarrierUnit = Carrier_List[Carrier_Index] -- Wrapper.Unit#UNIT
|
|
|
|
-- This counters loop through the available Carriers.
|
|
Carrier_Index = Carrier_Index + 1
|
|
if Carrier_Index > Carrier_Count then
|
|
Carrier_Index = 1
|
|
end
|
|
|
|
if Cargo:IsUnLoaded() and not Cargo:IsDeployed() then
|
|
Carrier:RouteStop()
|
|
Cargo:__Board( -LoadDelay, CarrierUnit )
|
|
self:__Board( LoadDelay, Cargo, CarrierUnit )
|
|
|
|
LoadDelay = LoadDelay + Cargo:GetCount() * LoadInterval
|
|
|
|
-- So now this CarrierUnit has Cargo that is being loaded.
|
|
-- This will be used further in the logic to follow and to check cargo status.
|
|
self.Carrier_Cargo[Cargo] = CarrierUnit
|
|
Boarding = true
|
|
Loaded = true
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
if not Loaded == true then
|
|
-- No loading happened, so we need to pickup something else.
|
|
self.Relocating = false
|
|
end
|
|
end
|
|
|
|
return Boarding
|
|
|
|
end
|
|
|
|
--- On after Board event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param Cargo.Cargo#CARGO Cargo Cargo object.
|
|
-- @param Wrapper.Unit#UNIT CarrierUnit
|
|
-- @param Core.Zone#ZONE PickupZone (optional) The zone where the cargo will be picked up. The PickupZone can be nil, if there wasn't any PickupZoneSet provided.
|
|
function AI_CARGO:onafterBoard( Carrier, From, Event, To, Cargo, CarrierUnit, PickupZone )
|
|
self:F( { Carrier, From, Event, To, Cargo, CarrierUnit:GetName() } )
|
|
|
|
if Carrier and Carrier:IsAlive() then
|
|
self:F({ IsLoaded = Cargo:IsLoaded(), Cargo:GetName(), Carrier:GetName() } )
|
|
if not Cargo:IsLoaded() and not Cargo:IsDestroyed() then
|
|
self:__Board( -10, Cargo, CarrierUnit, PickupZone )
|
|
return
|
|
end
|
|
end
|
|
|
|
self:__Loaded( 0.1, Cargo, CarrierUnit, PickupZone )
|
|
|
|
end
|
|
|
|
--- On after Loaded event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @return #boolean Cargo loaded.
|
|
-- @param Core.Zone#ZONE PickupZone (optional) The zone where the cargo will be picked up. The PickupZone can be nil, if there wasn't any PickupZoneSet provided.
|
|
function AI_CARGO:onafterLoaded( Carrier, From, Event, To, Cargo, PickupZone )
|
|
self:F( { Carrier, From, Event, To } )
|
|
|
|
local Loaded = true
|
|
|
|
if Carrier and Carrier:IsAlive() then
|
|
for Cargo, CarrierUnit in pairs( self.Carrier_Cargo ) do
|
|
local Cargo = Cargo -- Cargo.Cargo#CARGO
|
|
self:F( { IsLoaded = Cargo:IsLoaded(), IsDestroyed = Cargo:IsDestroyed(), Cargo:GetName(), Carrier:GetName() } )
|
|
if not Cargo:IsLoaded() and not Cargo:IsDestroyed() then
|
|
Loaded = false
|
|
end
|
|
end
|
|
end
|
|
|
|
if Loaded then
|
|
self:__PickedUp( 0.1, PickupZone )
|
|
end
|
|
|
|
end
|
|
|
|
--- On after PickedUp event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param Core.Zone#ZONE PickupZone (optional) The zone where the cargo will be picked up. The PickupZone can be nil, if there wasn't any PickupZoneSet provided.
|
|
function AI_CARGO:onafterPickedUp( Carrier, From, Event, To, PickupZone )
|
|
self:F( { Carrier, From, Event, To } )
|
|
|
|
Carrier:RouteResume()
|
|
|
|
local HasCargo = false
|
|
if Carrier and Carrier:IsAlive() then
|
|
for Cargo, CarrierUnit in pairs( self.Carrier_Cargo ) do
|
|
HasCargo = true
|
|
break
|
|
end
|
|
end
|
|
|
|
self.Relocating = false
|
|
if HasCargo then
|
|
self:F( "Transporting" )
|
|
self.Transporting = true
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
|
|
--- On after Unload event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param Core.Zone#ZONE DeployZone The zone wherein the cargo is deployed. This can be any zone type, like a ZONE, ZONE_GROUP, ZONE_AIRBASE.
|
|
function AI_CARGO:onafterUnload( Carrier, From, Event, To, DeployZone, Defend )
|
|
self:F( { Carrier, From, Event, To, DeployZone, Defend = Defend } )
|
|
|
|
local UnboardInterval = 5
|
|
local UnboardDelay = 5
|
|
|
|
if Carrier and Carrier:IsAlive() then
|
|
for _, CarrierUnit in pairs( Carrier:GetUnits() ) do
|
|
local CarrierUnit = CarrierUnit -- Wrapper.Unit#UNIT
|
|
Carrier:RouteStop()
|
|
for _, Cargo in pairs( CarrierUnit:GetCargo() ) do
|
|
self:F( { Cargo = Cargo:GetName(), Isloaded = Cargo:IsLoaded() } )
|
|
if Cargo:IsLoaded() then
|
|
Cargo:__UnBoard( UnboardDelay )
|
|
UnboardDelay = UnboardDelay + Cargo:GetCount() * UnboardInterval
|
|
self:__Unboard( UnboardDelay, Cargo, CarrierUnit, DeployZone, Defend )
|
|
if not Defend == true then
|
|
Cargo:SetDeployed( true )
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
end
|
|
|
|
--- On after Unboard event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param #string Cargo.Cargo#CARGO Cargo Cargo object.
|
|
-- @param Core.Zone#ZONE DeployZone The zone wherein the cargo is deployed. This can be any zone type, like a ZONE, ZONE_GROUP, ZONE_AIRBASE.
|
|
function AI_CARGO:onafterUnboard( Carrier, From, Event, To, Cargo, CarrierUnit, DeployZone, Defend )
|
|
self:F( { Carrier, From, Event, To, Cargo:GetName(), DeployZone = DeployZone, Defend = Defend } )
|
|
|
|
if Carrier and Carrier:IsAlive() then
|
|
if not Cargo:IsUnLoaded() then
|
|
self:__Unboard( 10, Cargo, CarrierUnit, DeployZone, Defend )
|
|
return
|
|
end
|
|
end
|
|
|
|
self:Unloaded( Cargo, CarrierUnit, DeployZone, Defend )
|
|
|
|
end
|
|
|
|
--- On after Unloaded event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param #string Cargo.Cargo#CARGO Cargo Cargo object.
|
|
-- @param #boolean Deployed Cargo is deployed.
|
|
-- @param Core.Zone#ZONE DeployZone The zone wherein the cargo is deployed. This can be any zone type, like a ZONE, ZONE_GROUP, ZONE_AIRBASE.
|
|
function AI_CARGO:onafterUnloaded( Carrier, From, Event, To, Cargo, CarrierUnit, DeployZone, Defend )
|
|
self:F( { Carrier, From, Event, To, Cargo:GetName(), DeployZone = DeployZone, Defend = Defend } )
|
|
|
|
local AllUnloaded = true
|
|
|
|
--Cargo:Regroup()
|
|
|
|
if Carrier and Carrier:IsAlive() then
|
|
for _, CarrierUnit in pairs( Carrier:GetUnits() ) do
|
|
local CarrierUnit = CarrierUnit -- Wrapper.Unit#UNIT
|
|
local IsEmpty = CarrierUnit:IsCargoEmpty()
|
|
self:I({ IsEmpty = IsEmpty })
|
|
if not IsEmpty then
|
|
AllUnloaded = false
|
|
break
|
|
end
|
|
end
|
|
|
|
if AllUnloaded == true then
|
|
if DeployZone == true then
|
|
self.Carrier_Cargo = {}
|
|
end
|
|
self.CargoCarrier = Carrier
|
|
end
|
|
end
|
|
|
|
if AllUnloaded == true then
|
|
self:__Deployed( 5, DeployZone, Defend )
|
|
end
|
|
|
|
end
|
|
|
|
--- On after Deployed event.
|
|
-- @param #AI_CARGO self
|
|
-- @param Wrapper.Group#GROUP Carrier
|
|
-- @param #string From From state.
|
|
-- @param #string Event Event.
|
|
-- @param #string To To state.
|
|
-- @param Core.Zone#ZONE DeployZone The zone wherein the cargo is deployed. This can be any zone type, like a ZONE, ZONE_GROUP, ZONE_AIRBASE.
|
|
-- @param #boolean Defend Defend for APCs.
|
|
function AI_CARGO:onafterDeployed( Carrier, From, Event, To, DeployZone, Defend )
|
|
self:F( { Carrier, From, Event, To, DeployZone = DeployZone, Defend = Defend } )
|
|
|
|
if not Defend == true then
|
|
self.Transporting = false
|
|
else
|
|
self:F( "Defending" )
|
|
|
|
end
|
|
|
|
end
|