Advertisement
Guest User

Untitled

a guest
Mar 1st, 2015
350
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.56 KB | None | 0 0
  1.  
  2. -- Class Colours In Names
  3.  
  4. local frame = CreateFrame("FRAME")
  5. frame:RegisterEvent("GROUP_ROSTER_UPDATE")
  6. frame:RegisterEvent("PLAYER_TARGET_CHANGED")
  7. frame:RegisterEvent("PLAYER_FOCUS_CHANGED")
  8. frame:RegisterEvent("UNIT_FACTION")
  9.  
  10. local function eventHandler(self, event, ...)
  11. if UnitIsPlayer("target") then
  12. c = RAID_CLASS_COLORS[select(2, UnitClass
  13.  
  14. ("target"))]
  15. TargetFrameNameBackground:SetVertexColor(c.r, c.g,
  16.  
  17. c.b)
  18. end
  19. if UnitIsPlayer("focus") then
  20. c = RAID_CLASS_COLORS[select(2, UnitClass
  21.  
  22. ("focus"))]
  23. FocusFrameNameBackground:SetVertexColor(c.r, c.g,
  24.  
  25. c.b)
  26. end
  27. end
  28.  
  29. frame:SetScript("OnEvent", eventHandler)
  30.  
  31. for _, BarTextures in pairs({TargetFrameNameBackground,
  32.  
  33. FocusFrameNameBackground}) do
  34. BarTextures:SetTexture("Interface\\TargetingFrame\\UI-
  35.  
  36. StatusBar")
  37. end
  38.  
  39. -- Frame Sizes
  40.  
  41. PlayerFrame:SetScale(1.1)
  42. TargetFrame:SetScale(1.1)
  43. FocusFrame:SetScale(1.1)
  44. PetFrame:SetScale(1.1)
  45. TargetFrameSpellBar:SetScale(1.1)
  46. FocusFrameSpellBar:SetScale(1.1)
  47.  
  48. -- Arena Frames
  49.  
  50. LoadAddOn("Blizzard_ArenaUI")
  51.  
  52. ArenaEnemyFrames:SetScale(1.8)
  53.  
  54. ArenaEnemyFrame1:ClearAllPoints()
  55. ArenaEnemyFrame2:ClearAllPoints()
  56. ArenaEnemyFrame3:ClearAllPoints()
  57. ArenaEnemyFrame4:ClearAllPoints()
  58. ArenaEnemyFrame5:ClearAllPoints()
  59.  
  60. ArenaEnemyFrame1:SetPoint("CENTER",UIParent,"CENTER",200,50)
  61. ArenaEnemyFrame2:SetPoint("CENTER",UIParent,"CENTER",200,0)
  62. ArenaEnemyFrame3:SetPoint("CENTER",UIParent,"CENTER",200,-50)
  63. ArenaEnemyFrame4:SetPoint("CENTER",UIParent,"CENTER",200,-100)
  64. ArenaEnemyFrame5:SetPoint("CENTER",UIParent,"CENTER",200,-150)
  65.  
  66. ArenaEnemyFrame1.SetPoint = function() end
  67. ArenaEnemyFrame2.SetPoint = function() end
  68. ArenaEnemyFrame3.SetPoint = function() end
  69. ArenaEnemyFrame4.SetPoint = function() end
  70. ArenaEnemyFrame5.SetPoint = function() end
  71.  
  72. trinkets = {}
  73. local arenaFrame, trinket
  74. for i = 1, 5 do
  75. arenaFrame = "ArenaEnemyFrame"..i
  76. trinket = CreateFrame("Cooldown", arenaFrame.."Trinket",
  77.  
  78. ArenaEnemyFrames)
  79. trinket:SetPoint("TOPRIGHT", arenaFrame, 30, -6)
  80. trinket:SetSize(24, 24)
  81. trinket.icon = trinket:CreateTexture(nil, "BACKGROUND")
  82. trinket.icon:SetAllPoints()
  83. trinket.icon:SetTexture("Interface\\Icons\
  84.  
  85. \inv_jewelry_trinketpvp_01")
  86. trinket:Hide()
  87. trinkets["arena"..i] = trinket
  88. end
  89.  
  90. local events = CreateFrame("Frame")
  91. function events:UNIT_SPELLCAST_SUCCEEDED(unitID, spell, rank,
  92.  
  93. lineID, spellID)
  94. if not trinkets[unitID] then
  95. return
  96. end
  97. if spellID == 59752 or spellID == 42292 then
  98. CooldownFrame_SetTimer(trinkets[unitID], GetTime
  99.  
  100. (), 120, 1)
  101. SendChatMessage("Trinket used by: "..GetUnitName
  102.  
  103. (unitID, true), "PARTY")
  104. end
  105. end
  106.  
  107. function events:PLAYER_ENTERING_WORLD()
  108. local _, instanceType = IsInInstance()
  109. if instanceType == "arena" then
  110. self:RegisterEvent("UNIT_SPELLCAST_SUCCEEDED")
  111. elseif self:IsEventRegistered("UNIT_SPELLCAST_SUCCEEDED")
  112.  
  113. then
  114. self:UnregisterEvent("UNIT_SPELLCAST_SUCCEEDED")
  115. for _, trinket in pairs(trinkets) do
  116. trinket:SetCooldown(0, 0)
  117. trinket:Hide()
  118. end
  119. end
  120. end
  121. events:SetScript("OnEvent", function(self, event, ...) return
  122.  
  123. self[event](self, ...) end)
  124. events:RegisterEvent("PLAYER_ENTERING_WORLD")
  125.  
  126. -- Gryphon Hide
  127.  
  128. MainMenuBarLeftEndCap:Hide()
  129. MainMenuBarRightEndCap:Hide()
  130.  
  131. -- XP Bar
  132.  
  133. MainMenuExpBar:Hide()
  134.  
  135. -- Cast Bar Timer
  136.  
  137. CastingBarFrame.timer = CastingBarFrame:CreateFontString(nil);
  138. CastingBarFrame.timer:SetFont(STANDARD_TEXT_FONT,12,"OUTLINE");
  139. CastingBarFrame.timer:SetPoint("TOP", CastingBarFrame, "BOTTOM",
  140.  
  141. 65, 15);
  142. CastingBarFrame.update = .1;
  143.  
  144. hooksecurefunc("CastingBarFrame_OnUpdate", function(self, elapsed)
  145. if not self.timer then return end
  146. if self.update and self.update < elapsed then
  147. if self.casting then
  148. self.timer:SetText(format("%2.1f/%1.1f",
  149.  
  150. max(self.maxValue - self.value, 0), self.maxValue))
  151. elseif self.channeling then
  152. self.timer:SetText(format("%.1f", max
  153.  
  154. (self.value, 0)))
  155. else
  156. self.timer:SetText("")
  157. end
  158. self.update = .1
  159. else
  160. self.update = self.update - elapsed
  161. end
  162. end)
  163.  
  164. -- Minimap Tweaks
  165.  
  166. MinimapZoomIn:Hide()
  167. MinimapZoomOut:Hide()
  168. Minimap:EnableMouseWheel(true)
  169. Minimap:SetScript('OnMouseWheel', function(self, delta)
  170. if delta > 0 then
  171. Minimap_ZoomIn()
  172. else
  173. Minimap_ZoomOut()
  174. end
  175. end)
  176. MiniMapTracking:ClearAllPoints()
  177. MiniMapTracking:SetPoint("TOPRIGHT", -26, 7)
  178.  
  179. -- RAID BOSS EMOTE FRAME
  180.  
  181. local BATTLEGROUNDS = {
  182. ["Arathi Basin"] = true,
  183. ["Wintergrasp"] = true,
  184. ["Strand of the Ancients"] = true,
  185. ["Tol Barad"] = true,
  186. ["The Battle for Gilneas"] = true,
  187. }
  188.  
  189. local Fixer = CreateFrame( "Frame" )
  190. local RaidBossEmoteFrame, spamDisabled = RaidBossEmoteFrame
  191. local function ToggleBossEmotes()
  192. if BATTLEGROUNDS[GetZoneText()] then
  193. RaidBossEmoteFrame:UnregisterEvent( "RAID_BOSS_EMOTE" )
  194. spamDisabled = true
  195. elseif spamDisabled then
  196. RaidBossEmoteFrame:RegisterEvent( "RAID_BOSS_EMOTE" )
  197. spamDisabled = false
  198. end
  199. end
  200.  
  201. Fixer:RegisterEvent( "PLAYER_ENTERING_WORLD" )
  202. Fixer:RegisterEvent( "ZONE_CHANGED_NEW_AREA" )
  203. Fixer:SetScript( "OnEvent", ToggleBossEmotes )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement