From 0a9c8a34e275f6fddaee156c8d2704e7451fedcb Mon Sep 17 00:00:00 2001
From: Artur Morozov <Artur91425@gmail.com>
Date: Sun, 30 Dec 2018 02:28:32 +0300
Subject: [PATCH] skin: add MacroFrame

---
 pfUI.toc                 |  1 +
 skins/blizzard/macro.lua | 87 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 88 insertions(+)
 create mode 100644 skins/blizzard/macro.lua

diff --git a/pfUI.toc b/pfUI.toc
index 4f4bac4a..3ce533e4 100644
--- a/pfUI.toc
+++ b/pfUI.toc
@@ -56,6 +56,7 @@ skins\blizzard\spellbook.lua
 skins\blizzard\friends.lua
 skins\blizzard\talents.lua
 skins\blizzard\inspect.lua
+skins\blizzard\macro.lua
 
 # modules
 modules\gui.lua
diff --git a/skins/blizzard/macro.lua b/skins/blizzard/macro.lua
new file mode 100644
index 00000000..525521d6
--- /dev/null
+++ b/skins/blizzard/macro.lua
@@ -0,0 +1,87 @@
+pfUI:RegisterSkin("Macro", function ()
+  local border = tonumber(pfUI_config.appearance.border.default)
+  local bpad = border > 1 and border - 1 or 1
+
+  local f = CreateFrame("Frame")
+  f:RegisterEvent("ADDON_LOADED")
+  f:SetScript("OnEvent", function()
+    if arg1 == "Blizzard_MacroUI" then
+      StripTextures(MacroFrame)
+      CreateBackdrop(MacroFrame, nil, nil, .9)
+      EnableMovable(MacroFrame)
+
+      MacroFrame:SetWidth(360)
+      MacroFrame:SetHeight(460)
+
+      SkinCloseButton(MacroFrameCloseButton, MacroFrame, -6, -6)
+      SkinTab(MacroFrameTab1)
+      SkinTab(MacroFrameTab2)
+      MacroFrameTab2:SetPoint("LEFT", MacroFrameTab1, "RIGHT", 2*bpad + 4, 0)
+
+      for i=1, 18 do
+        local button = _G["MacroButton"..i]
+        StripTextures(button)
+        CreateBackdrop(button)
+        button:SetHighlightTexture([[Interface\Buttons\ButtonHilight-Square]])
+        button:SetCheckedTexture([[Interface\Buttons\CheckButtonHilight]])
+        local icon = _G["MacroButton"..i..'Icon']
+        icon:SetAllPoints(button)
+        icon:SetTexCoord(.08, .92, .08, .92)
+      end
+      StripTextures(MacroFrameSelectedMacroButton)
+      CreateBackdrop(MacroFrameSelectedMacroButton)
+      MacroFrameSelectedMacroButtonIcon:SetAllPoints(MacroFrameSelectedMacroButton)
+      MacroFrameSelectedMacroButtonIcon:SetTexCoord(.08, .92, .08, .92)
+      MacroFrameSelectedMacroName:SetPoint("TOPLEFT", MacroFrameSelectedMacroButton, "TOPRIGHT", 6, 3)
+
+      SkinButton(MacroDeleteButton)
+      MacroDeleteButton:ClearAllPoints()
+      MacroDeleteButton:SetPoint("BOTTOMLEFT", 20, 17)
+      SkinButton(MacroExitButton)
+      MacroExitButton:ClearAllPoints()
+      MacroExitButton:SetPoint("BOTTOMRIGHT", -20, 17)
+      SkinButton(MacroNewButton)
+      MacroNewButton:ClearAllPoints()
+      MacroNewButton:SetPoint("RIGHT", MacroExitButton, "LEFT", -2*bpad, 0)
+      SkinButton(MacroEditButton)
+
+      MacroEditButton:ClearAllPoints()
+      MacroEditButton:SetHeight(22)
+      MacroEditButton:SetWidth(150)
+      MacroEditButton:SetPoint("BOTTOMLEFT", MacroFrameSelectedMacroButton, "BOTTOMRIGHT", 6, -2)
+
+      CreateBackdrop(MacroFrameTextBackground, nil, nil, 1)
+      SkinScrollbar(MacroFrameScrollFrameScrollBar)
+      MacroFrameCharLimitText:SetPoint("BOTTOM", MacroFrameTextBackground, "BOTTOM", 0, -16)
+
+      StripTextures(MacroPopupFrame)
+      CreateBackdrop(MacroPopupFrame, nil, nil, .9)
+      StripTextures(MacroPopupScrollFrame)
+      SkinScrollbar(MacroPopupScrollFrameScrollBar)
+
+      MacroPopupNameLeft:SetTexture(nil)
+      MacroPopupNameMiddle:SetTexture(nil)
+      MacroPopupNameRight:SetTexture(nil)
+      CreateBackdrop(MacroPopupEditBox)
+      MacroPopupEditBox:SetScript("OnEscapePressed", function()
+        MacroPopupFrame:Hide()
+        MacroFrame_Update()
+      end)
+
+      for i=1, 20 do
+        local button = _G["MacroPopupButton"..i]
+        StripTextures(button)
+        CreateBackdrop(button)
+        button:SetHighlightTexture([[Interface\Buttons\ButtonHilight-Square]])
+        button:SetCheckedTexture([[Interface\Buttons\CheckButtonHilight]])
+        local icon = _G["MacroPopupButton"..i..'Icon']
+        icon:SetAllPoints(button)
+        icon:SetTexCoord(.08, .92, .08, .92)
+      end
+      SkinButton(MacroPopupCancelButton)
+      SkinButton(MacroPopupOkayButton)
+      MacroPopupOkayButton:ClearAllPoints()
+      MacroPopupOkayButton:SetPoint("RIGHT", MacroPopupCancelButton, "LEFT", -2*bpad, 0)
+    end
+  end)
+end)