Кастом стандартных плейтов

[ida]

Чуть позже чекну, отпишу

Спруди, актуально все еще?

[Sproody]

Спруди, актуально все еще?

А, да, вот. Правда мне не оч нравится что их приоритеты(выше-ниже) распределяются без какой то логики. В идеале бы сделать зависимость от расстояния к юниту плейта, но это уже сишную часть ковырять надо.

local CLASSICON_SIZE = 28
local ACCURACY = 8
local CLASS_ICON_TCOORDS = CLASS_ICON_TCOORDS
local UnitClass = UnitClass
local pairs = pairs

local nameplates = {}


local math_round
do
    local math_floor = math.floor
    math_round = function(x)
        return math_floor(x+0.5)
    end
end

local function GetUnitTypeByNameplateRGB(r,g,b)
    if g + b == 0 then -- red
        return "enemy"
    elseif r + b == 0 then -- green
        return "friend_pvp"
    elseif r + g == 0 then -- blue
        return "friend_nopvp"
    elseif r + g > 1.99 and b == 0 then -- yellow
        return "neutral"
    else
        return "enemy_player"
    end
end

local GetClassByRGB
do
    local RAID_CLASS_COLORS = RAID_CLASS_COLORS
    GetClassByRGB = function(r,g,b)
        for class,tbl in pairs(RAID_CLASS_COLORS) do
            if math_round(tbl.r*ACCURACY) == math_round(r*ACCURACY)
                and math_round(tbl.g*ACCURACY) == math_round(g*ACCURACY)
                and math_round(tbl.b*ACCURACY) == math_round(b*ACCURACY) then

                return class
            end
        end
    end
end

local function healthbar_UpdateClassIcon(self,r,g,b)
    if GetUnitTypeByNameplateRGB(r,g,b) == "enemy_player" then
        local class = GetClassByRGB(r,g,b)
        if class then
            self.classIcon:SetTexCoord(unpack(CLASS_ICON_TCOORDS[class]))
            self.classIcon:Show()
            return
        end
    end

    self.classIcon:Hide()
end

local function healthbar_valuechanged_cb(self,value)
    self.text:SetText(value)
end

local function healthbar_show_cb(self)
    self.text:SetText(self:GetValue())
end

local function healthbar_update_cb(self)
    local r,g,b = self:GetStatusBarColor()
    if not (r == self.r and g == self.g and b == self.b) then
        healthbar_UpdateClassIcon(self,r,g,b)
        self.r,self.g,self.b = r,g,b
    end
end

local function nameplate_update_cb(self)
    self:SetAlpha(1)
end

local function InitNamePlate(frame)
    local healthbar = frame:GetChildren()
    healthbar.text = healthbar:CreateFontString(nil,"ARTWORK")
    healthbar.text:SetFont("Fonts\\FRIZQT__.TTF",11,"OUTLINE")
    healthbar.text:SetPoint("CENTER")

    healthbar.classIcon = healthbar:CreateTexture(nil,"BORDER")
    healthbar.classIcon:SetPoint("RIGHT",healthbar,"LEFT",-4,0)
    healthbar.classIcon:SetSize(CLASSICON_SIZE,CLASSICON_SIZE)
    healthbar.classIcon:SetTexture("Interface\\TargetingFrame\\UI-Classes-Circles")
    healthbar.classIcon:Hide()

    healthbar_show_cb(healthbar)
    healthbar:SetScript("OnValueChanged",healthbar_valuechanged_cb)
    healthbar:SetScript("OnShow",healthbar_show_cb)
    healthbar:SetScript("OnUpdate",healthbar_update_cb)
    frame:SetScript("OnUpdate",nameplate_update_cb)

    table.insert(nameplates,frame)
end

local function IdentifyFrame(self)
    if self:GetName() then return end
    if self.GetRegions then
        local region = self:GetRegions()
        if region.GetTexture then
            local texturePath = region:GetTexture()
            if texturePath == "Interface\\TargetingFrame\\UI-TargetingFrame-Flash" then
                return "NamePlate"
            elseif texturePath == "Interface\\Tooltips\\ChatBubble-Background" then
                return "ChatBubble"
            end
        end
    end
end

local function iterateChildrens(object,...)
    if not object then return end

    local type = IdentifyFrame(object)
    if type == "NamePlate" then
        InitNamePlate(object)
    elseif type == "ChatBubble" then
        --InitChatBubble(object)
    end

    return iterateChildrens(...)
end


local select,WorldFrame = select,WorldFrame
local lastWorldFrameChildsCount = 0
CreateFrame("frame"):SetScript("OnUpdate",function()
    local worldFrameChildsCount = WorldFrame:GetNumChildren()
    if worldFrameChildsCount ~= lastWorldFrameChildsCount then
        iterateChildrens(select(lastWorldFrameChildsCount+1,WorldFrame:GetChildren()))
        lastWorldFrameChildsCount = worldFrameChildsCount
    end


    local level = 1
    for _,frame in pairs(nameplates) do
        if frame:IsShown() then
            if frame:GetFrameLevel() == 20 then -- is target
                frame:SetFrameLevel(#nameplates*2)
            else
                level = level + 2
                frame:SetFrameLevel(level)
            end
        end
    end
end) 

- - - Updated - - -

неа)
Удаляется иконка а надо показ ПХ!
Проще напиши код на Иконку класса противника, без показа ХП игрока!
А я по мере необходимости буду менять код да и всё...

Скрытый текст

Тогда закомменти как здесь
Untitled.png

[свернуть]

