BulwarkFrame - compact Earthen Bulwark readout for TurtleWoW

2026-08-05 15:54:49 +02:00
commit 7cd508e2a3
17 changed files with 1990 additions and 0 deletions
@@ -0,0 +1,108 @@
+-- BulwarkFrame - minimap.lua
+-- Hand-rolled minimap button (no LibDBIcon on 1.12). Orbits the minimap at a saved angle,
+-- drag-repositions, left-click opens the options panel, right-click toggles demo mode.
+-- WoW-API file (parse-checked only).
+--
+-- pfUI-safe, the same way TotemBar's button is: parent = Minimap, the frame NAME contains
+-- "Minimap", strata HIGH with level 9 (MEDIUM ends up underneath pfUI). /bulwark options stays
+-- the guaranteed access path if a UI collects or hides the button anyway.
+
+BulwarkFrame = BulwarkFrame or {}
+local BF = BulwarkFrame
+
+local button = nil
+
+local function db() return BulwarkFrameDB end
+
+-- Position on the orbit for an angle in degrees. Plain trigonometry rather than a lib: the
+-- radius is the minimap's own half-width so it follows a resized minimap.
+local function PlaceButton(angleDeg)
+    if not button then return end
+    local radius = (Minimap:GetWidth() / 2) + 5
+    local rad = angleDeg * math.pi / 180
+    button:ClearAllPoints()
+    button:SetPoint("CENTER", Minimap, "CENTER", math.cos(rad) * radius, math.sin(rad) * radius)
+end
+
+local function BuildButton()
+    if button then return end
+
+    local btn = CreateFrame("Button", "BulwarkFrameMinimapButton", Minimap)
+    btn:SetWidth(33)
+    btn:SetHeight(33)
+    btn:SetFrameStrata("HIGH")
+    btn:SetFrameLevel(9)
+
+    -- No custom art yet: a shield-shaped stock icon says "defensive readout" well enough, and a
+    -- placeholder texture that fails to load would leave an invisible button.
+    local icon = btn:CreateTexture("BulwarkFrameMinimapIcon", "ARTWORK")
+    icon:SetTexture("Interface\\Icons\\Spell_Nature_StoneClawTotem")
+    icon:SetWidth(20)
+    icon:SetHeight(20)
+    icon:SetPoint("CENTER", btn, "CENTER", 0, 0)
+    icon:SetTexCoord(0.08, 0.92, 0.08, 0.92)
+
+    local border = btn:CreateTexture("BulwarkFrameMinimapBorder", "OVERLAY")
+    border:SetTexture("Interface\\Minimap\\MiniMap-TrackingBorder")
+    -- Vanilla recipe (MiniMapTrackingButton): a 54px border anchored TOPLEFT(0,0) on a 33px
+    -- button. The ring sits off-centre WITHIN the texture, so this exact anchor is what makes it
+    -- concentric with the icon -- centring it pushes the ring off.
+    border:SetWidth(54)
+    border:SetHeight(54)
+    border:SetPoint("TOPLEFT", btn, "TOPLEFT", 0, 0)
+
+    btn:SetHighlightTexture("Interface\\Minimap\\UI-Minimap-ZoomButton-Highlight")
+    btn:RegisterForClicks("LeftButtonUp", "RightButtonUp")
+    btn:RegisterForDrag("LeftButton")
+
+    btn:SetScript("OnDragStart", function() this.isDragging = true end)
+    btn:SetScript("OnDragStop", function() this.isDragging = false end)
+    btn:SetScript("OnUpdate", function()
+        if not this.isDragging then return end
+        -- Follow the cursor around the orbit: angle from the minimap centre to the pointer.
+        local mx, my = Minimap:GetCenter()
+        local cx, cy = GetCursorPosition()
+        local scale = Minimap:GetEffectiveScale()
+        cx, cy = cx / scale, cy / scale
+        local angle = math.deg(math.atan2(cy - my, cx - mx))
+        db().minimapAngle = angle
+        PlaceButton(angle)
+    end)
+
+    btn:SetScript("OnClick", function()
+        if arg1 == "RightButton" then
+            -- Show/hide the readout, the same thing TotemBar's button does. This used to toggle
+            -- DEMO mode, which was a trap: the frame hides itself when no buffer is up, so the
+            -- obvious reaction is to right-click to make it appear -- and that silently replaced
+            -- the live readout with synthetic numbers.
+            local shown = BF.ToggleFrame()
+            DEFAULT_CHAT_FRAME:AddMessage("BulwarkFrame: " .. (shown and "shown" or "hidden"))
+        else
+            BF.ToggleOptions()
+        end
+    end)
+
+    btn:SetScript("OnEnter", function()
+        GameTooltip:SetOwner(this, "ANCHOR_LEFT")
+        GameTooltip:SetText("BulwarkFrame", 1, 1, 1)
+        GameTooltip:AddLine("Left click: options", 0.8, 0.8, 0.8)
+        GameTooltip:AddLine("Right click: show / hide the readout", 0.8, 0.8, 0.8)
+        GameTooltip:AddLine("Drag: move around the minimap", 0.8, 0.8, 0.8)
+        GameTooltip:Show()
+    end)
+    btn:SetScript("OnLeave", function() GameTooltip:Hide() end)
+
+    button = btn
+    PlaceButton(db().minimapAngle or 215)
+end
+
+-- Creates the button on demand and honours the "show minimap button" setting.
+function BF.UpdateMinimapButton()
+    if not db().showMinimapButton then
+        if button then button:Hide() end
+        return
+    end
+    BuildButton()
+    PlaceButton(db().minimapAngle or 215)
+    button:Show()
+end