Updates - Much improved version!

This commit is contained in:
FlightControl 2019-07-01 17:28:49 +03:00
parent 14b834e8ad
commit 1afe1c48b4
3 changed files with 13 additions and 8 deletions

View File

@ -98,6 +98,7 @@ function AI_ESCORT_DISPATCHER:OnEventBirth( EventData )
local PlayerGroup = EventData.IniGroup
local PlayerUnit = EventData.IniUnit
self:I({EscortAirbase= self.EscortAirbase } )
self:I({PlayerGroupName = PlayerGroupName } )
self:I({PlayerGroup = PlayerGroup})
self:I({FirstGroup = self.CarrierSet:GetFirst()})
@ -106,11 +107,13 @@ function AI_ESCORT_DISPATCHER:OnEventBirth( EventData )
if self.CarrierSet:FindGroup( PlayerGroupName ) then
if not self.AI_Escorts[PlayerGroupName] then
local LeaderUnit = PlayerUnit
local EscortGroup = self.EscortSpawn:SpawnAtAirbase( self.EscortAirbase )
local EscortSet = SET_GROUP:New()
EscortSet:AddGroup( EscortGroup )
self:ScheduleOnce( 0.1,
function()
local EscortGroup = self.EscortSpawn:SpawnAtAirbase( self.EscortAirbase, SPAWN.Takeoff.Hot )
self:I({EscortGroup = EscortGroup})
self:ScheduleOnce( 1,
function( EscortGroup )
local EscortSet = SET_GROUP:New()
EscortSet:AddGroup( EscortGroup )
self.AI_Escorts[PlayerGroupName] = AI_ESCORT:New( LeaderUnit, EscortSet, self.EscortName, self.EscortBriefing )
self.AI_Escorts[PlayerGroupName]:FormationTrail( 0, 100, 0 )
if EscortGroup:IsHelicopter() then
@ -119,7 +122,7 @@ function AI_ESCORT_DISPATCHER:OnEventBirth( EventData )
self.AI_Escorts[PlayerGroupName]:MenusAirplanes()
end
self.AI_Escorts[PlayerGroupName]:__Start( 0.1 )
end
end, EscortGroup
)
end
end

View File

@ -269,6 +269,7 @@ function AI_ESCORT_REQUEST:onafterStart( EscortGroupSet )
self:F()
if not self.MenuRequestEscort then
self.MainMenu = MENU_GROUP:New( self.PlayerGroup, self.EscortName )
self.MenuRequestEscort = MENU_GROUP_COMMAND:New( self.LeaderGroup, "Request new escort ", self.MainMenu,
function()
self:SpawnEscort()

View File

@ -2215,10 +2215,11 @@ function SPAWN:ParkAtAirbase( SpawnAirbase, TerminalType, Parkingdata ) -- R2.2,
self:ParkAircraft( SpawnAirbase, TerminalType, Parkingdata, 1 )
for SpawnIndex = 2, self.SpawnMaxGroups do
self:ScheduleOnce( SpawnIndex * 0.1, SPAWN.ParkAircraft, self, SpawnAirbase, TerminalType, Parkingdata, SpawnIndex )
self:ParkAircraft( SpawnAirbase, TerminalType, Parkingdata, SpawnIndex )
--self:ScheduleOnce( SpawnIndex * 0.1, SPAWN.ParkAircraft, self, SpawnAirbase, TerminalType, Parkingdata, SpawnIndex )
end
self:SetSpawnIndex()
self:SetSpawnIndex( 0 )
return nil
end