Mercurial > wow > reaction

annotate classes/ActionButton.lua @ 165:5257073138e8

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