mirror of
https://github.com/Lacustat/Freewood-OctoWoW-Core.git
synced 2026-10-31 11:17:01 +00:00
LacustatandClaude Sonnet 5.5
505a06b46d
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_016onJCSHLwhs9udhC9ZLzk9
267 lines
11 KiB
Lua
267 lines
11 KiB
Lua
-- Freewood-OctoWoW-Core: Namensplaketten anpassen (Balkenbreite, Name, Level, Rahmen) und die zugehoerigen Einstellungen.
|
|
-- Frueher im Quest-Modul (QuestTargetMarks/QuestPlateSettings); laeuft jetzt ohne Quest-Modul. Werte: FW.Plates.Get/Set,
|
|
-- gespeichert in den Core-Einstellungen. Die Quest-Symbole (Logo) bleiben im Quest-Modul.
|
|
|
|
local FW = _G.Freewood
|
|
if not FW then return end
|
|
local UI = FW.UI
|
|
|
|
local P = {}
|
|
FW.Plates = P
|
|
|
|
local defaults = { plateCustom = false, plateW = 160, plateBorderOff = false, plateNameSize = 0, plateLvlGap = 2, plateY = 0 }
|
|
|
|
local function Store()
|
|
local s = FW.settings
|
|
if not s then return nil end
|
|
if type(s.plates) ~= "table" then s.plates = {} end
|
|
return s.plates
|
|
end
|
|
|
|
function P.Get(key)
|
|
local st = Store()
|
|
local v = st and st[key]
|
|
if v == nil then return defaults[key] end
|
|
return v
|
|
end
|
|
|
|
function P.Set(key, value)
|
|
local st = Store()
|
|
if not st then return end
|
|
st[key] = value
|
|
FW:Fire("PLATES_CHANGED", key)
|
|
FW:Fire("QUEST_PLATE_CHANGED", key) -- Quest-Modul: Symbole neu setzen
|
|
P.dirty = true
|
|
end
|
|
|
|
-- Alte Werte aus den Quest-Einstellungen uebernehmen (einmalig, nur wenn im Core noch nichts steht)
|
|
function P.Migrate(old)
|
|
local st = Store()
|
|
if not st or type(old) ~= "table" then return end
|
|
for k in pairs(defaults) do
|
|
if st[k] == nil and old[k] ~= nil and type(old[k]) == type(defaults[k]) then st[k] = old[k] end
|
|
end
|
|
end
|
|
|
|
------------------------------------------------------------------------
|
|
-- Anpassung
|
|
-- Wie ShaguPlates: Name und Level werden als EIGENE Texte auf einem eigenen Rahmen gezeichnet, die Originaltexte der Plakette nur
|
|
-- ausgeblendet (Hide). SetFont/SetScale auf den Originalteilen stuerzt den Client ab, auf eigenen Texten nicht.
|
|
-- Am Lebensbalken aendern wir nur Breite/Hoehe/Anker, am Rahmen nur Hide/Show. Ausgangswerte merkt sich das Addon pro Plakette.
|
|
------------------------------------------------------------------------
|
|
|
|
local BAR_W = 160
|
|
local FALLBACK_FONT = "Fonts\\FRIZQT__.TTF"
|
|
local origs = setmetatable({}, { __mode = "k" })
|
|
local overlays = setmetatable({}, { __mode = "k" })
|
|
local customOff = false
|
|
P.Overlays = overlays
|
|
|
|
local function LookParts(plate)
|
|
local bar = plate:GetChildren()
|
|
local border, glow, name, level = plate:GetRegions()
|
|
if not (bar and bar.SetWidth and name and name.GetFont and level and level.GetText) then return nil end
|
|
return bar, border, name, level, glow
|
|
end
|
|
|
|
local function SavePoint(f)
|
|
local pt, rel, relPt, x, y = f:GetPoint(1)
|
|
return { pt, rel, relPt, x or 0, y or 0 }
|
|
end
|
|
|
|
local function Overlay(plate, font, size, flags)
|
|
local ov = overlays[plate]
|
|
if ov then return ov end
|
|
local ok, f = pcall(_G.CreateFrame, "Frame", nil, plate)
|
|
if not ok or not f then return nil end
|
|
if f.EnableMouse then f:EnableMouse(false) end
|
|
f:SetFrameStrata("HIGH")
|
|
ov = { frame = f, size = size }
|
|
ov.hl = f:CreateTexture(nil, "BACKGROUND")
|
|
ov.hl:SetTexture(1, 1, 1, 0.3)
|
|
ov.hl:Hide()
|
|
ov.name = f:CreateFontString(nil, "OVERLAY")
|
|
ov.name:SetFont(font, size, flags)
|
|
ov.level = f:CreateFontString(nil, "OVERLAY")
|
|
ov.level:SetFont(font, size, flags)
|
|
overlays[plate] = ov
|
|
return ov
|
|
end
|
|
|
|
local function CopyText(src, dst)
|
|
local t = src:GetText()
|
|
dst:SetText(t or "")
|
|
local r, g, b, a = src:GetTextColor()
|
|
if r then dst:SetTextColor(r, g, b, a or 1) end
|
|
end
|
|
|
|
local function ApplyLook(plate)
|
|
local on = (not customOff) and P.Get("plateCustom") == true
|
|
local o = origs[plate]
|
|
if not on and not o then return end
|
|
local bar, border, name, level, glow = LookParts(plate)
|
|
if not bar then return end
|
|
if not o then
|
|
local path, size, flags = name:GetFont()
|
|
o = { w = bar:GetWidth(), h = bar:GetHeight(), barPt = SavePoint(bar),
|
|
font = path or FALLBACK_FONT, size = size or 12, flags = flags,
|
|
glowAlpha = glow and glow.GetAlpha and glow:GetAlpha() or 1 }
|
|
origs[plate] = o
|
|
end
|
|
local ov = overlays[plate]
|
|
if not on then
|
|
bar:SetWidth(o.w) bar:SetHeight(o.h)
|
|
local b = o.barPt
|
|
if b[1] then bar:ClearAllPoints() bar:SetPoint(b[1], b[2], b[3], b[4], b[5]) end
|
|
if border then border:Show() end
|
|
name:Show() level:Show()
|
|
if glow and glow.SetAlpha then glow:SetAlpha(o.glowAlpha or 1) end
|
|
if ov then ov.frame:Hide() end
|
|
origs[plate] = nil
|
|
return
|
|
end
|
|
local w = math.max(40, math.min(200, tonumber(P.Get("plateW")) or BAR_W))
|
|
local h = math.floor(o.h * w / o.w * 10 + 0.5) / 10
|
|
if math.abs(bar:GetWidth() - w) > 0.4 then bar:SetWidth(w) end
|
|
if math.abs(bar:GetHeight() - h) > 0.4 then bar:SetHeight(h) end
|
|
-- Balken mittig halten: Ausgangs-Anker um die halbe Breitendifferenz verschieben
|
|
local b = o.barPt
|
|
if b[1] then
|
|
local dx = (o.w - w) / 2
|
|
local x = b[4]
|
|
if b[1]:find("LEFT") then x = x + dx elseif b[1]:find("RIGHT") then x = x - dx end
|
|
bar:ClearAllPoints()
|
|
bar:SetPoint(b[1], b[2], b[3], x, b[5] + (tonumber(P.Get("plateY")) or 0))
|
|
end
|
|
if border then
|
|
if P.Get("plateBorderOff") == true then border:Hide() else border:Show() end
|
|
end
|
|
-- eigene Texte fuer Name und Level
|
|
local ns = tonumber(P.Get("plateNameSize")) or 0
|
|
local size = (ns >= 8) and ns or o.size
|
|
ov = Overlay(plate, o.font, size, o.flags)
|
|
if not ov then return end
|
|
if ov.size ~= size then
|
|
ov.size = size
|
|
pcall(ov.name.SetFont, ov.name, o.font, size, o.flags)
|
|
pcall(ov.level.SetFont, ov.level, o.font, size, o.flags)
|
|
end
|
|
ov.frame:Show()
|
|
if name:IsShown() then name:Hide() end
|
|
if level:IsShown() then level:Hide() end
|
|
ov.name:ClearAllPoints()
|
|
ov.name:SetPoint("BOTTOM", bar, "TOP", 0, 2)
|
|
ov.level:ClearAllPoints()
|
|
ov.level:SetPoint("LEFT", bar, "RIGHT", tonumber(P.Get("plateLvlGap")) or 2, 0)
|
|
CopyText(name, ov.name)
|
|
CopyText(level, ov.level)
|
|
-- Mouseover-Leuchten: das Original (zu gross) unsichtbar, dafuer ein eigenes Rechteck genau um den Balken
|
|
if glow and glow.SetAlpha then
|
|
if glow:GetAlpha() ~= 0 then glow:SetAlpha(0) end
|
|
ov.hl:ClearAllPoints()
|
|
ov.hl:SetPoint("TOPLEFT", bar, "TOPLEFT", -2, 2)
|
|
ov.hl:SetPoint("BOTTOMRIGHT", bar, "BOTTOMRIGHT", 2, -2)
|
|
if glow:IsShown() then ov.hl:Show() else ov.hl:Hide() end
|
|
end
|
|
end
|
|
|
|
P.ApplyLook = ApplyLook
|
|
|
|
local function PlateList()
|
|
local NP = _G.C_NamePlate
|
|
if not (NP and NP.GetNamePlates) then return nil end
|
|
local ok, plates = pcall(NP.GetNamePlates)
|
|
if ok and type(plates) == "table" then return plates end
|
|
return nil
|
|
end
|
|
|
|
-- Alle sichtbaren Plaketten durchgehen (wenige, alle 0,25 s); ist die Anpassung aus und nichts mehr veraendert, ruht es
|
|
local f = _G.CreateFrame("Frame")
|
|
local acc = 0
|
|
local anyChanged = false
|
|
f:SetScript("OnUpdate", function(_, elapsed)
|
|
acc = acc + (elapsed or 0)
|
|
if acc < 0.25 then return end
|
|
acc = 0
|
|
local on = P.Get("plateCustom") == true
|
|
if not on and not anyChanged then return end
|
|
local plates = PlateList()
|
|
if not plates then return end
|
|
for _, plate in ipairs(plates) do pcall(ApplyLook, plate) end
|
|
anyChanged = on
|
|
end)
|
|
local function Touch() anyChanged = true end
|
|
FW:On("PLATES_CHANGED", Touch, P)
|
|
if FW.RegisterEvent then
|
|
FW:RegisterEvent("NAME_PLATE_UNIT_ADDED", function() acc = 1 end, P) -- neue Plakette sofort anpassen
|
|
end
|
|
|
|
------------------------------------------------------------------------
|
|
-- Einstellungen (Reiter "Quests und Hinweise")
|
|
------------------------------------------------------------------------
|
|
|
|
if UI and UI.RegisterSettingsSection then
|
|
local function StepRow(parent, onMinus, onPlus)
|
|
local row = CreateFrame("Frame", nil, parent)
|
|
row:SetHeight(30)
|
|
local plus = UI.CreateButton(row, "+", 24, 22, onPlus, "default")
|
|
plus:SetPoint("RIGHT", row, "RIGHT", 0, 0)
|
|
local minus = UI.CreateButton(row, "-", 24, 22, onMinus, "default")
|
|
minus:SetPoint("RIGHT", plus, "LEFT", -4, 0)
|
|
local lbl = UI.CreateLabel(row, "", { size = 12 })
|
|
lbl:SetPoint("LEFT", row, "LEFT", 0, 0)
|
|
lbl:SetPoint("RIGHT", minus, "LEFT", -8, 0)
|
|
lbl:SetWordWrap(true)
|
|
return row, lbl
|
|
end
|
|
|
|
local function Step(key, lo, hi, def, d, zero)
|
|
local v = tonumber(P.Get(key)) or def
|
|
local n = v + d
|
|
if zero and v == 0 and d > 0 then n = lo elseif zero and v <= lo and d < 0 then n = 0 end
|
|
P.Set(key, math.max(zero and 0 or lo, math.min(hi, n)))
|
|
end
|
|
|
|
UI:RegisterSettingsSection("plates", {
|
|
category = "quest",
|
|
order = 120,
|
|
height = 330,
|
|
build = function(parent)
|
|
local L = FW.L
|
|
local f2, stack = UI.CreateSection(parent, L.QUEST_PLATESET_HEADER)
|
|
local note = UI.CreateLabel(f2, L.QUEST_PLATESET_NOTE, { size = 11, color = "textDim", justifyV = "TOP" })
|
|
stack:Add(note, { fit = true, gap = 8 })
|
|
local boxes = {}
|
|
local function Box(key, label)
|
|
local cb = UI.CreateCheckbox(f2, label, function() return P.Get(key) == true end,
|
|
function(on) P.Set(key, on and true or false) end)
|
|
stack:Add(cb, { fit = true, gap = 4 })
|
|
boxes[#boxes + 1] = cb
|
|
end
|
|
Box("plateCustom", L.QUEST_OPT_PLATECUSTOM)
|
|
Box("plateBorderOff", L.QUEST_OPT_PLATEBORDER)
|
|
local labels = {}
|
|
local function Row(key, lo, hi, def, step, zero, fmt)
|
|
local row, lbl = StepRow(f2, function() Step(key, lo, hi, def, -step, zero) end, function() Step(key, lo, hi, def, step, zero) end)
|
|
stack:Add(row, { height = 30, stretch = true, gap = 4 })
|
|
labels[#labels + 1] = function() lbl:SetText(fmt(tonumber(P.Get(key)) or def)) end
|
|
end
|
|
Row("plateW", 40, 200, 160, 10, false, function(v) return string.format(L.QUEST_PLATEW_LABEL, v) end)
|
|
Row("plateNameSize", 8, 20, 0, 1, true, function(v)
|
|
return string.format(L.QUEST_PLATENAME_LABEL, v >= 8 and tostring(v) or L.QUEST_PLATENAME_STD)
|
|
end)
|
|
Row("plateLvlGap", -10, 20, 2, 1, false, function(v) return string.format(L.QUEST_PLATELVL_LABEL, v) end)
|
|
Row("plateY", -40, 40, 0, 2, false, function(v) return string.format(L.QUEST_PLATEY_LABEL, v) end)
|
|
function f2.Refresh()
|
|
for _, cb in ipairs(boxes) do cb:Refresh() end
|
|
for _, fn in ipairs(labels) do fn() end
|
|
stack:Layout()
|
|
end
|
|
FW:On("PLATES_CHANGED", function() if f2:IsVisible() then f2.Refresh() end end, f2)
|
|
stack:Layout()
|
|
return f2
|
|
end,
|
|
refresh = function(frame) frame.Refresh() end,
|
|
})
|
|
end
|