local Panda = Panda
local GS = Panda.GS
local GetItemInfo = GetItemInfo
 
 
local results, probs = {}, {}
local values = setmetatable({}, {
  __index = function(t, link)
    if not link then return end
 
    local name, _, qual, itemLevel, _, itemType, itemSubType, _, _, texture = GetItemInfo(link)
 
    if not name or not Panda:DEable(link) then
      t[link] = false
      return
    end
 
    local id1, qtytxt1, perctxt1, qty1, weight1, id2, qtytxt2, perctxt2, qty2, weight2, id3, _, _, qty3, weight3 = Panda:GetPossibleDisenchants(link)
    local bo1, bo2, bo3 = Panda:GetAHBuyout(id1), Panda:GetAHBuyout(id2), Panda:GetAHBuyout(id3)
    local mean = GS((id1 and qty1*weight1*bo1 or 0)+ (id2 and qty2*weight2*bo2 or 0) + (id3 and qty3*weight3*bo3 or 0))
    local mode = GS(qty1*bo1)
 
    if qual == 2 and itemType == "Weapon" then id1, qtytxt1, perctxt1 = id2, qtytxt2, perctxt2 end
    results[link] = qtytxt1.." "..select(2, GetItemInfo(id1))
    probs[link] = perctxt1
 
    val = string.format("%s (%s \206\188)", mode, mean)
    t[link] = val
    return val
  end,
})
 
 
local f = CreateFrame("Frame")
f:RegisterEvent("AUCTION_ITEM_LIST_UPDATE")
f:SetScript("OnEvent", function() for i in pairs(values) do values[i] = nil end end)
 
local origs = {}
local OnTooltipSetItem = function(frame, ...)
  assert(frame, "arg 1 is nil, someone isn't hooking correctly")
 
  local _, link = frame:GetItem()
  local val = values[link]
  if val and val ~= 0 then
    frame:AddDoubleLine("Disenchant ("..(probs[link] or "???").."):", results[link] or "???")
    frame:AddDoubleLine("Estimated DE Value:", val)
  end
  if origs[frame] then return origs[frame](frame, ...) end
end
 
for i,frame in pairs{GameTooltip, ItemRefTooltip} do
  origs[frame] = frame:GetScript("OnTooltipSetItem")
  frame:SetScript("OnTooltipSetItem", OnTooltipSetItem)
end