Mercurial > wow > skeletonkey

annotate SkeletonKey/ActionTemplates.lua @ 67:ecd6c6116b9c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
make item bindings great again
author Nenue
date Sat, 10 Sep 2016 20:56:19 -0400
parents 41f367b832a2
children
rev   line source
Nenue@16 1 -- SkeletonKey
Nenue@27 2 -- ActionTemplates.lua
Nenue@16 3 -- Created: 7/29/2016 9:14 PM
Nenue@16 4 -- %file-revision%
Nenue@27 5 -- Code dealing with the implementation of action hotkeys
Nenue@27 6
Nenue@21 7 local tostring, tonumber, pairs, ipairs = tostring, tonumber, pairs, ipairs
Nenue@21 8 local unpack, SetBinding = unpack, SetBinding
Nenue@21 9 local tinsert, tContains, select, wipe = tinsert, tContains, select, table.wipe
Nenue@21 10 local GetSpellBookItemInfo, GetSpellBookItemName, GetSpellInfo = GetSpellBookItemInfo, GetSpellBookItemName, GetSpellInfo
Nenue@21 11 local GetSpecialization, GetSpecializationInfo, IsPassiveSpell, IsTalentSpell = GetSpecialization, GetSpecializationInfo, IsPassiveSpell, IsTalentSpell
Nenue@21 12 local PetHasSpellbook, PetHasActionBar, GetPetActionInfo, HasPetSpells = PetHasSpellbook, PetHasActionBar, GetPetActionInfo, HasPetSpells
Nenue@21 13 local GetProfessions, GetProfessionInfo, GetTalentInfo = GetProfessions, GetProfessionInfo, GetTalentInfo
Nenue@21 14 local GetNumBindings, GetBinding = GetNumBindings, GetBinding
Nenue@21 15
Nenue@21 16 local kb, print, wrap = LibStub('LibKraken').register(KeyBinder, 'Info')
Nenue@34 17 local cprint = (DEVIAN_PNAME == 'SkeletonKey') and function(...) _G.print('Cfg', ...) end or function() end
Nenue@16 18
Nenue@17 19 local CLICK_KEYBINDER_MACRO = "CLICK KeyBinderMacro:"
Nenue@17 20 local CLICK_KEYBINDER_KEY = "CLICK KeyBinderKey:"
Nenue@21 21 local PET_BASIC_SUBTEXT = 'Basic Attack'
Nenue@21 22 local PET_SPECIAL_SUBTEXT = 'Special Ability'
Nenue@16 23 local PETACTION_SCRIPT = {
Nenue@22 24 [PET_ACTION_MOVE_TO] = {'pet_move_to', SLASH_PET_MOVE_TO1},
Nenue@22 25 [PET_ACTION_ATTACK] = {'pet_attack', SLASH_PET_ATTACK1},
Nenue@22 26 [PET_ACTION_FOLLOW] = {'pet_follow', SLASH_PET_FOLLOW1},
Nenue@22 27 [PET_ACTION_WAIT] = {'pet_stay', SLASH_PET_STAY1 },
Nenue@22 28 [PET_MODE_AGGRESSIVE] = {'pet_aggressive', SLASH_PET_AGGRESSIVE1 },
Nenue@22 29 [PET_MODE_DEFENSIVE] = { 'pet_defensive', SLASH_PET_DEFENSIVE1},
Nenue@22 30 [PET_MODE_PASSIVE] = { 'pet_passive', SLASH_PET_PASSIVE1},
Nenue@22 31 [PET_MODE_ASSIST] = {'pet_assist', SLASH_PET_ASSIST1},
Nenue@16 32 }
Nenue@21 33 local SECONDARY_PROFESSIONS = {
Nenue@21 34 [5] = 3,
Nenue@21 35 [7] = 4,
Nenue@21 36 [9] = 5,
Nenue@21 37 [10] = 6
Nenue@21 38 }
Nenue@54 39 local petSpellCache,petSubtextCache
Nenue@21 40 local SUMMON_RANDOM_FAVORITE_MOUNT_SPELL = 150544
Nenue@16 41
Nenue@27 42 --kb.ChangedBindings = {}
Nenue@27 43 --kb.ActionTypes = {}
Nenue@19 44
Nenue@19 45 local atype = kb.ActionTypes
Nenue@19 46
Nenue@17 47 --- Caps Lock
Nenue@19 48 atype['mount'] = function(id, name)
Nenue@17 49 if id == SUMMON_RANDOM_FAVORITE_MOUNT_SPELL then
Nenue@24 50 return CLICK_KEYBINDER_MACRO, 'mount_random', "/script C_MountJournal.SummonByID(0)"
Nenue@17 51 else
Nenue@24 52 return CLICK_KEYBINDER_MACRO, 'mount_'..id, "/script C_MountJournal.SummonByID("..id..")"
Nenue@17 53 end
Nenue@16 54 end
Nenue@19 55
Nenue@19 56 atype['macro'] = function(id, name)
Nenue@17 57 return CLICK_KEYBINDER_MACRO, 'macro_' .. tostring(name), id
Nenue@17 58 end
Nenue@19 59
Nenue@19 60 atype['equipset'] = function(id, name)
Nenue@17 61 return CLICK_KEYBINDER_MACRO, 'equipset_'..tostring(name), "/script UseEquipmentSet("..tostring(id)..")"
Nenue@17 62 end
Nenue@19 63
Nenue@19 64 atype['spell'] = function(id, name)
Nenue@17 65 local attributeName = name
Nenue@17 66 if kb.ProfessionCache[id] then
Nenue@17 67 attributeName = "profession_".. kb.ProfessionCache[id].profOffset .. '_' .. kb.ProfessionCache[id].spellNum
Nenue@17 68 end
Nenue@17 69 return CLICK_KEYBINDER_KEY, attributeName, name
Nenue@17 70 end
Nenue@19 71
Nenue@19 72 atype['petaction'] = function(_, name)
Nenue@17 73 -- ID doesn't exist for basic commands, even though they can be picked up
Nenue@17 74 local attributeName, attributeValue = "petaction_" .. tostring(name), "/cast "..tostring(name)
Nenue@54 75
Nenue@54 76 if not petSpellCache then
Nenue@54 77 kb.UpdatePetInfo()
Nenue@54 78 end
Nenue@54 79 -- Compose a multi-macro for subtext abilities
Nenue@54 80 if petSpellCache[name] then
Nenue@54 81 attributeValue = ""
Nenue@54 82 for spellName, enabled in pairs(petSubtextCache[petSpellCache[name]]) do
Nenue@54 83 attributeValue = attributeValue .. "/cast " .. spellName .. "\n"
Nenue@54 84 end
Nenue@54 85 end
Nenue@54 86
Nenue@17 87 if PETACTION_SCRIPT[name] then
Nenue@22 88 attributeName, attributeValue = unpack(PETACTION_SCRIPT[name])
Nenue@19 89 elseif kb.PetCache.special[name] then
Nenue@21 90 attributeName = "petaction_"..kb.PetCache.special[name][3].."_" .. tonumber(kb.PetCache.special[name][6])
Nenue@17 91 end
Nenue@17 92 return CLICK_KEYBINDER_MACRO, attributeName, attributeValue
Nenue@16 93 end
Nenue@16 94
Nenue@19 95 atype['battlepet'] = function(id, name)
Nenue@17 96 return CLICK_KEYBINDER_MACRO, 'battlepet_' .. tostring(name), SLASH_SUMMON_BATTLE_PET1 .. " " .. tostring(name)
Nenue@17 97 end
Nenue@19 98
Nenue@19 99 atype['item'] = function(id, name)
Nenue@67 100 return CLICK_KEYBINDER_KEY, tostring(name), id
Nenue@17 101 end
Nenue@16 102
Nenue@16 103
Nenue@17 104 --- Resolves the SecureActionButton attribute names used for the given action
Nenue@16 105 kb.RegisterAction = function(actionType, id, name)
Nenue@19 106 assert(atype[actionType], 'Missing actionType handler for `'..tostring(actionType)..'`')
Nenue@19 107 local target, attributeName, attributeValue = atype[actionType](id, name)
Nenue@17 108 local command = target .. attributeName
Nenue@17 109 kb.macros[attributeName] = {attributeValue, command}
Nenue@17 110 return attributeName, attributeValue, command
Nenue@17 111 end
Nenue@17 112
Nenue@17 113
Nenue@17 114
Nenue@17 115
Nenue@17 116 kb.ApplyTalentBinding = function(talentInfo, cache)
Nenue@17 117 for i = 5, #talentInfo do
Nenue@17 118 local command = CLICK_KEYBINDER_KEY.. talentInfo[2]
Nenue@17 119 SetBinding(talentInfo[i], command)
Nenue@62 120 --cprint(' **', talentInfo[i], '->', command)
Nenue@17 121 tinsert(cache, talentInfo[i])
Nenue@17 122 end
Nenue@17 123 end
Nenue@17 124 kb.CacheTalentBinding = function(talentInfo, cache)
Nenue@17 125
Nenue@17 126 local spellID = talentInfo[4]
Nenue@19 127 cache[spellID] = cache[spellID] or {}
Nenue@19 128 cache[spellID] = {select(5,unpack(talentInfo)) }
Nenue@19 129 --cprint(spellID, unpack(kb.TalentBindings[spellID]))
Nenue@17 130 end
Nenue@17 131
Nenue@27 132
Nenue@17 133 do
Nenue@63 134 local commandActions = {}
Nenue@17 135 local bindings = kb.bindings
Nenue@17 136 local key, macro = KeyBinderKey, KeyBinderMacro
Nenue@17 137 kb.LoadBinding = function(command, name, icon, actionType, actionID, macroName, macroText )
Nenue@17 138
Nenue@63 139 local indexKey = actionType..'_'..actionID
Nenue@67 140 local buttonTypeSuffix, buttonType = name, actionType
Nenue@67 141 local actionKey, actionValue = "*"..actionType.."-"..name, actionID
Nenue@62 142 local button = key
Nenue@17 143 if actionType == 'spell' then
Nenue@67 144 buttonTypeSuffix = name
Nenue@67 145 buttonType = actionType
Nenue@67 146 actionValue = name
Nenue@17 147 elseif actionType == 'item' then
Nenue@67 148 buttonTypeSuffix = name
Nenue@67 149 buttonType = actionType
Nenue@67 150 actionValue = name
Nenue@16 151 else
Nenue@62 152 button = macro
Nenue@67 153 buttonTypeSuffix = macroName
Nenue@67 154 buttonType = 'macro'
Nenue@67 155 if actionType == 'macro' then
Nenue@67 156 actionKey = "*macro-" .. macroName
Nenue@67 157 actionValue = name
Nenue@67 158 else
Nenue@67 159 actionKey = '*macrotext-'..macroName
Nenue@67 160 actionValue = macroText
Nenue@67 161 end
Nenue@16 162 end
Nenue@62 163
Nenue@67 164 kb.SecureAttribute(button, "*type-"..buttonTypeSuffix, buttonType)
Nenue@67 165 kb.SecureAttribute(button, actionKey, actionValue)
Nenue@62 166
Nenue@63 167 kb.bindings[indexKey] = kb.bindings[indexKey] or {}
Nenue@63 168 kb.bindings[command] = kb.bindings[indexKey]
Nenue@63 169 commandActions[command] = indexKey
Nenue@50 170 return bindings[indexKey], actionID
Nenue@16 171 end
Nenue@16 172
Nenue@17 173 kb.ApplyBindings = function (profile)
Nenue@62 174 --cprint('binding profile', profile)
Nenue@63 175
Nenue@17 176 for slot, data in pairs(profile.buttons) do
Nenue@63 177 local bindsTable, actionID = kb.LoadBinding(unpack(data))
Nenue@63 178 local command = data[1]
Nenue@17 179 end
Nenue@17 180
Nenue@17 181 for key, command in pairs(profile.bindings) do
Nenue@63 182 cprint('|cFF00FFFF'.. key .. '|r to|cFF00FF00', command, commandActions[command])
Nenue@17 183 SetBinding(key, command)
Nenue@64 184 if kb.bindings[command] and not tContains(kb.bindings[command], key) then
Nenue@63 185 tinsert(kb.bindings[command], key)
Nenue@17 186 end
Nenue@17 187 end
Nenue@17 188
Nenue@17 189 for spellName, talentInfo in pairs(profile.talents) do
Nenue@17 190 local dummy = GetSpellInfo(spellName)
Nenue@17 191 local func = kb.CacheTalentBinding
Nenue@19 192 local dest = kb.TalentBindings
Nenue@17 193 if dummy then
Nenue@62 194 --cprint('|cFFBBFF00Active:|r', dummy)
Nenue@17 195 local macroName, spellName, actionType, actionID = unpack(talentInfo)
Nenue@50 196 local indexKey = actionType .. '_' .. actionID
Nenue@63 197 kb.bindings[indexKey] = {}
Nenue@17 198 func = kb.ApplyTalentBinding
Nenue@50 199 dest = kb.bindings[indexKey]
Nenue@17 200 else
Nenue@17 201
Nenue@62 202 --cprint('|cFFFF4400Inactive:|r', talentInfo[2])
Nenue@17 203 end
Nenue@17 204 func(talentInfo, dest)
Nenue@17 205 end
Nenue@17 206
Nenue@17 207 end
Nenue@17 208
Nenue@17 209 kb.ApplyAllBindings =function ()
Nenue@21 210 wipe(kb.TalentBindings)
Nenue@62 211 wipe(kb.bindings)
Nenue@63 212 --kb:print('Loading binding profile', kb.profileName)
Nenue@17 213
Nenue@17 214 -- reflect action key settings
Nenue@17 215 if GetCVarBool("ActionButtonUseKeyDown") then
Nenue@17 216 KeyBinderMacro:RegisterForClicks("AnyDown")
Nenue@17 217 KeyBinderKey:RegisterForClicks("AnyDown")
Nenue@17 218 else
Nenue@17 219 KeyBinderMacro:RegisterForClicks("AnyUp")
Nenue@17 220 KeyBinderKey:RegisterForClicks("AnyUp")
Nenue@17 221 end
Nenue@17 222
Nenue@17 223 for i, profile in ipairs(kb.orderedProfiles) do
Nenue@17 224 kb.ApplyBindings(profile)
Nenue@17 225 end
Nenue@17 226 -- do this after to ensure that profession binds are properly overridden
Nenue@17 227 kb.UpdateProfessionInfo()
Nenue@17 228
Nenue@17 229 SaveBindings(GetCurrentBindingSet())
Nenue@17 230 end
Nenue@19 231 end
Nenue@19 232
Nenue@19 233
Nenue@19 234 kb.specInfo = {}
Nenue@19 235 kb.UpdateSpecInfo = function()
Nenue@19 236 kb.specInfo.id = GetSpecialization()
Nenue@19 237 kb.specInfo.globalID, kb.specInfo.name, kb.specInfo.desc, kb.specInfo.texture = GetSpecializationInfo(kb.specInfo.id)
Nenue@19 238 end
Nenue@19 239
Nenue@63 240 kb.UpdateMacroInfo = function()
Nenue@64 241 for index = 1, GetNumMacros() do
Nenue@63 242 local name = GetMacroInfo(index)
Nenue@65 243 kb.SecureAttribute(KeyBinderMacro, "*type-macro_"..tostring(name), 'macro')
Nenue@66 244 kb.SecureAttribute(KeyBinderMacro, "*macro-macro_"..tostring(name), index)
Nenue@63 245 end
Nenue@63 246 end
Nenue@63 247
Nenue@19 248 kb.UpdateTalentInfo = function()
Nenue@19 249 if kb.talentsPushed then
Nenue@19 250 return
Nenue@19 251 end
Nenue@21 252 wipe(kb.TalentCache)
Nenue@19 253 for row =1, MAX_TALENT_TIERS do
Nenue@19 254 for col = 1, NUM_TALENT_COLUMNS do
Nenue@19 255 local talentID, talentName, icon, selected, available, spellID = GetTalentInfo(row, col, 1)
Nenue@19 256 local talentInfo = kb.TalentCache[spellID] or {}
Nenue@19 257 talentInfo.row = 1
Nenue@19 258 talentInfo.col = col
Nenue@19 259 talentInfo.name = talentName
Nenue@19 260 talentInfo.talentID = talentID
Nenue@19 261 talentInfo.selected = selected
Nenue@19 262 talentInfo.available = available
Nenue@19 263 talentInfo.spellID = spellID
Nenue@19 264 kb.TalentCache[spellID] = talentInfo
Nenue@19 265 kb.TalentCache[talentName] = talentInfo
Nenue@62 266 --print('Talent ', row, col, spellID, talentName)
Nenue@19 267 end
Nenue@19 268 end
Nenue@19 269 kb.talentsPushed = true
Nenue@19 270
Nenue@19 271 kb.UpdateDynamicButtons('talent')
Nenue@19 272 end
Nenue@19 273
Nenue@19 274 kb.UpdateProfessionInfo = function()
Nenue@21 275 wipe(kb.ProfessionCache)
Nenue@19 276 local profs = {GetProfessions() }
Nenue@62 277 --print(GetProfessions())
Nenue@19 278 local primaryNum = 0
Nenue@30 279 for i = 1, 6 do
Nenue@30 280 if profs[i] then
Nenue@30 281 local index = profs[i]
Nenue@30 282 local profName, texture, _, _, numSpells, spellOffset = GetProfessionInfo(index)
Nenue@62 283 --print(i, index, profName, numSpells, spellOffset)
Nenue@30 284 if not SECONDARY_PROFESSIONS[index] then
Nenue@30 285 primaryNum = primaryNum + 1
Nenue@30 286 end
Nenue@30 287 local profNum = SECONDARY_PROFESSIONS[index] or primaryNum
Nenue@62 288 --print(i, profNum)
Nenue@19 289
Nenue@19 290
Nenue@30 291 kb.ProfessionCache[profNum] = kb.ProfessionCache[profNum] or {}
Nenue@19 292
Nenue@30 293 for j = 1, numSpells do
Nenue@30 294 local spellName, _, icon, _, _, _, spellID = GetSpellInfo(spellOffset+j, BOOKTYPE_PROFESSION)
Nenue@19 295
Nenue@30 296 local profInfo = {
Nenue@30 297 spellName = spellName,
Nenue@30 298 spellID = spellID,
Nenue@30 299 icon = icon,
Nenue@30 300 profOffset = i,
Nenue@30 301 profIndex = index,
Nenue@30 302 spellOffset = (spellOffset+j),
Nenue@30 303 spellNum = j
Nenue@30 304 }
Nenue@26 305
Nenue@30 306 kb.SecureAttribute(KeyBinderKey, "*type-profession_"..i .. '_' ..j, "spell")
Nenue@30 307 kb.SecureAttribute(KeyBinderKey, "*spell-profession_"..i .. '_' ..j, spellName)
Nenue@19 308
Nenue@30 309 kb.ProfessionCache[i .. '_' .. j] = profInfo
Nenue@30 310 kb.ProfessionCache[spellName] = profInfo
Nenue@30 311 kb.ProfessionCache[spellID] = profInfo
Nenue@62 312 --print(' |cFF0088FF['..i..']|r|cFFFF44BB['..spellOffset+i..']|r', spellName, "profession_"..i .. '_' ..j)
Nenue@30 313 end
Nenue@19 314 end
Nenue@19 315
Nenue@19 316 end
Nenue@19 317
Nenue@19 318 kb.UpdateDynamicButtons('profession')
Nenue@19 319 end
Nenue@19 320
Nenue@19 321
Nenue@19 322
Nenue@19 323 kb.UpdatePetInfo = function()
Nenue@19 324 local hasPetSpells, petType = HasPetSpells()
Nenue@34 325
Nenue@56 326 -- reconcile saved data if it becomes available
Nenue@56 327 if kb.db then
Nenue@56 328 kb.db.petSpellsDB = kb.db.petSpellsDB or {}
Nenue@56 329 kb.db.petSpellsDB.subtext = kb.db.petSpellsDB.subtext or {}
Nenue@56 330 kb.db.petSpellsDB.spell = kb.db.petSpellsDB.spell or {}
Nenue@56 331 local spellCache = kb.db.petSpellsDB.spell
Nenue@56 332 local subtextCache = kb.db.petSpellsDB.subtext
Nenue@56 333 if petSpellCache then
Nenue@56 334 for k,v in pairs(petSpellCache) do
Nenue@56 335 if not spellCache[k] then
Nenue@56 336 spellCache[k] = v
Nenue@56 337 end
Nenue@56 338 end
Nenue@56 339 end
Nenue@57 340 petSpellCache = spellCache
Nenue@56 341 if petSubtextCache then
Nenue@56 342 for k,v in pairs(petSubtextCache) do
Nenue@56 343 if not subtextCache[k] then
Nenue@56 344 subtextCache[k] = v
Nenue@56 345 end
Nenue@56 346 end
Nenue@56 347 end
Nenue@57 348 petSubtextCache = subtextCache
Nenue@56 349 else
Nenue@56 350 petSpellCache = {}
Nenue@56 351 petSubtextCache = {}
Nenue@56 352 end
Nenue@54 353
Nenue@19 354 if PetHasSpellbook() then
Nenue@62 355 --print('PET SPELLBOOK')
Nenue@19 356 local i = 1
Nenue@21 357 local specialNum = {}
Nenue@19 358 repeat
Nenue@19 359
Nenue@19 360 local spellType, spellID = GetSpellBookItemInfo(i, BOOKTYPE_PET)
Nenue@19 361 local spellName, subText = GetSpellBookItemName(i, BOOKTYPE_PET)
Nenue@21 362 local texture = GetSpellBookItemTexture(i, BOOKTYPE_PET)
Nenue@19 363 local isPassive = IsPassiveSpell(i, BOOKTYPE_PET)
Nenue@19 364 if not isPassive then
Nenue@19 365 if spellName then
Nenue@21 366 kb.PetCache.spellslot[spellName] = {i, spellName, subText, spellID, texture}
Nenue@62 367 --print('|cFF00FF88spellslot['..spellName..']|r', '=>', i, subText)
Nenue@19 368
Nenue@21 369 if subText then
Nenue@34 370 -- make sure that pet specialization subtext maps correctly
Nenue@34 371 --if match(subText, kb.PetCache.specName) then
Nenue@34 372 -- subText = 'specialization'
Nenue@34 373 --end
Nenue@21 374 kb.PetCache.subtext[subText] = kb.PetCache.subtext[subText] or {}
Nenue@21 375 specialNum[subText] = (specialNum[subText] or 0) + 1
Nenue@21 376
Nenue@54 377 petSpellCache[spellName] = subText
Nenue@54 378 petSubtextCache[subText] = petSubtextCache[subText] or {}
Nenue@54 379
Nenue@54 380 -- add to the list
Nenue@54 381 if not petSubtextCache[subText][spellName] then
Nenue@54 382 petSubtextCache[subText][spellName] = true
Nenue@54 383
Nenue@54 384 local macrotext = ""
Nenue@54 385 for spellName, enabled in pairs(petSubtextCache[subText]) do
Nenue@54 386 macrotext = macrotext .. "/cast " .. spellName .. "\n"
Nenue@54 387 end
Nenue@54 388 kb.SecureAttribute(KeyBinderMacro, "*macrotext-petaction_"..subText.."_"..specialNum[subText], macrotext)
Nenue@62 389 --print('|cFF00FFFFspecial['..spellName..']|r', '\n','|cFF00FFFFsubtext['..subText..']['..specialNum[subText]..']|r', '=>', i, spellName, subText, spellID, texture, specialNum[subText])
Nenue@54 390 end
Nenue@54 391
Nenue@54 392
Nenue@54 393
Nenue@21 394 local entry = {i, spellName, subText, spellID, texture, specialNum[subText]}
Nenue@21 395
Nenue@21 396 kb.PetCache.special[spellName] = entry
Nenue@21 397 kb.PetCache.subtext[subText][specialNum[subText]] = entry
Nenue@19 398 end
Nenue@19 399
Nenue@19 400 if spellID then
Nenue@19 401 kb.PetCache.spell[i] = {spellID, spellName, subText}
Nenue@62 402 --print('|cFF0088FFspell['..i..']|r', '=>', spellID, spellName, subText)
Nenue@19 403 end
Nenue@19 404 end
Nenue@19 405
Nenue@19 406
Nenue@19 407 end
Nenue@19 408
Nenue@19 409 i = i + 1
Nenue@19 410 until spellType == nil
Nenue@19 411 else
Nenue@62 412 --print('NO PET SPELLBOOK')
Nenue@21 413 wipe(kb.PetCache.spell)
Nenue@21 414 wipe(kb.PetCache.spellslot)
Nenue@19 415 end
Nenue@19 416
Nenue@19 417 if PetHasActionBar() then
Nenue@62 418 --print('PET ACTION BAR')
Nenue@19 419 for i = 1, 10 do
Nenue@19 420
Nenue@19 421
Nenue@19 422 local name, subtext, texture, isToken, isActive = GetPetActionInfo(i)
Nenue@19 423 if name then
Nenue@19 424 kb.PetCache.action[i] = {name, subtext, texture, isToken, isActive }
Nenue@19 425
Nenue@19 426
Nenue@19 427 end
Nenue@62 428 --print('|cFFFFFF00action['..i..']|r', name, subtext, texture)
Nenue@19 429 end
Nenue@19 430 else
Nenue@62 431 --print('NO PET ACTION BAR')
Nenue@21 432 wipe(kb.PetCache.action)
Nenue@19 433 end
Nenue@19 434
Nenue@19 435 kb.UpdateDynamicButtons('petaction')
Nenue@19 436
Nenue@19 437 end
Nenue@19 438
Nenue@19 439 kb.UpdateSystemBinds = function()
Nenue@21 440 wipe(kb.SystemBindings)
Nenue@19 441 local n = GetNumBindings()
Nenue@19 442 for i=1, n do
Nenue@19 443 local command, key1, key2 = GetBinding(i)
Nenue@34 444 if not command:match('ACTION.*%d+') then
Nenue@34 445 if key1 then
Nenue@34 446 kb.SystemBindings[key1] = command
Nenue@34 447 end
Nenue@34 448 if key2 then
Nenue@34 449 kb.SystemBindings[key2] = command
Nenue@34 450 end
Nenue@34 451 else
Nenue@62 452 --print('ignoring action button binding', command)
Nenue@19 453 end
Nenue@19 454 end
Nenue@19 455 end
Nenue@19 456
Nenue@19 457 kb.UpdateDynamicButtons = function(dynamicType)
Nenue@19 458 for i, button in ipairs(kb.buttons) do
Nenue@19 459 if button.isDynamic == dynamicType then
Nenue@19 460 kb.UpdateSlot(button, true)
Nenue@19 461 end
Nenue@19 462 end
Nenue@26 463 end
Nenue@26 464
Nenue@26 465 kb.pendingAttributes = {}
Nenue@26 466 kb.SecureAttribute = function(target, name, value)
Nenue@26 467 if InCombatLockdown() then
Nenue@34 468 if #kb.pendingAttributes == 0 then
Nenue@49 469 kb:print(kb.L('Key bindings will be applied when you exit combat.'))
Nenue@34 470 end
Nenue@34 471
Nenue@26 472 tinsert(kb.pendingAttributes, {target, name, value})
Nenue@26 473 kb:RegisterEvent('PLAYER_REGEN_ENABLED')
Nenue@34 474
Nenue@26 475 else
Nenue@26 476
Nenue@63 477 cprint('|cFFFF4444' .. target:GetName()..'|r.|cFFFFFF00'.. tostring(name)..'|r = "'..tostring(value)..'"')
Nenue@26 478 target:SetAttribute(name, value)
Nenue@26 479 end
Nenue@26 480 end
Nenue@26 481
Nenue@26 482 kb.PLAYER_REGEN_ENABLED = function()
Nenue@26 483 if #kb.pendingAttributes >= 1 then
Nenue@26 484 local args = tremove(kb.pendingAttributes)
Nenue@26 485 while args do
Nenue@26 486 local target, name, value = unpack(args)
Nenue@62 487 --print(target:GetName(), 'attribute', '"'.. tostring(name)..'" = "'..tostring(value)..'"')
Nenue@63 488 cprint('deferred', target:GetName(), 'attribute', '"'.. tostring(name)..'" = "'..tostring(value)..'"')
Nenue@26 489 target:SetAttribute(name, value)
Nenue@26 490 args = tremove(kb.pendingAttributes)
Nenue@26 491 end
Nenue@26 492 end
Nenue@27 493
Nenue@27 494 if #kb.pendingCalls >= 1 then
Nenue@27 495
Nenue@27 496 local func = tremove(kb.pendingCalls)
Nenue@27 497 while func do
Nenue@27 498 func()
Nenue@27 499 end
Nenue@27 500 end
Nenue@27 501 end
Nenue@27 502
Nenue@27 503 kb.UpdateBindingsCache = function(actionType, actionID, bindings)
Nenue@50 504 local indexKey = actionType .. '_' .. actionID
Nenue@50 505 kb.bindings[indexKey] = bindings
Nenue@27 506
Nenue@62 507 --print('|cFF00FF00'..indexKey..'|r = {', table.concat(bindings,', '), '}')
Nenue@27 508 tinsert(kb.ChangedBindings, {actionType, actionID})
Nenue@16 509 end