Mercurial > wow > skeletonkey

annotate SkeletonKey/ActionTemplates.lua @ 66:41f367b832a2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
SecureTemplate attribute names and values match up with reality
author Nenue
date Sat, 10 Sep 2016 20:39:53 -0400
parents 556e075983a6
children ecd6c6116b9c
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@17 100 return CLICK_KEYBINDER_KEY, 'item_' .. 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@62 140 local buttonTypeKey, buttonTypeValue = "*type-"..name, actionType
Nenue@62 141 local buttonActionKey, buttonActionValue = "*"..actionType.."-"..name, actionID
Nenue@62 142 local button = key
Nenue@17 143 if actionType == 'spell' then
Nenue@66 144 buttonTypeKey = name
Nenue@62 145 buttonTypeValue = actionType
Nenue@62 146 buttonActionKey = "*"..actionType.."-"..name
Nenue@62 147 buttonActionValue = name
Nenue@17 148 elseif actionType == 'item' then
Nenue@66 149 buttonTypeKey = name
Nenue@62 150 buttonTypeValue = actionType
Nenue@62 151 buttonActionKey = "*"..actionType.."-"..name
Nenue@62 152 buttonActionValue = actionID
Nenue@17 153 elseif actionType == 'macro' then
Nenue@62 154 button = macro
Nenue@66 155 buttonTypeKey = macroName
Nenue@66 156 buttonTypeValue = "macro"
Nenue@66 157 buttonActionKey = "*macro-" .. macroName
Nenue@66 158 buttonActionValue = name
Nenue@16 159 else
Nenue@62 160 button = macro
Nenue@66 161 buttonTypeKey = macroName
Nenue@62 162 buttonTypeValue = macroText
Nenue@62 163 buttonActionKey = nil
Nenue@16 164 end
Nenue@62 165
Nenue@62 166 --cprint(actionType, actionID, name)
Nenue@66 167 kb.SecureAttribute(button, "*type-"..buttonTypeKey, buttonTypeValue)
Nenue@62 168 if buttonActionKey then
Nenue@62 169 --cprint(button:GetName(), buttonActionKey,'=', buttonActionValue)
Nenue@62 170 kb.SecureAttribute(button, buttonActionKey, buttonActionValue)
Nenue@62 171 end
Nenue@62 172
Nenue@63 173 kb.bindings[indexKey] = kb.bindings[indexKey] or {}
Nenue@63 174 kb.bindings[command] = kb.bindings[indexKey]
Nenue@63 175 commandActions[command] = indexKey
Nenue@50 176 return bindings[indexKey], actionID
Nenue@16 177 end
Nenue@16 178
Nenue@17 179 kb.ApplyBindings = function (profile)
Nenue@62 180 --cprint('binding profile', profile)
Nenue@63 181
Nenue@17 182 for slot, data in pairs(profile.buttons) do
Nenue@63 183 local bindsTable, actionID = kb.LoadBinding(unpack(data))
Nenue@63 184 local command = data[1]
Nenue@17 185 end
Nenue@17 186
Nenue@17 187 for key, command in pairs(profile.bindings) do
Nenue@63 188 cprint('|cFF00FFFF'.. key .. '|r to|cFF00FF00', command, commandActions[command])
Nenue@17 189 SetBinding(key, command)
Nenue@64 190 if kb.bindings[command] and not tContains(kb.bindings[command], key) then
Nenue@63 191 tinsert(kb.bindings[command], key)
Nenue@17 192 end
Nenue@17 193 end
Nenue@17 194
Nenue@17 195 for spellName, talentInfo in pairs(profile.talents) do
Nenue@17 196 local dummy = GetSpellInfo(spellName)
Nenue@17 197 local func = kb.CacheTalentBinding
Nenue@19 198 local dest = kb.TalentBindings
Nenue@17 199 if dummy then
Nenue@62 200 --cprint('|cFFBBFF00Active:|r', dummy)
Nenue@17 201 local macroName, spellName, actionType, actionID = unpack(talentInfo)
Nenue@50 202 local indexKey = actionType .. '_' .. actionID
Nenue@63 203 kb.bindings[indexKey] = {}
Nenue@17 204 func = kb.ApplyTalentBinding
Nenue@50 205 dest = kb.bindings[indexKey]
Nenue@17 206 else
Nenue@17 207
Nenue@62 208 --cprint('|cFFFF4400Inactive:|r', talentInfo[2])
Nenue@17 209 end
Nenue@17 210 func(talentInfo, dest)
Nenue@17 211 end
Nenue@17 212
Nenue@17 213 end
Nenue@17 214
Nenue@17 215 kb.ApplyAllBindings =function ()
Nenue@21 216 wipe(kb.TalentBindings)
Nenue@62 217 wipe(kb.bindings)
Nenue@63 218 --kb:print('Loading binding profile', kb.profileName)
Nenue@17 219
Nenue@17 220 -- reflect action key settings
Nenue@17 221 if GetCVarBool("ActionButtonUseKeyDown") then
Nenue@17 222 KeyBinderMacro:RegisterForClicks("AnyDown")
Nenue@17 223 KeyBinderKey:RegisterForClicks("AnyDown")
Nenue@17 224 else
Nenue@17 225 KeyBinderMacro:RegisterForClicks("AnyUp")
Nenue@17 226 KeyBinderKey:RegisterForClicks("AnyUp")
Nenue@17 227 end
Nenue@17 228
Nenue@17 229 for i, profile in ipairs(kb.orderedProfiles) do
Nenue@17 230 kb.ApplyBindings(profile)
Nenue@17 231 end
Nenue@17 232 -- do this after to ensure that profession binds are properly overridden
Nenue@17 233 kb.UpdateProfessionInfo()
Nenue@17 234
Nenue@17 235 SaveBindings(GetCurrentBindingSet())
Nenue@17 236 end
Nenue@19 237 end
Nenue@19 238
Nenue@19 239
Nenue@19 240 kb.specInfo = {}
Nenue@19 241 kb.UpdateSpecInfo = function()
Nenue@19 242 kb.specInfo.id = GetSpecialization()
Nenue@19 243 kb.specInfo.globalID, kb.specInfo.name, kb.specInfo.desc, kb.specInfo.texture = GetSpecializationInfo(kb.specInfo.id)
Nenue@19 244 end
Nenue@19 245
Nenue@63 246 kb.UpdateMacroInfo = function()
Nenue@64 247 for index = 1, GetNumMacros() do
Nenue@63 248 local name = GetMacroInfo(index)
Nenue@65 249 kb.SecureAttribute(KeyBinderMacro, "*type-macro_"..tostring(name), 'macro')
Nenue@66 250 kb.SecureAttribute(KeyBinderMacro, "*macro-macro_"..tostring(name), index)
Nenue@63 251 end
Nenue@63 252 end
Nenue@63 253
Nenue@19 254 kb.UpdateTalentInfo = function()
Nenue@19 255 if kb.talentsPushed then
Nenue@19 256 return
Nenue@19 257 end
Nenue@21 258 wipe(kb.TalentCache)
Nenue@19 259 for row =1, MAX_TALENT_TIERS do
Nenue@19 260 for col = 1, NUM_TALENT_COLUMNS do
Nenue@19 261 local talentID, talentName, icon, selected, available, spellID = GetTalentInfo(row, col, 1)
Nenue@19 262 local talentInfo = kb.TalentCache[spellID] or {}
Nenue@19 263 talentInfo.row = 1
Nenue@19 264 talentInfo.col = col
Nenue@19 265 talentInfo.name = talentName
Nenue@19 266 talentInfo.talentID = talentID
Nenue@19 267 talentInfo.selected = selected
Nenue@19 268 talentInfo.available = available
Nenue@19 269 talentInfo.spellID = spellID
Nenue@19 270 kb.TalentCache[spellID] = talentInfo
Nenue@19 271 kb.TalentCache[talentName] = talentInfo
Nenue@62 272 --print('Talent ', row, col, spellID, talentName)
Nenue@19 273 end
Nenue@19 274 end
Nenue@19 275 kb.talentsPushed = true
Nenue@19 276
Nenue@19 277 kb.UpdateDynamicButtons('talent')
Nenue@19 278 end
Nenue@19 279
Nenue@19 280 kb.UpdateProfessionInfo = function()
Nenue@21 281 wipe(kb.ProfessionCache)
Nenue@19 282 local profs = {GetProfessions() }
Nenue@62 283 --print(GetProfessions())
Nenue@19 284 local primaryNum = 0
Nenue@30 285 for i = 1, 6 do
Nenue@30 286 if profs[i] then
Nenue@30 287 local index = profs[i]
Nenue@30 288 local profName, texture, _, _, numSpells, spellOffset = GetProfessionInfo(index)
Nenue@62 289 --print(i, index, profName, numSpells, spellOffset)
Nenue@30 290 if not SECONDARY_PROFESSIONS[index] then
Nenue@30 291 primaryNum = primaryNum + 1
Nenue@30 292 end
Nenue@30 293 local profNum = SECONDARY_PROFESSIONS[index] or primaryNum
Nenue@62 294 --print(i, profNum)
Nenue@19 295
Nenue@19 296
Nenue@30 297 kb.ProfessionCache[profNum] = kb.ProfessionCache[profNum] or {}
Nenue@19 298
Nenue@30 299 for j = 1, numSpells do
Nenue@30 300 local spellName, _, icon, _, _, _, spellID = GetSpellInfo(spellOffset+j, BOOKTYPE_PROFESSION)
Nenue@19 301
Nenue@30 302 local profInfo = {
Nenue@30 303 spellName = spellName,
Nenue@30 304 spellID = spellID,
Nenue@30 305 icon = icon,
Nenue@30 306 profOffset = i,
Nenue@30 307 profIndex = index,
Nenue@30 308 spellOffset = (spellOffset+j),
Nenue@30 309 spellNum = j
Nenue@30 310 }
Nenue@26 311
Nenue@30 312 kb.SecureAttribute(KeyBinderKey, "*type-profession_"..i .. '_' ..j, "spell")
Nenue@30 313 kb.SecureAttribute(KeyBinderKey, "*spell-profession_"..i .. '_' ..j, spellName)
Nenue@19 314
Nenue@30 315 kb.ProfessionCache[i .. '_' .. j] = profInfo
Nenue@30 316 kb.ProfessionCache[spellName] = profInfo
Nenue@30 317 kb.ProfessionCache[spellID] = profInfo
Nenue@62 318 --print(' |cFF0088FF['..i..']|r|cFFFF44BB['..spellOffset+i..']|r', spellName, "profession_"..i .. '_' ..j)
Nenue@30 319 end
Nenue@19 320 end
Nenue@19 321
Nenue@19 322 end
Nenue@19 323
Nenue@19 324 kb.UpdateDynamicButtons('profession')
Nenue@19 325 end
Nenue@19 326
Nenue@19 327
Nenue@19 328
Nenue@19 329 kb.UpdatePetInfo = function()
Nenue@19 330 local hasPetSpells, petType = HasPetSpells()
Nenue@34 331
Nenue@56 332 -- reconcile saved data if it becomes available
Nenue@56 333 if kb.db then
Nenue@56 334 kb.db.petSpellsDB = kb.db.petSpellsDB or {}
Nenue@56 335 kb.db.petSpellsDB.subtext = kb.db.petSpellsDB.subtext or {}
Nenue@56 336 kb.db.petSpellsDB.spell = kb.db.petSpellsDB.spell or {}
Nenue@56 337 local spellCache = kb.db.petSpellsDB.spell
Nenue@56 338 local subtextCache = kb.db.petSpellsDB.subtext
Nenue@56 339 if petSpellCache then
Nenue@56 340 for k,v in pairs(petSpellCache) do
Nenue@56 341 if not spellCache[k] then
Nenue@56 342 spellCache[k] = v
Nenue@56 343 end
Nenue@56 344 end
Nenue@56 345 end
Nenue@57 346 petSpellCache = spellCache
Nenue@56 347 if petSubtextCache then
Nenue@56 348 for k,v in pairs(petSubtextCache) do
Nenue@56 349 if not subtextCache[k] then
Nenue@56 350 subtextCache[k] = v
Nenue@56 351 end
Nenue@56 352 end
Nenue@56 353 end
Nenue@57 354 petSubtextCache = subtextCache
Nenue@56 355 else
Nenue@56 356 petSpellCache = {}
Nenue@56 357 petSubtextCache = {}
Nenue@56 358 end
Nenue@54 359
Nenue@19 360 if PetHasSpellbook() then
Nenue@62 361 --print('PET SPELLBOOK')
Nenue@19 362 local i = 1
Nenue@21 363 local specialNum = {}
Nenue@19 364 repeat
Nenue@19 365
Nenue@19 366 local spellType, spellID = GetSpellBookItemInfo(i, BOOKTYPE_PET)
Nenue@19 367 local spellName, subText = GetSpellBookItemName(i, BOOKTYPE_PET)
Nenue@21 368 local texture = GetSpellBookItemTexture(i, BOOKTYPE_PET)
Nenue@19 369 local isPassive = IsPassiveSpell(i, BOOKTYPE_PET)
Nenue@19 370 if not isPassive then
Nenue@19 371 if spellName then
Nenue@21 372 kb.PetCache.spellslot[spellName] = {i, spellName, subText, spellID, texture}
Nenue@62 373 --print('|cFF00FF88spellslot['..spellName..']|r', '=>', i, subText)
Nenue@19 374
Nenue@21 375 if subText then
Nenue@34 376 -- make sure that pet specialization subtext maps correctly
Nenue@34 377 --if match(subText, kb.PetCache.specName) then
Nenue@34 378 -- subText = 'specialization'
Nenue@34 379 --end
Nenue@21 380 kb.PetCache.subtext[subText] = kb.PetCache.subtext[subText] or {}
Nenue@21 381 specialNum[subText] = (specialNum[subText] or 0) + 1
Nenue@21 382
Nenue@54 383 petSpellCache[spellName] = subText
Nenue@54 384 petSubtextCache[subText] = petSubtextCache[subText] or {}
Nenue@54 385
Nenue@54 386 -- add to the list
Nenue@54 387 if not petSubtextCache[subText][spellName] then
Nenue@54 388 petSubtextCache[subText][spellName] = true
Nenue@54 389
Nenue@54 390 local macrotext = ""
Nenue@54 391 for spellName, enabled in pairs(petSubtextCache[subText]) do
Nenue@54 392 macrotext = macrotext .. "/cast " .. spellName .. "\n"
Nenue@54 393 end
Nenue@54 394 kb.SecureAttribute(KeyBinderMacro, "*macrotext-petaction_"..subText.."_"..specialNum[subText], macrotext)
Nenue@62 395 --print('|cFF00FFFFspecial['..spellName..']|r', '\n','|cFF00FFFFsubtext['..subText..']['..specialNum[subText]..']|r', '=>', i, spellName, subText, spellID, texture, specialNum[subText])
Nenue@54 396 end
Nenue@54 397
Nenue@54 398
Nenue@54 399
Nenue@21 400 local entry = {i, spellName, subText, spellID, texture, specialNum[subText]}
Nenue@21 401
Nenue@21 402 kb.PetCache.special[spellName] = entry
Nenue@21 403 kb.PetCache.subtext[subText][specialNum[subText]] = entry
Nenue@19 404 end
Nenue@19 405
Nenue@19 406 if spellID then
Nenue@19 407 kb.PetCache.spell[i] = {spellID, spellName, subText}
Nenue@62 408 --print('|cFF0088FFspell['..i..']|r', '=>', spellID, spellName, subText)
Nenue@19 409 end
Nenue@19 410 end
Nenue@19 411
Nenue@19 412
Nenue@19 413 end
Nenue@19 414
Nenue@19 415 i = i + 1
Nenue@19 416 until spellType == nil
Nenue@19 417 else
Nenue@62 418 --print('NO PET SPELLBOOK')
Nenue@21 419 wipe(kb.PetCache.spell)
Nenue@21 420 wipe(kb.PetCache.spellslot)
Nenue@19 421 end
Nenue@19 422
Nenue@19 423 if PetHasActionBar() then
Nenue@62 424 --print('PET ACTION BAR')
Nenue@19 425 for i = 1, 10 do
Nenue@19 426
Nenue@19 427
Nenue@19 428 local name, subtext, texture, isToken, isActive = GetPetActionInfo(i)
Nenue@19 429 if name then
Nenue@19 430 kb.PetCache.action[i] = {name, subtext, texture, isToken, isActive }
Nenue@19 431
Nenue@19 432
Nenue@19 433 end
Nenue@62 434 --print('|cFFFFFF00action['..i..']|r', name, subtext, texture)
Nenue@19 435 end
Nenue@19 436 else
Nenue@62 437 --print('NO PET ACTION BAR')
Nenue@21 438 wipe(kb.PetCache.action)
Nenue@19 439 end
Nenue@19 440
Nenue@19 441 kb.UpdateDynamicButtons('petaction')
Nenue@19 442
Nenue@19 443 end
Nenue@19 444
Nenue@19 445 kb.UpdateSystemBinds = function()
Nenue@21 446 wipe(kb.SystemBindings)
Nenue@19 447 local n = GetNumBindings()
Nenue@19 448 for i=1, n do
Nenue@19 449 local command, key1, key2 = GetBinding(i)
Nenue@34 450 if not command:match('ACTION.*%d+') then
Nenue@34 451 if key1 then
Nenue@34 452 kb.SystemBindings[key1] = command
Nenue@34 453 end
Nenue@34 454 if key2 then
Nenue@34 455 kb.SystemBindings[key2] = command
Nenue@34 456 end
Nenue@34 457 else
Nenue@62 458 --print('ignoring action button binding', command)
Nenue@19 459 end
Nenue@19 460 end
Nenue@19 461 end
Nenue@19 462
Nenue@19 463 kb.UpdateDynamicButtons = function(dynamicType)
Nenue@19 464 for i, button in ipairs(kb.buttons) do
Nenue@19 465 if button.isDynamic == dynamicType then
Nenue@19 466 kb.UpdateSlot(button, true)
Nenue@19 467 end
Nenue@19 468 end
Nenue@26 469 end
Nenue@26 470
Nenue@26 471 kb.pendingAttributes = {}
Nenue@26 472 kb.SecureAttribute = function(target, name, value)
Nenue@26 473 if InCombatLockdown() then
Nenue@34 474 if #kb.pendingAttributes == 0 then
Nenue@49 475 kb:print(kb.L('Key bindings will be applied when you exit combat.'))
Nenue@34 476 end
Nenue@34 477
Nenue@26 478 tinsert(kb.pendingAttributes, {target, name, value})
Nenue@26 479 kb:RegisterEvent('PLAYER_REGEN_ENABLED')
Nenue@34 480
Nenue@26 481 else
Nenue@26 482
Nenue@63 483 cprint('|cFFFF4444' .. target:GetName()..'|r.|cFFFFFF00'.. tostring(name)..'|r = "'..tostring(value)..'"')
Nenue@26 484 target:SetAttribute(name, value)
Nenue@26 485 end
Nenue@26 486 end
Nenue@26 487
Nenue@26 488 kb.PLAYER_REGEN_ENABLED = function()
Nenue@26 489 if #kb.pendingAttributes >= 1 then
Nenue@26 490 local args = tremove(kb.pendingAttributes)
Nenue@26 491 while args do
Nenue@26 492 local target, name, value = unpack(args)
Nenue@62 493 --print(target:GetName(), 'attribute', '"'.. tostring(name)..'" = "'..tostring(value)..'"')
Nenue@63 494 cprint('deferred', target:GetName(), 'attribute', '"'.. tostring(name)..'" = "'..tostring(value)..'"')
Nenue@26 495 target:SetAttribute(name, value)
Nenue@26 496 args = tremove(kb.pendingAttributes)
Nenue@26 497 end
Nenue@26 498 end
Nenue@27 499
Nenue@27 500 if #kb.pendingCalls >= 1 then
Nenue@27 501
Nenue@27 502 local func = tremove(kb.pendingCalls)
Nenue@27 503 while func do
Nenue@27 504 func()
Nenue@27 505 end
Nenue@27 506 end
Nenue@27 507 end
Nenue@27 508
Nenue@27 509 kb.UpdateBindingsCache = function(actionType, actionID, bindings)
Nenue@50 510 local indexKey = actionType .. '_' .. actionID
Nenue@50 511 kb.bindings[indexKey] = bindings
Nenue@27 512
Nenue@62 513 --print('|cFF00FF00'..indexKey..'|r = {', table.concat(bindings,', '), '}')
Nenue@27 514 tinsert(kb.ChangedBindings, {actionType, actionID})
Nenue@16 515 end