annotate classes/ActionButton.lua @ 128:729232aeeb5e

Action Button rewrite. (note: pet actions are probably slightly broken right now, they haven't been updated yet)
author Flick <flickerstreak@gmail.com>
date Thu, 05 Mar 2009 01:28:48 +0000
parents 0c5017f6062d
children 28b430de5875
rev   line source
flickerstreak@122 1 local ReAction = ReAction
flickerstreak@122 2 local L = ReAction.L
flickerstreak@122 3 local _G = _G
flickerstreak@122 4 local CreateFrame = CreateFrame
flickerstreak@122 5 local GetBindingKey = GetBindingKey
flickerstreak@122 6 local format = string.format
flickerstreak@122 7 local IsUsableAction = IsUsableAction
flickerstreak@122 8 local IsEquippedAction = IsEquippedAction
flickerstreak@122 9 local IsConsumableAction = IsConsumableAction
flickerstreak@122 10 local IsStackableAction = IsStackableAction
flickerstreak@122 11 local GetActionText = GetActionText
flickerstreak@122 12 local GetCVar = GetCVar
flickerstreak@122 13 local GameTooltip_SetDefaultAnchor = GameTooltip_SetDefaultAnchor
flickerstreak@122 14 local IsCurrentAction = IsCurrentAction
flickerstreak@122 15 local IsAutoRepeatAction = IsAutoRepeatAction
flickerstreak@122 16 local IsUsableAction = IsUsableAction
flickerstreak@122 17 local IsAttackAction = IsAttackAction
flickerstreak@122 18 local CooldownFrame_SetTimer = CooldownFrame_SetTimer
flickerstreak@122 19 local GetActionCooldown = GetActionCooldown
flickerstreak@122 20 local GetActionTexture = GetActionTexture
flickerstreak@122 21 local ATTACK_BUTTON_FLASH_TIME = ATTACK_BUTTON_FLASH_TIME
flickerstreak@122 22 local TOOLTIP_UPDATE_TIME = TOOLTIP_UPDATE_TIME
flickerstreak@122 23 local IsActionInRange = IsActionInRange
flickerstreak@122 24 local InCombatLockdown = InCombatLockdown
flickerstreak@122 25 local HasAction = HasAction
flickerstreak@122 26
flickerstreak@122 27 ReAction:UpdateRevision("$Revision: 154 $")
flickerstreak@122 28
flickerstreak@122 29 --
flickerstreak@122 30 -- Secure snippets
flickerstreak@122 31 -- These are run within the context of the bar's sandbox, as the
flickerstreak@122 32 -- buttons themselves do not have their own sandbox.
flickerstreak@122 33 --
flickerstreak@122 34 local _onstate_mc = -- function(self, stateid, newstate)
flickerstreak@122 35 [[
flickerstreak@122 36 local oldMcVehicleState = mcVehicleState
flickerstreak@122 37 mcVehicleState = newstate
flickerstreak@122 38 control:ChildUpdate()
flickerstreak@122 39 if oldMcVehicleState == "vehicle" or mcVehicleState == "vehicle" then
flickerstreak@122 40 control:ChildUpdate("vehicle")
flickerstreak@122 41 end
flickerstreak@122 42 ]]
flickerstreak@122 43
flickerstreak@122 44 local _childupdate = -- function(self, snippetid, message)
flickerstreak@122 45 [[
flickerstreak@122 46 local action = nil
flickerstreak@122 47 if (doVehicle and mcVehicleState == "vehicle") or
flickerstreak@122 48 (doMindControl and mcVehicleState == "mc") then
flickerstreak@122 49 local idx = self:GetAttribute("bar-idx")
flickerstreak@122 50 if idx and idx <= 12 then
flickerstreak@122 51 action = 120 + idx
flickerstreak@122 52 else
flickerstreak@122 53 action = 0
flickerstreak@122 54 end
flickerstreak@122 55 elseif page and state and page[state] then
flickerstreak@122 56 action = self:GetAttribute("action-page"..page[state])
flickerstreak@122 57 else
flickerstreak@122 58 action = self:GetAttribute("default-action")
flickerstreak@122 59 end
flickerstreak@122 60
flickerstreak@122 61 self:SetAttribute("action",action)
flickerstreak@122 62
flickerstreak@128 63 if not self:GetAttribute("showgrid") then
flickerstreak@128 64 local hasaction = (action > 120) or self:GetAttribute("hasaction-"..action)
flickerstreak@128 65 local tempShow = self:GetAttribute("showgrid-temp")
flickerstreak@128 66 local evtShow = self:GetAttribute("showgrid-event")
flickerstreak@128 67 if tempShow then tempShow = (tempShow > 0) end
flickerstreak@128 68 if evtShow then evtShow = (evtShow > 0) end
flickerstreak@128 69
flickerstreak@128 70 if tempShow or evtShow or hasaction then
flickerstreak@128 71 self:Show()
flickerstreak@128 72 else
flickerstreak@128 73 self:Hide()
flickerstreak@128 74 end
flickerstreak@122 75 end
flickerstreak@122 76 ]]
flickerstreak@122 77
flickerstreak@122 78 local _childupdate_vehicleExit = -- function(self, snippetid, message)
flickerstreak@122 79 [[
flickerstreak@122 80 local show = (mcVehicleState == "vehicle")
flickerstreak@124 81 if show and doVehicle then
flickerstreak@122 82 self:SetAttribute("type","macro")
flickerstreak@122 83 self:SetAttribute("macrotext","/run VehicleExit()")
flickerstreak@122 84 self:Show()
flickerstreak@122 85 else
flickerstreak@122 86 self:SetAttribute("type","action")
flickerstreak@122 87 end
flickerstreak@122 88 control:CallMethod("ShowVehicleExit",show)
flickerstreak@122 89 ]]
flickerstreak@122 90
flickerstreak@122 91 local _childupdate_showgrid = -- function(self, snippetid, message)
flickerstreak@122 92 [[
flickerstreak@128 93 self:SetAttribute("showgrid-event",message)
flickerstreak@128 94 if not self:GetAttribute("showgrid") then
flickerstreak@128 95 local count = message + (self:GetAttribute("showgrid-temp") or 0)
flickerstreak@128 96 if count <= 0 then
flickerstreak@128 97 local action = self:GetAttribute("action")
flickerstreak@128 98 local hasaction = (action > 120) or self:GetAttribute("hasaction-"..action)
flickerstreak@128 99 if hasaction then
flickerstreak@128 100 self:Show()
flickerstreak@128 101 else
flickerstreak@128 102 self:Hide()
flickerstreak@128 103 end
flickerstreak@128 104 else
flickerstreak@122 105 self:Show()
flickerstreak@122 106 end
flickerstreak@122 107 end
flickerstreak@122 108 ]]
flickerstreak@122 109
flickerstreak@122 110 local _onDragStart = -- function(self, button, kind, value, ...)
flickerstreak@122 111 [[
flickerstreak@122 112 if lockButtons and (PlayerInCombat() or not lockButtonsCombat) and not IsModifiedClick("PICKUPACTION") then
flickerstreak@122 113 return kind, value, ...
flickerstreak@122 114 else
flickerstreak@122 115 -- don't make any assumptions about hiding on grid show here, as we don't know if the
flickerstreak@122 116 -- drag gets cancelled later.
flickerstreak@122 117 return "action", self:GetAttribute("action")
flickerstreak@122 118 end
flickerstreak@122 119 ]]
flickerstreak@122 120
flickerstreak@122 121 local _onReceiveDrag = -- function(self, button, kind, value, ...)
flickerstreak@122 122 [[
flickerstreak@128 123 if kind == "spell" or kind == "item" or kind == "macro" then
flickerstreak@128 124 -- assume it's a valid action
flickerstreak@128 125 self:SetAttribute("hasaction-"..self:GetAttribute("action"),true)
flickerstreak@122 126 end
flickerstreak@128 127 return "action", self:GetAttribute("action")
flickerstreak@122 128 ]]
flickerstreak@122 129
flickerstreak@122 130 --
flickerstreak@122 131 -- private
flickerstreak@122 132 --
flickerstreak@122 133 local eventList = {
flickerstreak@122 134 "PLAYER_REGEN_ENABLED",
flickerstreak@122 135 "PLAYER_ENTERING_WORLD",
flickerstreak@122 136 "ACTIONBAR_PAGE_CHANGED",
flickerstreak@122 137 "ACTIONBAR_SLOT_CHANGED",
flickerstreak@122 138 "UPDATE_BINDINGS",
flickerstreak@122 139 "ACTIONBAR_UPDATE_STATE",
flickerstreak@122 140 "ACTIONBAR_UPDATE_USABLE",
flickerstreak@122 141 "ACTIONBAR_UPDATE_COOLDOWN",
flickerstreak@122 142 "UPDATE_INVENTORY_ALERTS",
flickerstreak@122 143 "PLAYER_TARGET_CHANGED",
flickerstreak@122 144 "TRADE_SKILL_SHOW",
flickerstreak@122 145 "TRADE_SKILL_CLOSE",
flickerstreak@122 146 "PLAYER_ENTER_COMBAT",
flickerstreak@122 147 "PLAYER_LEAVE_COMBAT",
flickerstreak@122 148 "START_AUTOREPEAT_SPELL",
flickerstreak@122 149 "STOP_AUTOREPEAT_SPELL",
flickerstreak@122 150 "UNIT_ENTERED_VEHICLE",
flickerstreak@122 151 "UNIT_EXITED_VEHICLE",
flickerstreak@122 152 "COMPANION_UPDATE",
flickerstreak@122 153 }
flickerstreak@122 154
flickerstreak@122 155 --
flickerstreak@122 156 -- Action Button class
flickerstreak@122 157 --
flickerstreak@122 158 local Super = ReAction.Button
flickerstreak@122 159 local Action = setmetatable( { }, { __index = Super } )
flickerstreak@122 160 ReAction.Button.Action = Action
flickerstreak@122 161
flickerstreak@128 162 function Action:New( idx, barConfig, bar, idHint )
flickerstreak@123 163 local name = format("ReAction_%s_Action_%d",bar:GetName(),idx)
flickerstreak@123 164
flickerstreak@128 165 self = Super.New(self, name, barConfig, bar, idx, "SecureActionButtonTemplate, ActionButtonTemplate" )
flickerstreak@122 166
flickerstreak@122 167 local f = self:GetFrame()
flickerstreak@122 168 local barFrame = bar:GetFrame()
flickerstreak@128 169 local config = self:GetConfig()
flickerstreak@122 170
flickerstreak@122 171 local frames = { }
flickerstreak@122 172 self.frames = frames
flickerstreak@122 173 frames.icon = _G[name.."Icon"]
flickerstreak@122 174 frames.flash = _G[name.."Flash"]
flickerstreak@122 175 frames.hotkey = _G[name.."HotKey"]
flickerstreak@122 176 frames.count = _G[name.."Count"]
flickerstreak@122 177 frames.name = _G[name.."Name"]
flickerstreak@122 178 frames.border = _G[name.."Border"]
flickerstreak@122 179 frames.cooldown = _G[name.."Cooldown"]
flickerstreak@122 180 frames.normalTexture = _G[name.."NormalTexture"]
flickerstreak@122 181
flickerstreak@122 182 self.hotkey = frames.hotkey -- alias for Button methods
flickerstreak@122 183 self.border = frames.border -- alias for Button methods
flickerstreak@122 184
flickerstreak@122 185 self.rangeTimer = TOOLTIP_UPDATE_TIME
flickerstreak@122 186
flickerstreak@122 187 -- set up the base action ID
flickerstreak@122 188 self:SetActionIDPool("action",120)
flickerstreak@122 189 config.actionID = self:AcquireActionID(config.actionID, idHint)
flickerstreak@122 190 self.nPages = 1
flickerstreak@122 191
flickerstreak@122 192 -- attribute setup
flickerstreak@122 193 f:SetAttribute("type","action")
flickerstreak@122 194 f:SetAttribute("checkselfcast", true)
flickerstreak@122 195 f:SetAttribute("checkfocuscast", true)
flickerstreak@122 196 f:SetAttribute("useparent-unit", true)
flickerstreak@122 197 f:SetAttribute("action", config.actionID)
flickerstreak@122 198 f:SetAttribute("default-action", config.actionID)
flickerstreak@128 199 f:SetAttribute("bar-idx",idx)
flickerstreak@122 200 f:SetAttribute("showgrid-temp",0)
flickerstreak@128 201 f:SetAttribute("showgrid-event",0)
flickerstreak@128 202 f:SetAttribute("showgrid",not self:GetBarConfig().hideEmpty)
flickerstreak@128 203
flickerstreak@128 204 self:RefreshHasActionAttributes()
flickerstreak@122 205
flickerstreak@122 206 -- non secure scripts
flickerstreak@122 207 f:SetScript("OnEvent", function(frame, ...) self:OnEvent(...) end)
flickerstreak@122 208 f:SetScript("OnEnter", function(frame) self:OnEnter() end)
flickerstreak@122 209 f:SetScript("OnLeave", function(frame) self:OnLeave() end)
flickerstreak@122 210 f:SetScript("OnAttributeChanged", function(frame, attr, value) self:OnAttributeChanged(attr, value) end)
flickerstreak@122 211 f:SetScript("PostClick", function(frame, ...) self:PostClick(...) end)
flickerstreak@122 212 f:SetScript("OnUpdate", function(frame, elapsed) self:OnUpdate(elapsed) end)
flickerstreak@122 213 f:SetScript("OnDragStart", function(frame) self:OnDragStart() end)
flickerstreak@123 214 f:SetScript("OnReceiveDrag", function(frame) self:OnReceiveDrag() end)
flickerstreak@122 215
flickerstreak@122 216 -- secure handlers
flickerstreak@128 217 f:SetAttribute("_childupdate", _childupdate)
flickerstreak@122 218 f:SetAttribute("_childupdate-showgrid",_childupdate_showgrid)
flickerstreak@122 219 barFrame:WrapScript(f, "OnDragStart", _onDragStart)
flickerstreak@122 220 barFrame:WrapScript(f, "OnReceiveDrag", _onReceiveDrag)
flickerstreak@122 221
flickerstreak@122 222 -- event registration
flickerstreak@124 223 f:EnableMouse(true)
flickerstreak@122 224 f:RegisterForDrag("LeftButton", "RightButton")
flickerstreak@122 225 f:RegisterForClicks("AnyUp")
flickerstreak@122 226 for _, evt in pairs(eventList) do
flickerstreak@122 227 f:RegisterEvent(evt)
flickerstreak@122 228 end
flickerstreak@122 229
flickerstreak@122 230 -- attach to skinner
flickerstreak@122 231 bar:SkinButton(self)
flickerstreak@122 232
flickerstreak@122 233 -- initial display
flickerstreak@122 234 if ReAction:GetConfigMode() then
flickerstreak@128 235 self:ShowGridTemp(true)
flickerstreak@122 236 end
flickerstreak@122 237
flickerstreak@122 238 self:Refresh()
flickerstreak@123 239
flickerstreak@123 240 return self
flickerstreak@122 241 end
flickerstreak@122 242
flickerstreak@122 243 function Action:Destroy()
flickerstreak@122 244 local f = self:GetFrame()
flickerstreak@128 245 local c = self:GetConfig()
flickerstreak@122 246
flickerstreak@122 247 f:UnregisterAllEvents()
flickerstreak@122 248
flickerstreak@122 249 f:SetAttribute("_childupdate-vehicle",nil)
flickerstreak@122 250
flickerstreak@128 251 self:ReleaseActionID(c.actionID)
flickerstreak@128 252 if c.pageactions then
flickerstreak@128 253 for _, id in ipairs(c.pageactions) do
flickerstreak@122 254 self:ReleaseActionID(id)
flickerstreak@122 255 end
flickerstreak@122 256 end
flickerstreak@122 257
flickerstreak@128 258 Super.Destroy(self)
flickerstreak@122 259 end
flickerstreak@122 260
flickerstreak@122 261 function Action:Refresh()
flickerstreak@122 262 self.bar:PlaceButton(self, 36, 36)
flickerstreak@122 263 self:RefreshPages()
flickerstreak@124 264 self:InstallVehicle()
flickerstreak@128 265 self:ShowGrid(not self:GetBarConfig().hideEmpty)
flickerstreak@122 266 self:UpdateAction()
flickerstreak@122 267 end
flickerstreak@122 268
flickerstreak@124 269 function Action:InstallVehicle()
flickerstreak@128 270 if self.idx == 7 and self:GetBarConfig().vehicle then
flickerstreak@124 271 -- install vehicle-exit button on 7th button (only)
flickerstreak@128 272 self:GetFrame():SetAttribute("_childupdate-vehicle", _childupdate_vehicleExit)
flickerstreak@128 273 self:GetBar():GetFrame().ShowVehicleExit = function(bar,show)
flickerstreak@124 274 self:ShowVehicleExit(show)
flickerstreak@124 275 end
flickerstreak@124 276 else
flickerstreak@128 277 self:GetFrame():SetAttribute("_childupdate-vehicle",nil)
flickerstreak@128 278 end
flickerstreak@128 279 end
flickerstreak@128 280
flickerstreak@128 281 function Action:ShowGrid( show )
flickerstreak@128 282 if not InCombatLockdown() then
flickerstreak@128 283 self.frame:SetAttribute("showgrid", show)
flickerstreak@128 284 self:UpdateShowGrid()
flickerstreak@128 285 end
flickerstreak@128 286 end
flickerstreak@128 287
flickerstreak@128 288 function Action:ShowGridTemp( show )
flickerstreak@128 289 -- This function only modifies the show-grid when out
flickerstreak@128 290 -- of combat, and is ignored by the secure handler. Use
flickerstreak@128 291 -- it for configuration modes.
flickerstreak@128 292 if not InCombatLockdown() then
flickerstreak@128 293 local count = self.showGridTempCount or 0
flickerstreak@128 294 if show then
flickerstreak@128 295 count = count + 1
flickerstreak@128 296 else
flickerstreak@128 297 count = count - 1
flickerstreak@128 298 end
flickerstreak@128 299 if count < 0 then count = 0 end
flickerstreak@128 300 self.showGridTempCount = count
flickerstreak@128 301 self:GetFrame():SetAttribute("showgrid-temp",count)
flickerstreak@128 302 self:UpdateShowGrid()
flickerstreak@124 303 end
flickerstreak@124 304 end
flickerstreak@124 305
flickerstreak@122 306 function Action:UpdateAll()
flickerstreak@122 307 self:UpdateActionIDLabel(ReAction:GetConfigMode())
flickerstreak@122 308 self:UpdateHotkey()
flickerstreak@122 309 self:UpdateShowGrid()
flickerstreak@122 310 self:UpdateIcon()
flickerstreak@122 311 self:UpdateBorder()
flickerstreak@122 312 self:UpdateMacroText()
flickerstreak@122 313 self:UpdateCount()
flickerstreak@122 314 self:UpdateTooltip()
flickerstreak@122 315 self:UpdateCheckedState()
flickerstreak@122 316 self:UpdateUsable()
flickerstreak@122 317 self:UpdateCooldown()
flickerstreak@122 318 self:UpdateFlash()
flickerstreak@122 319 end
flickerstreak@122 320
flickerstreak@122 321 function Action:UpdateAction()
flickerstreak@122 322 local action = self:GetActionID()
flickerstreak@122 323 if action ~= self.actionID then
flickerstreak@122 324 self.actionID = action
flickerstreak@122 325 self:UpdateAll()
flickerstreak@122 326 end
flickerstreak@122 327 end
flickerstreak@122 328
flickerstreak@128 329 function Action:RefreshHasActionAttributes()
flickerstreak@128 330 -- check if each action has an action or not, and flag an attribute
flickerstreak@128 331 -- so that the showgrid secure handler can make decisions accordingly
flickerstreak@128 332 local f = self:GetFrame()
flickerstreak@128 333 local attr = "hasaction-"..self.config.actionID
flickerstreak@128 334 local hasAction = HasAction(self.config.actionID)
flickerstreak@128 335 if f:GetAttribute(attr) ~= hasAction then
flickerstreak@128 336 f:SetAttribute(attr,hasAction) -- avoid setting attribute and triggering script handler unnecessarily
flickerstreak@128 337 end
flickerstreak@128 338 if self.config.pageactions then
flickerstreak@128 339 for i = 1, self.nPages do
flickerstreak@128 340 attr = "hasaction-"..self.config.pageactions[i]
flickerstreak@128 341 hasAction = HasAction(self.config.pageactions[i])
flickerstreak@128 342 if f:GetAttribute(attr) ~= hasAction then
flickerstreak@128 343 f:SetAttribute(attr,hasAction)
flickerstreak@128 344 end
flickerstreak@128 345 end
flickerstreak@128 346 end
flickerstreak@128 347 end
flickerstreak@128 348
flickerstreak@122 349 function Action:UpdateShowGrid()
flickerstreak@122 350 -- this is a little bit complicated because there's no
flickerstreak@128 351 -- secure access to HasAction.
flickerstreak@122 352 if InCombatLockdown() then
flickerstreak@122 353 self.showgridPending = true -- handle after combat
flickerstreak@122 354 else
flickerstreak@122 355 self.showgridPending = false
flickerstreak@128 356 self:RefreshHasActionAttributes()
flickerstreak@128 357
flickerstreak@122 358 -- the following is an out-of-combat show/hide to supplement the secure
flickerstreak@122 359 -- handling and clean up after it when it guesses
flickerstreak@128 360 local f = self:GetFrame()
flickerstreak@128 361 local count = (f:GetAttribute("showgrid-event") or 0) +
flickerstreak@128 362 (self.showGridTempCount or 0) +
flickerstreak@128 363 (f:GetAttribute("showgrid") and 1 or 0)
flickerstreak@128 364
flickerstreak@128 365 if count <= 0 and not HasAction(self.actionID) then
flickerstreak@128 366 if f:IsShown() then
flickerstreak@128 367 f:Hide()
flickerstreak@128 368 end
flickerstreak@128 369 elseif not f:IsShown() then
flickerstreak@122 370 f:Show()
flickerstreak@122 371 end
flickerstreak@122 372 end
flickerstreak@122 373 end
flickerstreak@122 374
flickerstreak@122 375 function Action:UpdateIcon()
flickerstreak@122 376 local action = self.actionID
flickerstreak@122 377 local texture = GetActionTexture(action)
flickerstreak@122 378 local icon = self.frames.icon
flickerstreak@122 379 local hotkey = self.frames.hotkey
flickerstreak@122 380 local f = self:GetFrame()
flickerstreak@122 381 if texture then
flickerstreak@122 382 icon:SetTexture(texture)
flickerstreak@122 383 icon:Show()
flickerstreak@122 384 self.rangeTimer = -1
flickerstreak@122 385 f:SetNormalTexture("Interface\\Buttons\\UI-Quickslot2")
flickerstreak@122 386 hotkey:SetVertexColor(1.0, 1.0, 1.0)
flickerstreak@122 387 else
flickerstreak@122 388 icon:Hide()
flickerstreak@122 389 self.frames.cooldown:Hide()
flickerstreak@122 390 self.rangeTimer = nil
flickerstreak@122 391 f:SetNormalTexture("Interface\\Buttons\\UI-Quickslot")
flickerstreak@122 392 hotkey:SetVertexColor(0.6, 0.6, 0.6)
flickerstreak@122 393 end
flickerstreak@122 394 end
flickerstreak@122 395
flickerstreak@122 396 function Action:UpdateBorder()
flickerstreak@122 397 local action = self.actionID
flickerstreak@122 398 if ReAction:GetKeybindMode() then
flickerstreak@122 399 self:UpdateKeybindModeDisplay(true)
flickerstreak@122 400 elseif IsEquippedAction(action) then
flickerstreak@122 401 self.frames.border:SetVertexColor(0, 1.0, 0, 0.35)
flickerstreak@122 402 self.frames.border:Show()
flickerstreak@122 403 else
flickerstreak@122 404 self.frames.border:Hide()
flickerstreak@122 405 end
flickerstreak@122 406 end
flickerstreak@122 407
flickerstreak@122 408 function Action:UpdateMacroText()
flickerstreak@122 409 local action = self.actionID
flickerstreak@122 410 if not IsConsumableAction(action) and not IsStackableAction(action) then
flickerstreak@122 411 self.frames.name:SetText(GetActionText(action))
flickerstreak@122 412 else
flickerstreak@122 413 self.frames.name:SetText("")
flickerstreak@122 414 end
flickerstreak@122 415 end
flickerstreak@122 416
flickerstreak@122 417 function Action:UpdateCount()
flickerstreak@122 418 local action = self.actionID
flickerstreak@122 419 if IsConsumableAction(action) or IsStackableAction(action) then
flickerstreak@122 420 self.frames.count:SetText(GetActionCount(action))
flickerstreak@122 421 else
flickerstreak@122 422 self.frames.count:SetText("")
flickerstreak@122 423 end
flickerstreak@122 424 end
flickerstreak@122 425
flickerstreak@122 426 function Action:UpdateTooltip()
flickerstreak@122 427 local f = self:GetFrame()
flickerstreak@122 428 if GameTooltip:GetOwner() == f then
flickerstreak@122 429 self:SetTooltip()
flickerstreak@122 430 end
flickerstreak@122 431 end
flickerstreak@122 432
flickerstreak@122 433 function Action:SetTooltip()
flickerstreak@122 434 local f = self:GetFrame()
flickerstreak@122 435 if GetCVar("UberTooltips") == "1" then
flickerstreak@122 436 GameTooltip_SetDefaultAnchor(GameTooltip, f)
flickerstreak@122 437 else
flickerstreak@122 438 GameTooltip:SetOwner(f)
flickerstreak@122 439 end
flickerstreak@122 440 GameTooltip:SetAction(self.actionID)
flickerstreak@122 441 end
flickerstreak@122 442
flickerstreak@122 443 function Action:UpdateCheckedState()
flickerstreak@122 444 local action = self.actionID
flickerstreak@122 445 if IsCurrentAction(action) or IsAutoRepeatAction(action) then
flickerstreak@122 446 self:GetFrame():SetChecked(1)
flickerstreak@122 447 else
flickerstreak@122 448 self:GetFrame():SetChecked(0)
flickerstreak@122 449 end
flickerstreak@122 450 end
flickerstreak@122 451
flickerstreak@122 452 function Action:UpdateUsable()
flickerstreak@122 453 local isUsable, notEnoughMana = IsUsableAction(self.actionID)
flickerstreak@122 454 if isUsable then
flickerstreak@122 455 self.frames.icon:SetVertexColor(1.0, 1.0, 1.0)
flickerstreak@122 456 self.frames.normalTexture:SetVertexColor(1.0, 1.0, 1.0)
flickerstreak@122 457 elseif notEnoughMana then
flickerstreak@122 458 self.frames.icon:SetVertexColor(0.5, 0.5, 1.0)
flickerstreak@122 459 self.frames.normalTexture:SetVertexColor(0.5, 0.5, 1.0)
flickerstreak@122 460 else
flickerstreak@122 461 self.frames.icon:SetVertexColor(0.4, 0.4, 0.4)
flickerstreak@122 462 self.frames.normalTexture:SetVertexColor(1.0, 1.0, 1.0)
flickerstreak@122 463 end
flickerstreak@122 464 end
flickerstreak@122 465
flickerstreak@122 466 function Action:UpdateCooldown()
flickerstreak@122 467 CooldownFrame_SetTimer(self.frames.cooldown, GetActionCooldown(self.actionID))
flickerstreak@122 468 end
flickerstreak@122 469
flickerstreak@122 470 function Action:UpdateFlash()
flickerstreak@122 471 local action = self.actionID
flickerstreak@122 472 self:SetFlash( (IsAttackAction(action) and IsCurrentAction(action)) or IsAutoRepeatAction(action) )
flickerstreak@122 473 end
flickerstreak@122 474
flickerstreak@122 475 function Action:SetFlash(flash)
flickerstreak@122 476 if self.flashing ~= flash then
flickerstreak@122 477 self.flashing = flash
flickerstreak@122 478 self.flashtime = 0
flickerstreak@122 479 if not flash then
flickerstreak@122 480 self.frames.flash:Hide()
flickerstreak@122 481 end
flickerstreak@122 482 self:UpdateCheckedState()
flickerstreak@122 483 end
flickerstreak@122 484 end
flickerstreak@122 485
flickerstreak@122 486 function Action:RunFlash(elapsed)
flickerstreak@122 487 if self.flashing then
flickerstreak@122 488 local flashtime = self.flashtime - elapsed
flickerstreak@122 489 self.flashtime = flashtime
flickerstreak@122 490 if flashtime <= 0 then
flickerstreak@122 491 local overtime = -flashtime
flickerstreak@122 492 if overtime >= ATTACK_BUTTON_FLASH_TIME then
flickerstreak@122 493 overtime = 0
flickerstreak@122 494 end
flickerstreak@122 495 flashtime = ATTACK_BUTTON_FLASH_TIME - overtime
flickerstreak@122 496 local flash = self.frames.flash
flickerstreak@122 497 if flash:IsShown() then
flickerstreak@122 498 flash:Hide()
flickerstreak@122 499 else
flickerstreak@122 500 flash:Show()
flickerstreak@122 501 end
flickerstreak@122 502 end
flickerstreak@122 503 end
flickerstreak@122 504 end
flickerstreak@122 505
flickerstreak@122 506 function Action:RunRangeFinder(elapsed)
flickerstreak@122 507 local rangeTimer = self.rangeTimer
flickerstreak@122 508 if rangeTimer then
flickerstreak@122 509 rangeTimer = rangeTimer - elapsed
flickerstreak@122 510 self.rangeTimer = rangeTimer
flickerstreak@122 511 if rangeTimer <= 0 then
flickerstreak@122 512 if IsActionInRange(self.actionID) == 0 then
flickerstreak@122 513 self.frames.icon:SetVertexColor(1.0,0.1,0.1)
flickerstreak@122 514 else
flickerstreak@122 515 self:UpdateUsable()
flickerstreak@122 516 end
flickerstreak@123 517 self.rangeTimer = TOOLTIP_UPDATE_TIME
flickerstreak@122 518 end
flickerstreak@122 519 end
flickerstreak@122 520 end
flickerstreak@122 521
flickerstreak@122 522 function Action:GetActionID(page)
flickerstreak@122 523 if page == nil then
flickerstreak@122 524 -- get the effective ID
flickerstreak@122 525 return self:GetFrame():GetAttribute("action")
flickerstreak@122 526 else
flickerstreak@122 527 if page == 1 then
flickerstreak@122 528 return self.config.actionID
flickerstreak@122 529 else
flickerstreak@122 530 return self.config.pageactions and self.config.pageactions[page] or self.config.actionID
flickerstreak@122 531 end
flickerstreak@122 532 end
flickerstreak@122 533 end
flickerstreak@122 534
flickerstreak@122 535 function Action:SetActionID( id, page )
flickerstreak@122 536 id = tonumber(id)
flickerstreak@122 537 page = tonumber(page)
flickerstreak@122 538 if id == nil or id < 1 or id > 120 then
flickerstreak@122 539 error("Action:SetActionID - invalid action ID")
flickerstreak@122 540 end
flickerstreak@122 541 if page and page ~= 1 then
flickerstreak@122 542 if not self.config.pageactions then
flickerstreak@122 543 self.config.pageactions = { }
flickerstreak@122 544 end
flickerstreak@122 545 self:ReleaseActionID(self.config.pageactions[page])
flickerstreak@122 546 self.config.pageactions[page] = id
flickerstreak@122 547 self:AcquireActionID(self.config.pageactions[page])
flickerstreak@122 548 self.frame:SetAttribute("action-page"..page,id)
flickerstreak@122 549 else
flickerstreak@122 550 self:ReleaseActionID(self.config.actionID)
flickerstreak@122 551 self.config.actionID = id
flickerstreak@122 552 self:AcquireActionID(self.config.actionID)
flickerstreak@122 553 self.frame:SetAttribute("action",id)
flickerstreak@122 554 self.frame:SetAttribute("default-action",id)
flickerstreak@122 555 if self.config.pageactions then
flickerstreak@122 556 self.config.pageactions[1] = id
flickerstreak@122 557 self.frame:SetAttribute("action-page1",id)
flickerstreak@122 558 end
flickerstreak@122 559 end
flickerstreak@122 560 end
flickerstreak@122 561
flickerstreak@122 562 function Action:RefreshPages( force )
flickerstreak@128 563 local nPages = self:GetBarConfig().nPages
flickerstreak@122 564 if nPages and (nPages ~= self.nPages or force) then
flickerstreak@122 565 local f = self:GetFrame()
flickerstreak@122 566 local c = self.config.pageactions
flickerstreak@122 567 if nPages > 1 and not c then
flickerstreak@122 568 c = { }
flickerstreak@122 569 self.config.pageactions = c
flickerstreak@122 570 end
flickerstreak@122 571 for i = 1, nPages do
flickerstreak@122 572 if i > 1 then
flickerstreak@122 573 c[i] = self:AcquireActionID(c[i], self.config.actionID + (i-1)*self.bar:GetNumButtons())
flickerstreak@122 574 else
flickerstreak@122 575 c[i] = self.config.actionID -- page 1 is the same as the base actionID
flickerstreak@122 576 end
flickerstreak@122 577 f:SetAttribute(("action-page%d"):format(i),c[i])
flickerstreak@122 578 end
flickerstreak@122 579 for i = nPages+1, #c do
flickerstreak@122 580 self:ReleaseActionID(c[i])
flickerstreak@122 581 c[i] = nil
flickerstreak@122 582 f:SetAttribute(("action-page%d"):format(i),nil)
flickerstreak@122 583 end
flickerstreak@122 584 self.nPages = nPages
flickerstreak@122 585 end
flickerstreak@122 586 end
flickerstreak@122 587
flickerstreak@128 588 function Action.SetupBarHeader( bar, config ) -- call this as a static method
flickerstreak@122 589 local f = bar:GetFrame()
flickerstreak@128 590 f:SetAttribute("mindcontrol",config.mindcontrol)
flickerstreak@128 591 f:SetAttribute("vehicle",config.vehicle)
flickerstreak@122 592 f:Execute(
flickerstreak@122 593 [[
flickerstreak@122 594 doMindControl = self:GetAttribute("mindcontrol")
flickerstreak@122 595 doVehicle = self:GetAttribute("vehicle")
flickerstreak@122 596 control:ChildUpdate()
flickerstreak@122 597 ]])
flickerstreak@122 598
flickerstreak@122 599 f:SetAttribute("_onstate-mc", _onstate_mc)
flickerstreak@122 600 RegisterStateDriver(f, "mc", "[target=vehicle,exists] vehicle; [bonusbar:5] mc; none")
flickerstreak@122 601
flickerstreak@128 602 f:SetAttribute("lockbuttons",config.lockButtons)
flickerstreak@128 603 f:SetAttribute("lockbuttonscombat",config.lockButtonsCombat)
flickerstreak@122 604 f:Execute(
flickerstreak@122 605 [[
flickerstreak@122 606 lockButtons = self:GetAttribute("lockbuttons")
flickerstreak@122 607 lockButtonsCombat = self:GetAttribute("lockbuttonscombat")
flickerstreak@122 608 ]])
flickerstreak@122 609 end
flickerstreak@122 610
flickerstreak@122 611
flickerstreak@123 612 function Action.SetButtonLock( bar, lock, lockCombat ) -- call this as a static method
flickerstreak@123 613 local f = bar:GetFrame()
flickerstreak@123 614 f:SetAttribute("lockbuttons",lock)
flickerstreak@123 615 f:SetAttribute("lockbuttonscombat",lockCombat)
flickerstreak@123 616 f:Execute(
flickerstreak@123 617 [[
flickerstreak@123 618 lockButtons = self:GetAttribute("lockbuttons")
flickerstreak@123 619 lockButtonsCombat = self:GetAttribute("lockbuttonscombat")
flickerstreak@123 620 ]])
flickerstreak@123 621 end
flickerstreak@123 622
flickerstreak@123 623
flickerstreak@122 624 function Action:ShowVehicleExit(show)
flickerstreak@122 625 local f = self:GetFrame()
flickerstreak@122 626 local tx = f.vehicleExitTexture
flickerstreak@128 627 if show and self:GetBarConfig().vehicle then
flickerstreak@122 628 if not tx then
flickerstreak@122 629 tx = f:CreateTexture(nil,"ARTWORK")
flickerstreak@122 630 tx:SetAllPoints()
flickerstreak@122 631 -- copied from Blizzard/VehicleMenuBar.lua SkinsData
flickerstreak@122 632 tx:SetTexture("Interface\\Vehicles\\UI-Vehicles-Button-Exit-Up")
flickerstreak@122 633 tx:SetTexCoord(0.140625, 0.859375, 0.140625, 0.859375)
flickerstreak@122 634 f.vehicleExitTexture = tx
flickerstreak@122 635 end
flickerstreak@122 636 tx:Show()
flickerstreak@122 637 f.vehicleExitMode = true
flickerstreak@122 638 elseif tx then
flickerstreak@122 639 tx:SetTexCoord(0,1,0,1)
flickerstreak@122 640 tx:Hide()
flickerstreak@122 641 f.vehicleExitMode = false
flickerstreak@122 642 end
flickerstreak@122 643 end
flickerstreak@122 644
flickerstreak@122 645 function Action:OnEnter( )
flickerstreak@122 646 self:SetTooltip()
flickerstreak@122 647 end
flickerstreak@122 648
flickerstreak@122 649 function Action:OnLeave( )
flickerstreak@122 650 GameTooltip:Hide()
flickerstreak@122 651 end
flickerstreak@122 652
flickerstreak@122 653 function Action:OnAttributeChanged( attr, value )
flickerstreak@122 654 self:UpdateAction()
flickerstreak@122 655 end
flickerstreak@122 656
flickerstreak@122 657 function Action:PostClick( )
flickerstreak@122 658 self:UpdateCheckedState()
flickerstreak@122 659 end
flickerstreak@122 660
flickerstreak@122 661 function Action:OnUpdate( elapsed )
flickerstreak@122 662 self:RunFlash(elapsed)
flickerstreak@122 663 self:RunRangeFinder(elapsed)
flickerstreak@122 664 end
flickerstreak@122 665
flickerstreak@122 666 function Action:OnDragStart()
flickerstreak@122 667 self:UpdateCheckedState()
flickerstreak@122 668 self:UpdateFlash()
flickerstreak@122 669 end
flickerstreak@122 670
flickerstreak@122 671 function Action:OnReceiveDrag()
flickerstreak@122 672 self:UpdateCheckedState()
flickerstreak@122 673 self:UpdateFlash()
flickerstreak@122 674 end
flickerstreak@122 675
flickerstreak@122 676 function Action:OnEvent(event, ...)
flickerstreak@122 677 if self[event] then
flickerstreak@122 678 self[event](self, event, ...)
flickerstreak@122 679 end
flickerstreak@122 680 end
flickerstreak@122 681
flickerstreak@122 682 function Action:ACTIONBAR_SLOT_CHANGED(event, action)
flickerstreak@122 683 if action == 0 or action == self.actionID then
flickerstreak@128 684 self:UpdateAll()
flickerstreak@122 685 end
flickerstreak@122 686 end
flickerstreak@122 687
flickerstreak@122 688 function Action:PLAYER_ENTERING_WORLD()
flickerstreak@122 689 self:UpdateAction()
flickerstreak@122 690 end
flickerstreak@122 691
flickerstreak@122 692 function Action:ACTIONBAR_PAGE_CHANGED()
flickerstreak@122 693 self:UpdateAction()
flickerstreak@122 694 end
flickerstreak@122 695
flickerstreak@122 696 function Action:UPDATE_BONUS_ACTIONBAR()
flickerstreak@122 697 self:UpdateAction()
flickerstreak@122 698 end
flickerstreak@122 699
flickerstreak@122 700 function Action:UPDATE_BINDINGS()
flickerstreak@122 701 self:UpdateHotkey()
flickerstreak@122 702 end
flickerstreak@122 703
flickerstreak@122 704 function Action:PLAYER_TARGET_CHANGED()
flickerstreak@122 705 self.rangeTimer = -1
flickerstreak@122 706 end
flickerstreak@122 707
flickerstreak@122 708 function Action:ACTIONBAR_UPDATE_STATE()
flickerstreak@122 709 self:UpdateCheckedState()
flickerstreak@122 710 end
flickerstreak@124 711
flickerstreak@124 712 function Action:TRADE_SKILL_SHOW()
flickerstreak@124 713 self:UpdateCheckedState()
flickerstreak@124 714 end
flickerstreak@124 715 Action.TRADE_SKILL_CLOSE = Action.TRADE_SKILL_CLOSE
flickerstreak@122 716
flickerstreak@122 717 function Action:UNIT_ENTERED_VEHICLE(event,unit)
flickerstreak@122 718 if unit == "player" then
flickerstreak@122 719 self:UpdateCheckedState()
flickerstreak@122 720 end
flickerstreak@122 721 end
flickerstreak@122 722 Action.UNIT_EXITED_VEHICLE = Action.UNIT_ENTERED_VEHICLE
flickerstreak@122 723
flickerstreak@122 724 function Action:COMPANION_UPDATE(event,unit)
flickerstreak@122 725 if unit == "mount" then
flickerstreak@122 726 self:UpdateCheckedState()
flickerstreak@122 727 end
flickerstreak@122 728 end
flickerstreak@122 729
flickerstreak@122 730 function Action:ACTIONBAR_UPDATE_USABLE()
flickerstreak@122 731 self:UpdateUsable()
flickerstreak@122 732 end
flickerstreak@122 733
flickerstreak@122 734 function Action:ACTIONBAR_UPDATE_COOLDOWN()
flickerstreak@122 735 self:UpdateCooldown()
flickerstreak@122 736 end
flickerstreak@122 737
flickerstreak@122 738 function Action:PLAYER_ENTER_COMBAT()
flickerstreak@122 739 if IsAttackAction(self.actionID) then
flickerstreak@122 740 self:SetFlash(true)
flickerstreak@122 741 end
flickerstreak@122 742 end
flickerstreak@122 743
flickerstreak@122 744 function Action:PLAYER_LEAVE_COMBAT()
flickerstreak@122 745 if IsAttackAction(self.actionID) then
flickerstreak@122 746 self:SetFlash(false)
flickerstreak@122 747 end
flickerstreak@122 748 end
flickerstreak@122 749
flickerstreak@122 750 function Action:START_AUTOREPEAT_SPELL()
flickerstreak@122 751 if IsAutoRepeatAction(self.actionID) then
flickerstreak@122 752 self:SetFlash(true)
flickerstreak@122 753 end
flickerstreak@122 754 end
flickerstreak@122 755
flickerstreak@122 756 function Action:STOP_AUTOREPEAT_SPELL()
flickerstreak@122 757 if not IsAttackAction(self.actionID) then
flickerstreak@122 758 self:SetFlash(false)
flickerstreak@122 759 end
flickerstreak@122 760 end
flickerstreak@122 761
flickerstreak@122 762 function Action:PLAYER_REGEN_ENABLED()
flickerstreak@122 763 if self.showgridPending then
flickerstreak@122 764 self:UpdateShowGrid()
flickerstreak@122 765 end
flickerstreak@122 766 end