View Single Post
11-05-16, 04:11 AM   #3
Aftermathhqt
A Molten Giant
 
Aftermathhqt's Avatar
AddOn Author - Click to view addons
Join Date: Dec 2009
Posts: 784
Here is something that i wrote, that works very well!

Lua Code:
  1. local A, C, L = select(2, ...):unpack()
  2.  
  3. local OrderHallFrameEvent = CreateFrame("Frame")
  4. OrderHallFrameEvent:RegisterEvent("ADDON_LOADED")
  5. OrderHallFrameEvent:RegisterEvent("PLAYER_ENTERING_WORLD")
  6.  
  7. local GarrsionFrameEvent = CreateFrame("Frame")
  8. GarrsionFrameEvent:RegisterEvent("ADDON_LOADED")
  9. GarrsionFrameEvent:RegisterEvent("PLAYER_ENTERING_WORLD")
  10. GarrsionFrameEvent:RegisterEvent("GARRISON_UPDATE")
  11.  
  12. local function GarrsionFrameOnEvent(self, event, AddOn)
  13.     if C_Garrison.IsPlayerInGarrison(LE_GARRISON_TYPE_7_0) then
  14.         ATopPanel:Show()
  15.     else
  16.         ATopPanel:Hide()
  17.         return
  18.     end
  19. end
  20.  
  21. local function OrderHallBarOnEvent(self, event, AddOn)
  22.     if AddOn == "Blizzard_OrderHallUI" then
  23.    
  24.        -- Create a Fake Bar so we can reposition the Troops Icon + Text
  25.        
  26.         local OrderHallCommandBarFrame = CreateFrame("Frame", nil, UIParent)
  27.         OrderHallCommandBarFrame:SetSize(588, 24)
  28.         OrderHallCommandBarFrame:SetPoint("TOP", UIParent, 0, -1)
  29.        
  30.          -- Attach the Original Bar to our Fake Bar!
  31.  
  32.         local AOrderHallCommandBar = _G["OrderHallCommandBar"]     
  33.         AOrderHallCommandBar:ClearAllPoints()
  34.         AOrderHallCommandBar:SetParent("UIParent")
  35.         AOrderHallCommandBar:SetAllPoints(OrderHallCommandBarFrame)
  36.         AOrderHallCommandBar:SetPoint("TOP", OrderHallCommandBarFrame)
  37.        
  38.         -- Hide Blizz Texture & World Map Button
  39.        
  40.         AOrderHallCommandBar.Background:Hide()
  41.         AOrderHallCommandBar.WorldMapButton:Hide()
  42.        
  43.         -- Reposition Icons + Texts
  44.  
  45.         AOrderHallCommandBar.ClassIcon:ClearAllPoints()
  46.         AOrderHallCommandBar.ClassIcon:SetPoint("TOPLEFT", UIParent, 0, -1)
  47.  
  48.         AOrderHallCommandBar.Currency:ClearAllPoints()
  49.         AOrderHallCommandBar.Currency:SetPoint("TOPLEFT", UIParent, 618, -6)
  50.        
  51.         AOrderHallCommandBar.CurrencyIcon:ClearAllPoints()
  52.         AOrderHallCommandBar.CurrencyIcon:SetPoint("TOPLEFT", UIParent, 662, 0)
  53.    
  54.         AOrderHallCommandBar.AreaName:SetFont(C.Media.Font2, 14, "THINOUTLINE")    
  55.         AOrderHallCommandBar.AreaName:SetVertexColor(0.41, 0.8, 0.94)
  56.     end
  57. end
  58.  
  59. GarrsionFrameEvent:SetScript("OnEvent", GarrsionFrameOnEvent)
  60. OrderHallFrameEvent:SetScript("OnEvent", OrderHallBarOnEvent)
Attached Thumbnails
Click image for larger version

Name:	Skärmklipp.PNG
Views:	155
Size:	167.7 KB
ID:	8869  

Last edited by Aftermathhqt : 11-05-16 at 04:23 AM.
  Reply With Quote