Mercurial > wow > askmrrobot

annotate Gear.lua @ 87:fe0bc2f32851 v41

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
changed event for talent switch
author yellowfive
date Fri, 02 Sep 2016 16:21:56 -0700
parents af2474d28bb4
children 6bbe64d587b4
rev   line source
yellowfive@57 1 local Amr = LibStub("AceAddon-3.0"):GetAddon("AskMrRobot")
yellowfive@57 2 local L = LibStub("AceLocale-3.0"):GetLocale("AskMrRobot", true)
yellowfive@57 3 local AceGUI = LibStub("AceGUI-3.0")
yellowfive@57 4
yellowfive@57 5 local _gearTabs
yellowfive@57 6 local _activeTab
yellowfive@57 7
yellowfive@57 8 -- Returns a number indicating how different two items are (0 means the same, higher means more different)
yellowfive@57 9 local function countItemDifferences(item1, item2)
yellowfive@57 10 if item1 == nil and item2 == nil then return 0 end
yellowfive@57 11
yellowfive@57 12 -- different items (id + bonus ids + suffix, constitutes a different physical drop)
yellowfive@57 13 if Amr.GetItemUniqueId(item1, true) ~= Amr.GetItemUniqueId(item2, true) then
yellowfive@57 14 return 1000
yellowfive@57 15 end
yellowfive@57 16
yellowfive@81 17 -- different upgrade levels of the same item
yellowfive@57 18 if item1.upgradeId ~= item2.upgradeId then
yellowfive@57 19 return 100
yellowfive@57 20 end
yellowfive@57 21
yellowfive@57 22 -- different gems
yellowfive@57 23 local gemDiffs = 0
yellowfive@57 24 for i = 1, 3 do
yellowfive@57 25 if item1.gemIds[i] ~= item2.gemIds[i] then
yellowfive@57 26 gemDiffs = gemDiffs + 1
yellowfive@57 27 end
yellowfive@57 28 end
yellowfive@57 29
yellowfive@57 30 -- different enchants
yellowfive@57 31 local enchantDiff = 0
yellowfive@57 32 if item1.enchantId ~= item2.enchantId then
yellowfive@57 33 enchantDiff = 1
yellowfive@57 34 end
yellowfive@57 35
yellowfive@57 36 return gemDiffs + enchantDiff
yellowfive@57 37 end
yellowfive@57 38
yellowfive@57 39 -- given a table of items (keyed or indexed doesn't matter) find closest match to item, or nil if none are a match
yellowfive@57 40 local function findMatchingItemFromTable(item, list, bestLink, bestItem, bestDiff, bestLoc, usedItems, tableType)
yellowfive@57 41 if not list then return nil end
yellowfive@57 42
yellowfive@73 43 local found = false
yellowfive@57 44 for k,v in pairs(list) do
yellowfive@57 45 local listItem = Amr.ParseItemLink(v)
yellowfive@57 46 if listItem then
yellowfive@57 47 local diff = countItemDifferences(item, listItem)
yellowfive@57 48 if diff < bestDiff then
yellowfive@57 49 -- each physical item can only be used once, the usedItems table has items we can't use in this search
yellowfive@57 50 local key = string.format("%s_%s", tableType, k)
yellowfive@57 51 if not usedItems[key] then
yellowfive@57 52 bestLink = v
yellowfive@57 53 bestItem = listItem
yellowfive@57 54 bestDiff = diff
yellowfive@57 55 bestLoc = string.format("%s_%s", tableType, k)
yellowfive@73 56 found = true
yellowfive@57 57 end
yellowfive@57 58 end
yellowfive@73 59 if found then break end
yellowfive@57 60 end
yellowfive@57 61 end
yellowfive@57 62
yellowfive@57 63 return bestLink, bestItem, bestDiff, bestLoc
yellowfive@57 64 end
yellowfive@57 65
yellowfive@57 66 -- search the player's equipped gear, bag, bank, and void storage for an item that best matches the specified item
yellowfive@57 67 function Amr:FindMatchingItem(item, player, usedItems)
yellowfive@57 68 if not item then return nil end
yellowfive@57 69
yellowfive@57 70 local equipped = player.Equipped and player.Equipped[player.ActiveSpec] or nil
yellowfive@57 71 local bestLink, bestItem, bestDiff, bestLoc = findMatchingItemFromTable(item, equipped, nil, nil, 1000, nil, usedItems, "equip")
yellowfive@57 72 bestLink, bestItem, bestDiff, bestLoc = findMatchingItemFromTable(item, player.BagItems, bestLink, bestItem, bestDiff, bestLoc, usedItems, "bag")
yellowfive@57 73 bestLink, bestItem, bestDiff, bestLoc = findMatchingItemFromTable(item, player.BankItems, bestLink, bestItem, bestDiff, bestLoc, usedItems, "bank")
yellowfive@57 74 bestLink, bestItem, bestDiff, bestLoc = findMatchingItemFromTable(item, player.VoidItems, bestLink, bestItem, bestDiff, bestLoc, usedItems, "void")
yellowfive@57 75
yellowfive@57 76 if bestDiff >= 1000 then
yellowfive@57 77 return nil, nil, 1000
yellowfive@57 78 else
yellowfive@57 79 usedItems[bestLoc] = true
yellowfive@57 80 return bestLink, bestItem, bestDiff
yellowfive@57 81 end
yellowfive@57 82 end
yellowfive@57 83
yellowfive@57 84 local function renderEmptyGear(container)
yellowfive@57 85
yellowfive@57 86 local panelBlank = AceGUI:Create("AmrUiPanel")
yellowfive@57 87 panelBlank:SetLayout("None")
yellowfive@57 88 panelBlank:SetBackgroundColor(Amr.Colors.Black, 0.4)
yellowfive@57 89 panelBlank:SetPoint("TOPLEFT", container.content, "TOPLEFT", 6, 0)
yellowfive@57 90 panelBlank:SetPoint("BOTTOMRIGHT", container.content, "BOTTOMRIGHT")
yellowfive@57 91 container:AddChild(panelBlank)
yellowfive@57 92
yellowfive@57 93 local lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 94 lbl:SetText(L.GearBlank)
yellowfive@57 95 lbl:SetWidth(700)
yellowfive@57 96 lbl:SetJustifyH("MIDDLE")
yellowfive@57 97 lbl:SetFont(Amr.CreateFont("Italic", 16, Amr.Colors.TextTan))
yellowfive@57 98 lbl:SetPoint("BOTTOM", panelBlank.content, "CENTER", 0, 20)
yellowfive@57 99 panelBlank:AddChild(lbl)
yellowfive@57 100
yellowfive@57 101 local lbl2 = AceGUI:Create("AmrUiLabel")
yellowfive@57 102 lbl2:SetText(L.GearBlank2)
yellowfive@57 103 lbl2:SetWidth(700)
yellowfive@57 104 lbl2:SetJustifyH("MIDDLE")
yellowfive@57 105 lbl2:SetFont(Amr.CreateFont("Italic", 16, Amr.Colors.TextTan))
yellowfive@57 106 lbl2:SetPoint("TOP", lbl.frame, "CENTER", 0, -20)
yellowfive@57 107 panelBlank:AddChild(lbl2)
yellowfive@57 108 end
yellowfive@57 109
yellowfive@57 110 local function renderGear(spec, container)
yellowfive@57 111
yellowfive@57 112 local player = Amr:ExportCharacter()
yellowfive@57 113 local gear = Amr.db.char.GearSets[spec]
yellowfive@57 114 local equipped = player.Equipped[player.ActiveSpec]
yellowfive@57 115
yellowfive@57 116 if not gear then
yellowfive@57 117 -- no gear has been imported for this spec so show a message
yellowfive@57 118 renderEmptyGear(container)
yellowfive@57 119 else
yellowfive@57 120 local panelGear = AceGUI:Create("AmrUiPanel")
yellowfive@57 121 panelGear:SetLayout("None")
yellowfive@57 122 panelGear:SetBackgroundColor(Amr.Colors.Black, 0.3)
yellowfive@57 123 panelGear:SetPoint("TOPLEFT", container.content, "TOPLEFT", 6, 0)
yellowfive@57 124 panelGear:SetPoint("BOTTOMRIGHT", container.content, "BOTTOMRIGHT", -300, 0)
yellowfive@57 125 container:AddChild(panelGear)
yellowfive@57 126
yellowfive@57 127 local panelMods = AceGUI:Create("AmrUiPanel")
yellowfive@57 128 panelMods:SetLayout("None")
yellowfive@57 129 panelMods:SetPoint("TOPLEFT", panelGear.frame, "TOPRIGHT", 15, 0)
yellowfive@57 130 panelMods:SetPoint("BOTTOMRIGHT", container.content, "BOTTOMRIGHT")
yellowfive@57 131 panelMods:SetBackgroundColor(Amr.Colors.Black, 0.3)
yellowfive@57 132 container:AddChild(panelMods)
yellowfive@57 133
yellowfive@57 134 -- spec icon
yellowfive@57 135 local icon = AceGUI:Create("AmrUiIcon")
yellowfive@57 136 icon:SetIconBorderColor(Amr.Colors.Classes[player.Class])
yellowfive@57 137 icon:SetWidth(48)
yellowfive@57 138 icon:SetHeight(48)
yellowfive@57 139
yellowfive@57 140 local iconSpec
yellowfive@81 141 if player.SubSpecs and player.SubSpecs[spec] then
yellowfive@57 142 iconSpec = player.SubSpecs[spec]
yellowfive@57 143 else
yellowfive@57 144 iconSpec = player.Specs[spec]
yellowfive@57 145 end
yellowfive@57 146
yellowfive@57 147 icon:SetIcon("Interface\\Icons\\" .. Amr.SpecIcons[iconSpec])
yellowfive@57 148 icon:SetPoint("TOPLEFT", panelGear.content, "TOPLEFT", 10, -10)
yellowfive@57 149 panelGear:AddChild(icon)
yellowfive@57 150
yellowfive@57 151 local btnEquip = AceGUI:Create("AmrUiButton")
yellowfive@81 152 btnEquip:SetText(L.GearButtonEquip(L.SpecsShort[player.Specs[spec]]))
yellowfive@57 153 btnEquip:SetBackgroundColor(Amr.Colors.Green)
yellowfive@57 154 btnEquip:SetFont(Amr.CreateFont("Regular", 14, Amr.Colors.White))
yellowfive@57 155 btnEquip:SetWidth(300)
yellowfive@57 156 btnEquip:SetHeight(26)
yellowfive@57 157 btnEquip:SetPoint("LEFT", icon.frame, "RIGHT", 40, 0)
yellowfive@57 158 btnEquip:SetPoint("RIGHT", panelGear.content, "RIGHT", -40, 0)
yellowfive@57 159 btnEquip:SetCallback("OnClick", function(widget)
yellowfive@57 160 Amr:EquipGearSet(spec)
yellowfive@57 161 end)
yellowfive@57 162 panelGear:AddChild(btnEquip)
yellowfive@57 163
yellowfive@57 164 -- each physical item can only be used once, this tracks ones we have already used
yellowfive@57 165 local usedItems = {}
yellowfive@57 166
yellowfive@57 167 -- gear list
yellowfive@57 168 local prevElem = icon
yellowfive@57 169 for slotNum = 1, #Amr.SlotIds do
yellowfive@57 170 local slotId = Amr.SlotIds[slotNum]
yellowfive@57 171
yellowfive@57 172 local equippedItemLink = equipped and equipped[slotId] or nil
yellowfive@57 173 local equippedItem = Amr.ParseItemLink(equippedItemLink)
yellowfive@57 174 local optimalItem = gear[slotId]
yellowfive@57 175 local optimalItemLink = Amr.CreateItemLink(optimalItem)
yellowfive@57 176
yellowfive@57 177 -- see if item is currently equipped, is false if don't have any item for that slot (e.g. OH for a 2-hander)
yellowfive@57 178 local isEquipped = false
yellowfive@57 179 if equippedItem and optimalItem and Amr.GetItemUniqueId(equippedItem) == Amr.GetItemUniqueId(optimalItem) then
yellowfive@57 180 isEquipped = true
yellowfive@57 181 end
yellowfive@57 182
yellowfive@57 183 -- find the item in the player's inventory that best matches what the optimization wants to use
yellowfive@57 184 local matchItemLink, matchItem = Amr:FindMatchingItem(optimalItem, player, usedItems)
yellowfive@57 185
yellowfive@57 186 -- slot label
yellowfive@57 187 local lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 188 lbl:SetText(Amr.SlotDisplayText[slotId])
yellowfive@57 189 lbl:SetWidth(85)
yellowfive@57 190 lbl:SetFont(Amr.CreateFont("Regular", 14, Amr.Colors.White))
yellowfive@57 191 lbl:SetPoint("TOPLEFT", prevElem.frame, "BOTTOMLEFT", 0, -12)
yellowfive@57 192 panelGear:AddChild(lbl)
yellowfive@57 193 prevElem = lbl
yellowfive@57 194
yellowfive@57 195 -- ilvl label
yellowfive@57 196 local lblIlvl = AceGUI:Create("AmrUiLabel")
yellowfive@57 197 lblIlvl:SetWidth(45)
yellowfive@57 198 lblIlvl:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.TextTan))
yellowfive@57 199 lblIlvl:SetPoint("TOPLEFT", lbl.frame, "TOPRIGHT", 0, 0)
yellowfive@57 200 panelGear:AddChild(lblIlvl)
yellowfive@57 201
yellowfive@57 202 -- equipped label
yellowfive@57 203 local lblEquipped = AceGUI:Create("AmrUiLabel")
yellowfive@57 204 lblEquipped:SetWidth(20)
yellowfive@57 205 lblEquipped:SetFont(Amr.CreateFont("Regular", 14, Amr.Colors.White))
yellowfive@57 206 lblEquipped:SetPoint("TOPLEFT", lblIlvl.frame, "TOPRIGHT", 0, 0)
yellowfive@57 207 lblEquipped:SetText(isEquipped and "E" or "")
yellowfive@57 208 panelGear:AddChild(lblEquipped)
yellowfive@57 209
yellowfive@57 210 -- item name/link label
yellowfive@57 211 local lblItem = AceGUI:Create("AmrUiLabel")
yellowfive@57 212 lblItem:SetWordWrap(false)
yellowfive@57 213 lblItem:SetWidth(345)
yellowfive@57 214 lblItem:SetFont(Amr.CreateFont(isEquipped and "Regular" or "Bold", isEquipped and 14 or 15, Amr.Colors.White))
yellowfive@57 215 lblItem:SetPoint("TOPLEFT", lblEquipped.frame, "TOPRIGHT", 0, 0)
yellowfive@57 216 panelGear:AddChild(lblItem)
yellowfive@57 217
yellowfive@57 218 -- fill the name/ilvl labels, which may require asynchronous loading of item information
yellowfive@57 219 if optimalItemLink then
yellowfive@57 220 Amr.GetItemInfo(optimalItemLink, function(obj, name, link, quality, iLevel)
yellowfive@57 221 -- set item name, tooltip, and ilvl
yellowfive@57 222 obj.nameLabel:SetText(link:gsub("%[", ""):gsub("%]", ""))
yellowfive@57 223 Amr:SetItemTooltip(obj.nameLabel, link)
yellowfive@57 224 obj.ilvlLabel:SetText(iLevel)
yellowfive@57 225 end, { ilvlLabel = lblIlvl, nameLabel = lblItem })
yellowfive@57 226 end
yellowfive@57 227
yellowfive@57 228 -- modifications
yellowfive@57 229 if optimalItem then
yellowfive@57 230 local itemInfo = Amr.db.char.ExtraItemData[spec][optimalItem.id]
yellowfive@57 231
yellowfive@57 232 -- gems
yellowfive@57 233 if itemInfo and itemInfo.socketColors then
yellowfive@57 234 for i = 1, #itemInfo.socketColors do
yellowfive@57 235 local g = optimalItem.gemIds[i]
yellowfive@57 236 local isGemEquipped = g ~= 0 and matchItem and matchItem.gemIds and matchItem.gemIds[i] == g
yellowfive@57 237
yellowfive@57 238 -- highlight for gem that doesn't match
yellowfive@57 239 local socketBorder = AceGUI:Create("AmrUiPanel")
yellowfive@57 240 socketBorder:SetLayout("None")
yellowfive@57 241 socketBorder:SetBackgroundColor(Amr.Colors.Black, isGemEquipped and 0 or 1)
yellowfive@57 242 socketBorder:SetWidth(26)
yellowfive@57 243 socketBorder:SetHeight(26)
yellowfive@57 244 socketBorder:SetPoint("LEFT", lblItem.frame, "RIGHT", 30, 0)
yellowfive@57 245 if isGemEquipped then
yellowfive@57 246 socketBorder:SetAlpha(0.3)
yellowfive@57 247 end
yellowfive@57 248 panelMods:AddChild(socketBorder)
yellowfive@57 249
yellowfive@57 250 local socketBg = AceGUI:Create("AmrUiIcon")
yellowfive@57 251 socketBg:SetLayout("None")
yellowfive@57 252 socketBg:SetBorderWidth(2)
yellowfive@57 253 socketBg:SetIconBorderColor(Amr.Colors.Green, isGemEquipped and 0 or 1)
yellowfive@57 254 socketBg:SetWidth(24)
yellowfive@57 255 socketBg:SetHeight(24)
yellowfive@57 256 socketBg:SetPoint("TOPLEFT", socketBorder.content, "TOPLEFT", 1, -1)
yellowfive@57 257 socketBorder:AddChild(socketBg)
yellowfive@57 258
yellowfive@57 259 local socketIcon = AceGUI:Create("AmrUiIcon")
yellowfive@57 260 socketIcon:SetBorderWidth(1)
yellowfive@57 261 socketIcon:SetIconBorderColor(Amr.Colors.White)
yellowfive@57 262 socketIcon:SetWidth(18)
yellowfive@57 263 socketIcon:SetHeight(18)
yellowfive@57 264 socketIcon:SetPoint("CENTER", socketBg.content, "CENTER")
yellowfive@57 265 socketBg:AddChild(socketIcon)
yellowfive@57 266
yellowfive@57 267 -- get icon for optimized gem
yellowfive@57 268 if g ~= 0 then
yellowfive@57 269 local gemInfo = Amr.db.char.ExtraGemData[spec][g]
yellowfive@57 270 if gemInfo then
yellowfive@57 271 Amr.GetItemInfo(gemInfo.id, function(obj, name, link, quality, iLevel, reqLevel, class, subclass, maxStack, equipSlot, texture)
yellowfive@57 272 -- set icon and a tooltip
yellowfive@57 273 obj:SetIcon(texture)
yellowfive@57 274 Amr:SetItemTooltip(obj, link)
yellowfive@57 275 end, socketIcon)
yellowfive@57 276 end
yellowfive@57 277 end
yellowfive@57 278 end
yellowfive@57 279 end
yellowfive@57 280
yellowfive@57 281 -- enchant
yellowfive@57 282 if optimalItem.enchantId and optimalItem.enchantId ~= 0 then
yellowfive@57 283 local isEnchantEquipped = matchItem and matchItem.enchantId and matchItem.enchantId == optimalItem.enchantId
yellowfive@57 284
yellowfive@57 285 local lblEnchant = AceGUI:Create("AmrUiLabel")
yellowfive@57 286 lblEnchant:SetWordWrap(false)
yellowfive@57 287 lblEnchant:SetWidth(170)
yellowfive@57 288 lblEnchant:SetFont(Amr.CreateFont(isEnchantEquipped and "Regular" or "Bold", 14, isEnchantEquipped and Amr.Colors.TextGray or Amr.Colors.White))
yellowfive@57 289 lblEnchant:SetPoint("TOPLEFT", lblItem.frame, "TOPRIGHT", 130, 0)
yellowfive@57 290
yellowfive@57 291 local enchInfo = Amr.db.char.ExtraEnchantData[spec][optimalItem.enchantId]
yellowfive@57 292 if enchInfo then
yellowfive@57 293 lblEnchant:SetText(enchInfo.text)
yellowfive@57 294
yellowfive@57 295 Amr.GetItemInfo(enchInfo.itemId, function(obj, name, link)
yellowfive@57 296 Amr:SetItemTooltip(obj, link)
yellowfive@57 297 end, lblEnchant)
yellowfive@57 298 --Amr:SetSpellTooltip(lblEnchant, enchInfo.spellId)
yellowfive@57 299 end
yellowfive@57 300 panelMods:AddChild(lblEnchant)
yellowfive@57 301 end
yellowfive@57 302 end
yellowfive@57 303
yellowfive@57 304 prevElem = lbl
yellowfive@57 305 end
yellowfive@57 306 end
yellowfive@57 307 end
yellowfive@57 308
yellowfive@57 309 local function onGearTabSelected(container, event, group)
yellowfive@57 310 container:ReleaseChildren()
yellowfive@57 311 _activeTab = group
yellowfive@57 312 renderGear(tonumber(group), container)
yellowfive@57 313 end
yellowfive@57 314
yellowfive@57 315 local function onImportClick(widget)
yellowfive@57 316 Amr:ShowImportWindow()
yellowfive@57 317 end
yellowfive@57 318
yellowfive@57 319 -- renders the main UI for the Gear tab
yellowfive@57 320 function Amr:RenderTabGear(container)
yellowfive@57 321
yellowfive@57 322 local btnImport = AceGUI:Create("AmrUiButton")
yellowfive@57 323 btnImport:SetText(L.GearButtonImportText)
yellowfive@57 324 btnImport:SetBackgroundColor(Amr.Colors.Orange)
yellowfive@57 325 btnImport:SetFont(Amr.CreateFont("Bold", 16, Amr.Colors.White))
yellowfive@57 326 btnImport:SetWidth(120)
yellowfive@57 327 btnImport:SetHeight(26)
yellowfive@57 328 btnImport:SetPoint("TOPLEFT", container.content, "TOPLEFT", 0, -81)
yellowfive@57 329 btnImport:SetCallback("OnClick", onImportClick)
yellowfive@57 330 container:AddChild(btnImport)
yellowfive@57 331
yellowfive@57 332 local lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 333 lbl:SetText(L.GearImportNote)
yellowfive@57 334 lbl:SetWidth(100)
yellowfive@57 335 lbl:SetFont(Amr.CreateFont("Italic", 12, Amr.Colors.TextTan))
yellowfive@57 336 lbl:SetJustifyH("MIDDLE")
yellowfive@57 337 lbl:SetPoint("TOP", btnImport.frame, "BOTTOM", 0, -5)
yellowfive@57 338 container:AddChild(lbl)
yellowfive@57 339
yellowfive@57 340 local lbl2 = AceGUI:Create("AmrUiLabel")
yellowfive@57 341 lbl2:SetText(L.GearTipTitle)
yellowfive@57 342 lbl2:SetWidth(140)
yellowfive@57 343 lbl2:SetFont(Amr.CreateFont("Italic", 20, Amr.Colors.Text))
yellowfive@57 344 lbl2:SetJustifyH("MIDDLE")
yellowfive@57 345 lbl2:SetPoint("TOP", lbl.frame, "BOTTOM", 0, -50)
yellowfive@57 346 container:AddChild(lbl2)
yellowfive@57 347
yellowfive@57 348 lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 349 lbl:SetText(L.GearTipText)
yellowfive@57 350 lbl:SetWidth(140)
yellowfive@57 351 lbl:SetFont(Amr.CreateFont("Italic", 12, Amr.Colors.Text))
yellowfive@57 352 lbl:SetJustifyH("MIDDLE")
yellowfive@57 353 lbl:SetPoint("TOP", lbl2.frame, "BOTTOM", 0, -5)
yellowfive@57 354 container:AddChild(lbl)
yellowfive@57 355
yellowfive@57 356 lbl2 = AceGUI:Create("AmrUiLabel")
yellowfive@57 357 lbl2:SetText(L.GearTipCommands)
yellowfive@57 358 lbl2:SetWidth(130)
yellowfive@57 359 lbl2:SetFont(Amr.CreateFont("Italic", 12, Amr.Colors.Text))
yellowfive@57 360 lbl2:SetPoint("TOP", lbl.frame, "BOTTOM", 10, -5)
yellowfive@57 361 container:AddChild(lbl2)
yellowfive@57 362
yellowfive@57 363 local t = AceGUI:Create("AmrUiTabGroup")
yellowfive@57 364 t:SetLayout("None")
yellowfive@81 365
yellowfive@81 366 local tabz = {}
yellowfive@81 367 for pos = 1, 4 do
yellowfive@81 368 local specId = GetSpecializationInfo(pos)
yellowfive@81 369 if specId then
yellowfive@81 370 table.insert(tabz, { text = L.SpecsShort[Amr.SpecIds[specId]], value = pos .. "", style = "bold" })
yellowfive@81 371 end
yellowfive@81 372 end
yellowfive@81 373
yellowfive@81 374 t:SetTabs(tabz)
yellowfive@57 375 t:SetCallback("OnGroupSelected", onGearTabSelected)
yellowfive@57 376 t:SetPoint("TOPLEFT", container.content, "TOPLEFT", 144, -30)
yellowfive@57 377 t:SetPoint("BOTTOMRIGHT", container.content, "BOTTOMRIGHT")
yellowfive@57 378 container:AddChild(t)
yellowfive@57 379 _gearTabs = t;
yellowfive@57 380
yellowfive@81 381 --[[
yellowfive@61 382 local btnShop = AceGUI:Create("AmrUiButton")
yellowfive@61 383 btnShop:SetText(L.GearButtonShop)
yellowfive@61 384 btnShop:SetBackgroundColor(Amr.Colors.Blue)
yellowfive@61 385 btnShop:SetFont(Amr.CreateFont("Regular", 14, Amr.Colors.White))
yellowfive@61 386 btnShop:SetWidth(245)
yellowfive@61 387 btnShop:SetHeight(26)
yellowfive@61 388 btnShop:SetPoint("TOPRIGHT", container.content, "TOPRIGHT", -20, -25)
yellowfive@61 389 btnShop:SetCallback("OnClick", function(widget) Amr:ShowShopWindow() end)
yellowfive@61 390 container:AddChild(btnShop)
yellowfive@81 391 ]]
yellowfive@61 392
yellowfive@57 393 if not _activeTab then
yellowfive@81 394 _activeTab = tostring(GetSpecialization())
yellowfive@57 395 end
yellowfive@57 396
yellowfive@57 397 t:SelectTab(_activeTab)
yellowfive@57 398 end
yellowfive@57 399
yellowfive@57 400 -- do cleanup when the gear tab is released
yellowfive@57 401 function Amr:ReleaseTabGear()
yellowfive@57 402 _gearTabs = nil
yellowfive@57 403 end
yellowfive@57 404
yellowfive@57 405 -- show and update the gear tab for the specified spec
yellowfive@57 406 function Amr:ShowGearTab(spec)
yellowfive@57 407 if not _gearTabs then return end
yellowfive@57 408
yellowfive@57 409 _activeTab = tostring(spec)
yellowfive@57 410 _gearTabs:SelectTab(_activeTab)
yellowfive@57 411 end
yellowfive@57 412
yellowfive@57 413 -- refresh display of the current gear tab
yellowfive@57 414 function Amr:RefreshGearTab()
yellowfive@57 415 if not _gearTabs then return end
yellowfive@57 416 _gearTabs:SelectTab(_activeTab)
yellowfive@57 417 end
yellowfive@57 418
yellowfive@57 419
yellowfive@57 420 ------------------------------------------------------------------------------------------------
yellowfive@57 421 -- Gear Set Management
yellowfive@57 422 ------------------------------------------------------------------------------------------------
yellowfive@57 423 local _waitingForSpec = 0
yellowfive@57 424 local _waitingForItemLock = nil
yellowfive@57 425 local _pendingEquip = nil
yellowfive@57 426
yellowfive@57 427 -- scan a bag for the best matching item
yellowfive@57 428 local function scanBagForItem(item, bagId, bestItem, bestDiff, bestLink)
yellowfive@57 429 local numSlots = GetContainerNumSlots(bagId)
yellowfive@57 430 for slotId = 1, numSlots do
yellowfive@57 431 local _, _, _, _, _, _, itemLink = GetContainerItemInfo(bagId, slotId)
yellowfive@57 432 -- we skip any stackable item, as far as we know, there is no equippable gear that can be stacked
yellowfive@57 433 if itemLink then
yellowfive@57 434 local bagItem = Amr.ParseItemLink(itemLink)
yellowfive@57 435 if bagItem ~= nil then
yellowfive@57 436 local diff = countItemDifferences(item, bagItem)
yellowfive@57 437 if diff < bestDiff then
yellowfive@57 438 bestItem = { bag = bagId, slot = slotId }
yellowfive@57 439 bestDiff = diff
yellowfive@57 440 bestLink = itemLink
yellowfive@57 441 end
yellowfive@57 442 end
yellowfive@57 443 end
yellowfive@57 444 end
yellowfive@57 445 return bestItem, bestDiff, bestLink
yellowfive@57 446 end
yellowfive@57 447
yellowfive@57 448 -- find the first empty slot in the player's backpack+bags
yellowfive@57 449 local function findFirstEmptyBagSlot()
yellowfive@57 450
yellowfive@57 451 local bagIds = {}
yellowfive@57 452 table.insert(bagIds, BACKPACK_CONTAINER)
yellowfive@57 453 for bagId = 1, NUM_BAG_SLOTS do
yellowfive@57 454 table.insert(bagIds, bagId)
yellowfive@57 455 end
yellowfive@57 456
yellowfive@57 457 for i, bagId in ipairs(bagIds) do
yellowfive@57 458 local numSlots = GetContainerNumSlots(bagId)
yellowfive@57 459 for slotId = 1, numSlots do
yellowfive@57 460 local _, _, _, _, _, _, itemLink = GetContainerItemInfo(bagId, slotId)
yellowfive@57 461 if not itemLink then
yellowfive@57 462 return bagId, slotId
yellowfive@57 463 end
yellowfive@57 464 end
yellowfive@57 465 end
yellowfive@57 466
yellowfive@57 467 return nil, nil
yellowfive@57 468 end
yellowfive@57 469
yellowfive@57 470 local function finishEquipGearSet()
yellowfive@57 471 if not _pendingEquip then return end
yellowfive@57 472
yellowfive@57 473 _pendingEquip.tries = _pendingEquip.tries + 1
yellowfive@57 474 if _pendingEquip.tries > 16 then
yellowfive@61 475 -- too many tries, just give up (shouldn't happen but just to be safe)
yellowfive@57 476 _pendingEquip = nil
yellowfive@57 477 else
yellowfive@57 478 -- start over again, trying any items that could not be equipped in the previous pass (unique constraints)
yellowfive@57 479 Amr:EquipGearSet(_pendingEquip.spec)
yellowfive@57 480 end
yellowfive@57 481 end
yellowfive@57 482
yellowfive@57 483 -- equip the next slot in a pending equip
yellowfive@57 484 local function tryEquipNextItem()
yellowfive@57 485 if not _pendingEquip then return end
yellowfive@57 486
yellowfive@57 487 local item = _pendingEquip.itemsToEquip[_pendingEquip.nextSlot]
yellowfive@57 488
yellowfive@57 489 local bestItem = nil
yellowfive@57 490 local bestLink = nil
yellowfive@57 491 local bestDiff = 1000
yellowfive@57 492
yellowfive@57 493 -- find the best matching item
yellowfive@57 494
yellowfive@73 495 -- inventory
yellowfive@73 496 bestItem, bestDiff, bestLink = scanBagForItem(item, BACKPACK_CONTAINER, bestItem, bestDiff, bestLink)
yellowfive@73 497 for bagId = 1, NUM_BAG_SLOTS do
yellowfive@73 498 bestItem, bestDiff, bestLink = scanBagForItem(item, bagId, bestItem, bestDiff, bestLink)
yellowfive@73 499 end
yellowfive@73 500
yellowfive@61 501 -- equipped items, but skip slots we have just equipped (to avoid e.g. just moving 2 of the same item back and forth between mh oh weapon slots)
yellowfive@57 502 for slotNum = 1, #Amr.SlotIds do
yellowfive@57 503 local slotId = Amr.SlotIds[slotNum]
yellowfive@61 504 if not _pendingEquip.doneSlots[slotId] then
yellowfive@61 505 local itemLink = GetInventoryItemLink("player", slotId)
yellowfive@61 506 if itemLink then
yellowfive@61 507 local invItem = Amr.ParseItemLink(itemLink)
yellowfive@61 508 if invItem ~= nil then
yellowfive@61 509 local diff = countItemDifferences(item, invItem)
yellowfive@61 510 if diff < bestDiff then
yellowfive@61 511 bestItem = { slot = slotId }
yellowfive@61 512 bestDiff = diff
yellowfive@61 513 bestLink = itemLink
yellowfive@61 514 end
yellowfive@57 515 end
yellowfive@57 516 end
yellowfive@57 517 end
yellowfive@57 518 end
yellowfive@57 519
yellowfive@57 520 -- bank
yellowfive@67 521 bestItem, bestDiff, bestLink = scanBagForItem(item, BANK_CONTAINER, bestItem, bestDiff, bestLink)
yellowfive@57 522 for bagId = NUM_BAG_SLOTS + 1, NUM_BAG_SLOTS + NUM_BANKBAGSLOTS do
yellowfive@67 523 bestItem, bestDiff, bestLink = scanBagForItem(item, bagId, bestItem, bestDiff, bestLink)
yellowfive@57 524 end
yellowfive@57 525
yellowfive@57 526 ClearCursor()
yellowfive@57 527
yellowfive@57 528 if not bestItem then
yellowfive@57 529 -- stop if we can't find an item
yellowfive@57 530 Amr:Print(L.GearEquipErrorNotFound)
yellowfive@57 531 Amr:Print(L.GearEquipErrorNotFound2)
yellowfive@57 532 _pendingEquip = nil
yellowfive@57 533 return
yellowfive@57 534
yellowfive@71 535 elseif bestItem and bestItem.bag and (bestItem.bag == BANK_CONTAINER or bestItem.bag >= NUM_BAG_SLOTS + 1 and bestItem.bag <= NUM_BAG_SLOTS + NUM_BANKBAGSLOTS) then
yellowfive@57 536 -- find first empty bag slot
yellowfive@57 537 local invBag, invSlot = findFirstEmptyBagSlot()
yellowfive@57 538 if not invBag then
yellowfive@57 539 -- stop if bags are too full
yellowfive@57 540 Amr:Print(L.GearEquipErrorBagFull)
yellowfive@57 541 _pendingEquip = nil
yellowfive@57 542 return
yellowfive@57 543 end
yellowfive@57 544
yellowfive@57 545 -- move from bank to bag
yellowfive@57 546 PickupContainerItem(bestItem.bag, bestItem.slot)
yellowfive@57 547 PickupContainerItem(invBag, invSlot)
yellowfive@57 548
yellowfive@57 549 -- set flag so that when we clear cursor and release the item lock, we can respond to the event and continue
yellowfive@57 550 _waitingForItemLock = {
yellowfive@57 551 bagId = invBag,
yellowfive@57 552 slotId = invSlot
yellowfive@57 553 }
yellowfive@57 554
yellowfive@57 555 ClearCursor()
yellowfive@57 556
yellowfive@57 557 -- now we need to wait for game event to continue and try this item again after it is in our bag
yellowfive@57 558 return
yellowfive@57 559 else
yellowfive@59 560 if not Amr:CanEquip(bestItem.bag, bestItem.slot) then
yellowfive@57 561 -- if an item is not soulbound, then warn the user and quit
yellowfive@57 562 Amr:Print(L.GearEquipErrorSoulbound(bestLink))
yellowfive@57 563 _pendingEquip = nil
yellowfive@57 564 return
yellowfive@57 565 else
yellowfive@57 566 local slotId = _pendingEquip.nextSlot
yellowfive@57 567
yellowfive@57 568 -- an item in the player's bags or already equipped, equip it
yellowfive@57 569 _pendingEquip.bag = bestItem.bag
yellowfive@57 570 _pendingEquip.slot = bestItem.slot
yellowfive@57 571 _pendingEquip.destSlot = slotId
yellowfive@57 572
yellowfive@57 573 if bestItem.bag then
yellowfive@57 574 PickupContainerItem(bestItem.bag, bestItem.slot)
yellowfive@57 575 else
yellowfive@57 576 PickupInventoryItem(bestItem.slot)
yellowfive@57 577 end
yellowfive@57 578 PickupInventoryItem(slotId)
yellowfive@57 579 ClearCursor()
yellowfive@61 580
yellowfive@61 581 -- wait for game events to continue
yellowfive@57 582 end
yellowfive@57 583 end
yellowfive@57 584
yellowfive@57 585 end
yellowfive@57 586
yellowfive@57 587 local function onItemUnlocked(bagId, slotId)
yellowfive@57 588
yellowfive@57 589 if _waitingForItemLock then
yellowfive@57 590 -- waiting on a move from bank to bags to complete, just continue as normal afterwards
yellowfive@57 591 if bagId == _waitingForItemLock.bagId and slotId == _waitingForItemLock.slotId then
yellowfive@57 592 _waitingForItemLock = nil
yellowfive@57 593 tryEquipNextItem()
yellowfive@57 594 end
yellowfive@57 595
yellowfive@57 596 elseif _pendingEquip and _pendingEquip.destSlot then
yellowfive@57 597 -- waiting on an item swap to complete successfully so that we can go on to the next item
yellowfive@57 598
yellowfive@57 599 -- inventory slot we're swapping to is still locked, can't continue yet
yellowfive@57 600 if IsInventoryItemLocked(_pendingEquip.destSlot) then return end
yellowfive@57 601
yellowfive@57 602 if _pendingEquip.bag then
yellowfive@57 603 local _, _, locked = GetContainerItemInfo(_pendingEquip.bag, _pendingEquip.slot)
yellowfive@57 604 -- the bag slot we're swapping from is still locked, can't continue yet
yellowfive@57 605 if locked then return end
yellowfive@57 606 else
yellowfive@57 607 -- inventory slot we're swapping from is still locked, can't continue yet
yellowfive@57 608 if IsInventoryItemLocked(_pendingEquip.slot) then return end
yellowfive@57 609 end
yellowfive@57 610
yellowfive@83 611 -- move on to the next item, this item is done or could not be swapped
yellowfive@83 612
yellowfive@83 613 local item = _pendingEquip.itemsToEquip[_pendingEquip.destSlot]
yellowfive@83 614 local itemLink = GetInventoryItemLink("player", _pendingEquip.destSlot)
yellowfive@83 615 if itemLink then
yellowfive@83 616 local invItem = Amr.ParseItemLink(itemLink)
yellowfive@83 617 if invItem ~= nil then
yellowfive@83 618 local diff = countItemDifferences(item, invItem)
yellowfive@83 619 if diff == 0 then
yellowfive@83 620 _pendingEquip.doneSlots[_pendingEquip.destSlot] = true
yellowfive@83 621 end
yellowfive@83 622 end
yellowfive@83 623 end
yellowfive@83 624
yellowfive@57 625 _pendingEquip.itemsToEquip[_pendingEquip.destSlot] = nil
yellowfive@57 626 _pendingEquip.destSlot = nil
yellowfive@57 627 _pendingEquip.bag = nil
yellowfive@57 628 _pendingEquip.slot = nil
yellowfive@57 629
yellowfive@57 630 _pendingEquip.remaining = _pendingEquip.remaining - 1
yellowfive@57 631 if _pendingEquip.remaining > 0 then
yellowfive@57 632 for slotId, item in pairs(_pendingEquip.itemsToEquip) do
yellowfive@57 633 _pendingEquip.nextSlot = slotId
yellowfive@57 634 break
yellowfive@57 635 end
yellowfive@57 636 tryEquipNextItem()
yellowfive@57 637 else
yellowfive@57 638 finishEquipGearSet()
yellowfive@57 639 end
yellowfive@57 640
yellowfive@57 641 end
yellowfive@57 642 end
yellowfive@57 643
yellowfive@57 644 local function startEquipGearSet(spec)
yellowfive@57 645
yellowfive@57 646 local gear = Amr.db.char.GearSets[spec]
yellowfive@57 647 if not gear then
yellowfive@57 648 Amr:Print(L.GearEquipErrorEmpty)
yellowfive@57 649 return
yellowfive@57 650 end
yellowfive@57 651
yellowfive@57 652 local player = Amr:ExportCharacter()
yellowfive@57 653
yellowfive@57 654 local itemsToEquip = {}
yellowfive@57 655 local remaining = 0
yellowfive@57 656 local usedItems = {}
yellowfive@57 657 local firstSlot = nil
yellowfive@57 658
yellowfive@57 659 -- check for items that need to be equipped
yellowfive@57 660 for slotNum = 1, #Amr.SlotIds do
yellowfive@57 661 local slotId = Amr.SlotIds[slotNum]
yellowfive@57 662
yellowfive@57 663 local old = player.Equipped[spec][slotId]
yellowfive@57 664 old = Amr.ParseItemLink(old)
yellowfive@57 665
yellowfive@57 666 local new = gear[slotId]
yellowfive@69 667 if new then
yellowfive@69 668 local diff = countItemDifferences(old, new)
yellowfive@69 669 if diff < 1000 then
yellowfive@69 670 -- same item, see if inventory has one that is closer (e.g. a duplicate item with correct enchants/gems)
yellowfive@69 671 local bestLink, bestItem, bestDiff = Amr:FindMatchingItem(new, player, usedItems)
yellowfive@69 672 if bestDiff and bestDiff < diff then
yellowfive@69 673 itemsToEquip[slotId] = new
yellowfive@69 674 remaining = remaining + 1
yellowfive@69 675 end
yellowfive@69 676 else
yellowfive@57 677 itemsToEquip[slotId] = new
yellowfive@57 678 remaining = remaining + 1
yellowfive@57 679 end
yellowfive@57 680 end
yellowfive@57 681 end
yellowfive@57 682
yellowfive@57 683 if remaining > 0 then
yellowfive@57 684 _pendingEquip = {
yellowfive@57 685 tries = _pendingEquip and _pendingEquip.spec == spec and _pendingEquip.tries or 0,
yellowfive@57 686 spec = spec,
yellowfive@57 687 itemsToEquip = itemsToEquip,
yellowfive@57 688 remaining = remaining,
yellowfive@73 689 doneSlots = _pendingEquip and _pendingEquip.spec == spec and _pendingEquip.doneSlots or {},
yellowfive@57 690 nextSlot = firstSlot
yellowfive@57 691 }
yellowfive@57 692
yellowfive@57 693 -- starting item
yellowfive@57 694 for slotId, item in pairs(_pendingEquip.itemsToEquip) do
yellowfive@57 695 _pendingEquip.nextSlot = slotId
yellowfive@57 696 break
yellowfive@57 697 end
yellowfive@57 698
yellowfive@57 699 tryEquipNextItem()
yellowfive@57 700 else
yellowfive@57 701 _pendingEquip = nil
yellowfive@57 702 end
yellowfive@57 703 end
yellowfive@57 704
yellowfive@57 705 local function onActiveTalentGroupChanged()
yellowfive@81 706
yellowfive@57 707 local auto = Amr.db.profile.options.autoGear
yellowfive@81 708 local currentSpec = GetSpecialization()
yellowfive@57 709
yellowfive@57 710 if currentSpec == _waitingForSpec or auto then
yellowfive@57 711 -- spec is what we want, now equip the gear
yellowfive@57 712 startEquipGearSet(currentSpec)
yellowfive@57 713 end
yellowfive@57 714
yellowfive@57 715 _waitingForSpec = 0
yellowfive@57 716 end
yellowfive@57 717
yellowfive@81 718 -- activate the specified spec and then equip the saved gear set
yellowfive@57 719 function Amr:EquipGearSet(spec)
yellowfive@57 720
yellowfive@81 721 -- if no argument, then cycle spec
yellowfive@57 722 if not spec then
yellowfive@81 723 spec = GetSpecialization() + 1
yellowfive@57 724 end
yellowfive@81 725
yellowfive@57 726 -- allow some flexibility in the arguments
yellowfive@81 727 if spec == "1" or spec == "2" or spec == "3" or spec == "4" then spec = tonumber(spec) end
yellowfive@81 728
yellowfive@81 729 local specId = GetSpecializationInfo(spec)
yellowfive@81 730 if not specId then spec = 1 end
yellowfive@57 731
yellowfive@57 732 if UnitAffectingCombat("player") then
yellowfive@57 733 Amr:Print(L.GearEquipErrorCombat)
yellowfive@57 734 return
yellowfive@57 735 end
yellowfive@57 736
yellowfive@57 737 _waitingForSpec = spec
yellowfive@57 738
yellowfive@81 739 local currentSpec = GetSpecialization()
yellowfive@57 740 if currentSpec ~= spec then
yellowfive@81 741 SetSpecialization(spec)
yellowfive@57 742 else
yellowfive@57 743 onActiveTalentGroupChanged()
yellowfive@57 744 end
yellowfive@57 745 end
yellowfive@57 746
yellowfive@57 747 -- moves any gear in bags to the bank if not part of main or off spec gear set
yellowfive@57 748 function Amr:CleanBags()
yellowfive@57 749 -- TODO: implement
yellowfive@57 750 end
yellowfive@57 751
yellowfive@81 752 --[[
yellowfive@81 753 local function testfunc(message)
yellowfive@81 754 print(strsub(message, 13))
yellowfive@81 755 end
yellowfive@81 756 ]]
yellowfive@81 757
yellowfive@57 758 function Amr:InitializeGear()
yellowfive@87 759 Amr:AddEventHandler("ACTIVE_TALENT_GROUP_CHANGED", onActiveTalentGroupChanged)
yellowfive@57 760
yellowfive@81 761 --Amr:AddEventHandler("CHAT_MSG_CHANNEL", testfunc)
yellowfive@81 762
yellowfive@57 763 Amr:AddEventHandler("UNIT_INVENTORY_CHANGED", function(unitID)
yellowfive@57 764 if unitID and unitID ~= "player" then return end
yellowfive@57 765 Amr:RefreshGearTab()
yellowfive@57 766 end)
yellowfive@57 767
yellowfive@57 768 Amr:AddEventHandler("ITEM_UNLOCKED", onItemUnlocked)
yellowfive@57 769 end