warscript 0.0.1-dev.2d7cb44 → 0.0.1-dev.2fd8394

package/engine/object-data/entry/ability-type/blank-passive-with-cooldown.lua

@@ -0,0 +1,112 @@
+local ____lualib = require("lualib_bundle")
+local __TS__Class = ____lualib.__TS__Class
+local __TS__ClassExtends = ____lualib.__TS__ClassExtends
+local __TS__SetDescriptor = ____lualib.__TS__SetDescriptor
+local ____exports = {}
+local ____exhume_2Dcorpses = require("engine.object-data.entry.ability-type.exhume-corpses")
+local ExhumeCorpsesAbilityType = ____exhume_2Dcorpses.ExhumeCorpsesAbilityType
+local ____ability = require("engine.standard.fields.ability")
+local DURATION_HERO_ABILITY_FLOAT_LEVEL_FIELD = ____ability.DURATION_HERO_ABILITY_FLOAT_LEVEL_FIELD
+local DURATION_NORMAL_ABILITY_FLOAT_LEVEL_FIELD = ____ability.DURATION_NORMAL_ABILITY_FLOAT_LEVEL_FIELD
+local TOOLTIP_NORMAL_EXTENDED_ABILITY_STRING_LEVEL_FIELD = ____ability.TOOLTIP_NORMAL_EXTENDED_ABILITY_STRING_LEVEL_FIELD
+local ____ability_2Dtype_2Dextended_2Dtooltip = require("engine.ability-type-extended-tooltip")
+local overrideAbilityTypeExtendedTooltipLocally = ____ability_2Dtype_2Dextended_2Dtooltip.overrideAbilityTypeExtendedTooltipLocally
+local ____local_2Dclient = require("engine.local-client")
+local LocalClient = ____local_2Dclient.LocalClient
+local ____timer = require("core.types.timer")
+local Timer = ____timer.Timer
+local NATIVE_DURATION = 2147483
+local compiletimeAbilityTypeIds = {}
+--- A passive ability whose cooldown can be started (`Ability.startCooldown`): Exhume
+-- Corpses (`Aexh`) is the only passive base ability that shows a cooldown.
+-- 
+-- The corpse fields of the underlying Exhume Corpses are fixed at zero and its native
+-- durations at a practically infinite value. {@link buffDuration} and
+-- {@link heroBuffDuration} are kept for scripts separately from the native fields.
+-- 
+-- The game ignores per-ability extended tooltips of this base ability, so the type's own
+-- tooltip is replaced locally with the one of the locally main selected unit's ability.
+-- Read the type's tooltip with `getAbilityTypeExtendedTooltip`, not with the native.
+____exports.BlankPassiveAbilityWithCooldownAbilityType = __TS__Class()
+local BlankPassiveAbilityWithCooldownAbilityType = ____exports.BlankPassiveAbilityWithCooldownAbilityType
+BlankPassiveAbilityWithCooldownAbilityType.name = "BlankPassiveAbilityWithCooldownAbilityType"
+__TS__ClassExtends(BlankPassiveAbilityWithCooldownAbilityType, ExhumeCorpsesAbilityType)
+function BlankPassiveAbilityWithCooldownAbilityType.prototype.____constructor(self, object)
+    ExhumeCorpsesAbilityType.prototype.____constructor(self, object)
+    self.levelCount = 1
+    self.iconPath = ""
+    self.targetEffectPresets = {}
+    self.maximumCorpseCount = function() return 0 end
+    self.corpseUnitTypeId = function() return 0 end
+    self:setNumberLevelField(
+        "adur",
+        function() return NATIVE_DURATION end
+    )
+    self:setNumberLevelField(
+        "ahdu",
+        function() return NATIVE_DURATION end
+    )
+    self.buffDuration = function() return 0 end
+    self.heroBuffDuration = function() return 0 end
+    self.buffTypeIds = function() return {} end
+    self.techTreeDependencies = {}
+    compiletimeAbilityTypeIds[self.id] = true
+end
+BlankPassiveAbilityWithCooldownAbilityType.IS_SYNTHETIC = true
+__TS__SetDescriptor(
+    BlankPassiveAbilityWithCooldownAbilityType.prototype,
+    "buffDuration",
+    {
+        get = function(self)
+            return DURATION_NORMAL_ABILITY_FLOAT_LEVEL_FIELD:getValue(self)
+        end,
+        set = function(self, buffDuration)
+            DURATION_NORMAL_ABILITY_FLOAT_LEVEL_FIELD:setValue(self, buffDuration)
+        end
+    },
+    true
+)
+__TS__SetDescriptor(
+    BlankPassiveAbilityWithCooldownAbilityType.prototype,
+    "heroBuffDuration",
+    {
+        get = function(self)
+            return DURATION_HERO_ABILITY_FLOAT_LEVEL_FIELD:getValue(self)
+        end,
+        set = function(self, heroBuffDuration)
+            DURATION_HERO_ABILITY_FLOAT_LEVEL_FIELD:setValue(self, heroBuffDuration)
+        end
+    },
+    true
+)
+local abilityTypeIds = postcompile(function() return compiletimeAbilityTypeIds end)
+if (next(abilityTypeIds)) ~= nil then
+    local overriddenLevelCountByAbilityTypeId = {}
+    Timer.onPeriod[1 / 32]:addListener(
+        0,
+        function()
+            local unit = LocalClient.mainSelectedUnit
+            for abilityTypeId in pairs(abilityTypeIds) do
+                local ability = unit and unit:getAbility(abilityTypeId)
+                local levelCount = ability and ability.levelCount or 0
+                if ability ~= nil then
+                    for level = 0, levelCount - 1 do
+                        overrideAbilityTypeExtendedTooltipLocally(
+                            abilityTypeId,
+                            level,
+                            TOOLTIP_NORMAL_EXTENDED_ABILITY_STRING_LEVEL_FIELD:getValue(ability, level)
+                        )
+                    end
+                end
+                local overriddenLevelCount = overriddenLevelCountByAbilityTypeId[abilityTypeId] or 0
+                for level = levelCount, overriddenLevelCount - 1 do
+                    overrideAbilityTypeExtendedTooltipLocally(abilityTypeId, level, nil)
+                end
+                if levelCount ~= overriddenLevelCount then
+                    overriddenLevelCountByAbilityTypeId[abilityTypeId] = levelCount
+                end
+            end
+        end
+    )
+end
+return ____exports

