annotate StanceButton.lua @ 259:c918ff9ac787

Add option to make buttons activate on mouse/key down
author Flick
date Mon, 25 Apr 2011 11:43:42 -0700
parents 46b59a9ded76
children 36a29870bf34
rev   line source
flickerstreak@175 1 local addonName, addonTable = ...
flickerstreak@175 2 local ReAction = addonTable.ReAction
flickerstreak@134 3 local L = ReAction.L
flickerstreak@134 4 local _G = _G
flickerstreak@134 5 local CreateFrame = CreateFrame
flickerstreak@134 6 local format = string.format
flickerstreak@134 7 local GetCVar = GetCVar
flickerstreak@134 8 local GameTooltip_SetDefaultAnchor = GameTooltip_SetDefaultAnchor
flickerstreak@134 9 local CooldownFrame_SetTimer = CooldownFrame_SetTimer
flickerstreak@134 10 local InCombatLockdown = InCombatLockdown
flickerstreak@134 11 local GetNumShapeshiftForms = GetNumShapeshiftForms
flickerstreak@134 12 local GetShapeshiftFormInfo = GetShapeshiftFormInfo
flickerstreak@134 13 local IsUsableSpell = IsUsableSpell
flickerstreak@134 14 local GetSpellInfo = GetSpellInfo
flickerstreak@134 15
flickerstreak@134 16 --
flickerstreak@134 17 -- private
flickerstreak@134 18 --
flickerstreak@134 19 local playerClass = select(2,UnitClass("player"))
flickerstreak@134 20
flickerstreak@134 21 local eventList = {
flickerstreak@134 22 "PLAYER_REGEN_ENABLED",
flickerstreak@134 23 "PLAYER_ENTERING_WORLD",
flickerstreak@134 24 "UPDATE_SHAPESHIFT_FORM",
flickerstreak@134 25 "UPDATE_SHAPESHIFT_FORMS",
flickerstreak@134 26 "UPDATE_SHAPESHIFT_USABLE",
flickerstreak@134 27 "UPDATE_SHAPESHIFT_COOLDOWN",
flickerstreak@137 28 "UPDATE_BINDINGS",
flickerstreak@134 29 }
flickerstreak@134 30
flickerstreak@134 31 --
flickerstreak@134 32 -- Stance Button class
flickerstreak@134 33 --
flickerstreak@218 34 local buttonTypeID = "Stance"
flickerstreak@134 35 local Super = ReAction.Button
flickerstreak@218 36 local Stance = setmetatable(
flickerstreak@218 37 {
Flick@248 38 defaultBarConfig = {
flickerstreak@218 39 type = buttonTypeID,
flickerstreak@218 40 btnHeight = 36,
flickerstreak@218 41 btnWidth = 36,
flickerstreak@218 42 btnRows = 1,
flickerstreak@218 43 btnColumns = 6,
flickerstreak@218 44 spacing = 3
flickerstreak@218 45 },
flickerstreak@218 46
flickerstreak@218 47 barType = L["Stance Bar"],
Flick@231 48 buttonTypeID = buttonTypeID
flickerstreak@218 49 },
flickerstreak@218 50 { __index = Super } )
flickerstreak@223 51
flickerstreak@134 52 ReAction.Button.Stance = Stance
flickerstreak@223 53 ReAction:RegisterBarType(Stance)
flickerstreak@134 54
Flick@234 55 function Stance:New( config, bar, idx, idHint )
flickerstreak@134 56 local name = format("ReAction_%s_Stance_%d",bar:GetName(),idx)
flickerstreak@134 57
flickerstreak@222 58 self = Super.New(self, name, config, bar, idx, "SecureActionButtonTemplate, ActionButtonTemplate" )
flickerstreak@134 59
flickerstreak@134 60 local f = self:GetFrame()
flickerstreak@134 61 local barFrame = bar:GetFrame()
flickerstreak@134 62 local config = self:GetConfig()
flickerstreak@134 63
Flick@249 64 -- set up the stance ID
Flick@249 65 config.stanceID = config.stanceID or idx
flickerstreak@134 66
flickerstreak@134 67 -- attribute setup
flickerstreak@134 68 f:SetAttribute("type","spell")
flickerstreak@134 69
flickerstreak@134 70 -- non secure scripts
flickerstreak@134 71 f:SetScript("OnEvent", function(frame, ...) self:OnEvent(...) end)
flickerstreak@134 72 f:SetScript("OnEnter", function(frame) self:OnEnter() end)
flickerstreak@134 73 f:SetScript("OnLeave", function(frame) self:OnLeave() end)
flickerstreak@134 74 f:SetScript("PreClick", function(frame, ...) self:PreClick(...) end)
flickerstreak@134 75
flickerstreak@134 76 -- secure handlers
flickerstreak@134 77 -- (none)
flickerstreak@134 78
flickerstreak@134 79 -- event registration
flickerstreak@134 80 for _, evt in pairs(eventList) do
flickerstreak@134 81 f:RegisterEvent(evt)
flickerstreak@134 82 end
flickerstreak@134 83
flickerstreak@134 84 -- attach to skinner
flickerstreak@134 85 bar:SkinButton(self)
flickerstreak@134 86
flickerstreak@134 87 -- initial display
flickerstreak@134 88 if ReAction:GetConfigMode() then
flickerstreak@134 89 self:GetFrame():Show()
flickerstreak@134 90 end
flickerstreak@134 91
flickerstreak@134 92 self:Refresh()
flickerstreak@134 93
flickerstreak@134 94 return self
flickerstreak@134 95 end
flickerstreak@134 96
flickerstreak@134 97 function Stance:GetActionID()
flickerstreak@134 98 return self.config.stanceID
flickerstreak@134 99 end
flickerstreak@134 100
Flick@249 101 function Stance:AcquireActionID()
Flick@249 102 -- don't use pool
Flick@249 103 end
Flick@249 104
Flick@249 105 function Stance:ReleaseActionID()
Flick@249 106 -- don't use pool
Flick@249 107 end
Flick@249 108
flickerstreak@134 109 function Stance:UpdateAction()
flickerstreak@134 110 if InCombatLockdown() then
flickerstreak@134 111 self.updatePending = true
flickerstreak@134 112 else
flickerstreak@134 113 self.updatePending = false
flickerstreak@134 114 local idx = self:GetActionID()
flickerstreak@134 115 local f = self:GetFrame()
flickerstreak@179 116 if idx > GetNumShapeshiftForms() then
flickerstreak@134 117 f:Hide()
flickerstreak@134 118 else
flickerstreak@134 119 f:SetAttribute("spell", select(2,GetShapeshiftFormInfo(idx)))
flickerstreak@134 120 f:Show()
flickerstreak@134 121 self:Update()
flickerstreak@134 122 end
flickerstreak@134 123 end
flickerstreak@134 124 end
flickerstreak@134 125
flickerstreak@134 126 function Stance:Refresh()
flickerstreak@134 127 Super.Refresh(self)
flickerstreak@137 128 self:UpdateHotkey()
flickerstreak@136 129 self:UpdateAction()
flickerstreak@134 130 end
flickerstreak@134 131
flickerstreak@134 132 function Stance:Update()
flickerstreak@179 133 local texture, _, isActive, isCastable = GetShapeshiftFormInfo(self:GetActionID())
flickerstreak@134 134
flickerstreak@134 135 local icon = self.frames.icon
flickerstreak@134 136 icon:SetTexture(texture)
flickerstreak@134 137 self:GetFrame():SetChecked( isActive and 1 or 0 )
flickerstreak@134 138 if isCastable then
flickerstreak@137 139 self.frames.hotkey:Show()
flickerstreak@134 140 icon:SetVertexColor(1.0, 1.0, 1.0)
flickerstreak@134 141 else
flickerstreak@134 142 icon:SetVertexColor(0.4, 0.4, 0.4)
flickerstreak@134 143 end
flickerstreak@134 144
flickerstreak@134 145 self:UpdateCooldown()
flickerstreak@134 146 end
flickerstreak@134 147
flickerstreak@134 148 function Stance:UpdateCooldown()
flickerstreak@179 149 local start, duration, enabled = GetShapeshiftFormCooldown(self:GetActionID())
flickerstreak@134 150 if start then
flickerstreak@134 151 CooldownFrame_SetTimer(self.frames.cooldown, start, duration, enabled)
flickerstreak@134 152 end
flickerstreak@134 153 end
flickerstreak@134 154
flickerstreak@134 155 function Stance:SetTooltip()
flickerstreak@134 156 if GetCVar("UberTooltips") == "1" then
flickerstreak@134 157 GameTooltip_SetDefaultAnchor(GameTooltip, self:GetFrame())
flickerstreak@134 158 else
flickerstreak@134 159 GameTooltip:SetOwner(self:GetFrame(), "ANCHOR_RIGHT")
flickerstreak@134 160 end
flickerstreak@179 161 GameTooltip:SetShapeshift(self:GetActionID())
flickerstreak@134 162 end
flickerstreak@134 163
flickerstreak@134 164 function Stance:OnEnter()
flickerstreak@134 165 self:SetTooltip()
flickerstreak@134 166 end
flickerstreak@134 167
flickerstreak@134 168 function Stance:OnLeave()
flickerstreak@134 169 GameTooltip:Hide()
flickerstreak@134 170 end
flickerstreak@134 171
flickerstreak@134 172 function Stance:PreClick()
flickerstreak@134 173 local f = self:GetFrame()
flickerstreak@134 174 f:SetChecked( not f:GetChecked() )
flickerstreak@134 175 end
flickerstreak@134 176
flickerstreak@134 177 function Stance:OnEvent(event, arg)
flickerstreak@134 178 if event == "PLAYER_REGEN_ENABLED" then
flickerstreak@134 179 if self.updatePending then
flickerstreak@134 180 self:UpdateAction()
flickerstreak@134 181 end
flickerstreak@134 182 elseif event == "UPDATE_SHAPESHIFT_COOLDOWN" then
flickerstreak@134 183 self:UpdateCooldown()
flickerstreak@179 184 elseif event == "UPDATE_SHAPESHIFT_FORMS" then
flickerstreak@134 185 self:UpdateAction()
flickerstreak@134 186 elseif event == "UNIT_AURA" then
flickerstreak@134 187 if arg == "player" then
flickerstreak@134 188 self:Update()
flickerstreak@134 189 end
flickerstreak@137 190 elseif event == "UPDATE_BINDINGS" then
flickerstreak@137 191 self:UpdateHotkey()
flickerstreak@134 192 else
flickerstreak@134 193 self:Update()
flickerstreak@134 194 end
flickerstreak@134 195 end
flickerstreak@134 196
flickerstreak@134 197 function Stance:ShowGridTemp(show)
flickerstreak@134 198 if show then
flickerstreak@134 199 self:GetFrame():Show()
flickerstreak@134 200 else
flickerstreak@134 201 self:UpdateAction()
flickerstreak@134 202 end
flickerstreak@134 203 end