sell-junk: add button to sell grey items

mods/sell-junk.lua

@@ -0,0 +1,172 @@
+local _G = _G or getfenv(0)
+local GetExpansion = ShaguTweaks.GetExpansion
+
+local module = ShaguTweaks:register({
+  title = "Add Button To Sell Junk",
+  description = "Display a \"Sell Junk\" Button on every mechant window.",
+  enabled = true,
+})
+
+local processed = {}
+
+local function CreateGoldString(money)
+  if type(money) ~= "number" then return "-" end
+
+  local gold = floor(money/ 100 / 100)
+  local silver = floor(mod((money/100),100))
+  local copper = floor(mod(money,100))
+
+  local string = ""
+  if gold > 0 then string = string .. "|cffffffff" .. gold .. "|cffffd700g" end
+  if silver > 0 or gold > 0 then string = string .. "|cffffffff " .. silver .. "|cffc7c7cfs" end
+  string = string .. "|cffffffff " .. copper .. "|cffeda55fc"
+
+  return string
+end
+
+local function HasGreyItems()
+  for bag = 0, 4, 1 do
+    for slot = 1, GetContainerNumSlots(bag), 1 do
+      local name = GetContainerItemLink(bag,slot)
+      if name and string.find(name,"ff9d9d9d") then return true end
+    end
+  end
+  return nil
+end
+
+local function GetNextGreyItem()
+  for bag = 0, 4, 1 do
+    for slot = 1, GetContainerNumSlots(bag), 1 do
+      local name = GetContainerItemLink(bag,slot)
+      if name and string.find(name,"ff9d9d9d") and not processed[bag.."x"..slot] then
+        processed[bag.."x"..slot] = true
+        return bag, slot
+      end
+    end
+  end
+
+  return nil, nil
+end
+
+module.enable = function(self)
+  local autovendor = CreateFrame("Frame", nil, nil)
+  autovendor:Hide()
+
+  autovendor:SetScript("OnShow", function()
+    processed = {}
+    this.price = 0
+    this.count = 0
+  end)
+
+  autovendor:SetScript("OnHide", function()
+    if this.count > 0 then
+      DEFAULT_CHAT_FRAME:AddMessage("Your vendor trash has been sold and you earned " .. CreateGoldString(this.price))
+    end
+  end)
+
+  autovendor:SetScript("OnUpdate", function()
+    -- throttle to to one item per .1 second
+    if ( this.tick or 1) > GetTime() then return else this.tick = GetTime() + .1 end
+
+    -- scan for the next grey item
+    local bag, slot = GetNextGreyItem()
+    if not bag or not slot then
+      this:Hide()
+      return
+    end
+
+    -- double check to only sell grey
+    local name = GetContainerItemLink(bag,slot)
+    if not name or not string.find(name,"ff9d9d9d") then
+      return
+    end
+
+    -- get value
+    local _, icount = GetContainerItemInfo(bag, slot)
+    local _, _, id = string.find(GetContainerItemLink(bag, slot), "item:(%d+):%d+:%d+:%d+")
+    local price = StaticModSellValue[tonumber(id)]
+    if this.price then
+      this.price = this.price + ( price * ( icount or 1 ) )
+      this.count = this.count + 1
+    end
+
+    -- abort if the merchant window disappeared
+    if not this.merchant then return end
+
+    -- clear cursor and sell the item
+    ClearCursor()
+    UseContainerItem(bag, slot)
+  end)
+
+  autovendor:RegisterEvent("MERCHANT_SHOW")
+  autovendor:RegisterEvent("MERCHANT_CLOSED")
+  autovendor:RegisterEvent("MERCHANT_UPDATE")
+  autovendor:SetScript("OnEvent", function()
+    autovendor.button:Update()
+
+    if event == "MERCHANT_CLOSED" then
+      autovendor.merchant = nil
+      autovendor:Hide()
+    elseif event == "MERCHANT_SHOW" then
+      autovendor.merchant = true
+      autovendor.button:Show()
+    end
+
+    MerchantRepairText:SetText("")
+    if MerchantRepairItemButton:IsShown() then
+      autovendor.button:ClearAllPoints()
+      autovendor.button:SetPoint("RIGHT", MerchantRepairItemButton, "LEFT", -4, 0)
+    else
+      autovendor.button:ClearAllPoints()
+      autovendor.button:SetPoint("RIGHT", MerchantBuyBackItemItemButton, "LEFT", -14, 0)
+    end
+  end)
+
+  -- Setup Autosell button
+  autovendor.button = CreateFrame("Button", nil, MerchantFrame)
+  autovendor.button:SetWidth(36)
+  autovendor.button:SetHeight(36)
+  autovendor.button:SetNormalTexture("Interface\\Buttons\\UI-Quickslot2")
+  autovendor.button:SetNormalTexture("Interface\\Icons\\Spell_Shadow_SacrificialShield")
+  autovendor.button:SetScript("OnEnter", function()
+    GameTooltip:SetOwner(this, "ANCHOR_RIGHT")
+    GameTooltip:SetText("Sell Grey Items")
+    GameTooltip:Show()
+  end)
+
+  autovendor.button:SetScript("OnLeave", function()
+    GameTooltip:Hide()
+  end)
+
+  autovendor.button:SetScript("OnClick", function()
+    autovendor:Show()
+  end)
+
+  autovendor.button.Update = function()
+    if not autovendor:IsVisible() then
+      if HasGreyItems() then
+        autovendor.button:Enable()
+        autovendor.button:GetNormalTexture():SetDesaturated(false)
+      else
+        autovendor.button:Disable()
+        autovendor.button:GetNormalTexture():SetDesaturated(true)
+      end
+    else
+      autovendor.button:Disable()
+      autovendor.button:GetNormalTexture():SetDesaturated(true)
+    end
+  end
+
+  -- Hook MerchantFrame_Update
+  if not HookMerchantFrame_Update then
+    local HookMerchantFrame_Update = MerchantFrame_Update
+    function _G.MerchantFrame_Update()
+      if MerchantFrame.selectedTab == 1 then
+        autovendor.button:Show()
+      else
+        autovendor.button:Hide()
+      end
+      HookMerchantFrame_Update()
+    end
+  end
+end