Mercurial > wow > itemauditor

annotate Core.lua @ 80:19609b3af2d7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed Bug 22 - Exchanging player bags for bank bags changes invested
author Asa Ayers <Asa.Ayers@Gmail.com>
date Thu, 05 Aug 2010 19:39:00 -0700
parents 71de6e86a1a4
children 64166ba5209a
rev   line source
Asa@63 1 local ItemAuditor = select(2, ...)
Asa@63 2 ItemAuditor = LibStub("AceAddon-3.0"):NewAddon(ItemAuditor, "ItemAuditor", "AceEvent-3.0", "AceBucket-3.0")
Asa@65 3 --@debug@
Asa@65 4 _G['ItemAuditor'] = ItemAuditor
Asa@65 5 --@end-debug@
Asa@0 6
Asa@0 7 local WHITE = "|cFFFFFFFF"
Asa@0 8 local RED = "|cFFFF0000"
Asa@0 9 local GREEN = "|cFF00FF00"
Asa@0 10 local YELLOW = "|cFFFFFF00"
Asa@0 11 local ORANGE = "|cFFFF7F00"
Asa@0 12 local TEAL = "|cFF00FF9A"
Asa@0 13 local GOLD = "|cFFFFD700"
Asa@0 14
Asa@67 15
Asa@67 16 ItemAuditor.Options = {
Asa@67 17 handler = ItemAuditor,
Asa@67 18 name = "ItemAuditor @project-version@",
Asa@67 19 type = 'group',
Asa@67 20 args = {
Asa@67 21 options = {
Asa@67 22 type = "execute",
Asa@67 23 name = "options",
Asa@67 24 desc = "Show Blizzard's options GUI",
Asa@67 25 func = "ShowOptionsGUI",
Asa@67 26 guiHidden = true,
Asa@67 27 },
Asa@67 28 debug = {
Asa@67 29 type = "execute",
Asa@67 30 name = "debug",
Asa@67 31 desc = "Shows the debug frame",
Asa@67 32 func = function() ItemAuditor_DebugFrame:Show() end,
Asa@67 33 guiHidden = true,
Asa@67 34 },
Asa@67 35 suspend = {
Asa@67 36 type = "toggle",
Asa@67 37 name = "suspend",
Asa@67 38 desc = "Suspends ItemAuditor",
Asa@67 39 get = "IsEnabled",
Asa@67 40 set = "SetEnabled",
Asa@67 41 guiHidden = true,
Asa@67 42 },
Asa@67 43 },
Asa@67 44 }
Asa@67 45
Asa@63 46 function ItemAuditor:OnInitialize()
Asa@0 47 local DB_defaults = {
Asa@0 48 char = {
Asa@13 49 ah = 1,
Asa@13 50 use_quick_auctions = false,
Asa@20 51 crafting_threshold = 1,
Asa@20 52 auction_threshold = 0.15,
Asa@71 53 qa_extra = 0,
Asa@55 54 output_chat_frame = nil,
Asa@0 55 },
Asa@16 56 profile = {
Asa@16 57 messages = {
Asa@16 58 cost_updates = true,
Asa@20 59 queue_skip = false,
Asa@23 60 },
Asa@63 61 ItemAuditor_enabled = true,
Asa@70 62 queue_destination = nil,
Asa@72 63 disabled_deciders = {},
Asa@16 64 },
Asa@0 65 factionrealm = {
Asa@8 66 item_account = {},
Asa@8 67 items = {},
Asa@39 68 outbound_cod = {},
Asa@0 69 },
Asa@0 70 }
Asa@0 71 self.db = LibStub("AceDB-3.0"):New("ItemAuditorDB", DB_defaults, true)
Asa@0 72
Asa@67 73 self.optionsFrame = LibStub("AceConfigDialog-3.0"):AddToBlizOptions("ItemAuditor", "ItemAuditor")
Asa@67 74
Asa@67 75 LibStub("AceConfig-3.0"):RegisterOptionsTable("ItemAuditor", ItemAuditor.Options, {"ia"})
Asa@38 76 ItemAuditor:RegisterFrame(ItemAuditor_DebugFrame)
Asa@23 77
Asa@65 78 --@debug@
Asa@59 79 -- ItemAuditor_DebugFrame:Show()
Asa@59 80 -- self:CreateFrame('tab_crafting')
Asa@74 81 self:RegisterEvent("TRADE_SKILL_SHOW", function()
Asa@74 82 ItemAuditor:CreateFrame('tab_crafting')
Asa@74 83 end)
Asa@65 84 --@end-debug@
Asa@0 85 end
Asa@0 86
Asa@67 87
Asa@67 88
Asa@38 89 local registeredEvents = {}
Asa@63 90 local originalRegisterEvent = ItemAuditor.RegisterEvent
Asa@63 91 function ItemAuditor:RegisterEvent(event, callback, arg)
Asa@38 92 registeredEvents[event] = true
Asa@38 93 if arg ~= nil then
Asa@38 94 return originalRegisterEvent(self, event, callback, arg)
Asa@38 95 elseif callback ~= nil then
Asa@38 96 return originalRegisterEvent(self, event, callback)
Asa@38 97 else
Asa@38 98 return originalRegisterEvent(self, event)
Asa@38 99 end
Asa@38 100 end
Asa@38 101
Asa@63 102 local originalUnregisterEvent = ItemAuditor.UnregisterEvent
Asa@63 103 function ItemAuditor:UnregisterEvent(event)
Asa@38 104 registeredEvents[event] = nil
Asa@38 105 return originalUnregisterEvent(self, event)
Asa@38 106 end
Asa@38 107
Asa@63 108 function ItemAuditor:UnregisterAllEvents()
Asa@38 109 for event in pairs(registeredEvents) do
Asa@38 110 self:UnregisterEvent(event)
Asa@38 111 end
Asa@38 112 end
Asa@38 113
Asa@38 114 local registeredFrames = {}
Asa@63 115 function ItemAuditor:RegisterFrame(frame)
Asa@38 116 tinsert(registeredFrames, frame)
Asa@38 117 end
Asa@38 118
Asa@63 119 function ItemAuditor:HideAllFrames()
Asa@38 120 for key, frame in pairs(registeredFrames) do
Asa@38 121 if frame then
Asa@38 122 frame:Hide()
Asa@38 123 end
Asa@38 124 end
Asa@38 125 end
Asa@38 126
Asa@63 127 function ItemAuditor:ConvertItems()
Asa@8 128 for itemName, value in pairs(self.db.factionrealm.item_account) do
Asa@15 129 local itemID = self:GetItemID(itemName)
Asa@8 130 if itemID ~= nil then
Asa@8 131 self:GetItem('item:' .. itemID)
Asa@8 132 end
Asa@8 133 if value == 0 then
Asa@8 134 self.db.factionrealm.item_account[itemName] = nil
Asa@8 135 end
Asa@8 136 end
Asa@8 137
Asa@8 138 for link, data in pairs(self.db.factionrealm.items) do
Asa@8 139 if self:GetItem(link).count == 0 or self:GetItem(link).invested == 0 then
Asa@8 140 self:RemoveItem(link)
Asa@8 141 end
Asa@10 142 end
Asa@10 143
Asa@12 144 self:RefreshQAGroups()
Asa@12 145 end
Asa@12 146
Asa@65 147 -- Options doesn't exist when this file is created the first time, so getOptions will
Asa@65 148 -- make one call to :GetModule and return the result and replace itself with a
Asa@65 149 -- function that simply returns the same object. The permanent solution will probably be
Asa@65 150 -- to move :Print to a different module.
Asa@65 151 local function getOptions()
Asa@65 152 local Options = ItemAuditor:GetModule("Options")
Asa@65 153 getOptions = function() return Options end
Asa@65 154 return Options
Asa@65 155 end
Asa@65 156
Asa@24 157 local printPrefix = "|cFFA3CEFFItemAuditor|r: "
Asa@63 158 function ItemAuditor:Print(message, ...)
Asa@24 159 message = format(message, ...)
Asa@65 160 getOptions().GetSelectedChatWindow():AddMessage( printPrefix .. tostring(message))
Asa@16 161 end
Asa@16 162
Asa@80 163 local function scanBag(bagID, i)
Asa@80 164 bagSize=GetContainerNumSlots(bagID)
Asa@80 165 for slotID = 0, bagSize do
Asa@80 166 local link= GetContainerItemLink(bagID, slotID);
Asa@80 167 link = link and ItemAuditor:GetSafeLink(link)
Asa@80 168
Asa@80 169 if link ~= nil and i[link] == nil then
Asa@80 170 i[link] = GetItemCount(link, true);
Asa@80 171 end
Asa@80 172 end
Asa@80 173 end
Asa@80 174
Asa@63 175 function ItemAuditor:GetCurrentInventory()
Asa@8 176 local i = {}
Asa@8 177 local bagID
Asa@8 178 local slotID
Asa@8 179
Asa@8 180 for bagID = 0, NUM_BAG_SLOTS do
Asa@80 181 scanBag(bagID, i)
Asa@8 182 end
Asa@80 183
Asa@80 184 scanBag(BANK_CONTAINER, i)
Asa@80 185 for bagID = NUM_BAG_SLOTS+1, NUM_BANKBAGSLOTS do
Asa@80 186 scanBag(bagID, i)
Asa@80 187 end
Asa@80 188
Asa@8 189 return {items = i, money = GetMoney()}
Asa@0 190 end
Asa@0 191
Asa@63 192 function ItemAuditor:GetInventoryDiff(pastInventory, current)
Asa@8 193 if current == nil then
Asa@8 194 current = self:GetCurrentInventory()
Asa@8 195 end
Asa@8 196 local diff = {}
Asa@8 197
Asa@8 198 for link, count in pairs(current.items) do
Asa@8 199 if pastInventory.items[link] == nil then
Asa@8 200 diff[link] = count
Asa@23 201 self:Debug("1 diff[" .. link .. "]=" .. diff[link])
Asa@8 202 elseif count - pastInventory.items[link] ~= 0 then
Asa@8 203 diff[link] = count - pastInventory.items[link]
Asa@23 204 self:Debug("2 diff[" .. link .. "]=" .. diff[link])
Asa@8 205 end
Asa@8 206 end
Asa@8 207
Asa@8 208 for link, count in pairs(pastInventory.items) do
Asa@8 209 if current.items[link] == nil then
Asa@8 210 diff[link] = -count
Asa@23 211 self:Debug("3 diff[" .. link .. "]=" .. diff[link])
Asa@8 212 elseif current.items[link] - count ~= 0 then
Asa@8 213 diff[link] = current.items[link] - pastInventory.items[link]
Asa@23 214 self:Debug("4 diff[" .. link .. "]=" .. diff[link])
Asa@8 215 end
Asa@8 216 end
Asa@8 217
Asa@8 218 local moneyDiff = current.money - pastInventory.money
Asa@23 219 if abs(moneyDiff) > 0 then
Asa@23 220 self:Debug("moneyDiff: " .. moneyDiff)
Asa@23 221 end
Asa@8 222
Asa@8 223 return {items = diff, money = moneyDiff}
Asa@0 224 end
Asa@0 225
Asa@39 226 local inboundCOD = {}
Asa@39 227 local skipMail = {}
Asa@63 228 function ItemAuditor:ScanMail()
Asa@0 229 local results = {}
Asa@39 230 local CODPaymentRegex = gsub(COD_PAYMENT, "%%s", "(.*)")
Asa@39 231
Asa@0 232 for mailIndex = 1, GetInboxNumItems() or 0 do
Asa@39 233 local sender, msgSubject, msgMoney, msgCOD, daysLeft, msgItem, _, _, msgText, _, isGM = select(3, GetInboxHeaderInfo(mailIndex))
Asa@15 234 local mailType = self:GetMailType(msgSubject)
Asa@6 235
Asa@39 236 local mailSignature = msgSubject .. '-' .. msgMoney .. '-' .. msgCOD .. '-' .. daysLeft
Asa@39 237
Asa@6 238 results[mailType] = (results[mailType] or {})
Asa@6 239
Asa@39 240 if skipMail[mailSignature] ~= nil then
Asa@39 241 -- do nothing
Asa@39 242 elseif mailType == "NonAHMail" and msgCOD > 0 then
Asa@6 243 mailType = 'COD'
Asa@6 244 results[mailType] = (results[mailType] or {})
Asa@5 245
Asa@5 246 local itemTypes = {}
Asa@5 247 for itemIndex = 1, ATTACHMENTS_MAX_RECEIVE do
Asa@5 248 local itemName, _, count, _, _= GetInboxItem(mailIndex, itemIndex)
Asa@5 249 if itemName ~= nil then
Asa@39 250 itemTypes[itemName] = (itemTypes[itemName] or 0) + count
Asa@5 251 end
Asa@5 252 end
Asa@5 253
Asa@15 254 if self:tcount(itemTypes) == 1 then
Asa@5 255 for itemName, count in pairs(itemTypes) do
Asa@39 256 results[mailType][itemName] = (results[mailType][itemName] or {total=0,count=0})
Asa@39 257 results[mailType][itemName].total = results[mailType][itemName].total + msgCOD
Asa@39 258
Asa@39 259 if inboundCOD[mailSignature] == nil then
Asa@39 260 results[mailType][itemName].count = results[mailType][itemName].count + count
Asa@39 261 inboundCOD[mailSignature] = (inboundCOD[mailSignature] or 0) + count
Asa@39 262 else
Asa@39 263 results[mailType][itemName].count = inboundCOD[mailSignature]
Asa@39 264 end
Asa@39 265
Asa@39 266
Asa@5 267 end
Asa@5 268 else
Asa@5 269 self:Debug("Don't know what to do with more than one item type on COD mail.")
Asa@5 270 end
Asa@6 271 elseif mailType == "CODPayment" then
Asa@39 272 -- /dump ItemAuditor.db.factionrealm.outbound_cod
Asa@39 273 self:Debug(msgSubject)
Asa@39 274 self:Debug(CODPaymentRegex)
Asa@39 275 local outboundSubject = select(3, msgSubject:find(CODPaymentRegex))
Asa@39 276 local trackID
Asa@39 277 if outboundSubject ~= nil then
Asa@39 278 self:Debug(outboundSubject)
Asa@45 279 trackID = select(3, outboundSubject:find('[[]IA: (%d*)[]]'))
Asa@39 280
Asa@39 281 if trackID ~= nil then
Asa@45 282 trackID = tonumber(trackID)
Asa@45 283 self:Debug('COD ID: %s', trackID)
Asa@39 284 local cod = self.db.factionrealm.outbound_cod[trackID]
Asa@39 285 if cod == nil then
Asa@39 286 skipMail[mailSignature] = true
Asa@39 287 self:Print("WARNING: {%s} has an invalid ItemAuditor tracking number.", msgSubject)
Asa@39 288 else
Asa@39 289 itemName = trackID .. "|" .. cod['link']
Asa@39 290
Asa@39 291
Asa@39 292 results[mailType][itemName] = (results[mailType][itemName] or {total=0,count=0})
Asa@39 293 results[mailType][itemName].total = results[mailType][itemName].total - msgMoney
Asa@39 294 results[mailType][itemName].count = results[mailType][itemName].count - cod.count
Asa@39 295 end
Asa@39 296 end
Asa@39 297 end
Asa@5 298
Asa@39 299 if trackID == nil then
Asa@39 300 skipMail[mailSignature] = true
Asa@39 301 self:Print("WARNING: {%s} is a COD payment but doesn't have an ItemAuditor tracking number.", msgSubject)
Asa@39 302 end
Asa@5 303
Asa@0 304 elseif mailType == "AHSuccess" then
Asa@0 305 local invoiceType, itemName, playerName, bid, buyout, deposit, consignment = GetInboxInvoiceInfo(mailIndex);
Asa@26 306 results[mailType][itemName] = (results[mailType][itemName] or {total=0,count=0})
Asa@26 307 results[mailType][itemName].total = results[mailType][itemName].total - deposit - buyout + consignment
Asa@26 308
Asa@0 309
Asa@0 310 elseif mailType == "AHWon" then
Asa@0 311 local invoiceType, itemName, playerName, bid, buyout, deposit, consignment = GetInboxInvoiceInfo(mailIndex);
Asa@26 312 results[mailType][itemName] = (results[mailType][itemName] or {total=0,count=0})
Asa@26 313 results[mailType][itemName].total = results[mailType][itemName].total + bid
Asa@26 314
Asa@26 315 local count = select(3, GetInboxItem(1,1))
Asa@26 316 results[mailType][itemName].count = results[mailType][itemName].count + count
Asa@5 317 elseif mailType == "AHExpired" or mailType == "AHCancelled" or mailType == "AHOutbid" then
Asa@0 318 -- These should be handled when you pay the deposit at the AH
Asa@0 319 else
Asa@24 320 -- self:Debug("Unhandled mail type: " .. mailType)
Asa@24 321 -- self:Debug(msgSubject)
Asa@0 322 end
Asa@0 323
Asa@0 324 end
Asa@23 325
Asa@23 326 for mailType, collection in pairs(results) do
Asa@26 327 for item, data in pairs(collection) do
Asa@26 328 self:Debug(format("|cFF00FF00MailScan|r: %s - %s - %s x %s", mailType, item, data.total, data.count))
Asa@23 329 end
Asa@23 330 end
Asa@23 331
Asa@0 332 return results
Asa@0 333 end
Asa@0 334
Asa@63 335 function ItemAuditor:GetItem(link, viewOnly)
Asa@9 336 if viewOnly == nil then
Asa@9 337 viewOnly = false
Asa@9 338 end
Asa@8 339
Asa@9 340 local itemName = nil
Asa@9 341 if self:GetSafeLink(link) == nil then
Asa@9 342 itemName = link
Asa@9 343 else
Asa@9 344 link = self:GetSafeLink(link)
Asa@9 345 itemName = GetItemInfo(link)
Asa@9 346 end
Asa@9 347
Asa@12 348
Asa@9 349 if self.db.factionrealm.item_account[itemName] ~= nil then
Asa@65 350 self.db.factionrealm.items[link] = {
Asa@12 351 count = Altoholic:GetItemCount(self:GetIDFromLink(link)),
Asa@8 352 invested = abs(self.db.factionrealm.item_account[itemName] or 0),
Asa@8 353 }
Asa@8 354 self.db.factionrealm.item_account[itemName] = nil
Asa@8 355 end
Asa@8 356
Asa@65 357 if viewOnly == false and self.db.factionrealm.items[link] == nil then
Asa@24 358
Asa@65 359 self.db.factionrealm.items[link] = {
Asa@10 360 count = Altoholic:GetItemCount(self:GetIDFromLink(link)),
Asa@9 361 invested = abs(self.db.factionrealm.item_account[itemName] or 0),
Asa@9 362 }
Asa@9 363
Asa@9 364 end
Asa@9 365
Asa@65 366 if self.db.factionrealm.items[link] ~= nil then
Asa@65 367 self.db.factionrealm.items[link].count = Altoholic:GetItemCount(self:GetIDFromLink(link))
Asa@45 368
Asa@65 369 if self.db.factionrealm.items[link].invested == nil then
Asa@65 370 self.db.factionrealm.items[link].invested = 0
Asa@45 371 end
Asa@37 372 end
Asa@37 373
Asa@65 374 if viewOnly == true and self.db.factionrealm.items[link] == nil then
Asa@9 375 return {count = 0, invested = 0}
Asa@9 376 elseif viewOnly == true then
Asa@28 377
Asa@65 378 return {count = self.db.factionrealm.items[link].count, invested = self.db.factionrealm.items[link].invested}
Asa@9 379 end
Asa@37 380
Asa@28 381
Asa@28 382
Asa@65 383 return self.db.factionrealm.items[link]
Asa@8 384 end
Asa@8 385
Asa@63 386 function ItemAuditor:RemoveItem(link)
Asa@9 387 self.db.factionrealm.item_account[link] = nil
Asa@9 388 link = self:GetSafeLink(link)
Asa@9 389 if link ~= nil then
Asa@63 390 local item = ItemAuditor:GetItem(link)
Asa@35 391 item.invested = 0
Asa@24 392 else
Asa@24 393 self:Debug('Failed to convert link' .. tostring(link))
Asa@9 394 end
Asa@8 395 end
Asa@8 396
Asa@63 397 function ItemAuditor:SaveValue(link, value, countChange)
Asa@26 398 self:Debug("SaveValue(%s, %s, %s)", tostring(link), value, (countChange or 'default'))
Asa@26 399 countChange = countChange or 0
Asa@9 400 local item = nil
Asa@9 401 local realLink = self:GetSafeLink(link)
Asa@9 402 local itemName = nil
Asa@9 403 if realLink == nil then
Asa@26 404 itemName = link
Asa@23 405 self:Debug('SaveValue: GetSafeLink failed, falling back to storing by name: ' .. tostring(itemName))
Asa@9 406 self.db.factionrealm.item_account[itemName] = (self.db.factionrealm.item_account[itemName] or 0) + value
Asa@9 407 item = {invested = self.db.factionrealm.item_account[itemName], count = 1}
Asa@9 408 else
Asa@23 409
Asa@9 410 item = self:GetItem(realLink)
Asa@9 411 item.invested = item.invested + value
Asa@9 412 itemName = GetItemInfo(realLink)
Asa@9 413 end
Asa@8 414
Asa@26 415 if value > 0 and countChange > 0 and item.invested == value and item.count ~= countChange then
Asa@26 416 local costPerItem = value / countChange
Asa@26 417 value = costPerItem * item.count
Asa@26 418 item.invested = value
Asa@26 419 self:Print("You already owned %s %s with an unknown price, so they have also been updated to %s each", (item.count - countChange), itemName, self:FormatMoney(costPerItem))
Asa@26 420 end
Asa@26 421
Asa@7 422 if abs(value) > 0 then
Asa@22 423 if item.invested < 0 then
Asa@16 424 if self.db.profile.messages.cost_updates then
Asa@16 425 self:Print(format("Updated price of %s from %s to %s. %sYou just made a profit of %s.", itemName, self:FormatMoney(item.invested - value), self:FormatMoney(0), GREEN, self:FormatMoney(abs(item.invested))))
Asa@16 426 end
Asa@12 427 self:RemoveItem(link)
Asa@12 428 -- This doesn't work when you mail the only copy of an item you have to another character.
Asa@12 429 --[[
Asa@12 430 elseif item.count == 0 and realLink and Altoholic:GetItemCount(self:GetIDFromLink(realLink)) then
Asa@15 431 self:Print("You ran out of " .. itemName .. " and never recovered " .. self:FormatMoney(item.invested))
Asa@12 432 self:RemoveItem(link)
Asa@12 433 ]]
Asa@16 434 else
Asa@16 435 if self.db.profile.messages.cost_updates then
Asa@16 436 self:Print(format("Updated price of %s from %s to %s. (total change:%s)", itemName, self:FormatMoney(item.invested - value), self:FormatMoney(item.invested), self:FormatMoney(value)))
Asa@16 437 end
Asa@12 438 end
Asa@0 439 end
Asa@10 440
Asa@10 441 if realLink ~= nil then
Asa@63 442 ItemAuditor:UpdateQAThreshold(realLink)
Asa@10 443 end
Asa@35 444 UpdateInvestedData()
Asa@10 445 end
Asa@12 446
Asa@0 447
Asa@63 448 function ItemAuditor:WatchBags()
Asa@4 449 if self.watch_handle == nil then
Asa@63 450 ItemAuditor:UpdateCurrentInventory()
Asa@23 451 self.watch_handle = self:RegisterBucketEvent({"BAG_UPDATE", "PLAYER_MONEY"}, 0.3, "UpdateAudit")
Asa@4 452 end
Asa@0 453 end
Asa@0 454
Asa@63 455 function ItemAuditor:UnwatchBags()
Asa@4 456 if self.watch_handle ~= nil then
Asa@4 457 self:UnregisterBucket(self.watch_handle)
Asa@4 458 self.watch_handle = nil
Asa@4 459 end
Asa@0 460 end
Asa@0 461
Asa@9 462
Asa@63 463 function ItemAuditor:GetSafeLink(link)
Asa@9 464 local newLink = nil
Asa@9 465
Asa@24 466 if link and link == string.match(link, '.-:[-0-9]+[:0-9]*') then
Asa@24 467 newLink = link
Asa@24 468 elseif link then
Asa@9 469 newLink = link and string.match(link, "|H(.-):([-0-9]+):([0-9]+)|h")
Asa@9 470 end
Asa@9 471 if newLink == nil then
Asa@9 472 local itemID = self:GetItemID(link)
Asa@9 473 if itemID ~= nil then
Asa@9 474 _, newLink = GetItemInfo(itemID)
Asa@9 475 return self:GetSafeLink(newLink)
Asa@9 476 end
Asa@9 477 end
Asa@9 478 return newLink and string.gsub(newLink, ":0:0:0:0:0:0", "")
Asa@9 479 end
Asa@9 480
Asa@63 481 function ItemAuditor:GetIDFromLink(link)
Asa@9 482 local _, _, _, _, Id = string.find(link, "|?c?f?f?(%x*)|?H?([^:]*):?(%d+):?(%d*):?(%d*):?(%d*):?(%d*):?(%d*):?(%-?%d*):?(%-?%d*):?(%d*)|?h?%[?([^%[%]]*)%]?|?h?|?r?")
Asa@9 483 return tonumber(Id)
Asa@9 484 end
Asa@9 485
Asa@63 486 function ItemAuditor:GetItemCost(link, countModifier)
Asa@9 487 local item = self:GetItem(link, true)
Asa@8 488
Asa@9 489 if item.invested > 0 then
Asa@9 490 local count = item.count
Asa@9 491
Asa@9 492 if countModifier ~= nil then
Asa@9 493 count = count - countModifier
Asa@0 494 end
Asa@9 495 if count > 0 then
Asa@45 496 return ceil(item.invested), ceil(item.invested/count), count
Asa@9 497 end
Asa@9 498
Asa@0 499 end
Asa@35 500 return 0, 0, Altoholic:GetItemCount(ItemAuditor:GetIDFromLink(link))
Asa@0 501 end