annotate ActionTemplates.lua @ 70:131d9190db6b

Curseforge migration
author Nenue
date Wed, 28 Dec 2016 16:31:15 -0500
parents
children ca3118127e5e
rev   line source
Nenue@70 1 -- SkeletonKey
Nenue@70 2 -- ActionTemplates.lua
Nenue@70 3 -- Created: 7/29/2016 9:14 PM
Nenue@70 4 -- %file-revision%
Nenue@70 5 -- Code dealing with the implementation of action hotkeys
Nenue@70 6
Nenue@70 7 local tostring, tonumber, pairs, ipairs = tostring, tonumber, pairs, ipairs
Nenue@70 8 local unpack, SetBinding = unpack, SetBinding
Nenue@70 9 local tinsert, tContains, select, wipe = tinsert, tContains, select, table.wipe
Nenue@70 10 local GetSpellBookItemInfo, GetSpellBookItemName, GetSpellInfo = GetSpellBookItemInfo, GetSpellBookItemName, GetSpellInfo
Nenue@70 11 local GetSpecialization, GetSpecializationInfo, IsPassiveSpell, IsTalentSpell = GetSpecialization, GetSpecializationInfo, IsPassiveSpell, IsTalentSpell
Nenue@70 12 local PetHasSpellbook, PetHasActionBar, GetPetActionInfo, HasPetSpells = PetHasSpellbook, PetHasActionBar, GetPetActionInfo, HasPetSpells
Nenue@70 13 local GetProfessions, GetProfessionInfo, GetTalentInfo = GetProfessions, GetProfessionInfo, GetTalentInfo
Nenue@70 14 local GetNumBindings, GetBinding = GetNumBindings, GetBinding
Nenue@70 15
Nenue@70 16 local _, kb = ...
Nenue@70 17 local print = (DEVIAN_PNAME == 'SkeletonKey') and function(...) print('SK', ...) end or nop
Nenue@70 18 local cprint = (DEVIAN_PNAME == 'SkeletonKey') and function(...) _G.print('Cfg', ...) end or nop
Nenue@70 19
Nenue@70 20 local CLICK_KEYBINDER_MACRO = "CLICK SkeletonKeyMacro:"
Nenue@70 21 local CLICK_KEYBINDER_KEY = "CLICK SkeletonKeyKey:"
Nenue@70 22 local PET_BASIC_SUBTEXT = 'Basic Attack'
Nenue@70 23 local PET_SPECIAL_SUBTEXT = 'Special Ability'
Nenue@70 24 local PETACTION_SCRIPT = {
Nenue@70 25 [PET_ACTION_MOVE_TO] = {'pet_move_to', SLASH_PET_MOVE_TO1},
Nenue@70 26 [PET_ACTION_ATTACK] = {'pet_attack', SLASH_PET_ATTACK1},
Nenue@70 27 [PET_ACTION_FOLLOW] = {'pet_follow', SLASH_PET_FOLLOW1},
Nenue@70 28 [PET_ACTION_WAIT] = {'pet_stay', SLASH_PET_STAY1 },
Nenue@70 29 [PET_MODE_AGGRESSIVE] = {'pet_aggressive', SLASH_PET_AGGRESSIVE1 },
Nenue@70 30 [PET_MODE_DEFENSIVE] = { 'pet_defensive', SLASH_PET_DEFENSIVE1},
Nenue@70 31 [PET_MODE_PASSIVE] = { 'pet_passive', SLASH_PET_PASSIVE1},
Nenue@70 32 [PET_MODE_ASSIST] = {'pet_assist', SLASH_PET_ASSIST1},
Nenue@70 33 }
Nenue@70 34 local SECONDARY_PROFESSIONS = {
Nenue@70 35 [5] = 3,
Nenue@70 36 [7] = 4,
Nenue@70 37 [9] = 5,
Nenue@70 38 [10] = 6
Nenue@70 39 }
Nenue@70 40 local petSpellCache,petSubtextCache
Nenue@70 41 local SUMMON_RANDOM_FAVORITE_MOUNT_SPELL = 150544
Nenue@70 42
Nenue@70 43 --kb.ChangedBindings = {}
Nenue@70 44 --kb.ActionTypes = {}
Nenue@70 45
Nenue@70 46 local atype = kb.ActionTypes
Nenue@70 47
Nenue@70 48 --- Caps Lock
Nenue@70 49 atype['mount'] = function(id, name)
Nenue@70 50 if id == SUMMON_RANDOM_FAVORITE_MOUNT_SPELL then
Nenue@70 51 return CLICK_KEYBINDER_MACRO, 'mount_random', "/script C_MountJournal.SummonByID(0)", SkeletonKeyMacro
Nenue@70 52 else
Nenue@70 53 return CLICK_KEYBINDER_MACRO, 'mount_'..id, "/script C_MountJournal.SummonByID("..id..")", SkeletonKeyMacro
Nenue@70 54 end
Nenue@70 55 end
Nenue@70 56
Nenue@70 57 atype['macro'] = function(id, name)
Nenue@70 58 local _, _, text = GetMacroInfo(id)
Nenue@70 59 return CLICK_KEYBINDER_MACRO, 'macro_' .. tostring(name), name, SkeletonKeyMacro
Nenue@70 60 end
Nenue@70 61
Nenue@70 62 atype['equipset'] = function(id, name)
Nenue@70 63 return CLICK_KEYBINDER_MACRO, 'equipset_'..tostring(name), "/script UseEquipmentSet("..tostring(id)..")", SkeletonKeyMacro
Nenue@70 64 end
Nenue@70 65
Nenue@70 66 atype['spell'] = function(id, name)
Nenue@70 67 local attributeName = name
Nenue@70 68 if kb.ProfessionCache[id] then
Nenue@70 69 attributeName = "profession_".. kb.ProfessionCache[id].dynamicIndex .. '_' .. kb.ProfessionCache[id].dynamicSubIndex
Nenue@70 70 end
Nenue@70 71 return CLICK_KEYBINDER_KEY, attributeName, name, SkeletonKeyKey
Nenue@70 72 end
Nenue@70 73
Nenue@70 74 atype['petaction'] = function(_, name)
Nenue@70 75 -- ID doesn't exist for basic commands, even though they can be picked up
Nenue@70 76 local attributeName, attributeValue = "petaction_" .. tostring(name), "/cast "..tostring(name)
Nenue@70 77
Nenue@70 78 if not petSpellCache then
Nenue@70 79 kb.UpdatePetInfo()
Nenue@70 80 end
Nenue@70 81 -- Compose a multi-macro for subtext abilities
Nenue@70 82 if petSpellCache[name] then
Nenue@70 83 attributeValue = ""
Nenue@70 84 for spellName, enabled in pairs(petSubtextCache[petSpellCache[name]]) do
Nenue@70 85 attributeValue = attributeValue .. "/cast " .. spellName .. "\n"
Nenue@70 86 end
Nenue@70 87 end
Nenue@70 88
Nenue@70 89 if PETACTION_SCRIPT[name] then
Nenue@70 90 attributeName, attributeValue = unpack(PETACTION_SCRIPT[name])
Nenue@70 91 elseif kb.PetCache.special[name] then
Nenue@70 92 attributeName = "petaction_"..kb.PetCache.special[name][3].."_" .. tonumber(kb.PetCache.special[name][6])
Nenue@70 93 end
Nenue@70 94 return CLICK_KEYBINDER_MACRO, attributeName, attributeValue, SkeletonKeyMacro
Nenue@70 95 end
Nenue@70 96
Nenue@70 97 atype['battlepet'] = function(id, name)
Nenue@70 98 return CLICK_KEYBINDER_MACRO, 'battlepet_' .. tostring(name), SLASH_SUMMON_BATTLE_PET1 .. " " .. tostring(name), SkeletonKeyMacro
Nenue@70 99 end
Nenue@70 100
Nenue@70 101 atype['item'] = function(id, name)
Nenue@70 102 return CLICK_KEYBINDER_KEY, tostring(name), id, SkeletonKeyKey
Nenue@70 103 end
Nenue@70 104
Nenue@70 105
Nenue@70 106 --- Resolves the SecureActionButton attribute names used for the given action
Nenue@70 107 kb.RegisterAction = function(actionType, id, name)
Nenue@70 108 assert(atype[actionType], 'Missing actionType handler for `'..tostring(actionType)..'`')
Nenue@70 109 local target, attributeName, attributeValue, button = atype[actionType](id, name)
Nenue@70 110 local command = target .. attributeName
Nenue@70 111
Nenue@70 112 return attributeName, attributeValue, command, target, button
Nenue@70 113 end
Nenue@70 114
Nenue@70 115
Nenue@70 116
Nenue@70 117
Nenue@70 118 kb.ApplyTalentBinding = function(talentInfo, cache)
Nenue@70 119 talentInfo.assignedKeys = talentInfo.assignedKeys or {}
Nenue@70 120 for i , key in pairs(talentInfo.assignedKeys) do
Nenue@70 121 local command = CLICK_KEYBINDER_KEY.. talentInfo.actionName
Nenue@70 122 SetBinding(key, command)
Nenue@70 123 cprint(' **', i, '->', command)
Nenue@70 124 tinsert(cache, talentInfo)
Nenue@70 125 end
Nenue@70 126 end
Nenue@70 127 kb.CacheTalentBinding = function(talentInfo, cache)
Nenue@70 128
Nenue@70 129 local spellID = talentInfo.actionID
Nenue@70 130 cache[spellID] = cache[spellID] or {}
Nenue@70 131 cache[spellID] = talentInfo
Nenue@70 132 cprint(spellID, unpack(kb.TalentBindings[spellID]))
Nenue@70 133 end
Nenue@70 134
Nenue@70 135
Nenue@70 136 do
Nenue@70 137 local commandActions = {}
Nenue@70 138 local bindings = kb.bindings
Nenue@70 139 local key, macro = SkeletonKeyKey, SkeletonKeyMacro
Nenue@70 140 kb.LoadBinding = function( configTable)
Nenue@70 141 if configTable.command then
Nenue@70 142 configTable.command = configTable.command:gsub('KeyBinder', 'SkeletonKey')
Nenue@70 143 end
Nenue@70 144
Nenue@70 145 local command, name, icon, actionType, actionID, macroName, macroText =
Nenue@70 146 configTable.command, configTable.actionName, configTable.iconPath, configTable.actionType,
Nenue@70 147 configTable.actionID, configTable.macroName, configTable.macroText
Nenue@70 148
Nenue@70 149
Nenue@70 150 local indexKey = actionType..'_'..actionID
Nenue@70 151 local actionPrefix = "*"..actionType.."-"
Nenue@70 152 local button = SkeletonKeyKey
Nenue@70 153 local isAvailable = true
Nenue@70 154 local specialButtonType
Nenue@70 155 if actionType == 'spell' then
Nenue@70 156 if not GetSpellInfo(actionID) then
Nenue@70 157 isAvailable = nil
Nenue@70 158 end
Nenue@70 159 local dynamicInfo = kb.TalentCache[name] or kb.ProfessionCache[name]
Nenue@70 160 if dynamicInfo then
Nenue@70 161 cprint('|cFF00FFFFDynamicInfo:|r', name)
Nenue@70 162 for k, v in pairs(dynamicInfo) do
Nenue@70 163 cprint(' --', k, v)
Nenue@70 164 configTable[k] = v
Nenue@70 165 end
Nenue@70 166 end
Nenue@70 167 else
Nenue@70 168 if actionType ~= 'macro' then
Nenue@70 169 actionPrefix = '*macrotext-'
Nenue@70 170 end
Nenue@70 171
Nenue@70 172 specialButtonType = 'macro'
Nenue@70 173 end
Nenue@70 174
Nenue@70 175 local attributeSuffix, attributeValue, command, target, button = kb.RegisterAction(actionType, actionID, name)
Nenue@70 176 local actionKey = actionPrefix .. attributeSuffix
Nenue@70 177 cprint('|cFF00FF88LoadBinding()|r', button:GetName(), "*type-"..attributeSuffix, actionType, '|cFFFFFF00'..actionKey, attributeValue)
Nenue@70 178
Nenue@70 179
Nenue@70 180
Nenue@70 181 if isAvailable then
Nenue@70 182 kb.SecureAttribute(button, "*type-"..attributeSuffix, specialButtonType or actionType)
Nenue@70 183 kb.SecureAttribute(button, actionKey, attributeValue)
Nenue@70 184 kb.bindings[indexKey] = configTable.assignedKeys
Nenue@70 185 commandActions[command] = kb.bindings[indexKey]
Nenue@70 186 return command, kb.bindings[indexKey]
Nenue@70 187 else
Nenue@70 188 return nil
Nenue@70 189 end
Nenue@70 190 end
Nenue@70 191
Nenue@70 192 local usedSlots = {}
Nenue@70 193 kb.ApplyBindings = function (profile)
Nenue@70 194 cprint('|cFF0088FFApplyBindings()')
Nenue@70 195 --cprint('binding profile', profile)
Nenue@70 196
Nenue@70 197 wipe(usedSlots)
Nenue@70 198 for slot, configTable in pairs(profile.buttons) do
Nenue@70 199
Nenue@70 200
Nenue@70 201 if #configTable >= 1 then
Nenue@70 202 local command, name, icon, actionType, actionID, macroName, macroText, spellbookSlot, spellbookType = unpack(configTable)
Nenue@70 203
Nenue@70 204 cprint('|CFFFF4400Fixing pad entry', slot, command, name)
Nenue@70 205 local assignedKeys = {GetBindingKey(command)}
Nenue@70 206 for k,v in pairs(profile.bindings) do
Nenue@70 207 if v == command then
Nenue@70 208 tinsert(assignedKeys, k)
Nenue@70 209 end
Nenue@70 210 end
Nenue@70 211
Nenue@70 212 configTable = {
Nenue@70 213 command = command,
Nenue@70 214 actionType = actionType,
Nenue@70 215 actionName = name,
Nenue@70 216 actionID = actionID,
Nenue@70 217 macroName = macroName,
Nenue@70 218 macroText = macroText,
Nenue@70 219 iconPath = icon,
Nenue@70 220 spellbookSlot = spellbookSlot,
Nenue@70 221 spellbookType = spellbookType,
Nenue@70 222 assignedKeys = assignedKeys
Nenue@70 223 }
Nenue@70 224 kb.currentProfile.buttons[slot] = configTable
Nenue@70 225 end
Nenue@70 226 if not configTable.actionID then
Nenue@70 227 configTable.actionID = configTable.actionName
Nenue@70 228 end
Nenue@70 229 if not configTable.iconPath then
Nenue@70 230 print('corrected missing icon')
Nenue@70 231 configTable.iconPath = GetSpellTexture(configTable.actionName)
Nenue@70 232 end
Nenue@70 233
Nenue@70 234 usedSlots[configTable.actionName or configTable.actionID] = true
Nenue@70 235 usedSlots[configTable.command] = true
Nenue@70 236
Nenue@70 237 if kb.LoadBinding(configTable) then
Nenue@70 238 configTable.isAvailable = true
Nenue@70 239 end
Nenue@70 240 end
Nenue@70 241
Nenue@70 242 for key, command in pairs(profile.bindings) do
Nenue@70 243 command = command:gsub('KeyBinder', 'SkeletonKey')
Nenue@70 244 profile.bindings[key] = command
Nenue@70 245 cprint('|cFF00FFFF'.. key .. '|r to|cFF00FF00', command)
Nenue@70 246 SetBinding(key, command)
Nenue@70 247
Nenue@70 248 if commandActions[command] and not tContains(commandActions[command], key) then
Nenue@70 249 tinsert(commandActions[command], key)
Nenue@70 250 end
Nenue@70 251 end
Nenue@70 252
Nenue@70 253 for spellName, talentInfo in pairs(profile.talents) do
Nenue@70 254 if not usedSlots[spellName] then
Nenue@70 255 cprint('|cFFFF4400Unslotted talent', spellName)
Nenue@70 256 profile.talents[spellName] = nil
Nenue@70 257 end
Nenue@70 258 end
Nenue@70 259 for command in pairs(profile.bound) do
Nenue@70 260 if not usedSlots[command] then
Nenue@70 261 cprint('|cFFFF4400Unslotted bound entry', command)
Nenue@70 262 profile.bound[command] = nil
Nenue@70 263 profile.commands[command] = nil
Nenue@70 264 end
Nenue@70 265 end
Nenue@70 266 for command in pairs(profile.commands) do
Nenue@70 267 if not usedSlots[command] then
Nenue@70 268 cprint('|cFFFF4400Unslotted command entry', command)
Nenue@70 269 profile.commands[command] = nil
Nenue@70 270 end
Nenue@70 271 end
Nenue@70 272
Nenue@70 273 end
Nenue@70 274
Nenue@70 275 kb.ApplyAllBindings =function ()
Nenue@70 276 cprint('|cFF0088FFApplyAllBindings()')
Nenue@70 277 wipe(kb.TalentBindings)
Nenue@70 278 wipe(kb.bindings)
Nenue@70 279 --kb:print('Loading binding profile', kb.profileName)
Nenue@70 280
Nenue@70 281 -- reflect action key settings
Nenue@70 282 if GetCVarBool("ActionButtonUseKeyDown") then
Nenue@70 283 SkeletonKeyMacro:RegisterForClicks("AnyDown")
Nenue@70 284 SkeletonKeyKey:RegisterForClicks("AnyDown")
Nenue@70 285 else
Nenue@70 286 SkeletonKeyMacro:RegisterForClicks("AnyUp")
Nenue@70 287 SkeletonKeyKey:RegisterForClicks("AnyUp")
Nenue@70 288 end
Nenue@70 289
Nenue@70 290 for i, profile in ipairs(kb.orderedProfiles) do
Nenue@70 291 kb.ApplyBindings(profile)
Nenue@70 292 end
Nenue@70 293 -- do this after to ensure that profession binds are properly overridden
Nenue@70 294 kb.UpdateProfessionInfo()
Nenue@70 295
Nenue@70 296 SaveBindings(GetCurrentBindingSet())
Nenue@70 297 end
Nenue@70 298 end
Nenue@70 299
Nenue@70 300
Nenue@70 301 kb.specInfo = {}
Nenue@70 302 kb.UpdateSpecInfo = function()
Nenue@70 303 kb.specInfo.id = GetSpecialization()
Nenue@70 304 kb.specInfo.globalID, kb.specInfo.name, kb.specInfo.desc, kb.specInfo.texture = GetSpecializationInfo(kb.specInfo.id)
Nenue@70 305 end
Nenue@70 306
Nenue@70 307 kb.UpdateMacroInfo = function()
Nenue@70 308 print('|cFFFFFF00kb.UpdateMacroInfo()|r')
Nenue@70 309 for index = 1, GetNumMacros() do
Nenue@70 310 local name = GetMacroInfo(index)
Nenue@70 311 kb.SecureAttribute(SkeletonKeyMacro, "*type-macro_"..tostring(name), 'macro')
Nenue@70 312 kb.SecureAttribute(SkeletonKeyMacro, "*macro-macro_"..tostring(name), index)
Nenue@70 313 end
Nenue@70 314 end
Nenue@70 315
Nenue@70 316 kb.UpdateTalentInfo = function()
Nenue@70 317 print('|cFFFFFF00kb.UpdateTalentInfo()|r')
Nenue@70 318 if kb.talentsPushed then
Nenue@70 319 return
Nenue@70 320 end
Nenue@70 321 wipe(kb.TalentCache)
Nenue@70 322 for row =1, MAX_TALENT_TIERS do
Nenue@70 323 for col = 1, NUM_TALENT_COLUMNS do
Nenue@70 324 local talentID, talentName, icon, selected, available, spellID = GetTalentInfo(row, col, 1)
Nenue@70 325 local talentInfo = kb.TalentCache[spellID] or {}
Nenue@70 326 if spellID then
Nenue@70 327 talentInfo.actionType = 'spell'
Nenue@70 328 talentInfo.actionName = talentName
Nenue@70 329 talentInfo.dynamicType = 'talent'
Nenue@70 330 talentInfo.dynamicID = talentID
Nenue@70 331 talentInfo.dynamicIndex = row
Nenue@70 332 talentInfo.dynamicSubIndex = col
Nenue@70 333 talentInfo.actionID = spellID
Nenue@70 334 talentInfo.isAvailable = selected
Nenue@70 335 kb.TalentCache[spellID] = talentInfo
Nenue@70 336 kb.TalentCache[talentName] = talentInfo
Nenue@70 337 kb.DynamicSpells[spellID] = talentInfo
Nenue@70 338 kb.DynamicSpells[talentName] = talentInfo
Nenue@70 339 end
Nenue@70 340
Nenue@70 341 --print('Talent ', row, col, spellID, talentName)
Nenue@70 342 end
Nenue@70 343 end
Nenue@70 344
Nenue@70 345 for row = 1, MAX_PVP_TALENT_TIERS do
Nenue@70 346 for col = 1, MAX_PVP_TALENT_COLUMNS do
Nenue@70 347 local id, name, icon, selected, available, spellID, unlocked = GetPvpTalentInfo(row, col, 1)
Nenue@70 348 if spellID then
Nenue@70 349 local talentInfo = kb.TalentCache[spellID] or {}
Nenue@70 350 talentInfo.actionType = 'spell'
Nenue@70 351 talentInfo.actionName = name
Nenue@70 352 talentInfo.dynamicType = 'talent'
Nenue@70 353 talentInfo.dynamicID = id
Nenue@70 354 talentInfo.actionID = spellID
Nenue@70 355 talentInfo.isAvailable = selected
Nenue@70 356 kb.TalentCache[spellID] = talentInfo
Nenue@70 357 kb.TalentCache[name] = talentInfo
Nenue@70 358 kb.DynamicSpells[spellID] = talentInfo
Nenue@70 359 kb.DynamicSpells[name] = talentInfo
Nenue@70 360 end
Nenue@70 361 end
Nenue@70 362 end
Nenue@70 363
Nenue@70 364 kb.talentsPushed = true
Nenue@70 365
Nenue@70 366 kb.UpdateDynamicButtons('talent')
Nenue@70 367 end
Nenue@70 368
Nenue@70 369 kb.UpdateProfessionInfo = function()
Nenue@70 370 wipe(kb.ProfessionCache)
Nenue@70 371 local profs = {GetProfessions() }
Nenue@70 372 --print(GetProfessions())
Nenue@70 373 local primaryNum = 0
Nenue@70 374 for i = 1, 6 do
Nenue@70 375 if profs[i] then
Nenue@70 376 local profID = profs[i]
Nenue@70 377 local profName, texture, _, _, numSpells, spellOffset = GetProfessionInfo(profID)
Nenue@70 378 cprint(i, profID, profName, numSpells, spellOffset)
Nenue@70 379 if not SECONDARY_PROFESSIONS[profID] then
Nenue@70 380 primaryNum = primaryNum + 1
Nenue@70 381 end
Nenue@70 382 local profNum = SECONDARY_PROFESSIONS[profID] or primaryNum
Nenue@70 383 cprint(i, profNum)
Nenue@70 384
Nenue@70 385
Nenue@70 386 kb.ProfessionCache[profNum] = kb.ProfessionCache[profNum] or {}
Nenue@70 387
Nenue@70 388 for j = 1, numSpells do
Nenue@70 389 local spellName, _, icon, _, _, _, spellID = GetSpellInfo(spellOffset+j, BOOKTYPE_PROFESSION)
Nenue@70 390 cprint(j, spellName)
Nenue@70 391 local profInfo = {
Nenue@70 392 actionType = 'spell',
Nenue@70 393 actionName = spellName,
Nenue@70 394 statusText = 'Profession ' .. i,
Nenue@70 395 actionID = spellID,
Nenue@70 396 iconPath = icon,
Nenue@70 397 dynamicIndex = i,
Nenue@70 398 dynamicSubIndex = j,
Nenue@70 399 dynamicType = 'profession',
Nenue@70 400 spellbookOffset = (spellOffset+j),
Nenue@70 401 spellbookType = BOOKTYPE_PROFESSION,
Nenue@70 402 isAvailable = true,
Nenue@70 403 -- need to check if necessary
Nenue@70 404 uniqueID = profID,
Nenue@70 405 }
Nenue@70 406
Nenue@70 407 kb.SecureAttribute(SkeletonKeyKey, "*type-profession_"..i .. '_' ..j, "spell")
Nenue@70 408 kb.SecureAttribute(SkeletonKeyKey, "*spell-profession_"..i .. '_' ..j, spellName)
Nenue@70 409
Nenue@70 410 kb.ProfessionCache[spellName] = profInfo
Nenue@70 411 kb.ProfessionCache[spellID] = profInfo
Nenue@70 412
Nenue@70 413 kb.DynamicSpells[spellName] = profInfo
Nenue@70 414 kb.DynamicSpells[spellID] = profInfo
Nenue@70 415
Nenue@70 416 kb.DynamicSpells.profession[i] = kb.DynamicSpells.profession[i] or {}
Nenue@70 417 kb.DynamicSpells.profession[i][j] = profInfo
Nenue@70 418 --print(' |cFF0088FF['..i..']|r|cFFFF44BB['..spellOffset+i..']|r', spellName, "profession_"..i .. '_' ..j)
Nenue@70 419 end
Nenue@70 420 end
Nenue@70 421
Nenue@70 422 end
Nenue@70 423
Nenue@70 424 kb.UpdateDynamicButtons('profession')
Nenue@70 425 end
Nenue@70 426
Nenue@70 427
Nenue@70 428
Nenue@70 429 kb.UpdatePetInfo = function()
Nenue@70 430 local hasPetSpells, petType = HasPetSpells()
Nenue@70 431
Nenue@70 432 -- reconcile saved data if it becomes available
Nenue@70 433 if kb.db then
Nenue@70 434 kb.db.petSpellsDB = kb.db.petSpellsDB or {}
Nenue@70 435 kb.db.petSpellsDB.subtext = kb.db.petSpellsDB.subtext or {}
Nenue@70 436 kb.db.petSpellsDB.spell = kb.db.petSpellsDB.spell or {}
Nenue@70 437 local spellCache = kb.db.petSpellsDB.spell
Nenue@70 438 local subtextCache = kb.db.petSpellsDB.subtext
Nenue@70 439 if petSpellCache then
Nenue@70 440 for k,v in pairs(petSpellCache) do
Nenue@70 441 if not spellCache[k] then
Nenue@70 442 spellCache[k] = v
Nenue@70 443 end
Nenue@70 444 end
Nenue@70 445 end
Nenue@70 446 petSpellCache = spellCache
Nenue@70 447 if petSubtextCache then
Nenue@70 448 for k,v in pairs(petSubtextCache) do
Nenue@70 449 if not subtextCache[k] then
Nenue@70 450 subtextCache[k] = v
Nenue@70 451 end
Nenue@70 452 end
Nenue@70 453 end
Nenue@70 454 petSubtextCache = subtextCache
Nenue@70 455 else
Nenue@70 456 petSpellCache = {}
Nenue@70 457 petSubtextCache = {}
Nenue@70 458 end
Nenue@70 459
Nenue@70 460 if PetHasSpellbook() then
Nenue@70 461 --print('PET SPELLBOOK')
Nenue@70 462 local spellbookOffset = 1
Nenue@70 463 local specialNum = {}
Nenue@70 464 local newSubtextItems = false
Nenue@70 465
Nenue@70 466 repeat
Nenue@70 467
Nenue@70 468 local spellType, spellID = GetSpellBookItemInfo(spellbookOffset, BOOKTYPE_PET)
Nenue@70 469 local spellName, subText = GetSpellBookItemName(spellbookOffset, BOOKTYPE_PET)
Nenue@70 470 local texture = GetSpellBookItemTexture(spellbookOffset, BOOKTYPE_PET)
Nenue@70 471 if (spellType == 'SPELL') and (not IsPassiveSpell(spellbookOffset, BOOKTYPE_PET)) then
Nenue@70 472 local info = kb.PetCache[spellName] or {}
Nenue@70 473 kb.PetCache.spellslot[spellName] = {spellbookOffset, spellName, subText, spellID, texture}
Nenue@70 474 --print('|cFF00FF88spellslot['..spellName..']|r', '=>', i, subText)
Nenue@70 475
Nenue@70 476 if subText then
Nenue@70 477 kb.PetCache.subtext[subText] = kb.PetCache.subtext[subText] or {}
Nenue@70 478 specialNum[subText] = (specialNum[subText] or 0) + 1
Nenue@70 479
Nenue@70 480 petSpellCache[spellName] = subText
Nenue@70 481 petSubtextCache[subText] = petSubtextCache[subText] or {}
Nenue@70 482
Nenue@70 483 -- add to the list
Nenue@70 484 if not petSubtextCache[subText][spellName] then
Nenue@70 485 petSubtextCache[subText][spellName] = true
Nenue@70 486 newSubtextItems = true
Nenue@70 487 --print('|cFF00FFFFspecial['..spellName..']|r', '\n','|cFF00FFFFsubtext['..subText..']['..specialNum[subText]..']|r', '=>', i, spellName, subText, spellID, texture, specialNum[subText])
Nenue@70 488 end
Nenue@70 489
Nenue@70 490
Nenue@70 491
Nenue@70 492 local entry = {spellbookOffset, spellName, subText, spellID, texture, specialNum[subText] }
Nenue@70 493
Nenue@70 494
Nenue@70 495 info.spellbookOffset = spellbookOffset
Nenue@70 496 info.spellbookType = BOOKTYPE_PET
Nenue@70 497 info.actionName = spellName
Nenue@70 498 info.spellID = spellID
Nenue@70 499 info.dynamicType = 'petaction'
Nenue@70 500 info.dynamicID = spellID
Nenue@70 501 info.dynamicIndex = subText
Nenue@70 502 info.dynamicSubIndex = specialNum[subText]
Nenue@70 503 info.isAvailable = true
Nenue@70 504
Nenue@70 505 kb.PetCache.special[spellName] = info
Nenue@70 506 kb.PetCache.subtext[subText][specialNum[subText]] = info
Nenue@70 507 kb.DynamicSpells[spellName] = info
Nenue@70 508 kb.DynamicSpells[spellID] = info
Nenue@70 509
Nenue@70 510 end
Nenue@70 511
Nenue@70 512 if spellID then
Nenue@70 513 kb.PetCache.spell[spellbookOffset] = {spellID, spellName, subText}
Nenue@70 514 --print('|cFF0088FFspell['..i..']|r', '=>', spellID, spellName, subText)
Nenue@70 515 end
Nenue@70 516
Nenue@70 517 kb.PetCache[spellName] = info
Nenue@70 518 end
Nenue@70 519
Nenue@70 520 spellbookOffset = spellbookOffset + 1
Nenue@70 521 until spellType == nil
Nenue@70 522
Nenue@70 523 if newSubtextItems then
Nenue@70 524
Nenue@70 525 local macrotext = ""
Nenue@70 526 for subText, spells in pairs(petSubtextCache) do
Nenue@70 527 if specialNum[subText] then
Nenue@70 528 for spellName, enabled in pairs(spells) do
Nenue@70 529 macrotext = macrotext .. "/cast " .. spellName .. "\n"
Nenue@70 530 end
Nenue@70 531 kb.SecureAttribute(SkeletonKeyMacro, "*macrotext-petaction_"..subText.."_"..specialNum[subText], macrotext)
Nenue@70 532 end
Nenue@70 533 end
Nenue@70 534 end
Nenue@70 535
Nenue@70 536
Nenue@70 537 else
Nenue@70 538 --print('NO PET SPELLBOOK')
Nenue@70 539 wipe(kb.PetCache.spell)
Nenue@70 540 wipe(kb.PetCache.spellslot)
Nenue@70 541 end
Nenue@70 542
Nenue@70 543 if PetHasActionBar() then
Nenue@70 544 --print('PET ACTION BAR')
Nenue@70 545 for i = 1, 10 do
Nenue@70 546
Nenue@70 547
Nenue@70 548 local name, subtext, texture, isToken, isActive = GetPetActionInfo(i)
Nenue@70 549 if name then
Nenue@70 550 kb.PetCache.action[i] = {name, subtext, texture, isToken, isActive }
Nenue@70 551
Nenue@70 552
Nenue@70 553 end
Nenue@70 554 --print('|cFFFFFF00action['..i..']|r', name, subtext, texture)
Nenue@70 555 end
Nenue@70 556 else
Nenue@70 557 --print('NO PET ACTION BAR')
Nenue@70 558 wipe(kb.PetCache.action)
Nenue@70 559 end
Nenue@70 560
Nenue@70 561 kb.UpdateDynamicButtons('petaction')
Nenue@70 562
Nenue@70 563 end
Nenue@70 564
Nenue@70 565 kb.UpdateSystemBinds = function()
Nenue@70 566 wipe(kb.SystemBindings)
Nenue@70 567 local n = GetNumBindings()
Nenue@70 568 for i=1, n do
Nenue@70 569 local command, key1, key2 = GetBinding(i)
Nenue@70 570 if not command:match('ACTION.*%d+') then
Nenue@70 571 if key1 then
Nenue@70 572 kb.SystemBindings[key1] = command
Nenue@70 573 end
Nenue@70 574 if key2 then
Nenue@70 575 kb.SystemBindings[key2] = command
Nenue@70 576 end
Nenue@70 577 else
Nenue@70 578 --print('ignoring action button binding', command)
Nenue@70 579 end
Nenue@70 580 end
Nenue@70 581 end
Nenue@70 582
Nenue@70 583 kb.UpdateDynamicButtons = function(dynamicType)
Nenue@70 584 for i, button in ipairs(kb.buttons) do
Nenue@70 585 if button.isDynamic == dynamicType then
Nenue@70 586 kb.UpdateSlot(button, true)
Nenue@70 587 end
Nenue@70 588 end
Nenue@70 589 end
Nenue@70 590
Nenue@70 591 kb.pendingAttributes = {}
Nenue@70 592 kb.SecureAttribute = function(target, name, value)
Nenue@70 593 if InCombatLockdown() then
Nenue@70 594 if #kb.pendingAttributes == 0 then
Nenue@70 595 kb:print(kb.L('Key bindings will be applied when you exit combat.'))
Nenue@70 596 end
Nenue@70 597
Nenue@70 598 tinsert(kb.pendingAttributes, {target, name, value})
Nenue@70 599 SkeletonKey:RegisterEvent('PLAYER_REGEN_ENABLED')
Nenue@70 600
Nenue@70 601 else
Nenue@70 602
Nenue@70 603 --cprint('|cFFFF4444' .. target:GetName()..'|r.|cFFFFFF00'.. tostring(name)..'|r = "'..tostring(value)..'"')
Nenue@70 604 target:SetAttribute(name, value)
Nenue@70 605 end
Nenue@70 606 end
Nenue@70 607
Nenue@70 608 kb.PLAYER_REGEN_ENABLED = function()
Nenue@70 609 if #kb.pendingAttributes >= 1 then
Nenue@70 610 local args = tremove(kb.pendingAttributes)
Nenue@70 611 while args do
Nenue@70 612 local target, name, value = unpack(args)
Nenue@70 613 --print(target:GetName(), 'attribute', '"'.. tostring(name)..'" = "'..tostring(value)..'"')
Nenue@70 614 cprint('deferred', target:GetName(), 'attribute', '"'.. tostring(name)..'" = "'..tostring(value)..'"')
Nenue@70 615 target:SetAttribute(name, value)
Nenue@70 616 args = tremove(kb.pendingAttributes)
Nenue@70 617 end
Nenue@70 618 end
Nenue@70 619
Nenue@70 620 if #kb.pendingCalls >= 1 then
Nenue@70 621
Nenue@70 622 local func = tremove(kb.pendingCalls)
Nenue@70 623 while func do
Nenue@70 624 func()
Nenue@70 625 end
Nenue@70 626 end
Nenue@70 627 end
Nenue@70 628
Nenue@70 629 kb.UpdateBindingsCache = function(actionType, actionID, bindings)
Nenue@70 630 local indexKey = actionType .. '_' .. actionID
Nenue@70 631 kb.bindings[indexKey] = bindings
Nenue@70 632
Nenue@70 633 cprint('|cFF00FF00'..indexKey..'|r = {'.. table.concat(bindings,', ').. '}')
Nenue@70 634 tinsert(kb.ChangedBindings, {actionType, actionID})
Nenue@70 635 end