mirror of
https://github.com/FlightControl-Master/MOOSE.git
synced 2025-10-29 16:58:06 +00:00
81 lines
3.5 KiB
Lua
81 lines
3.5 KiB
Lua
-- This test mission models the behaviour of the AI_PATROLZONE class.
|
|
--
|
|
-- It creates a 2 AI_PATROLZONE objects with the name Patrol1 and Patrol2.
|
|
-- Patrol1 will govern a GROUP object to patrol the zone defined by PatrolZone1, within 3000 meters and 6000 meters, within a speed of 400 and 600 km/h.
|
|
-- When the GROUP object that is assigned to Patrol has fuel below 20%, the GROUP object will orbit for 60 secondes, before returning to base.
|
|
--
|
|
-- Patrol2 will goven a GROUP object to patrol the zone defined by PatrolZone2, within 600 meters and 1000 meters, within a speed of 300 and 400 km/h.
|
|
-- When the GROUP object that is assigned to Patrol has fuel below 20%, the GROUP object will orbit for 0 secondes, before returning to base.
|
|
--
|
|
-- The Patrol1 and Patrol2 object have 2 state transition functions defined, which customize the default behaviour of the RTB state.
|
|
-- When Patrol1 goes RTB, it will create a new GROUP object, that will be assigned to Patrol2.
|
|
-- When Patrol2 goes RTB, it will create a new GROUP object, that will be assgined to Patrol1.
|
|
--
|
|
-- In this way, the Patrol1 and Patrol2 objects are fluctuating the patrol pattern from PatrolZone1 and PatrolZone2 :-)
|
|
|
|
|
|
local PatrolZoneGroup1 = GROUP:FindByName( "Patrol Zone 1" )
|
|
local PatrolZone1 = ZONE_POLYGON:New( "Patrol Zone 1", PatrolZoneGroup1 )
|
|
|
|
local PatrolZoneGroup2 = GROUP:FindByName( "Patrol Zone 2" )
|
|
local PatrolZone2 = ZONE_POLYGON:New( "Patrol Zone 2", PatrolZoneGroup2 )
|
|
|
|
local PatrolSpawn = SPAWN:New( "Patrol Group" )
|
|
local PatrolGroup = PatrolSpawn:Spawn()
|
|
|
|
local Patrol1 = AI_PATROLZONE:New( PatrolZone1, 3000, 6000, 400, 600 )
|
|
Patrol1:ManageFuel( 0.2, 60 )
|
|
Patrol1:SetControllable( PatrolGroup )
|
|
Patrol1:__Start( 5 )
|
|
|
|
local Patrol2 = AI_PATROLZONE:New( PatrolZone2, 600, 1000, 300, 400 )
|
|
Patrol2:ManageFuel( 0.2, 0 )
|
|
|
|
--- State transition function for the AI\_PATROLZONE **Patrol1** object
|
|
-- @param #AI_PATROLZONE self
|
|
-- @param Group#GROUP AIGroup
|
|
-- @return #boolean If false is returned, then the OnAfter state transition function will not be called.
|
|
function Patrol1:OnBeforeRTB( AIGroup )
|
|
AIGroup:MessageToRed( "Returning to base", 20 )
|
|
end
|
|
|
|
--- State transition function for the AI\_PATROLZONE **Patrol1** object
|
|
-- @param AI_PatrolZone#AI_PATROLZONE self
|
|
-- @param Group#GROUP AIGroup
|
|
function Patrol1:OnAfterRTB( AIGroup )
|
|
local NewGroup = PatrolSpawn:Spawn()
|
|
Patrol2:SetControllable( NewGroup )
|
|
Patrol2:__Start( 1 )
|
|
end
|
|
|
|
--- State transition function for the AI\_PATROLZONE **Patrol1** object
|
|
-- @param AI_PatrolZone#AI_PATROLZONE self
|
|
-- @param Group#GROUP AIGroup
|
|
function Patrol1:OnAfterPatrol( AIGroup )
|
|
AIGroup:MessageToRed( "Patrolling in zone " .. PatrolZone1:GetName() , 20 )
|
|
end
|
|
|
|
--- State transition function for the AI\_PATROLZONE **Patrol2** object
|
|
-- @param #AI_PATROLZONE self
|
|
-- @param Group#GROUP AIGroup
|
|
-- @return #boolean If false is returned, then the OnAfter state transition function will not be called.
|
|
function Patrol2:OnBeforeRTB( AIGroup )
|
|
AIGroup:MessageToRed( "Returning to base", 20 )
|
|
end
|
|
|
|
--- State transition function for the AI\_PATROLZONE **Patrol2** object
|
|
-- @param AI_PatrolZone#AI_PATROLZONE self
|
|
-- @param Group#GROUP AIGroup
|
|
function Patrol2:OnAfterRTB( AIGroup )
|
|
local NewGroup = PatrolSpawn:Spawn()
|
|
Patrol1:SetControllable( NewGroup )
|
|
Patrol1:__Start( 1 )
|
|
end
|
|
|
|
--- State transition function for the AI\_PATROLZONE **Patrol2** object
|
|
-- @param AI_PatrolZone#AI_PATROLZONE self
|
|
-- @param Group#GROUP AIGroup
|
|
function Patrol2:OnAfterPatrol( AIGroup )
|
|
AIGroup:MessageToRed( "Patrolling in zone " .. PatrolZone2:GetName() , 20 )
|
|
end
|