#PLAYERTASKCONTROLLER

* Added ship detail types
This commit is contained in:
Applevangelist 2023-02-14 12:58:39 +01:00
parent 055cbf4f7a
commit bf50adaa22

View File

@ -1369,6 +1369,13 @@ PLAYERTASKCONTROLLER.Messages = {
AIRDEFENSE = "Airdefense", AIRDEFENSE = "Airdefense",
SAM = "SAM", SAM = "SAM",
GROUP = "Group", GROUP = "Group",
UNARMEDSHIP = "Merchant",
LIGHTARMEDSHIP = "Light Boat",
CORVETTE = "Corvette",
FRIGATE = "Frigate",
CRUISER = "Cruiser",
DESTROYER = "Destroyer",
CARRIER = "Aircraft Carrier",
}, },
DE = { DE = {
TASKABORT = "Auftrag abgebrochen!", TASKABORT = "Auftrag abgebrochen!",
@ -1441,12 +1448,19 @@ PLAYERTASKCONTROLLER.Messages = {
AIRDEFENSE = "Flak", AIRDEFENSE = "Flak",
SAM = "Luftabwehr", SAM = "Luftabwehr",
GROUP = "Einheit", GROUP = "Einheit",
UNARMEDSHIP = "Handelsschiff",
LIGHTARMEDSHIP = "Tender",
CORVETTE = "Korvette",
FRIGATE = "Fregatte",
CRUISER = "Kreuzer",
DESTROYER = "Zerstörer",
CARRIER = "Flugzeugträger",
}, },
} }
--- PLAYERTASK class version. --- PLAYERTASK class version.
-- @field #string version -- @field #string version
PLAYERTASKCONTROLLER.version="0.1.56" PLAYERTASKCONTROLLER.version="0.1.57"
--- Create and run a new TASKCONTROLLER instance. --- Create and run a new TASKCONTROLLER instance.
-- @param #PLAYERTASKCONTROLLER self -- @param #PLAYERTASKCONTROLLER self
@ -2262,6 +2276,27 @@ function PLAYERTASKCONTROLLER:_CheckTargetQueue()
--self:T(self.lid.."Target TypeName = "..target.TypeName) --self:T(self.lid.."Target TypeName = "..target.TypeName)
end end
if self.UseTypeNames and object:IsShip() then
local threat = object:GetThreatLevel()
local typekey = "UNARMEDSHIP"
if threat == 1 then
typekey = "LIGHTARMEDSHIP"
elseif threat == 2 then
typekey = "CORVETTE"
elseif threat == 3 or threat == 4 then
typekey = "FRIGATE"
elseif threat == 5 or threat == 6 then
typekey = "CRUISER"
elseif threat == 7 or threat == 8 then
typekey = "DESTROYER"
elseif threat >= 9 then
typekey = "CARRIER"
end
local typename = self.gettext:GetEntry(typekey,self.locale)
target.TypeName = typename
--self:T(self.lid.."Target TypeName = "..target.TypeName)
end
self:_AddTask(target) self:_AddTask(target)
end end
return self return self