[ida]

А, да, вот. Правда мне не оч нравится что их приоритеты(выше-ниже) распределяются без какой то логики. В идеале бы сделать зависимость от расстояния к юниту плейта, но это уже сишную часть ковырять надо.

local CLASSICON_SIZE = 28
local ACCURACY = 8
local CLASS_ICON_TCOORDS = CLASS_ICON_TCOORDS
local UnitClass = UnitClass
local pairs = pairs

local nameplates = {}


local math_round
do
    local math_floor = math.floor
    math_round = function(x)
        return math_floor(x+0.5)
    end
end

local function GetUnitTypeByNameplateRGB(r,g,b)
    if g + b == 0 then -- red
        return "enemy"
    elseif r + b == 0 then -- green
        return "friend_pvp"
    elseif r + g == 0 then -- blue
        return "friend_nopvp"
    elseif r + g > 1.99 and b == 0 then -- yellow
        return "neutral"
    else
        return "enemy_player"
    end
end

local GetClassByRGB
do
    local RAID_CLASS_COLORS = RAID_CLASS_COLORS
    GetClassByRGB = function(r,g,b)
        for class,tbl in pairs(RAID_CLASS_COLORS) do
            if math_round(tbl.r*ACCURACY) == math_round(r*ACCURACY)
                and math_round(tbl.g*ACCURACY) == math_round(g*ACCURACY)
                and math_round(tbl.b*ACCURACY) == math_round(b*ACCURACY) then

                return class
            end
        end
    end
end

local function healthbar_UpdateClassIcon(self,r,g,b)
    if GetUnitTypeByNameplateRGB(r,g,b) == "enemy_player" then
        local class = GetClassByRGB(r,g,b)
        if class then
            self.classIcon:SetTexCoord(unpack(CLASS_ICON_TCOORDS[class]))
            self.classIcon:Show()
            return
        end
    end

    self.classIcon:Hide()
end

local function healthbar_valuechanged_cb(self,value)
    self.text:SetText(value)
end

local function healthbar_show_cb(self)
    self.text:SetText(self:GetValue())
end

local function healthbar_update_cb(self)
    local r,g,b = self:GetStatusBarColor()
    if not (r == self.r and g == self.g and b == self.b) then
        healthbar_UpdateClassIcon(self,r,g,b)
        self.r,self.g,self.b = r,g,b
    end
end

local function nameplate_update_cb(self)
    self:SetAlpha(1)
end

local function InitNamePlate(frame)
    local healthbar = frame:GetChildren()
    healthbar.text = healthbar:CreateFontString(nil,"ARTWORK")
    healthbar.text:SetFont("Fonts\\FRIZQT__.TTF",11,"OUTLINE")
    healthbar.text:SetPoint("CENTER")

    healthbar.classIcon = healthbar:CreateTexture(nil,"BORDER")
    healthbar.classIcon:SetPoint("RIGHT",healthbar,"LEFT",-4,0)
    healthbar.classIcon:SetSize(CLASSICON_SIZE,CLASSICON_SIZE)
    healthbar.classIcon:SetTexture("Interface\\TargetingFrame\\UI-Classes-Circles")
    healthbar.classIcon:Hide()

    healthbar_show_cb(healthbar)
    healthbar:SetScript("OnValueChanged",healthbar_valuechanged_cb)
    healthbar:SetScript("OnShow",healthbar_show_cb)
    healthbar:SetScript("OnUpdate",healthbar_update_cb)
    frame:SetScript("OnUpdate",nameplate_update_cb)

    table.insert(nameplates,frame)
end

local function IdentifyFrame(self)
    if self:GetName() then return end
    if self.GetRegions then
        local region = self:GetRegions()
        if region.GetTexture then
            local texturePath = region:GetTexture()
            if texturePath == "Interface\\TargetingFrame\\UI-TargetingFrame-Flash" then
                return "NamePlate"
            elseif texturePath == "Interface\\Tooltips\\ChatBubble-Background" then
                return "ChatBubble"
            end
        end
    end
end

local function iterateChildrens(object,...)
    if not object then return end

    local type = IdentifyFrame(object)
    if type == "NamePlate" then
        InitNamePlate(object)
    elseif type == "ChatBubble" then
        --InitChatBubble(object)
    end

    return iterateChildrens(...)
end


local select,WorldFrame = select,WorldFrame
local lastWorldFrameChildsCount = 0
CreateFrame("frame"):SetScript("OnUpdate",function()
    local worldFrameChildsCount = WorldFrame:GetNumChildren()
    if worldFrameChildsCount ~= lastWorldFrameChildsCount then
        iterateChildrens(select(lastWorldFrameChildsCount+1,WorldFrame:GetChildren()))
        lastWorldFrameChildsCount = worldFrameChildsCount
    end


    local level = 1
    for _,frame in pairs(nameplates) do
        if frame:IsShown() then
            if frame:GetFrameLevel() == 20 then -- is target
                frame:SetFrameLevel(#nameplates*2)
            else
                level = level + 2
                frame:SetFrameLevel(level)
            end
        end
    end
end) 

- - - Updated - - -

Скрытый текст

Тогда закомменти как здесь
Untitled.png

[свернуть]

Спасибо, друг!
А какие именно строчки кода отвечают за возможность убрать смешивание плейтов? Я бы их вставил в код из 2 поста, а то не особо удобно юзать код который ты написал для чела выше с иконками и цифрами хп целиком без "к", мне с "к" и без иконок удобнее.
UPD. Хотя вроде уже сам нашел