package/engine/object-data/entry/ability-type/channel.d.ts

@@ -33,8 +33,8 @@ export declare class ChannelAbilityType extends AbilityType {
      */
     get isUniqueCast(): boolean[];
     set isUniqueCast(isUniqueCast: ObjectDataEntryLevelFieldValueSupplier<boolean>);
-    get casterAttachmentPresetsDuration(): number[];
-    set casterAttachmentPresetsDuration(casterAttachmentsDuration: ObjectDataEntryLevelFieldValueSupplier<number>);
+    get casterEffectPresetsDuration(): number[];
+    set casterEffectPresetsDuration(casterEffectPresetsDuration: ObjectDataEntryLevelFieldValueSupplier<number>);
     /**
      * Whether the ability should disable and hide other abilities while being channeled.
      */

package/engine/object-data/entry/ability-type/channel.lua

@@ -100,13 +100,13 @@ __TS__SetDescriptor(
 )
 __TS__SetDescriptor(
     ChannelAbilityType.prototype,
-    "casterAttachmentPresetsDuration",
+    "casterEffectPresetsDuration",
     {
         get = function(self)
             return self:getNumberLevelField("Ncl4")
         end,
-        set = function(self, casterAttachmentsDuration)
-            self:setNumberLevelField("Ncl4", casterAttachmentsDuration)
+        set = function(self, casterEffectPresetsDuration)
+            self:setNumberLevelField("Ncl4", casterEffectPresetsDuration)
         end
     },
     true

package/engine/object-data/entry/ability-type.d.ts

@@ -32,10 +32,16 @@ export declare abstract class AbilityType extends ObjectDataEntry<AbilityTypeId>
     set casterCastingEffectPresets(casterCastingEffectPresets: EffectPresetWithParametersInput[]);
     get casterChannelingEffectPresets(): EffectPresetWithParameters[];
     set casterChannelingEffectPresets(casterChannelingEffectPresets: EffectPresetWithParametersInput[]);
-    get casterAttachmentPresets(): TupleOf<EffectPresetWithParameters, 0 | 1 | 2>;
-    set casterAttachmentPresets(casterAttachmentPresets: TupleOf<AttachmentPresetInput, 0 | 1 | 2>);
+    get casterEffectPresets(): TupleOf<EffectPresetWithParameters, 0 | 1 | 2>;
+    set casterEffectPresets(casterEffectPresets: TupleOf<AttachmentPresetInput, 0 | 1 | 2>);
     get effectModelPaths(): string[];
     set effectModelPaths(effectModelPaths: string[]);
+    get effectModelPathsSD(): string[];
+    set effectModelPathsSD(effectModelPathsSD: string[]);
+    get effectModelPathsHD(): string[];
+    set effectModelPathsHD(effectModelPathsHD: string[]);
+    get effectModelPathsDE(): string[];
+    set effectModelPathsDE(effectModelPathsDE: string[]);
     get iconPath(): string;
     set iconPath(iconPath: string);
     get iconPathSD(): string;
@@ -154,6 +160,8 @@ export declare abstract class AbilityType extends ObjectDataEntry<AbilityTypeId>
     set effectBuffTypeIds(effectBuffTypeIds: ObjectDataEntryLevelFieldValueSupplier<BuffTypeId[]>);
     get heroBuffDuration(): number[];
     set heroBuffDuration(heroBuffDuration: ObjectDataEntryLevelFieldValueSupplier<number>);
+    get isHeroAbility(): boolean;
+    set isHeroAbility(isHeroAbility: boolean);
     get learnLevelMinimum(): number;
     set learnLevelMinimum(learnLevelMinimum: number);
     get learnLevelStep(): number;

package/engine/object-data/entry/ability-type.lua

@@ -150,13 +150,13 @@ __TS__SetDescriptor(
 )
 __TS__SetDescriptor(
     AbilityType.prototype,
-    "casterAttachmentPresets",
+    "casterEffectPresets",
     {
         get = function(self)
             return self:getAttachmentPresetListField("acat", {"acap", "aca1"})
         end,
-        set = function(self, casterAttachmentPresets)
-            self:setAttachmentPresetListField("acat", {"acap", "aca1"}, "acac", casterAttachmentPresets)
+        set = function(self, casterEffectPresets)
+            self:setAttachmentPresetListField("acat", {"acap", "aca1"}, "acac", casterEffectPresets)
         end
     },
     true
@@ -174,6 +174,45 @@ __TS__SetDescriptor(
     },
     true
 )
+__TS__SetDescriptor(
+    AbilityType.prototype,
+    "effectModelPathsSD",
+    {
+        get = function(self)
+            return self:getStringsField("aeat:sd")
+        end,
+        set = function(self, effectModelPathsSD)
+            self:setStringsField("aeat:sd", effectModelPathsSD)
+        end
+    },
+    true
+)
+__TS__SetDescriptor(
+    AbilityType.prototype,
+    "effectModelPathsHD",
+    {
+        get = function(self)
+            return self:getStringsField("aeat:hd")
+        end,
+        set = function(self, effectModelPathsHD)
+            self:setStringsField("aeat:hd", effectModelPathsHD)
+        end
+    },
+    true
+)
+__TS__SetDescriptor(
+    AbilityType.prototype,
+    "effectModelPathsDE",
+    {
+        get = function(self)
+            return self:getStringsField("aeat:de")
+        end,
+        set = function(self, effectModelPathsDE)
+            self:setStringsField("aeat:de", effectModelPathsDE)
+        end
+    },
+    true
+)
 __TS__SetDescriptor(
     AbilityType.prototype,
     "iconPath",
@@ -1022,6 +1061,19 @@ __TS__SetDescriptor(
     },
     true
 )
+__TS__SetDescriptor(
+    AbilityType.prototype,
+    "isHeroAbility",
+    {
+        get = function(self)
+            return self:getBooleanField("aher")
+        end,
+        set = function(self, isHeroAbility)
+            self:setBooleanField("aher", isHeroAbility)
+        end
+    },
+    true
+)
 __TS__SetDescriptor(
     AbilityType.prototype,
     "learnLevelMinimum",

package/engine/object-data/entry/buff-type/applicable.lua

@@ -73,7 +73,7 @@ local applicatorAbilityTypeIdByApplicatorTypeByApplicableBuffTypeId, applicatorU
             abilityType.levelCount = applicableBuffType.levelCount
             abilityType.buttonPositionX = 0
             abilityType.buttonPositionY = -11
-            abilityType.casterAttachmentPresets = {}
+            abilityType.casterEffectPresets = {}
             abilityType.targetEffectPresets = {}
             abilityType.casterEffectSoundPresetId = nil
             abilityType.learnLevelMinimum = 6
@@ -305,14 +305,21 @@ preparePhysicalPositiveApplicatorAbility = function(ability, level, duration)
     setAbilityRealLevelField(ability, ABILITY_RLF_DURATION_NORMAL, level, duration)
     setAbilityRealLevelField(ability, ABILITY_RLF_DURATION_HERO, level, duration)
 end
----
+--- Removes the ability that keeps a hidden buff on the unit. A leftover applicator
+-- makes the next hidden application fail, since the unit already has the ability.
+-- 
 -- @internal For use by internal systems only.
-____exports.removeBuff = function(unit, applicableBuffTypeId)
+____exports.removeBuffApplicator = function(unit, applicableBuffTypeId)
     local ____opt_3 = applicatorAbilityTypeIdByApplicatorTypeByApplicableBuffTypeId[applicableBuffTypeId]
     local applicatorAbilityTypeId = ____opt_3 and ____opt_3[0]
     if applicatorAbilityTypeId ~= nil then
         unitRemoveAbility(unit, applicatorAbilityTypeId)
     end
+end
+---
+-- @internal For use by internal systems only.
+____exports.removeBuff = function(unit, applicableBuffTypeId)
+    ____exports.removeBuffApplicator(unit, applicableBuffTypeId)
     return unitRemoveAbility(unit, applicableBuffTypeId)
 end
 return ____exports

package/engine/object-data/entry/unit-type.d.ts

@@ -69,6 +69,16 @@ export declare abstract class UnitType<Id extends UnitTypeId = UnitTypeId> exten
     protected static generateId(): number;
     protected static getObjectData(map: WarMap): WarObjects;
     private isPortraitModelPathSet?;
+    /** Portrait fields a model setter emptied because no portrait was set yet. */
+    private autoEmptiedPortraitFields?;
+    private emptyPortraitForModel;
+    /**
+     * An explicit portrait wins over the automatic empty portraits of the model setters, so
+     * it may also be set after the models: the mode-less portrait (one portrait for every
+     * mode) returns the automatically emptied per-mode portraits to their defaults, a
+     * per-mode portrait replaces only its own mode's.
+     */
+    private setPortraitModelPathField;
     get abilityTypeIds(): AbilityTypeId[];
     set abilityTypeIds(abilityTypeIds: AbilityTypeId[]);
     get defaultActiveAbilityTypeId(): AbilityTypeId | undefined;

package/engine/object-data/entry/unit-type.lua

@@ -484,6 +484,32 @@ end
 function UnitType.getObjectData(self, map)
     return map.objects.unit
 end
+function UnitType.prototype.emptyPortraitForModel(self, portraitField)
+    if not self.isPortraitModelPathSet and WarscriptConfig.AUTOMATICALLY_SET_UNIT_TYPE_PORTRAIT_MODEL_PATH then
+        self:setStringField(portraitField, "")
+        if self.autoEmptiedPortraitFields == nil then
+            self.autoEmptiedPortraitFields = {}
+        end
+        self.autoEmptiedPortraitFields[portraitField] = true
+    end
+end
+function UnitType.prototype.setPortraitModelPathField(self, portraitField, portraitModelPath)
+    local autoEmptiedPortraitFields = self.autoEmptiedPortraitFields
+    if autoEmptiedPortraitFields ~= nil then
+        if portraitField == "upor" then
+            for field in pairs(autoEmptiedPortraitFields) do
+                if field ~= portraitField then
+                    self.object:setField(field, nil)
+                end
+            end
+            self.autoEmptiedPortraitFields = nil
+        else
+            autoEmptiedPortraitFields[portraitField] = nil
+        end
+    end
+    self:setStringField(portraitField, portraitModelPath)
+    self.isPortraitModelPathSet = true
+end
 function UnitType.prototype.setDeathTypeFlag(self, flag, value)
     local deathType = self:getNumberField("udea")
     self:setNumberField("udea", value and deathType | flag or deathType & ~flag)
@@ -1076,9 +1102,7 @@ __TS__SetDescriptor(
         end,
         set = function(self, modelPath)
             self:setStringField("umdl", modelPath)
-            if not self.isPortraitModelPathSet and WarscriptConfig.AUTOMATICALLY_SET_UNIT_TYPE_PORTRAIT_MODEL_PATH then
-                self:setStringField("upor", "")
-            end
+            self:emptyPortraitForModel("upor")
         end
     },
     true
@@ -1092,9 +1116,7 @@ __TS__SetDescriptor(
         end,
         set = function(self, modelPathSD)
             self:setStringField("umdl:sd", modelPathSD)
-            if not self.isPortraitModelPathSet and WarscriptConfig.AUTOMATICALLY_SET_UNIT_TYPE_PORTRAIT_MODEL_PATH then
-                self:setStringField("upor:sd", "")
-            end
+            self:emptyPortraitForModel("upor:sd")
         end
     },
     true
@@ -1108,9 +1130,7 @@ __TS__SetDescriptor(
         end,
         set = function(self, modelPathHD)
             self:setStringField("umdl:hd", modelPathHD)
-            if not self.isPortraitModelPathSet and WarscriptConfig.AUTOMATICALLY_SET_UNIT_TYPE_PORTRAIT_MODEL_PATH then
-                self:setStringField("upor:hd", "")
-            end
+            self:emptyPortraitForModel("upor:hd")
         end
     },
     true
@@ -1124,9 +1144,7 @@ __TS__SetDescriptor(
         end,
         set = function(self, modelPathDE)
             self:setStringField("umdl:de", modelPathDE)
-            if not self.isPortraitModelPathSet and WarscriptConfig.AUTOMATICALLY_SET_UNIT_TYPE_PORTRAIT_MODEL_PATH then
-                self:setStringField("upor:de", "")
-            end
+            self:emptyPortraitForModel("upor:de")
         end
     },
     true
@@ -1139,8 +1157,7 @@ __TS__SetDescriptor(
             return self:getStringField("upor")
         end,
         set = function(self, portraitModelPath)
-            self:setStringField("upor", portraitModelPath)
-            self.isPortraitModelPathSet = true
+            self:setPortraitModelPathField("upor", portraitModelPath)
         end
     },
     true
@@ -1153,8 +1170,7 @@ __TS__SetDescriptor(
             return self:getStringField("upor:sd")
         end,
         set = function(self, portraitModelPathSD)
-            self:setStringField("upor:sd", portraitModelPathSD)
-            self.isPortraitModelPathSet = true
+            self:setPortraitModelPathField("upor:sd", portraitModelPathSD)
         end
     },
     true
@@ -1167,8 +1183,7 @@ __TS__SetDescriptor(
             return self:getStringField("upor:hd")
         end,
         set = function(self, portraitModelPathHD)
-            self:setStringField("upor:hd", portraitModelPathHD)
-            self.isPortraitModelPathSet = true
+            self:setPortraitModelPathField("upor:hd", portraitModelPathHD)
         end
     },
     true
@@ -1181,8 +1196,7 @@ __TS__SetDescriptor(
             return self:getStringField("upor:de")
         end,
         set = function(self, portraitModelPathDE)
-            self:setStringField("upor:de", portraitModelPathDE)
-            self.isPortraitModelPathSet = true
+            self:setPortraitModelPathField("upor:de", portraitModelPathDE)
         end
     },
     true

package/engine/standard/fields/ability.d.ts

@@ -7,8 +7,8 @@ export declare const BUTTON_POSITION_ACTIVATED_Y_ABILITY_INTEGER_FIELD: AbilityI
 export declare const BUTTON_POSITION_RESEARCH_X_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
 export declare const BUTTON_POSITION_RESEARCH_Y_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
 export declare const MISSILE_SPEED_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
-export declare const TARGET_ATTACHMENTS_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
-export declare const CASTER_ATTACHMENTS_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
+export declare const TARGET_EFFECT_COUNT_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
+export declare const CASTER_EFFECT_COUNT_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
 export declare const PRIORITY_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
 export declare const LEVELS_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;
 export declare const REQUIRED_LEVEL_ABILITY_INTEGER_FIELD: AbilityIntegerField & symbol;

package/engine/standard/fields/ability.lua

@@ -18,8 +18,8 @@ ____exports.BUTTON_POSITION_ACTIVATED_Y_ABILITY_INTEGER_FIELD = AbilityIntegerFi
 ____exports.BUTTON_POSITION_RESEARCH_X_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("arpx"))
 ____exports.BUTTON_POSITION_RESEARCH_Y_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("arpy"))
 ____exports.MISSILE_SPEED_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("amsp"))
