Mercurial > wow > skeletonkey

annotate SkeletonKey/BindingsUI.lua @ 14:82170735e67c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- move co-routine handler to general lib - slightly better handling of pet actions
author Nenue
date Thu, 28 Jul 2016 23:58:53 -0400
parents SkeletonKey/UI.lua@eeec4a600064
children 32d64e42ec9b
rev   line source
Nenue@6 1 -- KrakTool
Nenue@14 2 -- BindingsUI.lua
Nenue@6 3 -- Created: 7/28/2016 3:39 PM
Nenue@6 4 -- %file-revision%
Nenue@6 5 --
Nenue@6 6
Nenue@6 7 local kb, print = LibStub("LibKraken").register(KeyBinder, 'KeySlot')
Nenue@6 8 local BINDS_PER_ROW = 2
Nenue@6 9 local BUTTON_HSPACING = 128
Nenue@6 10 local BUTTON_SPACING = 4
Nenue@6 11 local BUTTON_PADDING = 12
Nenue@6 12 local BINDING_TYPE_SPECIALIZATION = 3
Nenue@6 13 local BINDING_TYPE_CHARACTER = 2
Nenue@6 14 local BINDING_TYPE_GLOBAL = 1
Nenue@6 15 local KEY_BUTTON_SIZE = 48
Nenue@6 16 local MIN_BIND_SLOTS = 32
Nenue@6 17 local TAB_OFFSET = 12
Nenue@6 18 local TAB_HEIGHT = 40
Nenue@6 19 local TAB_SPACING = 2
Nenue@6 20
Nenue@6 21 local BINDING_SCHEME_COLOR = {
Nenue@6 22 [BINDING_TYPE_GLOBAL] = {0,.125,.5,.5},
Nenue@6 23 [BINDING_TYPE_CHARACTER] = {0,0.25,0,0.5},
Nenue@6 24 [BINDING_TYPE_SPECIALIZATION] = {.25,0,0,0.5},
Nenue@6 25 }
Nenue@6 26 local BINDING_SCHEME_VERTEX = {
Nenue@6 27 [BINDING_TYPE_GLOBAL] = {0,.5,1,1},
Nenue@6 28 [BINDING_TYPE_CHARACTER] = {0,1,0,1},
Nenue@6 29 [BINDING_TYPE_SPECIALIZATION] = {1,1,1,1},
Nenue@6 30 }
Nenue@6 31 local BINDING_SCHEME_TEXT = {
Nenue@6 32 [BINDING_TYPE_SPECIALIZATION] = {0, 1, 1},
Nenue@6 33 [BINDING_TYPE_CHARACTER] = {0, 1, 0},
Nenue@6 34 [BINDING_TYPE_GLOBAL] = {0, 1, 1}
Nenue@6 35 }
Nenue@6 36
Nenue@6 37 local restingAlpha = 0.7
Nenue@6 38 local fadeTime, fadeDelay = .30, 0.15
Nenue@6 39 local numButtons = BINDS_PER_ROW * 8
Nenue@6 40 local saveButton
Nenue@6 41 local KeyButton_OnKeyDown = function(self, key)
Nenue@6 42 kb.StoreBinding(self, key)
Nenue@6 43 end
Nenue@6 44 local KeyButton_OnClick = function(self, click)
Nenue@6 45 print(self:GetName(), 'OnMouseDown', click)
Nenue@6 46 if click == 'LeftButton' then
Nenue@6 47 kb.DropToSlot(self)
Nenue@6 48 elseif click == 'RightButton' then
Nenue@6 49 kb.ReleaseSlot(self)
Nenue@6 50 else
Nenue@6 51 kb.StoreBinding(self, click:upper())
Nenue@6 52 end
Nenue@6 53 end
Nenue@6 54
Nenue@6 55 local KeyButton_OnDragStart = function(self)
Nenue@6 56 kb.PickupSlot(self)
Nenue@6 57 end
Nenue@6 58
Nenue@6 59 local KeyButton_OnReceiveDrag = function(self, ...)
Nenue@6 60 kb.DropToSlot(self)
Nenue@6 61 end
Nenue@6 62
Nenue@6 63
Nenue@6 64 local KeyBinder_OnUpdate = function(self, elapsed)
Nenue@6 65 self.elapsed = self.elapsed + elapsed
Nenue@6 66 self.throttle = self.throttle + elapsed
Nenue@6 67
Nenue@6 68 if (self.throttle >= 0.032) then
Nenue@6 69 self.throttle = 0
Nenue@6 70 else
Nenue@6 71 return
Nenue@6 72 end
Nenue@6 73
Nenue@6 74 local progress = 1
Nenue@6 75 if self.elapsed > fadeTime then
Nenue@6 76 self.elapsed = 0
Nenue@6 77 self.fadeStep = 0
Nenue@6 78 --self.statustext:SetText(nil)
Nenue@6 79 --self.bindingstext:SetText(nil)
Nenue@6 80 self:SetScript('OnUpdate', nil)
Nenue@6 81 else
Nenue@6 82 if self.elapsed < fadeDelay then
Nenue@6 83 progress = 0
Nenue@6 84 else
Nenue@6 85 self.fadeStep = self.fadeStep + 1
Nenue@6 86 progress = (self.elapsed - fadeDelay) /(fadeTime - fadeDelay)
Nenue@6 87 end
Nenue@6 88 --print(self.fadeStep, format('%.02f/%.02f', (self.elapsed - fadeDelay) ,(fadeTime - fadeDelay)) , progress)
Nenue@6 89 end
Nenue@6 90
Nenue@6 91 local alpha = 1 - progress * (1- restingAlpha)
Nenue@6 92 self.statustext:SetAlpha(alpha)
Nenue@6 93 self.bindingstext:SetAlpha(alpha)
Nenue@6 94 end
Nenue@6 95
Nenue@6 96 local KeyButton_OnUpdate = function(self)
Nenue@6 97 if not self.command then
Nenue@6 98 return
Nenue@6 99 end
Nenue@6 100
Nenue@6 101 if self:IsMouseOver() then
Nenue@6 102 kb.elapsed = 0
Nenue@6 103 if not self.active then
Nenue@6 104 -- only set this handler when the button is activated/mouseOver
Nenue@6 105 self.active = true
Nenue@6 106 self:SetScript('OnKeyDown', KeyButton_OnKeyDown)
Nenue@6 107
Nenue@6 108 kb.statustext:SetText(self.statusText .. ': '..self.actionName)
Nenue@6 109 kb.bindingstext:SetText(self.bindingText)
Nenue@6 110 kb.fadeStep = 0
Nenue@6 111 kb.throttle = 0
Nenue@6 112 kb:SetScript('OnUpdate', KeyBinder_OnUpdate)
Nenue@6 113
Nenue@6 114 end
Nenue@6 115 else
Nenue@6 116 if self.active then
Nenue@6 117 self.active = nil
Nenue@6 118 self:SetScript('OnKeyDown', nil)
Nenue@6 119 end
Nenue@6 120 end
Nenue@6 121 end
Nenue@6 122
Nenue@6 123 local KeyBinder_OnMouseWheel = function(self, delta)
Nenue@6 124 print(self, delta, self.scrollOffset, (self.scrollOffset <= 0))
Nenue@6 125
Nenue@6 126
Nenue@6 127 if IsControlKeyDown() then
Nenue@6 128 KEY_BUTTON_SIZE = KEY_BUTTON_SIZE - delta
Nenue@6 129 else
Nenue@6 130
Nenue@6 131
Nenue@6 132 if (delta > 0) and (self.scrollOffset <= 0) then
Nenue@6 133 return
Nenue@6 134 elseif delta < 0 and kb.scrollOffset >= 42 then
Nenue@6 135 return
Nenue@6 136 end
Nenue@6 137 kb.scrollOffset = ceil(kb.scrollOffset - (delta * BINDS_PER_ROW))
Nenue@6 138 end
Nenue@6 139
Nenue@6 140 kb.ui(true)
Nenue@6 141 end
Nenue@6 142
Nenue@6 143 local KeyBinder_OnHide = function()
Nenue@6 144 KeyBinderImportLog:Hide()
Nenue@6 145 end
Nenue@6 146
Nenue@6 147 local CloseButton_OnClick = function()
Nenue@10 148 kb.db.showUI = false
Nenue@6 149 kb:Hide()
Nenue@6 150 end
Nenue@6 151 local CancelButton_OnClick = function()
Nenue@6 152 kb.RevertBindings()
Nenue@6 153 end
Nenue@6 154 local SaveButton_OnClick = function()
Nenue@6 155 kb.ConfirmBindings()
Nenue@6 156 end
Nenue@6 157
Nenue@6 158 local KeyBinder_Initialize = function()
Nenue@6 159
Nenue@6 160
Nenue@6 161 kb.scrollOffset = 0
Nenue@6 162 kb.tabAnchor = {'TOPLEFT', kb.profilebg, 'TOPLEFT', BUTTON_PADDING, -BUTTON_SPACING}
Nenue@6 163 kb.tabGrowth = {'TOPLEFT', nil,'TOPRIGHT', BUTTON_SPACING, 0}
Nenue@6 164 kb.tabSize = {TAB_HEIGHT, TAB_HEIGHT }
Nenue@6 165 kb.UIPanelAnchor = {'TOPLEFT', kb.sourcesbg, 'TOPLEFT', BUTTON_PADDING, -BUTTON_SPACING}
Nenue@6 166 kb.UIPanelGrowth = {'TOPLEFT', nil, 'BOTTOMLEFT', 0, -2 }
Nenue@6 167 kb.UIPanelSize = {84, 32 }
Nenue@6 168 kb.UIPanelIcon = {24, 32, 'LEFT', -12, 0}
Nenue@6 169 kb.controlsAnchor = {'BOTTOMLEFT', kb.footer, BUTTON_PADDING, BUTTON_PADDING }
Nenue@6 170 kb.controlsGrowth = {'BOTTOMLEFT', nil, 'BOTTOMRIGHT', BUTTON_SPACING, 0}
Nenue@6 171
Nenue@6 172 -- order of these is important
Nenue@6 173 kb:tab('KeyBinderGlobalTab',
Nenue@6 174 kb.configTitle[BINDING_TYPE_GLOBAL] .. '\n' .. kb.configDescription[BINDING_TYPE_GLOBAL], "Interface\\ICONS\\item_azereansphere", {0.15,.85,.15,.85})
Nenue@6 175 kb:tab('KeyBinderCharacterTab',
Nenue@6 176 kb.configHeaders[BINDING_TYPE_CHARACTER] .. '\n' .. kb.configDescription[BINDING_TYPE_CHARACTER], nil)
Nenue@6 177 kb:tab('KeyBinderSpecTab',
Nenue@6 178 kb.configHeaders[BINDING_TYPE_SPECIALIZATION] .. '\n' .. kb.configDescription[BINDING_TYPE_SPECIALIZATION], kb.specInfo.texture)
Nenue@6 179 KeyBinderCharacterTab.icon:SetTexCoord(0.15,.85,.15,.85)
Nenue@6 180
Nenue@6 181
Nenue@6 182
Nenue@6 183 --portraitLayers[1] = KeyBinderCharacterTab.icon
Nenue@6 184
Nenue@11 185 saveButton = kb:button('KeyBinderSaveButton', 'Refresh', 'Reload current bindings and refresh panel.', SaveButton_OnClick)
Nenue@6 186 --restoreButton = kb:button('KeyBinderRestoreButton', 'Discard', 'Revert all changes.', CancelButton_OnClick)
Nenue@6 187 --clearButton = kb:button('KeyBinderClearButton', 'Clear Page', 'Release all buttons.', ResetButton_OnClick)
Nenue@6 188
Nenue@6 189 kb:uibutton(
Nenue@6 190 'KeyBinderSpellBookButton', 'SpellBook', nil,
Nenue@6 191 function() ToggleSpellBook(BOOKTYPE_SPELL) end,
Nenue@6 192 "Interface\\BUTTONS\\UI-MicroButton-Spellbook-Up", {0, 1, .4, 1})
Nenue@6 193 kb:uibutton(
Nenue@6 194 'KeyBinderTalentFrameButton', TALENTS, SPECIALIZATION,
Nenue@6 195 function() ToggleTalentFrame() end,
Nenue@6 196 "Interface\\BUTTONS\\UI-MicroButton-Talents-Up", {0, 1, .4, 1})
Nenue@6 197
Nenue@6 198 kb:uibutton(
Nenue@6 199 'KeyBinderMacroFrameButton', 'Macros', nil,
Nenue@6 200 function() if MacroFrame and MacroFrame:IsVisible() then
Nenue@6 201 HideUIPanel(MacroFrame)
Nenue@6 202 else
Nenue@6 203 ShowMacroFrame() end
Nenue@6 204 end,
Nenue@6 205 "Interface\\BUTTONS\\UI-MicroButton-Help-Up", {0, 1, .4, 1})
Nenue@6 206
Nenue@6 207 kb:uibutton(
Nenue@6 208 'KeyBinderInventoryButton', 'Bags', nil,
Nenue@6 209 function() OpenAllBags() end,
Nenue@6 210 "Interface\\BUTTONS\\UI-MicroButtonCharacter-Up", {0, 1, .4, 1})
Nenue@6 211
Nenue@6 212
Nenue@6 213
Nenue@6 214 kb.info:SetPoint('TOPLEFT', kb.UIPanels[1], 'BOTTOMLEFT', 0, -BUTTON_SPACING)
Nenue@6 215 HEADER_OFFSET = kb.UIPanels[1]:GetHeight() + BUTTON_PADDING
Nenue@6 216 + kb.info:GetHeight()
Nenue@6 217 FOOTER_OFFSET = saveButton:GetHeight() + BUTTON_PADDING
Nenue@6 218
Nenue@6 219 kb:SetScript('OnHide', KeyBinder_OnHide)
Nenue@6 220 kb:SetScript('OnMouseWheel', KeyBinder_OnMouseWheel)
Nenue@6 221 kb.CloseButton:SetScript('OnClick', CloseButton_OnClick)
Nenue@6 222
Nenue@6 223 end
Nenue@6 224
Nenue@6 225
Nenue@6 226 --- Retrieves button at index; creates said button and instates any stored parameters
Nenue@7 227 do
Nenue@7 228 local leftSlot, upSlot
Nenue@7 229 local buttonsDepth = 0
Nenue@7 230 kb.GetSlot = function(index)
Nenue@6 231
Nenue@7 232 local slot = index + kb.scrollOffset
Nenue@6 233
Nenue@7 234 if not kb.buttons[index] then
Nenue@7 235 local button = CreateFrame('CheckButton', 'KeyBinderSlot'..index, kb, 'KeyButton')
Nenue@7 236 button:SetScript('OnClick', KeyButton_OnClick)
Nenue@7 237 button:SetScript('OnUpdate', KeyButton_OnUpdate)
Nenue@7 238 button:SetScript('OnDragStart', KeyButton_OnDragStart)
Nenue@7 239 button:SetScript('OnReceiveDrag', KeyButton_OnReceiveDrag)
Nenue@7 240 button:RegisterForClicks('AnyUp')
Nenue@6 241
Nenue@6 242
Nenue@7 243 local newRow = (mod(index, BINDS_PER_ROW) == 1)
Nenue@6 244
Nenue@7 245 if index == 1 then
Nenue@7 246 button:SetPoint('TOPLEFT', kb.bg, 'TOPLEFT', BUTTON_PADDING, - BUTTON_PADDING)
Nenue@7 247 upSlot = button
Nenue@7 248 buttonsDepth = KEY_BUTTON_SIZE + BUTTON_PADDING * 2
Nenue@7 249 elseif newRow then
Nenue@7 250 button:SetPoint('TOPLEFT', upSlot, 'BOTTOMLEFT', 0, -BUTTON_SPACING)
Nenue@7 251 upSlot = button
Nenue@7 252 buttonsDepth = buttonsDepth + KEY_BUTTON_SIZE + BUTTON_SPACING
Nenue@7 253 else
Nenue@7 254 button:SetPoint('TOPLEFT', leftSlot, 'TOPRIGHT', BUTTON_HSPACING, 0)
Nenue@7 255 end
Nenue@7 256
Nenue@7 257 button:SetSize(KEY_BUTTON_SIZE, KEY_BUTTON_SIZE)
Nenue@7 258 button:Show()
Nenue@7 259 kb.buttons[index] = button
Nenue@7 260 leftSlot = button
Nenue@6 261 end
Nenue@7 262 return kb.buttons[index]
Nenue@6 263 end
Nenue@6 264 end
Nenue@6 265
Nenue@6 266
Nenue@6 267 --- push current information into living UI
Nenue@6 268 kb.ui = function(force)
Nenue@6 269 for i, module in ipairs(kb.modules) do
Nenue@6 270 if module.ui then
Nenue@6 271 module.ui(force)
Nenue@6 272 end
Nenue@6 273 end
Nenue@6 274
Nenue@6 275 if not kb.db.showUI then
Nenue@6 276 print('---end of refresh')
Nenue@6 277 return
Nenue@6 278 end
Nenue@6 279 if not kb.loaded then
Nenue@6 280 KeyBinder_Initialize()
Nenue@6 281 kb.loaded = true
Nenue@6 282 end
Nenue@6 283 for i = 1, numButtons do
Nenue@6 284 local button = kb.GetSlot(i)
Nenue@6 285 button:SetID(i+kb.scrollOffset)
Nenue@6 286 kb.UpdateSlot(button, force)
Nenue@6 287 end
Nenue@6 288
Nenue@6 289
Nenue@6 290 --- Frame Sizing
Nenue@6 291 kb.profilebg:SetHeight(kb.tabSize[2] + BUTTON_PADDING * 2 + kb.profiletext:GetStringHeight())
Nenue@6 292
Nenue@6 293 kb.bg:SetWidth((KEY_BUTTON_SIZE + BUTTON_HSPACING + BUTTON_SPACING) * BINDS_PER_ROW + BUTTON_PADDING*2 - BUTTON_SPACING)
Nenue@6 294 local numRows = numButtons/BINDS_PER_ROW
Nenue@6 295
Nenue@6 296 kb.bg:SetHeight((KEY_BUTTON_SIZE + BUTTON_SPACING) * numRows + BUTTON_PADDING*2 - BUTTON_SPACING)
Nenue@6 297
Nenue@6 298 kb:SetHeight(kb.headerbg:GetHeight() + kb.profilebg:GetHeight() + kb.bg:GetHeight() + kb.footer:GetHeight())
Nenue@6 299 kb:SetWidth((kb.sourcesbg:GetWidth() +(BINDS_PER_ROW * (KEY_BUTTON_SIZE + BUTTON_HSPACING) + (BINDS_PER_ROW - 1) * BUTTON_SPACING + BUTTON_PADDING * 2) ))
Nenue@6 300
Nenue@6 301 kb.bg:SetColorTexture(unpack(BINDING_SCHEME_COLOR[kb.db.bindMode]))
Nenue@6 302 for i, tab in ipairs(kb.tabButtons) do
Nenue@6 303 local border = tab:GetNormalTexture()
Nenue@6 304 local tabTexture = "Interface\\Buttons\\UI-Quickslot2"
Nenue@6 305 local left, top, right, bottom = -12, 12, 13, -13
Nenue@6 306 if i == kb.db.bindMode then
Nenue@6 307 tabTexture = "Interface\\Buttons\\CheckButtonGlow"
Nenue@6 308 left, top, right, bottom = -14, 14, 15, -15
Nenue@6 309 tab.icon:SetDesaturated(false)
Nenue@6 310 if tab.icon2 then tab.icon2:SetDesaturated(false) end
Nenue@6 311 border:SetDesaturated(true)
Nenue@6 312 border:SetVertexColor(1,1,1, 1)
Nenue@6 313 else
Nenue@6 314 tab.icon:SetDesaturated(true)
Nenue@6 315 if tab.icon2 then tab.icon2:SetDesaturated(true) end
Nenue@6 316 border:SetDesaturated(false)
Nenue@6 317 border:SetVertexColor(1,1,1)
Nenue@6 318 end
Nenue@6 319 border:SetTexture(tabTexture)
Nenue@6 320 border:SetPoint('TOPLEFT', tab, 'TOPLEFT', left, top)
Nenue@6 321 border:SetPoint('BOTTOMRIGHT', tab, 'BOTTOMRIGHT', right, bottom)
Nenue@6 322 end
Nenue@6 323
Nenue@6 324 KeyBinderSpecTab.icon:SetTexture(kb.specInfo.texture)
Nenue@12 325 SetPortraitTexture(KeyBinderCharacterTab.icon, 'player')
Nenue@6 326
Nenue@6 327 kb.profiletext:SetText(kb.configHeaders[kb.db.bindMode])
Nenue@6 328 print(kb.db.bindMode, kb.configHeaders[kb.db.bindMode], kb:GetSize())
Nenue@6 329 print(kb:GetPoint(1))
Nenue@6 330
Nenue@6 331 kb:Show()
Nenue@6 332
Nenue@6 333 -- Reset this so talent cache can be rebuilt
Nenue@6 334 kb.talentsPushed = nil
Nenue@6 335 end
Nenue@6 336
Nenue@6 337 kb.AcceptAssignment = function(self, ...)
Nenue@6 338 local popup = StaticPopupDialogs["SKELETONKEY_CONFIRM_ASSIGN_SLOT"]
Nenue@6 339 local source = loadedProfiles[popup.oldProfile]
Nenue@6 340 kb.SetSlot(popup.slot, unpack(popup.args))
Nenue@6 341 kb.UpdateSlot(popup.slot)
Nenue@6 342 kb:SetScript('OnMouseWheel', KeyBinder_OnMouseWheel) -- re-enable scrolling
Nenue@6 343 ClearCursor()
Nenue@6 344 ResetCursor()
Nenue@6 345 end