Mercurial > wow > skeletonkey

annotate SkeletonKey/BindingsFrame.lua @ 52:81a7c71c4483

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- fixed safety override - fixed pet journal drag/drop - fixed confirmation cancel button
author Nenue
date Fri, 19 Aug 2016 10:46:36 -0400
parents 1aba8a6fd4a9
children 9eebce04e69b
rev   line source
Nenue@6 1 -- KrakTool
Nenue@27 2 -- BindingsFrame.lua
Nenue@6 3 -- Created: 7/28/2016 3:39 PM
Nenue@6 4 -- %file-revision%
Nenue@52 5 -- Handles the arrangement of and interaction with the SkeletonKey frame
Nenue@52 6 --[=[
Nenue@52 7 -- some useful texture paths
Nenue@52 8 [[Interface\PaperDollInfoFrame\UI-GearManager-Undo]]
Nenue@52 9 [[Interface\PetPaperDollFrame\UI-PetHappiness]]
Nenue@52 10 [[Interface\RAIDFRAME\ReadyCheck-Waiting]]
Nenue@52 11 [[Interface\RAIDFRAME\ReadyCheck-Read]]
Nenue@52 12 [[Interface\RAIDFRAME\ReadyCheck-NotReady]]
Nenue@52 13 [[Interface\TradeSkillFrame\UI-TradeSkill-LinkButton]]
Nenue@52 14 [[Interface\TUTORIALFRAME\UI-TUTORIAL-FRAME]]
Nenue@52 15 [[Interface\UI-TutorialFrame-QuestGiver\UI-TutorialFrame-QuestGray]]
Nenue@52 16 --]=]
Nenue@6 17
Nenue@52 18 local kb, print = LibStub("LibKraken").register(KeyBinder, 'BindingsUI')
Nenue@52 19 local L = kb.L
Nenue@6 20 local BINDS_PER_ROW = 2
Nenue@17 21 local BINDING_TYPE_SPECIALIZATION = 3
Nenue@17 22 local BINDING_TYPE_CHARACTER = 2
Nenue@17 23 local BINDING_TYPE_GLOBAL = 1
Nenue@6 24 local BUTTON_HSPACING = 128
Nenue@6 25 local BUTTON_SPACING = 4
Nenue@6 26 local BUTTON_PADDING = 12
Nenue@6 27 local KEY_BUTTON_SIZE = 48
Nenue@17 28 local NUM_KEY_SLOTS = BINDS_PER_ROW * 8
Nenue@6 29 local TAB_HEIGHT = 40
Nenue@6 30
Nenue@6 31 local BINDING_SCHEME_COLOR = {
Nenue@6 32 [BINDING_TYPE_GLOBAL] = {0,.125,.5,.5},
Nenue@6 33 [BINDING_TYPE_CHARACTER] = {0,0.25,0,0.5},
Nenue@6 34 [BINDING_TYPE_SPECIALIZATION] = {.25,0,0,0.5},
Nenue@6 35 }
Nenue@6 36 local BINDING_SCHEME_VERTEX = {
Nenue@6 37 [BINDING_TYPE_GLOBAL] = {0,.5,1,1},
Nenue@6 38 [BINDING_TYPE_CHARACTER] = {0,1,0,1},
Nenue@6 39 [BINDING_TYPE_SPECIALIZATION] = {1,1,1,1},
Nenue@6 40 }
Nenue@6 41 local BINDING_SCHEME_TEXT = {
Nenue@6 42 [BINDING_TYPE_SPECIALIZATION] = {0, 1, 1},
Nenue@6 43 [BINDING_TYPE_CHARACTER] = {0, 1, 0},
Nenue@6 44 [BINDING_TYPE_GLOBAL] = {0, 1, 1}
Nenue@6 45 }
Nenue@6 46
Nenue@52 47 local match, strupper = string.match, string.upper
Nenue@52 48 local tremove, tinsert, ipairs, pairs, unpack = table.remove, table.insert, ipairs, pairs, unpack
Nenue@52 49 local tonumber, tostring = tonumber, tostring
Nenue@52 50 local GetCursorInfo, ClearCursor, ResetCursor = GetCursorInfo, ClearCursor, ResetCursor
Nenue@52 51 local IsShiftKeyDown, IsControlKeyDown, IsAltKeyDown = IsShiftKeyDown, IsControlKeyDown, IsAltKeyDown
Nenue@52 52 local GetBindingAction, GetBindingKey, GetCurrentBindingSet = GetBindingAction, GetBindingKey, GetCurrentBindingSet
Nenue@52 53 local SetBinding, SaveBindings = SetBinding, SaveBindings
Nenue@52 54
Nenue@52 55 kb.ProcessInput = function(key)
Nenue@52 56 if key == 'ESCAPE' then
Nenue@52 57 kb.DeactivateSlot(kb.saveTarget)
Nenue@52 58 kb.ui()
Nenue@52 59 return
Nenue@52 60 end
Nenue@52 61
Nenue@52 62 if (match(key, '[RL]SHIFT') or match(key, '[RL]ALT') or match(key, '[RL]CTRL')) then
Nenue@52 63 return
Nenue@52 64 end
Nenue@52 65
Nenue@52 66 if kb.saveTarget then
Nenue@52 67 if kb.SaveSlot(kb.saveTarget, key) then
Nenue@52 68 if not (kb.db.stickyMode or kb.db.hoverInput) then
Nenue@52 69 kb.DeactivateSlot(kb.saveTarget)
Nenue@52 70 end
Nenue@52 71 end
Nenue@52 72 kb.ui()
Nenue@52 73 end
Nenue@34 74 end
Nenue@34 75
Nenue@52 76 local lastFolder
Nenue@6 77 local restingAlpha = 0.7
Nenue@6 78 local fadeTime, fadeDelay = .30, 0.15
Nenue@6 79 local saveButton
Nenue@17 80
Nenue@17 81 local KeyButton_OnKeyDown = function(self, key)
Nenue@52 82 local st = kb.saveTarget
Nenue@52 83 kb.ProcessInput(key)
Nenue@17 84 end
Nenue@17 85 local KeyButton_OnKeyUp = function(self, key)
Nenue@52 86 local st = kb.saveTarget
Nenue@6 87 end
Nenue@16 88
Nenue@6 89 local KeyButton_OnClick = function(self, click)
Nenue@6 90 print(self:GetName(), 'OnMouseDown', click)
Nenue@16 91 local cursorType = GetCursorInfo()
Nenue@6 92 if click == 'LeftButton' then
Nenue@16 93 if cursorType then
Nenue@16 94 kb.DropToSlot(self)
Nenue@16 95 else
Nenue@30 96 if self.command and self.isAvailable then
Nenue@30 97 if IsShiftKeyDown() then
Nenue@30 98 kb.db.stickyMode = true
Nenue@30 99 KeyBinderStickyMode:SetChecked(true)
Nenue@30 100 end
Nenue@30 101 kb.ActivateSlot(self)
Nenue@30 102 kb.ui()
Nenue@17 103 end
Nenue@16 104 end
Nenue@6 105 elseif click == 'RightButton' then
Nenue@6 106 kb.ReleaseSlot(self)
Nenue@34 107 kb.ui()
Nenue@52 108 else
Nenue@52 109 kb.ProcessInput(strupper(click))
Nenue@6 110 end
Nenue@6 111 end
Nenue@6 112
Nenue@6 113 local KeyButton_OnDragStart = function(self)
Nenue@6 114 kb.PickupSlot(self)
Nenue@6 115 end
Nenue@6 116
Nenue@6 117 local KeyButton_OnReceiveDrag = function(self, ...)
Nenue@6 118 kb.DropToSlot(self)
Nenue@6 119 end
Nenue@6 120
Nenue@6 121
Nenue@6 122 local KeyBinder_OnUpdate = function(self, elapsed)
Nenue@6 123 self.elapsed = self.elapsed + elapsed
Nenue@6 124 self.throttle = self.throttle + elapsed
Nenue@6 125
Nenue@6 126 if (self.throttle >= 0.032) then
Nenue@6 127 self.throttle = 0
Nenue@6 128 else
Nenue@6 129 return
Nenue@6 130 end
Nenue@6 131
Nenue@6 132 local progress = 1
Nenue@6 133 if self.elapsed > fadeTime then
Nenue@6 134 self.elapsed = 0
Nenue@6 135 self.fadeStep = 0
Nenue@6 136 --self.statustext:SetText(nil)
Nenue@6 137 --self.bindingstext:SetText(nil)
Nenue@6 138 self:SetScript('OnUpdate', nil)
Nenue@6 139 else
Nenue@6 140 if self.elapsed < fadeDelay then
Nenue@6 141 progress = 0
Nenue@6 142 else
Nenue@6 143 self.fadeStep = self.fadeStep + 1
Nenue@6 144 progress = (self.elapsed - fadeDelay) /(fadeTime - fadeDelay)
Nenue@6 145 end
Nenue@6 146 --print(self.fadeStep, format('%.02f/%.02f', (self.elapsed - fadeDelay) ,(fadeTime - fadeDelay)) , progress)
Nenue@6 147 end
Nenue@6 148
Nenue@6 149 local alpha = 1 - progress * (1- restingAlpha)
Nenue@6 150 self.statustext:SetAlpha(alpha)
Nenue@6 151 self.bindingstext:SetAlpha(alpha)
Nenue@6 152 end
Nenue@6 153
Nenue@6 154 local KeyButton_OnUpdate = function(self)
Nenue@6 155 if not self.command then
Nenue@6 156 return
Nenue@6 157 end
Nenue@6 158
Nenue@6 159 if self:IsMouseOver() then
Nenue@6 160 kb.elapsed = 0
Nenue@6 161 if not self.active then
Nenue@6 162 -- only set this handler when the button is activated/mouseOver
Nenue@6 163 self.active = true
Nenue@6 164 kb.statustext:SetText(self.statusText .. ': '..self.actionName)
Nenue@6 165 kb.bindingstext:SetText(self.bindingText)
Nenue@6 166 kb.fadeStep = 0
Nenue@6 167 kb.throttle = 0
Nenue@6 168 kb:SetScript('OnUpdate', KeyBinder_OnUpdate)
Nenue@6 169
Nenue@18 170 if kb.db.hoverInput and kb.saveTarget ~= self then
Nenue@18 171 kb.ActivateSlot(self)
Nenue@18 172 kb.ui()
Nenue@18 173 end
Nenue@18 174
Nenue@6 175 end
Nenue@6 176 else
Nenue@19 177 if self.active and kb.db.hoverInput then
Nenue@6 178 self.active = nil
Nenue@19 179 --kb.DeactivateSlot(self)
Nenue@19 180 --kb.ui()
Nenue@6 181 end
Nenue@6 182 end
Nenue@6 183 end
Nenue@6 184
Nenue@6 185 local KeyBinder_OnMouseWheel = function(self, delta)
Nenue@6 186 print(self, delta, self.scrollOffset, (self.scrollOffset <= 0))
Nenue@6 187
Nenue@6 188
Nenue@6 189 if IsControlKeyDown() then
Nenue@6 190 KEY_BUTTON_SIZE = KEY_BUTTON_SIZE - delta
Nenue@6 191 else
Nenue@6 192
Nenue@6 193
Nenue@6 194 if (delta > 0) and (self.scrollOffset <= 0) then
Nenue@6 195 return
Nenue@6 196 elseif delta < 0 and kb.scrollOffset >= 42 then
Nenue@6 197 return
Nenue@6 198 end
Nenue@6 199 kb.scrollOffset = ceil(kb.scrollOffset - (delta * BINDS_PER_ROW))
Nenue@6 200 end
Nenue@6 201
Nenue@17 202 for i = 1, #kb.buttons do
Nenue@17 203 kb.buttons[i]:SetSize(KEY_BUTTON_SIZE,KEY_BUTTON_SIZE)
Nenue@17 204 end
Nenue@17 205
Nenue@6 206 kb.ui(true)
Nenue@6 207 end
Nenue@6 208
Nenue@34 209 local frameCount = 0
Nenue@34 210 local lastCheckFrame
Nenue@34 211 local KeyBinder_CheckButton = function(frame ,enableText, disableText, dbKey, tooltipText, callback, header)
Nenue@19 212 if kb.db[dbKey] then
Nenue@19 213 frame:SetChecked(true)
Nenue@18 214 end
Nenue@34 215
Nenue@34 216 frame.header:SetText(header)
Nenue@18 217
Nenue@19 218 frame:SetScript('OnClick', function(self)
Nenue@52 219 kb.db[dbKey] = self:GetChecked()
Nenue@19 220 if callback then
Nenue@19 221 callback(self)
Nenue@19 222 end
Nenue@19 223 kb.ui()
Nenue@19 224 end)
Nenue@19 225
Nenue@19 226 frame:SetScript('OnEnter', function(self)
Nenue@19 227 if tooltipText then
Nenue@19 228 GameTooltip:SetOwner(self)
Nenue@19 229 GameTooltip:SetText(tooltipText)
Nenue@19 230 GameTooltip:Show()
Nenue@19 231 end
Nenue@19 232 end)
Nenue@19 233
Nenue@19 234 frame:SetScript('OnLeave', function(self)
Nenue@19 235 if tooltipText and GameTooltip:GetOwner() == self then
Nenue@19 236 GameTooltip:Hide()
Nenue@19 237 end
Nenue@19 238 end)
Nenue@34 239
Nenue@34 240 if frame:GetID() == 0 then
Nenue@34 241 frameCount = frameCount + 1
Nenue@34 242 frame:SetID(frameCount)
Nenue@34 243 print('checkbutton #', frameCount)
Nenue@34 244 if frameCount == 1 then
Nenue@34 245 frame:ClearAllPoints()
Nenue@34 246 frame:SetPoint('TOP', KeyBinderInventoryButton, 'BOTTOM', 0, -22)
Nenue@34 247 frame:SetPoint('LEFT', kb.sourcesbg, 'LEFT', 2, 0)
Nenue@34 248 else
Nenue@34 249 frame:ClearAllPoints()
Nenue@34 250 frame:SetPoint('TOPLEFT', lastCheckFrame, 'BOTTOMLEFT', 0, -2)
Nenue@34 251 end
Nenue@34 252
Nenue@34 253 frame.header:ClearAllPoints()
Nenue@34 254 frame.header:SetPoint('LEFT', frame, 'RIGHT', 2, 0)
Nenue@34 255
Nenue@34 256 lastCheckFrame = frame
Nenue@34 257 end
Nenue@18 258 end
Nenue@18 259
Nenue@6 260 local KeyBinder_OnHide = function()
Nenue@6 261 KeyBinderImportLog:Hide()
Nenue@6 262 end
Nenue@6 263
Nenue@6 264 local CloseButton_OnClick = function()
Nenue@10 265 kb.db.showUI = false
Nenue@6 266 kb:Hide()
Nenue@6 267 end
Nenue@6 268 local CancelButton_OnClick = function()
Nenue@6 269 kb.RevertBindings()
Nenue@6 270 end
Nenue@6 271 local SaveButton_OnClick = function()
Nenue@6 272 kb.ConfirmBindings()
Nenue@6 273 end
Nenue@6 274
Nenue@17 275
Nenue@6 276 local KeyBinder_Initialize = function()
Nenue@17 277 do
Nenue@17 278 local leftSlot, upSlot
Nenue@17 279 for index = 1, NUM_KEY_SLOTS do
Nenue@17 280
Nenue@17 281 local button = CreateFrame('CheckButton', 'KeyBinderSlot'..index, kb, 'KeyButton')
Nenue@17 282 button:SetScript('OnClick', KeyButton_OnClick)
Nenue@17 283 button:SetScript('OnUpdate', KeyButton_OnUpdate)
Nenue@17 284 button:SetScript('OnDragStart', KeyButton_OnDragStart)
Nenue@17 285 button:SetScript('OnReceiveDrag', KeyButton_OnReceiveDrag)
Nenue@17 286 button:RegisterForClicks('AnyUp')
Nenue@17 287
Nenue@17 288
Nenue@17 289 local newRow = (mod(index, BINDS_PER_ROW) == 1)
Nenue@17 290
Nenue@17 291 if index == 1 then
Nenue@17 292 button:SetPoint('TOPLEFT', kb.bg, 'TOPLEFT', BUTTON_PADDING, - BUTTON_PADDING)
Nenue@17 293 upSlot = button
Nenue@17 294 elseif newRow then
Nenue@17 295 button:SetPoint('TOPLEFT', upSlot, 'BOTTOMLEFT', 0, -BUTTON_SPACING)
Nenue@17 296 upSlot = button
Nenue@17 297 else
Nenue@17 298 button:SetPoint('TOPLEFT', leftSlot, 'TOPRIGHT', BUTTON_HSPACING, 0)
Nenue@17 299 end
Nenue@17 300
Nenue@17 301 button:SetSize(KEY_BUTTON_SIZE, KEY_BUTTON_SIZE)
Nenue@17 302 button:Show()
Nenue@17 303 kb.buttons[index] = button
Nenue@17 304 leftSlot = button
Nenue@17 305 end
Nenue@17 306 end
Nenue@6 307
Nenue@6 308
Nenue@6 309 kb.scrollOffset = 0
Nenue@6 310 kb.tabAnchor = {'TOPLEFT', kb.profilebg, 'TOPLEFT', BUTTON_PADDING, -BUTTON_SPACING}
Nenue@6 311 kb.tabGrowth = {'TOPLEFT', nil,'TOPRIGHT', BUTTON_SPACING, 0}
Nenue@6 312 kb.tabSize = {TAB_HEIGHT, TAB_HEIGHT }
Nenue@6 313 kb.UIPanelAnchor = {'TOPLEFT', kb.sourcesbg, 'TOPLEFT', BUTTON_PADDING, -BUTTON_SPACING}
Nenue@6 314 kb.UIPanelGrowth = {'TOPLEFT', nil, 'BOTTOMLEFT', 0, -2 }
Nenue@6 315 kb.UIPanelSize = {84, 32 }
Nenue@6 316 kb.UIPanelIcon = {24, 32, 'LEFT', -12, 0}
Nenue@17 317 kb.controlsAnchor = {'BOTTOMRIGHT', kb.footer, -BUTTON_PADDING, BUTTON_PADDING }
Nenue@17 318 kb.controlsGrowth = {'BOTTOMRIGHT', nil, 'BOTTOMLEFT', -BUTTON_SPACING, 0}
Nenue@6 319
Nenue@6 320 -- order of these is important
Nenue@6 321 kb:tab('KeyBinderGlobalTab',
Nenue@6 322 kb.configTitle[BINDING_TYPE_GLOBAL] .. '\n' .. kb.configDescription[BINDING_TYPE_GLOBAL], "Interface\\ICONS\\item_azereansphere", {0.15,.85,.15,.85})
Nenue@6 323 kb:tab('KeyBinderCharacterTab',
Nenue@6 324 kb.configHeaders[BINDING_TYPE_CHARACTER] .. '\n' .. kb.configDescription[BINDING_TYPE_CHARACTER], nil)
Nenue@6 325 kb:tab('KeyBinderSpecTab',
Nenue@6 326 kb.configHeaders[BINDING_TYPE_SPECIALIZATION] .. '\n' .. kb.configDescription[BINDING_TYPE_SPECIALIZATION], kb.specInfo.texture)
Nenue@6 327 KeyBinderCharacterTab.icon:SetTexCoord(0.15,.85,.15,.85)
Nenue@6 328
Nenue@6 329
Nenue@6 330
Nenue@6 331 --portraitLayers[1] = KeyBinderCharacterTab.icon
Nenue@17 332 -- todo: find some generic icons for refresh/key input,etc
Nenue@6 333
Nenue@17 334 saveButton = kb:button('KeyBinderSaveButton', 'Update', 'Reload current bindings and refresh panel.', SaveButton_OnClick)
Nenue@6 335 --restoreButton = kb:button('KeyBinderRestoreButton', 'Discard', 'Revert all changes.', CancelButton_OnClick)
Nenue@6 336 --clearButton = kb:button('KeyBinderClearButton', 'Clear Page', 'Release all buttons.', ResetButton_OnClick)
Nenue@6 337
Nenue@6 338 kb:uibutton(
Nenue@6 339 'KeyBinderSpellBookButton', 'SpellBook', nil,
Nenue@6 340 function() ToggleSpellBook(BOOKTYPE_SPELL) end,
Nenue@6 341 "Interface\\BUTTONS\\UI-MicroButton-Spellbook-Up", {0, 1, .4, 1})
Nenue@6 342 kb:uibutton(
Nenue@6 343 'KeyBinderTalentFrameButton', TALENTS, SPECIALIZATION,
Nenue@6 344 function() ToggleTalentFrame() end,
Nenue@6 345 "Interface\\BUTTONS\\UI-MicroButton-Talents-Up", {0, 1, .4, 1})
Nenue@6 346
Nenue@6 347 kb:uibutton(
Nenue@6 348 'KeyBinderMacroFrameButton', 'Macros', nil,
Nenue@6 349 function() if MacroFrame and MacroFrame:IsVisible() then
Nenue@6 350 HideUIPanel(MacroFrame)
Nenue@6 351 else
Nenue@6 352 ShowMacroFrame() end
Nenue@6 353 end,
Nenue@6 354 "Interface\\BUTTONS\\UI-MicroButton-Help-Up", {0, 1, .4, 1})
Nenue@6 355
Nenue@6 356 kb:uibutton(
Nenue@6 357 'KeyBinderInventoryButton', 'Bags', nil,
Nenue@6 358 function() OpenAllBags() end,
Nenue@6 359 "Interface\\BUTTONS\\UI-MicroButtonCharacter-Up", {0, 1, .4, 1})
Nenue@6 360
Nenue@52 361 KeyBinder_CheckButton(KeyBinderStickyMode, 'Enabled', 'Disabled', 'stickyMode', 'Keep input active after receiving a key.', function()
Nenue@52 362 if kb.saveTarget and (not kb.db.stickyMode) then
Nenue@52 363 kb.DeactivateSlot(kb.saveTarget)
Nenue@52 364 end
Nenue@52 365 end, 'Sticky:')
Nenue@34 366 KeyBinder_CheckButton(KeyBinderHoverInput, 'MouseOver', 'Click', 'hoverInput', 'Enable key input when the cursor is over a binding slot.', nil, 'Bind by:')
Nenue@34 367 KeyBinder_CheckButton(KeyBinderProtectBindings, 'Block', 'Allow', 'protectBlizKeys', 'Allow overwriting Blizzard UI bindings.', nil, 'Safety:')
Nenue@18 368
Nenue@18 369
Nenue@18 370 KeyBinderUnbindButton:SetScript('OnClick', function()
Nenue@18 371 if kb.saveTarget then
Nenue@18 372 kb.UnbindSlot(kb.saveTarget)
Nenue@18 373 end
Nenue@18 374 kb.ui()
Nenue@18 375 end)
Nenue@18 376
Nenue@6 377
Nenue@6 378 kb.info:SetPoint('TOPLEFT', kb.UIPanels[1], 'BOTTOMLEFT', 0, -BUTTON_SPACING)
Nenue@6 379 HEADER_OFFSET = kb.UIPanels[1]:GetHeight() + BUTTON_PADDING
Nenue@6 380 + kb.info:GetHeight()
Nenue@6 381 FOOTER_OFFSET = saveButton:GetHeight() + BUTTON_PADDING
Nenue@6 382
Nenue@6 383 kb:SetScript('OnHide', KeyBinder_OnHide)
Nenue@6 384 kb:SetScript('OnMouseWheel', KeyBinder_OnMouseWheel)
Nenue@6 385 kb.CloseButton:SetScript('OnClick', CloseButton_OnClick)
Nenue@6 386
Nenue@6 387 end
Nenue@6 388
Nenue@6 389
Nenue@6 390 --- Retrieves button at index; creates said button and instates any stored parameters
Nenue@6 391
Nenue@6 392
Nenue@17 393 kb.ActivateSlot = function(button)
Nenue@17 394 kb.saveTarget = button
Nenue@49 395 kb:SetScript('OnKeyUp', function(self, key) KeyButton_OnKeyUp(button, key) end)
Nenue@49 396 kb:SetScript('OnKeyDown', function(self, key) KeyButton_OnKeyDown(button, key) end)
Nenue@49 397 kb:SetScript('OnMouseUp', function(self, key) KeyButton_OnKeyUp(button, key) end)
Nenue@17 398 kb.savingText:ClearAllPoints()
Nenue@17 399 kb.savingText:SetParent(button)
Nenue@17 400 kb.savingText:SetPoint('BOTTOMLEFT', button, 'TOPLEFT', 0, 0)
Nenue@6 401 end
Nenue@6 402
Nenue@17 403 kb.DeactivateSlot = function(button)
Nenue@17 404 kb.saveTarget = nil
Nenue@17 405 kb:SetScript('OnKeyUp', nil)
Nenue@17 406 kb:SetScript('OnKeyDown', nil)
Nenue@49 407 kb:SetScript('OnMouseUp', nil)
Nenue@17 408 end
Nenue@6 409
Nenue@16 410
Nenue@6 411 --- push current information into living UI
Nenue@6 412 kb.ui = function(force)
Nenue@6 413 for i, module in ipairs(kb.modules) do
Nenue@6 414 if module.ui then
Nenue@6 415 module.ui(force)
Nenue@6 416 end
Nenue@6 417 end
Nenue@6 418
Nenue@6 419 if not kb.db.showUI then
Nenue@6 420 print('---end of refresh')
Nenue@6 421 return
Nenue@6 422 end
Nenue@6 423 if not kb.loaded then
Nenue@6 424 KeyBinder_Initialize()
Nenue@6 425 kb.loaded = true
Nenue@6 426 end
Nenue@17 427 for i, button in ipairs(kb.buttons) do
Nenue@6 428 button:SetID(i+kb.scrollOffset)
Nenue@6 429 kb.UpdateSlot(button, force)
Nenue@6 430 end
Nenue@6 431
Nenue@6 432
Nenue@6 433 --- Frame Sizing
Nenue@6 434 kb.profilebg:SetHeight(kb.tabSize[2] + BUTTON_PADDING * 2 + kb.profiletext:GetStringHeight())
Nenue@6 435
Nenue@6 436 kb.bg:SetWidth((KEY_BUTTON_SIZE + BUTTON_HSPACING + BUTTON_SPACING) * BINDS_PER_ROW + BUTTON_PADDING*2 - BUTTON_SPACING)
Nenue@17 437 local numRows = NUM_KEY_SLOTS/BINDS_PER_ROW
Nenue@6 438
Nenue@6 439 kb.bg:SetHeight((KEY_BUTTON_SIZE + BUTTON_SPACING) * numRows + BUTTON_PADDING*2 - BUTTON_SPACING)
Nenue@6 440
Nenue@6 441 kb:SetHeight(kb.headerbg:GetHeight() + kb.profilebg:GetHeight() + kb.bg:GetHeight() + kb.footer:GetHeight())
Nenue@6 442 kb:SetWidth((kb.sourcesbg:GetWidth() +(BINDS_PER_ROW * (KEY_BUTTON_SIZE + BUTTON_HSPACING) + (BINDS_PER_ROW - 1) * BUTTON_SPACING + BUTTON_PADDING * 2) ))
Nenue@6 443
Nenue@17 444 if kb.saveTarget then
Nenue@17 445 kb.bg:SetColorTexture(.2,.5, .2, .5)
Nenue@17 446 kb.savingText:Show()
Nenue@17 447
Nenue@17 448 else
Nenue@17 449 kb.bg:SetColorTexture(unpack(BINDING_SCHEME_COLOR[kb.db.bindMode]))
Nenue@17 450 kb.savingText:Hide()
Nenue@17 451 end
Nenue@17 452
Nenue@6 453 for i, tab in ipairs(kb.tabButtons) do
Nenue@6 454 local border = tab:GetNormalTexture()
Nenue@6 455 local tabTexture = "Interface\\Buttons\\UI-Quickslot2"
Nenue@6 456 local left, top, right, bottom = -12, 12, 13, -13
Nenue@6 457 if i == kb.db.bindMode then
Nenue@6 458 tabTexture = "Interface\\Buttons\\CheckButtonGlow"
Nenue@6 459 left, top, right, bottom = -14, 14, 15, -15
Nenue@6 460 tab.icon:SetDesaturated(false)
Nenue@6 461 if tab.icon2 then tab.icon2:SetDesaturated(false) end
Nenue@6 462 border:SetDesaturated(true)
Nenue@6 463 border:SetVertexColor(1,1,1, 1)
Nenue@6 464 else
Nenue@6 465 tab.icon:SetDesaturated(true)
Nenue@6 466 if tab.icon2 then tab.icon2:SetDesaturated(true) end
Nenue@6 467 border:SetDesaturated(false)
Nenue@6 468 border:SetVertexColor(1,1,1)
Nenue@6 469 end
Nenue@6 470 border:SetTexture(tabTexture)
Nenue@6 471 border:SetPoint('TOPLEFT', tab, 'TOPLEFT', left, top)
Nenue@6 472 border:SetPoint('BOTTOMRIGHT', tab, 'BOTTOMRIGHT', right, bottom)
Nenue@6 473 end
Nenue@6 474
Nenue@6 475 KeyBinderSpecTab.icon:SetTexture(kb.specInfo.texture)
Nenue@12 476 SetPortraitTexture(KeyBinderCharacterTab.icon, 'player')
Nenue@6 477
Nenue@6 478 kb.profiletext:SetText(kb.configHeaders[kb.db.bindMode])
Nenue@6 479 print(kb.db.bindMode, kb.configHeaders[kb.db.bindMode], kb:GetSize())
Nenue@6 480 print(kb:GetPoint(1))
Nenue@6 481
Nenue@6 482 kb:Show()
Nenue@6 483
Nenue@17 484 if kb.saveTarget then
Nenue@17 485 KeyBinderUnbindButton:SetParent(kb.saveTarget)
Nenue@19 486 KeyBinderUnbindButton:SetPoint('TOPLEFT', kb.saveTarget, 'BOTTOMLEFT', 0, -1)
Nenue@17 487 KeyBinderUnbindButton:Show()
Nenue@17 488 else
Nenue@17 489 KeyBinderUnbindButton:Hide()
Nenue@17 490 end
Nenue@17 491
Nenue@6 492 -- Reset this so talent cache can be rebuilt
Nenue@6 493 kb.talentsPushed = nil
Nenue@6 494 end
Nenue@6 495
Nenue@52 496 --- Associate processed input with the given slot's metadata
Nenue@52 497 kb.SaveSlot = function(self, key)
Nenue@52 498
Nenue@52 499 if not self.command then
Nenue@52 500 return
Nenue@52 501 end
Nenue@52 502 print('|cFFFFFF00received|cFFFFFF00', self:GetID(), '|cFF00FFFF', key)
Nenue@52 503
Nenue@52 504 local modifier = ''
Nenue@52 505 if IsAltKeyDown() then
Nenue@52 506 modifier = 'ALT-'
Nenue@52 507 end
Nenue@52 508 if IsControlKeyDown() then
Nenue@52 509 modifier = modifier.. 'CTRL-'
Nenue@52 510 end
Nenue@52 511 if IsShiftKeyDown() then
Nenue@52 512 modifier = modifier..'SHIFT-'
Nenue@52 513 end
Nenue@52 514 local binding = modifier..key
Nenue@52 515
Nenue@52 516 -- check for system bindings
Nenue@52 517 --bprint('|cFFFFFF00SaveBind|r', 'protectKeys', kb.db.protectBlizKeys)
Nenue@52 518 if kb.db.protectBlizKeys and kb.SystemBindings[binding] then
Nenue@52 519 kb.statustext:SetText(L('BINDING_FAILED_PROTECTED', binding, kb.SystemBindings[binding]))
Nenue@52 520 kb.bindingstext:SetText(nil)
Nenue@52 521 return false
Nenue@52 522 end
Nenue@52 523
Nenue@52 524 -- check for other keys
Nenue@52 525 local previousCommand = GetBindingAction(binding)
Nenue@52 526 if previousCommand ~= "" and previousCommand ~= self.command then
Nenue@52 527 local actionType, actionID, name = kb.GetCommandAction(previousCommand)
Nenue@52 528 if actionType then
Nenue@52 529 local keys = {GetBindingKey(previousCommand) }
Nenue@52 530 local i = 1
Nenue@52 531 while keys[i] do
Nenue@52 532 if keys[i] == binding then
Nenue@52 533 tremove(keys, i)
Nenue@52 534 kb.UpdateBindingsCache(actionType, actionID, keys)
Nenue@52 535 break
Nenue@52 536 end
Nenue@52 537 i = i + 1
Nenue@52 538 end
Nenue@52 539 end
Nenue@52 540 end
Nenue@52 541
Nenue@52 542 local currentHotKeys = {GetBindingKey(self.command)}
Nenue@52 543 local found
Nenue@52 544 for i, key in ipairs(currentHotKeys) do
Nenue@52 545 if key == binding then
Nenue@52 546 found = true
Nenue@52 547 kb:print('hotkey already assigned')
Nenue@52 548 end
Nenue@52 549 end
Nenue@52 550 if not found then
Nenue@52 551 tinsert(currentHotKeys, 1, binding)
Nenue@52 552 kb.UpdateBindingsCache(self.actionType, self.actionID, currentHotKeys)
Nenue@52 553 end
Nenue@52 554
Nenue@52 555
Nenue@52 556
Nenue@52 557 print('SetBinding', binding, self.command)
Nenue@52 558 SetBinding(binding, self.command)
Nenue@52 559 SaveBindings(GetCurrentBindingSet())
Nenue@52 560 self.binding = binding
Nenue@52 561
Nenue@52 562 local talentInfo
Nenue@52 563 if self.actionType == 'spell' and kb.TalentCache[self.actionID] then
Nenue@52 564 print('store dynamicType talent')
Nenue@52 565 talentInfo = {self.macroName, self.actionName, self.actionType, self.actionID}
Nenue@52 566 local bindings = {GetBindingKey(self.command) }
Nenue@52 567 for i, key in ipairs(bindings) do
Nenue@52 568 tinsert(talentInfo, key)
Nenue@52 569 end
Nenue@52 570 end
Nenue@52 571
Nenue@52 572 for level, profile in ipairs(kb.orderedProfiles) do
Nenue@52 573 if (level == kb.db.bindMode) then
Nenue@52 574 profile.bound[self.command] = true
Nenue@52 575 if talentInfo then
Nenue@52 576 profile.bindings[self.binding] = nil
Nenue@52 577 else
Nenue@52 578 profile.bindings[self.binding] = self.command
Nenue@52 579 end
Nenue@52 580 profile.talents[self.actionName] = talentInfo
Nenue@52 581 else
Nenue@52 582 profile.bindings[self.binding] = nil
Nenue@52 583 profile.bound[self.command] = nil
Nenue@52 584 kb.currentProfile.talents[self.actionName] = nil
Nenue@52 585 end
Nenue@52 586 if kb.currentProfile.talents[self.actionID] then
Nenue@52 587 kb.currentProfile.talents[self.actionID] = nil
Nenue@52 588 end
Nenue@52 589 end
Nenue@52 590
Nenue@52 591 kb:print(L('BINDING_ASSIGNED', self.binding, self.actionName, kb.currentHeader))
Nenue@52 592 kb.UpdateSlot(self, true)
Nenue@52 593 return true
Nenue@52 594 end
Nenue@52 595
Nenue@52 596
Nenue@52 597 kb.UnbindSlot = function(self)
Nenue@52 598
Nenue@52 599 local keys = {GetBindingKey(self.command) }
Nenue@52 600 if #keys >= 1 then
Nenue@52 601 kb.UpdateBindingsCache(self.actionType, self.actionID, {})
Nenue@52 602 end
Nenue@52 603
Nenue@52 604
Nenue@52 605 --print('detected', #keys, 'bindings')
Nenue@52 606 for i, key in pairs(keys) do
Nenue@52 607 --print('clearing', key)
Nenue@52 608 SetBinding(key, nil)
Nenue@52 609 SaveBindings(GetCurrentBindingSet())
Nenue@52 610 if kb.currentProfile.bindings[key] then
Nenue@52 611 --kb:print(L('BINDING_REMOVED', self.actionName, kb.currentHeader))
Nenue@52 612 kb.currentProfile.bindings[key] = nil
Nenue@52 613 end
Nenue@52 614 if kb.currentProfile.talents[self.actionName] then
Nenue@52 615 kb.currentProfile.talents[self.actionName] = nil
Nenue@52 616 end
Nenue@52 617
Nenue@52 618 kb.bindings[tostring(self.actionType)..'_'..tostring(self.actionID)] = nil
Nenue@52 619 end
Nenue@52 620 if kb.currentProfile.bound[self.command] then
Nenue@52 621 kb.currentProfile.bound[self.command] = nil
Nenue@52 622 --kb:print(BINDING_REMOVED:format(self.actionName, configHeaders[db.bindMode]))
Nenue@52 623 end
Nenue@52 624
Nenue@52 625
Nenue@52 626 self.active = false
Nenue@52 627 kb.UpdateSlot(self, true)
Nenue@52 628 end
Nenue@52 629
Nenue@6 630 kb.AcceptAssignment = function(self, ...)
Nenue@6 631 local popup = StaticPopupDialogs["SKELETONKEY_CONFIRM_ASSIGN_SLOT"]
Nenue@30 632 local source = kb. loadedProfiles[popup.oldProfile]
Nenue@6 633 kb.SetSlot(popup.slot, unpack(popup.args))
Nenue@6 634 kb.UpdateSlot(popup.slot)
Nenue@6 635 kb:SetScript('OnMouseWheel', KeyBinder_OnMouseWheel) -- re-enable scrolling
Nenue@6 636 ClearCursor()
Nenue@6 637 ResetCursor()
Nenue@6 638 end
Nenue@52 639
Nenue@52 640 --- Add to blizzard interfaces
Nenue@52 641 StaticPopupDialogs["SKELETONKEY_CONFIRM_ASSIGN_SLOT"] = {
Nenue@52 642 text = "Confirm moving an assigned command.",
Nenue@52 643 button1 = OKAY,
Nenue@52 644 button2 = CANCEL,
Nenue@52 645 timeout = 0,
Nenue@52 646 whileDead = 1,
Nenue@52 647 showAlert = 1,
Nenue@52 648 OnAccept = kb.AcceptAssignment,
Nenue@52 649 OnCancel = function() kb:SetScript('OnMouseWheel', KeyBinder_OnMouseWheel) end
Nenue@52 650 }