-____exports.TARGET_ATTACHMENTS_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("atac"))
-____exports.CASTER_ATTACHMENTS_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("acac"))
+____exports.TARGET_EFFECT_COUNT_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("atac"))
+____exports.CASTER_EFFECT_COUNT_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("acac"))
 ____exports.PRIORITY_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("apri"))
 ____exports.LEVELS_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("alev"))
 ____exports.REQUIRED_LEVEL_ABILITY_INTEGER_FIELD = AbilityIntegerField:create(fourCC("arlv"))

package/engine/text-tag.d.ts

@@ -20,7 +20,13 @@ declare const enum TextTagPropertyKey {
     FONT_SIZE = 104,
     COLOR = 105,
     X = 106,
-    Y = 107
+    Y = 107,
+    UNIT_X = 108,
+    UNIT_Y = 109,
+    UNIT_Z = 110,
+    UNIT_FLY_HEIGHT = 111,
+    IS_VISIBILITY_CHECK_PENDING = 112,
+    VISIBILITY_CHECK_PHASE = 113
 }
 export declare class TextTag extends AbstractDestroyable {
     private [TextTagPropertyKey.HANDLE]?;
@@ -31,6 +37,12 @@ export declare class TextTag extends AbstractDestroyable {
     private [TextTagPropertyKey.UNIT]?;
     private [TextTagPropertyKey.X]?;
     private [TextTagPropertyKey.Y]?;
+    private [TextTagPropertyKey.UNIT_X]?;
+    private [TextTagPropertyKey.UNIT_Y]?;
+    private [TextTagPropertyKey.UNIT_Z]?;
+    private [TextTagPropertyKey.UNIT_FLY_HEIGHT]?;
+    private [TextTagPropertyKey.IS_VISIBILITY_CHECK_PENDING]?;
+    private [TextTagPropertyKey.VISIBILITY_CHECK_PHASE]?;
     private constructor();
     protected onDestroy(): Destructor;
     get text(): string;

package/engine/text-tag.lua

@@ -13,8 +13,6 @@ local ____destroyable = require("destroyable")
 local AbstractDestroyable = ____destroyable.AbstractDestroyable
 local ____playerCamera = require("core.types.playerCamera")
 local worldCoordinatesToFrame = ____playerCamera.worldCoordinatesToFrame
-local ____get_2Dterrain_2Dz = require("engine.internal.misc.get-terrain-z")
-local getTerrainZ = ____get_2Dterrain_2Dz.getTerrainZ
 local ____player_2Dlocal_2Dhandle = require("engine.internal.misc.player-local-handle")
 local PLAYER_LOCAL_HANDLE = ____player_2Dlocal_2Dhandle.PLAYER_LOCAL_HANDLE
 local createTextTag = CreateTextTag
@@ -36,8 +34,10 @@ local isUnitVisible = IsUnitVisible
 local getUnitFlyHeight = GetUnitFlyHeight
 local getUnitX = GetUnitX
 local getUnitY = GetUnitY
+local getUnitZ = BlzGetUnitZ
 local unitAlive = UnitAlive
 local DEFAULT_FONT_SIZE = 0.024
+local VISIBILITY_CHECK_INTERVAL = 4
 local function applyConfiguration(textTag, configuration)
     setTextTagFadepoint(textTag, configuration.fadepoint)
     setTextTagLifespan(textTag, configuration.lifespan)
@@ -54,6 +54,7 @@ local function applyConfiguration(textTag, configuration)
     setTextTagVisibility(textTag, true)
 end
 local unitTextTags = setmetatable({}, {__mode = "k"})
+local nextVisibilityCheckPhase = 0
 local function ensureHandle(textTag)
     local handle = textTag[101]
     if handle == nil then
@@ -109,7 +110,9 @@ function TextTag.create(self, configuration, text, unit)
     textTag[103] = text
     textTag[100] = unit
     textTag[102] = configuration
-    ensureHandle(textTag)
+    textTag[113] = nextVisibilityCheckPhase
+    nextVisibilityCheckPhase = (nextVisibilityCheckPhase + 1) % VISIBILITY_CHECK_INTERVAL
+    textTag[112] = true
     unitTextTags[textTag] = true
     return textTag
 end
@@ -121,12 +124,14 @@ __TS__SetDescriptor(
             return self[103] or ""
         end,
         set = function(self, text)
-            setTextTagText(
-                ensureHandle(self),
-                text,
-                self[104] or DEFAULT_FONT_SIZE
-            )
+            if text == self[103] then
+                return
+            end
             self[103] = text
+            local handle = self[101]
+            if handle ~= nil then
+                setTextTagText(handle, text, self[104] or DEFAULT_FONT_SIZE)
+            end
         end
     },
     true
@@ -139,12 +144,14 @@ __TS__SetDescriptor(
             return self[104] or DEFAULT_FONT_SIZE
         end,
         set = function(self, fontSize)
-            setTextTagText(
-                ensureHandle(self),
-                self[103] or "",
-                fontSize
-            )
+            if fontSize == self[104] then
+                return
+            end
             self[104] = fontSize
+            local handle = self[101]
+            if handle ~= nil then
+                setTextTagText(handle, self[103] or "", fontSize)
+            end
         end
     },
     true
@@ -157,14 +164,20 @@ __TS__SetDescriptor(
             return self[105] or Color.white
         end,
         set = function(self, color)
-            setTextTagColor(
-                ensureHandle(self),
-                color.r,
-                color.g,
-                color.b,
-                color.a
-            )
+            if color == self[105] then
+                return
+            end
             self[105] = color
+            local handle = self[101]
+            if handle ~= nil then
+                setTextTagColor(
+                    handle,
+                    color.r,
+                    color.g,
+                    color.b,
+                    color.a
+                )
+            end
         end
     },
     true
@@ -178,13 +191,16 @@ __TS__SetDescriptor(
         end,
         set = function(self, unit)
             if unit ~= nil then
-                setTextTagPosUnit(
-                    ensureHandle(self),
-                    unit.handle,
-                    0
-                )
                 self[106] = nil
                 self[107] = nil
+                self[108] = nil
+                self[109] = nil
+                self[111] = nil
+                self[112] = true
+                local handle = self[101]
+                if handle ~= nil then
+                    setTextTagPosUnit(handle, unit.handle, self[102].offsetZ)
+                end
                 unitTextTags[self] = true
             elseif self[100] ~= nil then
                 local unit = self[100]
@@ -324,25 +340,46 @@ TextTag.SHADOW_STRIKE = __TS__ObjectAssign(
         lifespan = 5
     }
 )
+local visibilityCheckPhase = 0
 Timer.onPeriod[1 / 64]:addListener(function()
+    visibilityCheckPhase = (visibilityCheckPhase + 1) % VISIBILITY_CHECK_INTERVAL
     for textTag in pairs(unitTextTags) do
-        local unit = textTag[100].handle
-        local x = getUnitX(unit)
-        local y = getUnitY(unit)
-        local ____, ____, isInView = worldCoordinatesToFrame(
-            x,
-            y,
-            getUnitFlyHeight(unit) + getTerrainZ(x, y)
-        )
-        if isInView and not isUnitHidden(unit) and not isUnitLoaded(unit) and isUnitVisible(unit, PLAYER_LOCAL_HANDLE) and unitAlive(unit) then
-            setTextTagPosUnit(
-                ensureHandle(textTag),
-                unit,
-                textTag[102].offsetZ
-            )
-        elseif textTag[101] ~= nil then
-            destroyTextTag(textTag[101])
-            textTag[101] = nil
+        local handle = textTag[101]
+        local isVisibilityCheckDue = textTag[112] or textTag[113] == visibilityCheckPhase
+        if handle ~= nil or isVisibilityCheckDue then
+            local unit = textTag[100].handle
+            local x = getUnitX(unit)
+            local y = getUnitY(unit)
+            local flyHeight = getUnitFlyHeight(unit)
+            local hasPositionChanged = flyHeight ~= textTag[111]
+            if x ~= textTag[108] or y ~= textTag[109] then
+                textTag[108] = x
+                textTag[109] = y
+                textTag[110] = nil
+                hasPositionChanged = true
+            end
+            textTag[111] = flyHeight
+            local isShown = handle ~= nil
+            if isVisibilityCheckDue then
+                textTag[112] = nil
+                local z = textTag[110]
+                if z == nil then
+                    z = getUnitZ(unit)
+                    textTag[110] = z
+                end
+                local ____, ____, isInView = worldCoordinatesToFrame(x, y, flyHeight + z)
+                isShown = isInView and not isUnitHidden(unit) and not isUnitLoaded(unit) and isUnitVisible(unit, PLAYER_LOCAL_HANDLE) and unitAlive(unit)
+            end
+            if not isShown then
+                if handle ~= nil then
+                    destroyTextTag(handle)
+                    textTag[101] = nil
+                end
+            elseif handle == nil then
+                ensureHandle(textTag)
+            elseif hasPositionChanged then
+                setTextTagPosUnit(handle, unit, textTag[102].offsetZ)
+            end
         end
     end
 end)