Mercurial > wow > askmrrobot

annotate AskMrRobot.lua @ 45:1851d0fd18fa v15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed an issue with shopping tab enchant links not working on AH
author yellowfive
date Sat, 01 Nov 2014 22:51:36 -0700
parents 262083330ac9
children 90175bdc50e6
rev   line source
adam@0 1 local _, AskMrRobot = ...
yellowfive@11 2 local L = AskMrRobot.L;
adam@0 3
adam@17 4 AskMrRobot.eventListener = CreateFrame("FRAME") -- Need a frame to respond to events
adam@17 5 AskMrRobot.eventListener:RegisterEvent("ADDON_LOADED") -- Fired when saved variables are loaded
adam@17 6 AskMrRobot.eventListener:RegisterEvent("ITEM_PUSH")
adam@17 7 AskMrRobot.eventListener:RegisterEvent("DELETE_ITEM_CONFIRM")
adam@17 8 AskMrRobot.eventListener:RegisterEvent("UNIT_INVENTORY_CHANGED")
adam@17 9 AskMrRobot.eventListener:RegisterEvent("BANKFRAME_OPENED")
adam@17 10 --AskMrRobot.eventListener:RegisterEvent("BANKFRAME_CLOSED");
adam@17 11 AskMrRobot.eventListener:RegisterEvent("PLAYERBANKSLOTS_CHANGED")
adam@17 12 AskMrRobot.eventListener:RegisterEvent("CHARACTER_POINTS_CHANGED")
adam@17 13 AskMrRobot.eventListener:RegisterEvent("CONFIRM_TALENT_WIPE")
adam@17 14 AskMrRobot.eventListener:RegisterEvent("PLAYER_TALENT_UPDATE")
adam@17 15 AskMrRobot.eventListener:RegisterEvent("ACTIVE_TALENT_GROUP_CHANGED")
adam@17 16 AskMrRobot.eventListener:RegisterEvent("PLAYER_ENTERING_WORLD")
adam@17 17 --AskMrRobot.eventListener:RegisterEvent("PLAYER_LOGOUT") -- Fired when about to log out
adam@17 18 --AskMrRobot.eventListener:RegisterEvent("PLAYER_LEVEL_UP")
adam@0 19 --AskMrRobot.eventListener:RegisterEvent("GET_ITEM_INFO_RECEIVED")
adam@0 20 AskMrRobot.eventListener:RegisterEvent("PLAYER_SPECIALIZATION_CHANGED")
adam@0 21 AskMrRobot.eventListener:RegisterEvent("SOCKET_INFO_UPDATE")
adam@0 22 AskMrRobot.eventListener:RegisterEvent("SOCKET_INFO_CLOSE")
adam@0 23 AskMrRobot.eventListener:RegisterEvent("BAG_UPDATE")
adam@0 24 AskMrRobot.eventListener:RegisterEvent("ITEM_UNLOCKED")
yellowfive@11 25 AskMrRobot.eventListener:RegisterEvent("PLAYER_REGEN_DISABLED")
yellowfive@11 26 --AskMrRobot.eventListener:RegisterEvent("ENCOUNTER_START")
adam@0 27 AskMrRobot.eventListener:RegisterEvent("CHAT_MSG_ADDON")
adam@0 28 AskMrRobot.eventListener:RegisterEvent("UPDATE_INSTANCE_INFO")
adam@0 29 AskMrRobot.eventListener:RegisterEvent("PLAYER_DIFFICULTY_CHANGED")
adam@21 30 AskMrRobot.eventListener:RegisterEvent("VOID_STORAGE_OPEN")
adam@21 31 AskMrRobot.eventListener:RegisterEvent("VOID_STORAGE_CONTENTS_UPDATE")
adam@21 32 AskMrRobot.eventListener:RegisterEvent("PLAYER_DIFFICULTY_CHANGED")
adam@21 33 AskMrRobot.eventListener:RegisterEvent("VOID_STORAGE_UPDATE")
adam@0 34
adam@0 35 AskMrRobot.AddonName = ...
adam@0 36 AskMrRobot.ChatPrefix = "_AMR"
adam@0 37
yellowfive@31 38 -- flag to turn on debugging behavior
yellowfive@31 39 AskMrRobot.debug = false
yellowfive@31 40
adam@17 41 -- the main user interface window
adam@17 42 AskMrRobot.mainWindow = nil
adam@0 43
adam@17 44 local _amrLDB
adam@17 45 local _minimapIcon
adam@0 46
adam@0 47 function AskMrRobot.eventListener:OnEvent(event, ...)
adam@0 48 if event == "ADDON_LOADED" then
adam@0 49 local addon = select(1, ...)
adam@0 50 if (addon == "AskMrRobot") then
adam@17 51 AskMrRobot.InitializeSettings()
adam@17 52 AskMrRobot.InitializeMinimap()
adam@0 53
yellowfive@35 54 AskMrRobot.mainWindow = AskMrRobot.AmrUI:new()
yellowfive@35 55
adam@0 56 -- listen for messages from other AMR addons
yellowfive@33 57 RegisterAddonMessagePrefix(AskMrRobot.ChatPrefix)
adam@0 58 end
adam@17 59
adam@17 60 elseif event == "UNIT_INVENTORY_CHANGED" then
adam@17 61 AskMrRobot.ScanEquipped()
adam@0 62
adam@17 63 elseif event == "ITEM_PUSH" or event == "DELETE_ITEM_CONFIRM" or event == "SOCKET_INFO_CLOSE" or event == "PLAYER_SPECIALIZATION_CHANGED" or event == "BAG_UPDATE" then
adam@17 64 --if AskMrRobot_ReforgeFrame then
adam@17 65 -- AskMrRobot_ReforgeFrame:OnUpdate()
adam@17 66 --end
adam@0 67 --AskMrRobot.SaveBags();
adam@0 68 --AskMrRobot.SaveEquiped();
adam@0 69 --AskMrRonot.GetCurrencies();
adam@0 70 --AskMrRobot.GetGold();
adam@17 71
adam@0 72 elseif event == "BANKFRAME_OPENED" or event == "PLAYERBANKSLOTS_CHANGED" then
adam@0 73 AskMrRobot.ScanBank();
adam@21 74 elseif event == "VOID_STORAGE_OPEN" or event == "VOID_STORAGE_CONTENTS_UPDATE" or event == "VOID_STORAGE_DEPOSIT_UPDATE" or event == "VOID_STORAGE_UPDATE" then
adam@21 75 AskMrRobot.ScanVoidStorage();
adam@0 76 elseif event == "CHARACTER_POINTS_CHANGED" or event == "CONFIRM_TALENT_WIPE" or event == "PLAYER_TALENT_UPDATE" or event == "ACTIVE_TALENT_GROUP_CHANGED" then
adam@0 77 --AskMrRobot.GetAmrSpecializations();
adam@17 78 --if AskMrRobot_ReforgeFrame then
adam@17 79 -- AskMrRobot_ReforgeFrame:OnUpdate()
adam@17 80 --end
adam@17 81
adam@0 82 elseif event == "ITEM_UNLOCKED" then
adam@17 83 --AskMrRobot.On_ITEM_UNLOCKED()
yellowfive@11 84
adam@17 85 elseif event == "PLAYER_ENTERING_WORLD" then
adam@17 86 AskMrRobot.RecordLogin()
yellowfive@11 87
yellowfive@11 88 elseif event == "PLAYER_REGEN_DISABLED" then
yellowfive@11 89 -- send data about this character when a player enters combat in a supported zone
yellowfive@11 90 if AskMrRobot.IsSupportedInstance() then
yellowfive@11 91 local t = time()
yellowfive@11 92 AskMrRobot.SaveAll()
yellowfive@11 93 AskMrRobot.ExportToAddonChat(t)
adam@17 94 AskMrRobot.CombatLogTab.SaveExtras(t)
yellowfive@11 95 end
yellowfive@11 96
adam@0 97 elseif event == "CHAT_MSG_ADDON" then
adam@0 98 local chatPrefix, message = select(1, ...)
adam@17 99 local isLogging = AskMrRobot.CombatLogTab.IsLogging()
adam@0 100 if (isLogging and chatPrefix == AskMrRobot.ChatPrefix) then
yellowfive@35 101 if AskMrRobot.mainWindow then
yellowfive@35 102 AskMrRobot.mainWindow.combatLogTab:ReadAddonMessage(message)
yellowfive@35 103 end
adam@0 104 end
adam@17 105
adam@0 106 elseif event == "UPDATE_INSTANCE_INFO" or event == "PLAYER_DIFFICULTY_CHANGED" then
yellowfive@35 107 if AskMrRobot.mainWindow then
yellowfive@35 108 AskMrRobot.mainWindow.combatLogTab:UpdateAutoLogging()
yellowfive@35 109 end
adam@0 110 end
adam@0 111
adam@0 112 end
adam@0 113
adam@17 114 AskMrRobot.eventListener:SetScript("OnEvent", AskMrRobot.eventListener.OnEvent)
adam@0 115
adam@0 116
adam@0 117 SLASH_AMR1 = "/amr";
adam@0 118 function SlashCmdList.AMR(msg)
adam@0 119
adam@0 120 if msg == 'toggle' then
adam@17 121 AskMrRobot.mainWindow:Toggle()
adam@0 122 elseif msg == 'show' then
adam@17 123 AskMrRobot.mainWindow:Show()
adam@0 124 elseif msg == 'hide' then
adam@17 125 AskMrRobot.mainWindow:Hide()
adam@0 126 elseif msg == 'export' then
adam@17 127 AskMrRobot.mainWindow.exportTab:Show()
yellowfive@11 128 elseif msg == 'wipe' then
adam@17 129 AskMrRobot.mainWindow.combatLogTab:LogWipe()
yellowfive@11 130 elseif msg == 'unwipe' then
adam@17 131 AskMrRobot.mainWindow.combatLogTab:LogUnwipe()
adam@0 132 else
yellowfive@11 133 print(L.AMR_SLASH_COMMAND_TEXT_1 .. L.AMR_SLASH_COMMAND_TEXT_2 .. L.AMR_SLASH_COMMAND_TEXT_3 .. L.AMR_SLASH_COMMAND_TEXT_4 .. L.AMR_SLASH_COMMAND_TEXT_5 .. L.AMR_SLASH_COMMAND_TEXT_6 .. L.AMR_SLASH_COMMAND_TEXT_7)
adam@0 134 end
adam@0 135 end
adam@0 136
adam@17 137 -- initialize settings when the addon loads
adam@17 138 function AskMrRobot.InitializeSettings()
adam@17 139
adam@17 140 -- global settings
adam@17 141 if not AmrSettings then AmrSettings = {} end
adam@17 142
adam@17 143 -- per-character settings
adam@17 144 if not AmrDb then AmrDb = {} end
adam@17 145
adam@17 146 -- addon stuff
adam@17 147 if not AmrDb.IconInfo then AmrDb.IconInfo = {} end
adam@17 148 if not AmrDb.Options then AmrDb.Options = {} end
adam@17 149 if not AmrDb.LastCharacterImport then AmrDb.LastCharacterImport = "" end
adam@17 150 if not AmrDb.LastCharacterImportDate then AmrDb.LastCharacterImportDate = "" end
adam@17 151
adam@17 152 if not AmrDb.SendSettings then
adam@17 153 AmrDb.SendSettings = {
adam@17 154 SendGems = true,
adam@17 155 SendEnchants = true,
adam@17 156 SendEnchantMaterials = true,
adam@17 157 SendToType = "a friend",
adam@17 158 SendTo = ""
adam@17 159 }
adam@17 160 end
adam@17 161
adam@17 162 -- character stuff
adam@17 163 AskMrRobot.ScanCharacter()
adam@17 164 if not AmrDb.BankItems then AmrDb.BankItems = {} end
adam@17 165 if not AmrDb.BagItems then AmrDb.BagItems = {} end
adam@17 166 if not AmrDb.Currencies then AmrDb.Currencies = {} end
adam@17 167 if not AmrDb.Reps then AmrDb.Reps = {} end
adam@17 168 -- data saved for both specs
adam@17 169 if not AmrDb.Specs then AmrDb.Specs = {} end
adam@17 170 if not AmrDb.Glyphs then AmrDb.Glyphs = {} end
adam@17 171 if not AmrDb.Talents then AmrDb.Talents = {} end
adam@17 172 if not AmrDb.Equipped then AmrDb.Equipped = {} end
adam@17 173
adam@17 174 -- combat log specific settings
adam@17 175 AskMrRobot.CombatLogTab.InitializeVariable()
adam@0 176 end
adam@0 177
adam@17 178 -- record logins when the addon starts up, used to help figure out which character logged which parts of a log file
adam@17 179 function AskMrRobot.RecordLogin()
adam@17 180
yellowfive@41 181 -- only need to record the region now (only thing we can't get from the log file still)
yellowfive@41 182 AmrSettings.Region = AskMrRobot.regionNames[GetCurrentRegion()]
adam@17 183
yellowfive@41 184 -- remove the old Logins data, don't need it anymore
yellowfive@41 185 AmrSettings.Logins = nil
adam@17 186 end
adam@17 187
adam@17 188 function AskMrRobot.InitializeMinimap()
adam@17 189
adam@17 190 -- minimap icon and data broker icon plugin thingy
adam@17 191 _amrLDB = LibStub("LibDataBroker-1.1"):NewDataObject("AskMrRobot", {
adam@17 192 type = "launcher",
adam@17 193 text = "Ask Mr. Robot",
adam@17 194 icon = "Interface\\AddOns\\AskMrRobot\\Media\\icon",
adam@17 195 OnClick = function()
adam@17 196 if IsControlKeyDown() then
adam@17 197 AskMrRobot.mainWindow.combatLogTab:LogWipe()
adam@17 198 elseif IsModifiedClick("CHATLINL") then
adam@17 199 AskMrRobot.mainWindow.exportTab:Show()
adam@17 200 else
adam@17 201 AskMrRobot.mainWindow:Toggle()
adam@17 202 end
adam@17 203 end,
adam@17 204 OnTooltipShow = function(tt)
adam@17 205 tt:AddLine("Ask Mr. Robot", 1, 1, 1);
adam@17 206 tt:AddLine(" ");
adam@17 207 tt:AddLine(L.AMR_ON_EVENT_TOOLTIP)
adam@17 208 end
adam@17 209 });
adam@17 210
adam@17 211 AskMrRobot.AmrUpdateMinimap()
adam@0 212 end
adam@0 213
yellowfive@11 214 function AskMrRobot.AmrUpdateMinimap()
adam@17 215 if AmrDb.Options.hideMapIcon then
adam@17 216 if _minimapIcon then
adam@17 217 _minimapIcon:Hide("AskMrRobot")
adam@0 218 end
adam@0 219 else
adam@17 220 if not _minimapIcon then
adam@17 221 _minimapIcon = LibStub("LibDBIcon-1.0")
adam@17 222 _minimapIcon:Register("AskMrRobot", _amrLDB, AmrDb.IconInfo)
adam@0 223 end
adam@17 224
adam@17 225 if AskMrRobot.CombatLogTab.IsLogging() then
adam@17 226 _amrLDB.icon = 'Interface\\AddOns\\AskMrRobot\\Media\\icon_green'
yellowfive@11 227 else
adam@17 228 _amrLDB.icon = 'Interface\\AddOns\\AskMrRobot\\Media\\icon'
yellowfive@11 229 end
adam@17 230
adam@17 231 _minimapIcon:Show("AskMrRobot")
adam@0 232 end
adam@0 233 end
adam@0 234
adam@17 235
adam@17 236 function AskMrRobot.SaveAll()
adam@17 237 AskMrRobot.ScanCharacter()
adam@17 238 AskMrRobot.ScanBags()
adam@17 239 AskMrRobot.ScanEquipped()
adam@17 240 AskMrRobot.GetCurrencies()
adam@17 241 AskMrRobot.GetReputations()
adam@17 242 AskMrRobot.GetSpecs()
adam@0 243 end
adam@0 244
adam@17 245 -- gets all basic character properties
adam@17 246 function AskMrRobot.ScanCharacter()
yellowfive@41 247 AmrDb.Region = AskMrRobot.regionNames[GetCurrentRegion()]
adam@17 248 AmrDb.RealmName = GetRealmName()
adam@17 249 AmrDb.CharacterName = UnitName("player")
adam@17 250 AmrDb.Guild = GetGuildInfo("player")
adam@17 251 AmrDb.ActiveSpec = GetActiveSpecGroup()
adam@17 252 AmrDb.Level = UnitLevel("player");
adam@17 253
adam@17 254 local cls, clsEn = UnitClass("player")
adam@17 255 AmrDb.Class = clsEn;
adam@17 256
adam@17 257 local race, raceEn = UnitRace("player")
adam@17 258 AmrDb.Race = raceEn;
adam@17 259 AmrDb.Faction = UnitFactionGroup("player")
adam@17 260
adam@17 261 AskMrRobot.GetAmrProfessions()
adam@0 262 end
adam@0 263
adam@0 264 function AskMrRobot.GetAmrProfessions()
adam@0 265
adam@0 266 local profMap = {
adam@0 267 [794] = "Archaeology",
adam@0 268 [171] = "Alchemy",
adam@0 269 [164] = "Blacksmithing",
adam@0 270 [185] = "Cooking",
adam@0 271 [333] = "Enchanting",
adam@0 272 [202] = "Engineering",
adam@0 273 [129] = "First Aid",
adam@0 274 [356] = "Fishing",
adam@0 275 [182] = "Herbalism",
adam@0 276 [773] = "Inscription",
adam@0 277 [755] = "Jewelcrafting",
adam@0 278 [165] = "Leatherworking",
adam@0 279 [186] = "Mining",
adam@0 280 [393] = "Skinning",
adam@0 281 [197] = "Tailoring"
adam@0 282 }
adam@0 283
adam@0 284 local prof1, prof2, archaeology, fishing, cooking, firstAid = GetProfessions();
adam@17 285 AmrDb.Professions = {};
adam@0 286 if prof1 then
adam@0 287 local name, icon, skillLevel, maxSkillLevel, numAbilities, spelloffset, skillLine, skillModifier = GetProfessionInfo(prof1);
adam@0 288 if profMap[skillLine] ~= nil then
adam@17 289 AmrDb.Professions[profMap[skillLine]] = skillLevel;
adam@0 290 end
adam@0 291 end
adam@0 292 if prof2 then
adam@0 293 local name, icon, skillLevel, maxSkillLevel, numAbilities, spelloffset, skillLine, skillModifier = GetProfessionInfo(prof2);
adam@0 294 if profMap[skillLine] ~= nil then
adam@17 295 AmrDb.Professions[profMap[skillLine]] = skillLevel;
adam@0 296 end
adam@0 297 end
adam@0 298 if archaeology then
adam@0 299 local name, icon, skillLevel, maxSkillLevel, numAbilities, spelloffset, skillLine, skillModifier = GetProfessionInfo(archaeology);
adam@0 300 if profMap[skillLine] ~= nil then
adam@17 301 AmrDb.Professions[profMap[skillLine]] = skillLevel;
adam@0 302 end
adam@0 303 end
adam@0 304 if fishing then
adam@0 305 local name, icon, skillLevel, maxSkillLevel, numAbilities, spelloffset, skillLine, skillModifier = GetProfessionInfo(fishing);
adam@0 306 if profMap[skillLine] ~= nil then
adam@17 307 AmrDb.Professions[profMap[skillLine]] = skillLevel;
adam@0 308 end
adam@0 309 end
adam@0 310 if cooking then
adam@0 311 local name, icon, skillLevel, maxSkillLevel, numAbilities, spelloffset, skillLine, skillModifier = GetProfessionInfo(cooking);
adam@0 312 if profMap[skillLine] ~= nil then
adam@17 313 AmrDb.Professions[profMap[skillLine]] = skillLevel;
adam@0 314 end
adam@0 315 end
adam@0 316 if firstAid then
adam@0 317 local name, icon, skillLevel, maxSkillLevel, numAbilities, spelloffset, skillLine, skillModifier = GetProfessionInfo(firstAid);
adam@0 318 if profMap[skillLine] ~= nil then
adam@17 319 AmrDb.Professions[profMap[skillLine]] = skillLevel;
adam@0 320 end
adam@0 321 end
adam@0 322 end
adam@0 323
adam@17 324
adam@17 325 -- use some local variables to deal with the fact that a user can close the bank before a scan completes
adam@17 326 local _lastBankBagId = nil
adam@17 327 local _lastBankSlotId = nil
adam@17 328 local BACKPACK_CONTAINER = 0
adam@17 329 local BANK_CONTAINER = -1
adam@17 330
adam@17 331 local function scanBag(bagId, isBank, bagTable, bagItemsWithCount)
adam@17 332 local numSlots = GetContainerNumSlots(bagId)
adam@17 333 for slotId = 1, numSlots do
adam@17 334 local _, itemCount, _, _, _, _, itemLink = GetContainerItemInfo(bagId, slotId)
adam@17 335 -- we skip any stackable item, as far as we know, there is no equippable gear that can be stacked
adam@17 336 if itemLink ~= nil then
adam@17 337 local itemData = AskMrRobot.parseItemLink(itemLink)
adam@17 338 if itemData ~= nil then
adam@17 339 if itemCount == 1 then
adam@17 340 if isBank then
adam@17 341 _lastBankBagId = bagId
adam@17 342 _lastBankSlotId = slotId
adam@17 343 end
adam@17 344 tinsert(bagTable, itemLink)
adam@17 345 end
adam@17 346 if bagItemsWithCount then
adam@17 347 if bagItemsWithCount[itemData.id] then
adam@17 348 bagItemsWithCount[itemData.id] = bagItemsWithCount[itemData.id] + itemCount
adam@17 349 else
adam@17 350 bagItemsWithCount[itemData.id] = itemCount
adam@17 351 end
adam@17 352 end
adam@17 353 end
adam@17 354 end
adam@17 355 end
adam@17 356 end
adam@17 357
adam@21 358 function AskMrRobot.ScanBank()
adam@21 359 --REAGENTBANK_CONTAINER (-3)
adam@17 360 local bankItems = {}
adam@17 361 local bankItemsAndCounts = {}
adam@17 362
adam@17 363 scanBag(BANK_CONTAINER, true, bankItems, bankItemsAndCounts)
adam@21 364 scanBag(REAGENTBANK_CONTAINER, true, bankItems, bankItemsAndCounts)
adam@17 365 for bagId = NUM_BAG_SLOTS + 1, NUM_BAG_SLOTS + NUM_BANKBAGSLOTS do
adam@17 366 scanBag(bagId, true, bankItems, bankItemsAndCounts)
adam@17 367 end
adam@17 368
adam@17 369 -- see if the scan completed before the window closed, otherwise we don't overwrite with partial data
adam@17 370 if _lastBankBagId ~= nil then
adam@17 371 local itemLink = GetContainerItemLink(_lastBankBagId, _lastBankSlotId)
adam@17 372 if itemLink ~= nil then --still open
adam@17 373 AmrDb.BankItems = bankItems
adam@17 374 AmrDb.BankItemsAndCounts = bankItemsAndCounts
adam@17 375 end
adam@17 376 end
adam@0 377 end
adam@0 378
adam@21 379 function AskMrRobot.ScanVoidStorage()
adam@21 380 if IsVoidStorageReady() then
adam@21 381 local voidItems = {}
adam@21 382 local VOID_STORAGE_MAX = 80
adam@21 383 local VOID_STORAGE_PAGES = 2
yellowfive@37 384
adam@21 385 for page = 1,VOID_STORAGE_PAGES do
adam@21 386 for i = 1,VOID_STORAGE_MAX do
adam@21 387 local itemId = GetVoidItemInfo(page, i)
adam@21 388 if itemId then
yellowfive@37 389 local itemLink = GetVoidItemHyperlinkString(((page - 1) * VOID_STORAGE_MAX) + i);
adam@21 390 if itemLink then
adam@21 391 tinsert(voidItems, itemLink)
adam@21 392 end
adam@21 393 end
adam@21 394 end
adam@21 395 end
yellowfive@37 396
adam@21 397 AmrDb.VoidItems = voidItems
adam@21 398 end
adam@21 399 end
adam@21 400
adam@17 401 function AskMrRobot.ScanBags(bagItemsWithCount)
adam@17 402 local bagItems = {}
adam@17 403 scanBag(BACKPACK_CONTAINER, false, bagItems, bagItemsWithCount) -- backpack
adam@17 404 for bagId = 1, NUM_BAG_SLOTS do
adam@17 405 scanBag(bagId, false, bagItems, bagItemsWithCount)
adam@17 406 end
adam@17 407 AmrDb.BagItems = bagItems
adam@0 408 end
adam@0 409
adam@17 410 function AskMrRobot.ScanEquipped()
adam@17 411 local equippedItems = {};
adam@17 412 for slotNum = 1, #AskMrRobot.slotIds do
adam@17 413 local slotId = AskMrRobot.slotIds[slotNum];
adam@17 414 local itemLink = GetInventoryItemLink("player", slotId);
adam@17 415 if (itemLink ~= nil) then
adam@17 416 equippedItems[slotId] = itemLink;
adam@17 417 end
adam@17 418 end
adam@17 419
adam@17 420 -- store last-seen equipped gear for each spec
adam@17 421 AmrDb.Equipped[GetActiveSpecGroup()] = equippedItems
adam@17 422 end
adam@0 423
adam@17 424
adam@17 425 local function getCurrencyAmount(index)
adam@17 426 local localized_label, amount, icon_file_name = GetCurrencyInfo(index);
adam@17 427 return amount;
adam@17 428 end
adam@17 429
adam@17 430 function AskMrRobot.GetCurrencies()
adam@17 431 local currencies = {};
adam@17 432 currencies[-1] = GetMoney()
adam@17 433
yellowfive@31 434 local currencyList = {61, 81, 241, 361, 384, 394, 390, 391, 392, 393, 394, 395, 396, 397, 398, 399, 400, 401, 402, 416, 515, 614, 615, 676, 679, 823}
adam@17 435 for i, currency in pairs(currencyList) do
adam@17 436 local amount = getCurrencyAmount(currency)
adam@17 437 if amount ~= 0 then
adam@17 438 currencies[currency] = amount
adam@17 439 end
adam@17 440 end
adam@17 441
adam@17 442 AmrDb.Currencies = currencies
adam@17 443 end
adam@17 444
adam@17 445
adam@17 446 local function getRepStanding(factionId)
adam@17 447 local name, description, standingId, _ = GetFactionInfoByID(factionId)
adam@17 448 return standingId - 1; -- our rep enum correspond to what the armory returns, are 1 less than what the game returns
adam@17 449 end
adam@17 450
adam@17 451 function AskMrRobot.GetReputations()
adam@17 452 local reps = {}
adam@17 453
adam@17 454 local repList = {1375,1376,1270,1269,1341,1337,1387,1388,1435}
adam@17 455 for i, repId in pairs(repList) do
adam@17 456 local standing = getRepStanding(repId)
adam@17 457 if standing >= 0 then
adam@17 458 reps[repId] = standing
adam@17 459 end
adam@17 460 end
adam@17 461
adam@17 462 AmrDb.Reps = reps;
adam@17 463 end
adam@17 464
adam@17 465
adam@17 466 local function getSpecId(specGroup)
adam@17 467 local spec = GetSpecialization(false, false, specGroup);
adam@17 468 return spec and GetSpecializationInfo(spec);
adam@17 469 end
adam@17 470
adam@17 471 local function getTalents(specGroup)
adam@0 472 local talentInfo = {}
adam@17 473 local maxTiers = 7
adam@17 474 for tier = 1, maxTiers do
adam@17 475 for col = 1, 3 do
adam@17 476 local id, name, texture, selected, available = GetTalentInfo(tier, col, specGroup)
adam@17 477 if selected then
adam@17 478 talentInfo[tier] = col
adam@17 479 end
adam@17 480 end
adam@0 481 end
adam@0 482
adam@0 483 local str = ""
adam@0 484 for i = 1, maxTiers do
adam@0 485 if talentInfo[i] then
adam@0 486 str = str .. talentInfo[i]
adam@0 487 else
adam@0 488 str = str .. '0'
adam@0 489 end
adam@0 490 end
adam@0 491
adam@0 492 return str
adam@0 493 end
adam@0 494
adam@17 495 local function getGlyphs(specGroup)
adam@0 496 local glyphs = {}
adam@0 497 for i = 1, NUM_GLYPH_SLOTS do
adam@17 498 local _, _, _, glyphSpellID, _, glyphID = GetGlyphSocketInfo(i, specGroup)
adam@0 499 if (glyphID) then
adam@0 500 tinsert(glyphs, glyphSpellID)
adam@0 501 end
adam@0 502 end
adam@0 503 return glyphs;
adam@0 504 end
adam@0 505
adam@17 506 -- get specs, talents, and glyphs
adam@17 507 function AskMrRobot.GetSpecs()
adam@17 508
adam@17 509 AmrDb.Specs = {}
adam@17 510 AmrDb.Talents = {}
adam@17 511 AmrDb.Glyphs = {}
adam@17 512
adam@17 513 for group = 1, GetNumSpecGroups() do
adam@17 514 -- spec, convert game spec id to one of our spec ids
adam@17 515 local specId = getSpecId(group)
adam@17 516 if specId then
adam@17 517 AmrDb.Specs[group] = AskMrRobot.specIds[specId]
adam@17 518 else
adam@17 519 AmrDb.Specs[group] = 0
adam@17 520 end
adam@17 521
adam@17 522 AmrDb.Talents[group] = getTalents(group)
adam@17 523 AmrDb.Glyphs[group] = getGlyphs(group)
adam@0 524 end
adam@0 525 end
adam@0 526
adam@17 527 ----------------------------------------------------------------------------
adam@17 528 -- Export
adam@17 529 ----------------------------------------------------------------------------
adam@0 530
adam@17 531 function AskMrRobot.toCompressedNumberList(list)
adam@0 532 -- ensure the values are numbers, sorted from lowest to highest
adam@0 533 local nums = {}
adam@0 534 for i, v in ipairs(list) do
adam@0 535 table.insert(nums, tonumber(v))
adam@0 536 end
adam@0 537 table.sort(nums)
adam@0 538
adam@0 539 local ret = {}
adam@0 540 local prev = 0
adam@0 541 for i, v in ipairs(nums) do
adam@0 542 local diff = v - prev
adam@0 543 table.insert(ret, diff)
adam@0 544 prev = v
adam@0 545 end
adam@0 546
adam@0 547 return table.concat(ret, ",")
adam@0 548 end
adam@0 549
adam@17 550 -- appends a list of items to the export
adam@17 551 local function appendItemsToExport(fields, itemObjects)
adam@17 552
adam@17 553 -- sort by item id so we can compress it more easily
adam@17 554 table.sort(itemObjects, function(a, b) return a.id < b.id end)
adam@17 555
adam@17 556 -- append to the export string
adam@17 557 local prevItemId = 0
adam@17 558 local prevGemId = 0
adam@17 559 local prevEnchantId = 0
adam@17 560 local prevUpgradeId = 0
adam@17 561 local prevBonusId = 0
adam@17 562 for i, itemData in ipairs(itemObjects) do
adam@17 563 local itemParts = {}
adam@17 564
adam@17 565 table.insert(itemParts, itemData.id - prevItemId)
adam@17 566 prevItemId = itemData.id
adam@17 567
adam@17 568 if itemData.slot ~= nil then table.insert(itemParts, "s" .. itemData.slot) end
adam@17 569 if itemData.suffixId ~= 0 then table.insert(itemParts, "f" .. itemData.suffixId) end
adam@17 570 if itemData.upgradeId ~= 0 then
adam@17 571 table.insert(itemParts, "u" .. (itemData.upgradeId - prevUpgradeId))
adam@17 572 prevUpgradeId = itemData.upgradeId
adam@17 573 end
adam@17 574 if itemData.bonusIds then
adam@17 575 for bIndex, bValue in ipairs(itemData.bonusIds) do
adam@17 576 table.insert(itemParts, "b" .. (bValue - prevBonusId))
adam@17 577 prevBonusId = bValue
adam@17 578 end
adam@17 579 end
adam@17 580 if itemData.gemIds[1] ~= 0 then
adam@17 581 table.insert(itemParts, "x" .. (itemData.gemIds[1] - prevGemId))
adam@17 582 prevGemId = itemData.gemIds[1]
adam@17 583 end
adam@17 584 if itemData.gemIds[2] ~= 0 then
adam@17 585 table.insert(itemParts, "y" .. (itemData.gemIds[2] - prevGemId))
adam@17 586 prevGemId = itemData.gemIds[2]
adam@17 587 end
adam@17 588 if itemData.gemIds[3] ~= 0 then
adam@17 589 table.insert(itemParts, "z" .. (itemData.gemIds[3] - prevGemId))
adam@17 590 prevGemId = itemData.gemIds[3]
adam@17 591 end
adam@17 592 if itemData.enchantId ~= 0 then
adam@17 593 table.insert(itemParts, "e" .. (itemData.enchantId - prevEnchantId))
adam@17 594 prevEnchantId = itemData.enchantId
adam@17 595 end
adam@17 596
adam@17 597 table.insert(fields, table.concat(itemParts, ""))
adam@17 598 end
adam@17 599 end
adam@17 600
adam@17 601 -- create a compact string representing this player
adam@17 602 -- if complete is true, exports everything (inventory, both specs)
adam@17 603 -- otherwise only exports the player's active gear, spec, etc.
adam@17 604 function AskMrRobot.ExportToCompressedString(complete)
adam@0 605 local fields = {}
adam@0 606
adam@0 607 -- compressed string uses a fixed order rather than inserting identifiers
adam@0 608 table.insert(fields, GetAddOnMetadata(AskMrRobot.AddonName, "Version"))
yellowfive@41 609 table.insert(fields, AmrDb.Region)
adam@17 610 table.insert(fields, AmrDb.RealmName)
adam@17 611 table.insert(fields, AmrDb.CharacterName)
adam@0 612
adam@0 613 -- guild name
adam@0 614 local guildName = GetGuildInfo("player")
adam@0 615 if guildName == nil then
adam@0 616 table.insert(fields, "")
adam@0 617 else
adam@0 618 table.insert(fields, guildName)
adam@0 619 end
adam@0 620
adam@0 621 -- race, default to pandaren if we can't read it for some reason
adam@17 622 local raceval = AskMrRobot.raceIds[AmrDb.Race]
adam@0 623 if raceval == nil then raceval = 13 end
adam@0 624 table.insert(fields, raceval)
adam@0 625
adam@0 626 -- faction, default to alliance if we can't read it for some reason
adam@17 627 raceval = AskMrRobot.factionIds[AmrDb.Faction]
adam@0 628 if raceval == nil then raceval = 1 end
adam@0 629 table.insert(fields, raceval)
adam@0 630
adam@17 631 table.insert(fields, AmrDb.Level)
adam@0 632
adam@0 633 local profs = {}
adam@0 634 local noprofs = true
adam@17 635 if AmrDb.Professions then
adam@17 636 for k, v in pairs(AmrDb.Professions) do
adam@17 637 local profval = AskMrRobot.professionIds[k]
yellowfive@11 638 if profval ~= nil then
yellowfive@11 639 noprofs = false
yellowfive@11 640 table.insert(profs, profval .. ":" .. v)
yellowfive@11 641 end
yellowfive@11 642 end
yellowfive@11 643 end
adam@0 644
adam@0 645 if noprofs then
adam@0 646 table.insert(profs, "0:0")
adam@0 647 end
adam@0 648
adam@0 649 table.insert(fields, table.concat(profs, ","))
adam@0 650
adam@17 651 -- export specs
adam@17 652 table.insert(fields, AmrDb.ActiveSpec)
adam@17 653 for spec = 1, 2 do
adam@17 654 if AmrDb.Specs[spec] and (complete or spec == AmrDb.ActiveSpec) then
adam@17 655 table.insert(fields, ".s" .. spec) -- indicates the start of a spec block
adam@17 656 table.insert(fields, AmrDb.Specs[spec])
adam@17 657 table.insert(fields, AmrDb.Talents[spec])
adam@17 658 table.insert(fields, AskMrRobot.toCompressedNumberList(AmrDb.Glyphs[spec]))
adam@17 659 end
adam@0 660 end
adam@0 661
adam@17 662 -- export equipped gear
adam@17 663 if AmrDb.Equipped then
adam@17 664 for spec = 1, 2 do
adam@17 665 if AmrDb.Equipped[spec] and (complete or spec == AmrDb.ActiveSpec) then
adam@17 666 table.insert(fields, ".q" .. spec) -- indicates the start of an equipped gear block
adam@17 667
adam@17 668 local itemObjects = {}
adam@17 669 for k, v in pairs(AmrDb.Equipped[spec]) do
adam@17 670 local itemData = AskMrRobot.parseItemLink(v)
adam@17 671 itemData.slot = k
adam@17 672 table.insert(itemObjects, itemData)
adam@17 673 end
adam@17 674
adam@17 675 appendItemsToExport(fields, itemObjects)
adam@17 676 end
adam@17 677 end
yellowfive@11 678 end
adam@0 679
adam@17 680 -- if doing a complete export, include reputations and bank/bag items too
adam@17 681 if complete then
adam@17 682
adam@17 683 -- export reputations
adam@17 684 local reps = {}
adam@17 685 local noreps = true
adam@17 686 if AmrDb.Reps then
adam@17 687 for k, v in pairs(AmrDb.Reps) do
adam@17 688 noreps = false
adam@17 689 table.insert(reps, k .. ":" .. v)
adam@17 690 end
adam@17 691 end
adam@17 692 if noreps then
adam@17 693 table.insert(reps, "_")
adam@17 694 end
adam@17 695
adam@17 696 table.insert(fields, ".r")
adam@17 697 table.insert(fields, table.concat(reps, ","))
adam@17 698
adam@17 699 -- export bag and bank
adam@17 700 local itemObjects = {}
adam@17 701 if AmrDb.BagItems then
adam@17 702 for i, v in ipairs(AmrDb.BagItems) do
adam@21 703 local _,_,_,_,_,_,_,stackCount = GetItemInfo(v)
adam@21 704 if stackCount == 1 then
adam@21 705 local itemData = AskMrRobot.parseItemLink(v)
adam@21 706 if itemData ~= nil then
adam@21 707 table.insert(itemObjects, itemData)
adam@21 708 end
adam@21 709 end
yellowfive@11 710 end
yellowfive@11 711 end
adam@17 712 if AmrDb.BankItems then
adam@17 713 for i, v in ipairs(AmrDb.BankItems) do
adam@21 714 local _,_,_,_,_,_,_,stackCount = GetItemInfo(v)
adam@21 715 if stackCount == 1 then
adam@21 716 local itemData = AskMrRobot.parseItemLink(v)
adam@21 717 if itemData ~= nil then
adam@21 718 table.insert(itemObjects, itemData)
adam@21 719 end
yellowfive@11 720 end
yellowfive@11 721 end
yellowfive@11 722 end
adam@21 723 if AmrDb.VoidItems then
adam@21 724 for i, v in ipairs(AmrDb.VoidItems) do
adam@21 725 local _,_,_,_,_,_,_,stackCount = GetItemInfo(v)
adam@21 726 if stackCount == 1 then
adam@21 727 local itemData = AskMrRobot.parseItemLink(v)
adam@21 728 if itemData ~= nil then
adam@21 729 table.insert(itemObjects, itemData)
adam@21 730 end
adam@21 731 end
adam@21 732 end
adam@21 733 end
adam@0 734
adam@17 735 table.insert(fields, ".inv")
adam@17 736 appendItemsToExport(fields, itemObjects)
adam@0 737 end
yellowfive@11 738
adam@0 739 return "$" .. table.concat(fields, ";") .. "$"
adam@0 740 end
adam@0 741
adam@0 742 function AskMrRobot.ExportToAddonChat(timestamp)
yellowfive@11 743 local msg = AskMrRobot.ExportToCompressedString(false)
yellowfive@41 744 local msgPrefix = timestamp .. "\n" .. AmrDb.Region .. "\n" .. AmrDb.RealmName .. "\n" .. AmrDb.CharacterName .. "\n"
adam@0 745
adam@0 746 -- break the data into 250 character chunks (to deal with the short limit on addon message size)
adam@0 747 local chunks = {}
adam@0 748 local i = 1
yellowfive@11 749 local length = string.len(msg)
adam@0 750 local chunkLen = 249 - string.len(msgPrefix)
adam@0 751 while (i <= length) do
adam@0 752 local endpos = math.min(i + chunkLen, length)
yellowfive@11 753 table.insert(chunks, msgPrefix .. string.sub(msg, i, endpos))
adam@0 754 i = endpos + 1
adam@0 755 end
adam@0 756
adam@0 757 for i, v in ipairs(chunks) do
adam@0 758 SendAddonMessage(AskMrRobot.ChatPrefix, v, "RAID")
adam@0 759 end
adam@0 760
adam@0 761 -- send a completion message
adam@0 762 SendAddonMessage(AskMrRobot.ChatPrefix, msgPrefix .. "done", "RAID")
adam@0 763 end
adam@0 764
adam@0 765 -- Create an export string that can be copied to the website
adam@0 766 function AskMrRobot.ExportToString()
adam@17 767 return AskMrRobot.ExportToCompressedString(true)
adam@17 768 end
adam@0 769
adam@17 770
adam@17 771 ----------------------------------------------------------------------------
adam@17 772 -- Import
adam@17 773 ----------------------------------------------------------------------------
adam@17 774
adam@17 775 -- imports will give us extra information about items, gems, and enchants
adam@17 776 AskMrRobot.ExtraItemData = {} -- keyed by item id
adam@17 777 AskMrRobot.ExtraGemData = {} -- keyed by gem enchant id
adam@17 778 AskMrRobot.ExtraEnchantData = {} -- keyed by enchant id
adam@17 779
adam@17 780 -- the data that was last imported
adam@17 781 AskMrRobot.ImportData = nil -- keyed by slot id
adam@17 782
yellowfive@45 783 local MIN_IMPORT_VERSION = 13
adam@17 784
adam@17 785 --
adam@17 786 -- Import a character, returning nil on success, otherwise an error message, import result stored in AskMrRobot.ImportData
adam@17 787 --
yellowfive@31 788 function AskMrRobot.ImportCharacter(data, isTest)
adam@17 789
adam@17 790 -- make sure all data is up to date before importing
adam@17 791 AskMrRobot.SaveAll()
adam@0 792
adam@17 793 if data == nil or string.len(data) == 0 then
adam@17 794 return L.AMR_IMPORT_ERROR_EMPTY
adam@0 795 end
adam@0 796
adam@17 797 local data1 = { strsplit("$", data) }
adam@17 798 if #data1 ~= 3 then
adam@17 799 return L.AMR_IMPORT_ERROR_FORMAT
adam@0 800 end
adam@17 801
adam@17 802 local parts = { strsplit(";", data1[2]) }
adam@17 803
adam@17 804 -- require a minimum version
adam@17 805 local ver = tonumber(parts[1])
adam@17 806 if ver < MIN_IMPORT_VERSION then
adam@17 807 return L.AMR_IMPORT_ERROR_VERSION
adam@0 808 end
adam@17 809
yellowfive@41 810 -- require name match (don't match realm due to language issues for now)
yellowfive@31 811 if not isTest then
yellowfive@43 812 local region = parts[2]
yellowfive@43 813 local realm = parts[3]
yellowfive@43 814 local name = parts[4]
yellowfive@31 815 if name ~= AmrDb.CharacterName then
yellowfive@31 816 local badPers = name .. " (" .. realm .. ")"
yellowfive@31 817 local goodPers = AmrDb.CharacterName .. " (" .. AmrDb.RealmName .. ")"
yellowfive@31 818 return L.AMR_IMPORT_ERROR_CHAR:format(badPers, goodPers)
yellowfive@31 819 end
yellowfive@31 820
yellowfive@31 821 -- require race match
yellowfive@43 822 local race = tonumber(parts[6])
yellowfive@31 823 if race ~= AskMrRobot.raceIds[AmrDb.Race] then
yellowfive@31 824 return L.AMR_IMPORT_ERROR_RACE
yellowfive@31 825 end
yellowfive@31 826
yellowfive@31 827 -- require faction match
yellowfive@43 828 local faction = tonumber(parts[7])
yellowfive@31 829 if faction ~= AskMrRobot.factionIds[AmrDb.Faction] then
yellowfive@31 830 return L.AMR_IMPORT_ERROR_FACTION
yellowfive@31 831 end
yellowfive@31 832
yellowfive@31 833 -- require level match
yellowfive@43 834 local level = tonumber(parts[8])
yellowfive@31 835 if level ~= AmrDb.Level then
yellowfive@31 836 return L.AMR_IMPORT_ERROR_LEVEL
yellowfive@31 837 end
yellowfive@31 838
yellowfive@31 839 -- require spec match
yellowfive@43 840 local spec = tonumber(parts[12])
yellowfive@31 841 if spec ~= AmrDb.Specs[AmrDb.ActiveSpec] then
yellowfive@41 842 --print(AmrDb.ActiveSpec)
yellowfive@41 843 --print(spec)
yellowfive@41 844 --print(AmrDb.Specs[AmrDb.ActiveSpec])
yellowfive@31 845 local _, specName = GetSpecializationInfoByID(AskMrRobot.gameSpecIds[spec])
yellowfive@31 846 return L.AMR_IMPORT_ERROR_SPEC:format(specName)
yellowfive@31 847 end
yellowfive@31 848
yellowfive@31 849 -- require talent match
yellowfive@43 850 local talents = parts[13]
yellowfive@31 851 if talents ~= AmrDb.Talents[AmrDb.ActiveSpec] then
yellowfive@31 852 return L.AMR_IMPORT_ERROR_TALENT
yellowfive@31 853 end
yellowfive@31 854
yellowfive@31 855 -- require glyph match
yellowfive@31 856 -- TODO: re-enable this check when glyphs are more consistent
yellowfive@43 857 --local glyphs = parts[14]
yellowfive@31 858 --if glyphs ~= AskMrRobot.toCompressedNumberList(AmrDb.Glyphs[AmrDb.ActiveSpec]) then
yellowfive@31 859 -- return L.AMR_IMPORT_ERROR_GLYPH
yellowfive@31 860 --end
adam@0 861 end
adam@0 862
adam@17 863
adam@17 864 -- if we make it this far, the data is valid, so read item information
adam@17 865 local importData = {}
adam@17 866
adam@17 867 local itemInfo = {}
adam@17 868 local gemInfo = {}
adam@17 869 local enchantInfo = {}
adam@17 870
adam@17 871 local prevItemId = 0
adam@17 872 local prevGemId = 0
adam@17 873 local prevEnchantId = 0
adam@17 874 local prevUpgradeId = 0
adam@17 875 local prevBonusId = 0
adam@17 876 local digits = {
adam@17 877 ["-"] = true,
adam@17 878 ["0"] = true,
adam@17 879 ["1"] = true,
adam@17 880 ["2"] = true,
adam@17 881 ["3"] = true,
adam@17 882 ["4"] = true,
adam@17 883 ["5"] = true,
adam@17 884 ["6"] = true,
adam@17 885 ["7"] = true,
adam@17 886 ["8"] = true,
adam@17 887 ["9"] = true,
adam@17 888 }
yellowfive@43 889 for i = 16, #parts do
adam@17 890 local itemString = parts[i]
adam@17 891 if itemString ~= "" and itemString ~= "_" then
adam@17 892 local tokens = {}
adam@17 893 local bonusIds = {}
adam@17 894 local hasBonuses = false
adam@17 895 local token = ""
adam@17 896 local prop = "i"
adam@17 897 local tokenComplete = false
adam@17 898 for j = 1, string.len(itemString) do
adam@17 899 local c = string.sub(itemString, j, j)
adam@17 900 if digits[c] == nil then
adam@17 901 tokenComplete = true
adam@17 902 else
adam@17 903 token = token .. c
adam@17 904 end
adam@17 905
adam@17 906 if tokenComplete or j == string.len(itemString) then
adam@17 907 local val = tonumber(token)
adam@17 908 if prop == "i" then
adam@17 909 val = val + prevItemId
adam@17 910 prevItemId = val
adam@17 911 elseif prop == "u" then
adam@17 912 val = val + prevUpgradeId
adam@17 913 prevUpgradeId = val
adam@17 914 elseif prop == "b" then
adam@17 915 val = val + prevBonusId
adam@17 916 prevBonusId = val
adam@17 917 elseif prop == "x" or prop == "y" or prop == "z" then
adam@17 918 val = val + prevGemId
adam@17 919 prevGemId = val
adam@17 920 elseif prop == "e" then
adam@17 921 val = val + prevEnchantId
adam@17 922 prevEnchantId = val
adam@17 923 end
adam@17 924
adam@17 925 if prop == "b" then
adam@17 926 table.insert(bonusIds, val)
adam@17 927 hasBonuses = true
adam@17 928 else
adam@17 929 tokens[prop] = val
adam@17 930 end
adam@17 931
adam@17 932 token = ""
adam@17 933 tokenComplete = false
adam@17 934
adam@17 935 -- we have moved on to the next token
adam@17 936 prop = c
adam@17 937 end
adam@17 938 end
adam@17 939
adam@17 940 local obj = {}
adam@17 941 importData[tonumber(tokens["s"])] = obj
adam@17 942
adam@17 943 obj.id = tokens["i"]
adam@17 944 obj.suffixId = tokens["f"] or 0
adam@17 945 obj.upgradeId = tokens["u"] or 0
adam@17 946 obj.enchantId = tokens["e"] or 0
adam@17 947
adam@17 948 obj.gemIds = {}
adam@17 949 table.insert(obj.gemIds, tokens["x"] or 0)
adam@17 950 table.insert(obj.gemIds, tokens["y"] or 0)
adam@17 951 table.insert(obj.gemIds, tokens["z"] or 0)
adam@17 952 table.insert(obj.gemIds, 0)
adam@17 953
adam@17 954 if hasBonuses then
adam@17 955 obj.bonusIds = bonusIds
adam@17 956 end
adam@17 957
adam@17 958 local itemObj = {}
adam@17 959 itemObj.id = obj.id
adam@17 960 itemInfo[obj.id] = itemObj
adam@17 961
adam@17 962 -- look for any socket color information, add to our extra data
adam@17 963 if tokens["c"] then
adam@17 964 itemObj.socketColors = {}
adam@17 965 for j = 1, string.len(tokens["c"]) do
adam@17 966 table.insert(itemObj.socketColors, tonumber(string.sub(tokens["c"], j, j)))
yellowfive@33 967 end
adam@17 968 end
adam@17 969
adam@17 970 -- look for item ID duplicate info, deals with old SoO items
adam@17 971 if tokens["d"] then
adam@17 972 itemObj.duplicateId = tonumber(tokens["d"])
yellowfive@33 973 itemInfo[itemObj.duplicateId] = itemObj
adam@17 974 end
adam@17 975
adam@17 976 end
adam@17 977 end
adam@17 978
adam@17 979 -- now read any extra display information
adam@17 980 parts = { strsplit("@", data1[3]) }
adam@17 981 for i = 1, #parts do
adam@17 982 local infoParts = { strsplit("\\", parts[i]) }
adam@17 983
adam@17 984 if infoParts[1] == "g" then
adam@17 985
adam@17 986 local gemObj = {}
adam@17 987 gemObj.enchantId = tonumber(infoParts[2])
adam@17 988 gemObj.id = tonumber(infoParts[3])
adam@17 989
adam@17 990 local identicalGems = infoParts[4]
adam@17 991 if string.len(identicalGems) > 0 then
adam@17 992 gemObj.identicalGroup = {}
adam@17 993 identicalGems = { strsplit(",", identicalGems) }
adam@17 994 for j = 1, #identicalGems do
adam@17 995 gemObj.identicalGroup[tonumber(identicalGems[j])] = true
adam@17 996 end
adam@17 997 end
adam@17 998
adam@17 999 gemObj.text = string.gsub(infoParts[5], "_(%a+)_", function(s) return L.AMR_STAT_SHORT_STRINGS[s] end)
adam@17 1000 if infoParts[6] == nil or string.len(infoParts[6]) == 0 then
adam@17 1001 gemObj.identicalItemGroup = {[gemObj.id]=true}
adam@17 1002 else
adam@17 1003 local identicalIds = { strsplit(',', infoParts[6]) }
adam@17 1004 gemObj.identicalItemGroup = {}
adam@17 1005 for j = 1, #identicalIds do
adam@17 1006 gemObj.identicalItemGroup[tonumber(identicalIds[j])] = true
adam@17 1007 end
adam@17 1008 end
adam@17 1009
adam@17 1010 gemInfo[gemObj.enchantId] = gemObj
adam@17 1011
adam@17 1012 elseif infoParts[1] == "e" then
adam@17 1013
adam@17 1014 local enchObj = {}
adam@17 1015 enchObj.id = tonumber(infoParts[2])
adam@17 1016 enchObj.itemId = tonumber(infoParts[3])
adam@17 1017 enchObj.spellId = tonumber(infoParts[4])
adam@17 1018 enchObj.text = string.gsub(infoParts[5], "_(%a+)_", function(s) return L.AMR_STAT_SHORT_STRINGS[s] end)
adam@17 1019
adam@17 1020 local mats = infoParts[6]
adam@17 1021 if string.len(mats) > 0 then
adam@17 1022 enchObj.materials = {}
adam@17 1023 mats = { strsplit(",", mats) }
adam@17 1024 for j = 1, #mats do
adam@17 1025 local kv = { strsplit("=", mats[j]) }
adam@17 1026 enchObj.materials[tonumber(kv[1])] = tonumber(kv[2])
adam@17 1027 end
adam@17 1028 end
adam@17 1029
adam@17 1030 enchantInfo[enchObj.id] = enchObj
adam@17 1031
adam@17 1032 end
adam@17 1033 end
adam@17 1034
yellowfive@31 1035 if isTest then
yellowfive@33 1036
yellowfive@31 1037 -- print result for debugging
yellowfive@33 1038 --for k,v in pairs(importData) do
yellowfive@35 1039 -- local blah = AskMrRobot.createItemLink(v)
yellowfive@35 1040 -- print(blah)
yellowfive@35 1041 --local name, link = GetItemInfo(blah)
yellowfive@35 1042 --print(link)
yellowfive@35 1043 --if link == nil then
yellowfive@35 1044 -- print(blah)
yellowfive@35 1045 -- print("bad item: " .. v.id)
yellowfive@35 1046 --end
yellowfive@33 1047 --end
yellowfive@33 1048
yellowfive@31 1049
yellowfive@31 1050 else
yellowfive@31 1051 -- we have succeeded, record the result
yellowfive@31 1052 AskMrRobot.ImportData = importData
yellowfive@31 1053 AskMrRobot.ExtraItemData = itemInfo
yellowfive@31 1054 AskMrRobot.ExtraGemData = gemInfo
yellowfive@31 1055 AskMrRobot.ExtraEnchantData = enchantInfo
yellowfive@31 1056
yellowfive@31 1057 AmrDb.LastCharacterImport = data
yellowfive@31 1058 AmrDb.LastCharacterImportDate = date()
yellowfive@31 1059 end
adam@0 1060 end