456 lines
14 KiB
Lua
456 lines
14 KiB
Lua
|
|
local myname, ns = ...
|
|
|
|
|
|
local ItemSearch = LibStub('LibItemSearch-1.0')
|
|
|
|
local NUMROWS, ICONSIZE, GAP, SCROLLSTEP = 14, 17, 4, 5
|
|
|
|
|
|
for _,f in pairs{MerchantNextPageButton, MerchantPrevPageButton, MerchantPageText} do
|
|
f:Hide()
|
|
f.Show = f.Hide
|
|
end
|
|
|
|
|
|
local GVS = CreateFrame("frame", nil, MerchantFrame)
|
|
GVS:SetWidth(315)
|
|
GVS:SetHeight(294)
|
|
GVS:SetPoint("TOPLEFT", 8, -67)
|
|
GVS:SetScript("OnEvent", function(self, event, ...) if self[event] then return self[event](self, event, ...) end end)
|
|
GVS:Hide()
|
|
|
|
|
|
local function OnClick(self, button)
|
|
if IsAltKeyDown() and not self.altcurrency then self:BuyItem(true)
|
|
elseif IsModifiedClick() then HandleModifiedItemClick(GetMerchantItemLink(self:GetID()))
|
|
elseif self.altcurrency then
|
|
local id = self:GetID()
|
|
local link = GetMerchantItemLink(id)
|
|
self.link, self.texture = GetMerchantItemLink(id), self.icon:GetTexture()
|
|
MerchantFrame_ConfirmExtendedItemCost(self)
|
|
else self:BuyItem() end
|
|
end
|
|
|
|
|
|
local function PopoutOnClick(self, button)
|
|
local id = self:GetParent():GetID()
|
|
local link = GetMerchantItemLink(id)
|
|
if not link then return end
|
|
|
|
local _, _, _, vendorStackSize, numAvailable = GetMerchantItemInfo(id)
|
|
local maxPurchase = GetMerchantItemMaxStack(id)
|
|
local _, _, _, _, _, _, _, itemStackSize = GetItemInfo(link)
|
|
|
|
local size = numAvailable > 0 and numAvailable or itemStackSize
|
|
-- OpenStackSplitFrame(size, self, "LEFT", "RIGHT")
|
|
OpenStackSplitFrame(250, self, "LEFT", "RIGHT")
|
|
end
|
|
|
|
|
|
local function Purchase(id, quantity)
|
|
local _, _, _, vendorStackSize, numAvailable = GetMerchantItemInfo(id)
|
|
local maxPurchase = GetMerchantItemMaxStack(id)
|
|
|
|
if numAvailable > 0 and numAvailable < quantity then quantity = numAvailable end
|
|
local purchased = 0
|
|
while purchased < quantity do
|
|
local buyamount = math.min(maxPurchase, quantity - purchased)
|
|
purchased = purchased + buyamount
|
|
BuyMerchantItem(id, buyamount)
|
|
end
|
|
end
|
|
|
|
|
|
local function BuyItem(self, fullstack)
|
|
local id = self:GetID()
|
|
local link = GetMerchantItemLink(id)
|
|
if not link then return end
|
|
|
|
local _, _, _, vendorStackSize = GetMerchantItemInfo(id)
|
|
local _, _, _, _, _, _, _, itemStackSize = GetItemInfo(link)
|
|
Purchase(id, fullstack and itemStackSize or vendorStackSize or 1)
|
|
end
|
|
|
|
|
|
local function PopoutSplitStack(self, qty)
|
|
Purchase(self:GetParent():GetID(), qty)
|
|
end
|
|
|
|
|
|
local function OnEnter(self)
|
|
GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
|
|
if self.link then GameTooltip:SetHyperlink(self.link) else GameTooltip:SetMerchantCostItem(self.index, self.itemIndex) end
|
|
end
|
|
|
|
|
|
local function OnLeave()
|
|
GameTooltip:Hide()
|
|
ResetCursor()
|
|
end
|
|
|
|
|
|
local function GetCurencyCount(item)
|
|
for i=1,GetCurrencyListSize() do
|
|
local name, _, _, _, _, count = GetCurrencyListInfo(i)
|
|
if item == name then return count end
|
|
end
|
|
end
|
|
|
|
|
|
local function SetValue(self, text, icon, link)
|
|
local color = ""
|
|
local id = link and link:match("item:(%d+)")
|
|
self.link, self.index, self.itemIndex = nil
|
|
if id then self.link = link end
|
|
if id and (GetItemCount(id, true) or 0) < text or link and not id and (GetCurencyCount(link) or 0) < text then
|
|
color = "|cffff9999"
|
|
end
|
|
self.text:SetText(color..text)
|
|
self.icon:SetTexture(icon)
|
|
self:Show()
|
|
end
|
|
|
|
|
|
local function GetAltCurrencyFrame(frame)
|
|
for i,v in ipairs(frame.altframes) do if not v:IsShown() then return v end end
|
|
|
|
local anchor = #frame.altframes > 0 and frame.altframes[#frame.altframes].text
|
|
local f = CreateFrame('Frame', nil, frame)
|
|
f:SetWidth(ICONSIZE) f:SetHeight(ICONSIZE)
|
|
f:SetPoint("RIGHT", anchor or frame.ItemPrice, "LEFT")
|
|
|
|
f.icon = f:CreateTexture()
|
|
f.icon:SetWidth(ICONSIZE) f.icon:SetHeight(ICONSIZE)
|
|
f.icon:SetPoint("RIGHT")
|
|
|
|
f.text = f:CreateFontString(nil, nil, "NumberFontNormalSmall")
|
|
f.text:SetPoint("RIGHT", f.icon, "LEFT", -GAP/2, 0)
|
|
|
|
f.SetValue = SetValue
|
|
|
|
f:EnableMouse(true)
|
|
f:SetScript("OnEnter", OnEnter)
|
|
f:SetScript("OnLeave", OnLeave)
|
|
|
|
table.insert(frame.altframes, f)
|
|
return f
|
|
end
|
|
|
|
|
|
local function AddAltCurrency(frame, i)
|
|
local lastframe = frame.ItemPrice
|
|
for j=GetMerchantItemCostInfo(i),1,-1 do
|
|
local f = frame:GetAltCurrencyFrame()
|
|
local texture, price, link, name = GetMerchantItemCostItem(i, j)
|
|
f:SetValue(price, texture, link or name)
|
|
f.index, f.itemIndex, f.link = i, j
|
|
lastframe = f.text
|
|
end
|
|
frame.ItemName:SetPoint("RIGHT", lastframe, "LEFT", -GAP, 0)
|
|
end
|
|
|
|
|
|
local ROWHEIGHT = 21
|
|
local rows = {}
|
|
for i=1,NUMROWS do
|
|
local row = CreateFrame('Button', nil, GVS) -- base frame
|
|
row:SetHeight(ROWHEIGHT)
|
|
row:SetPoint("TOP", i == 1 and GVS or rows[i-1], i == 1 and "TOP" or "BOTTOM")
|
|
row:SetPoint("LEFT")
|
|
row:SetPoint("RIGHT", -19, 0)
|
|
|
|
row.BuyItem = BuyItem
|
|
|
|
row:SetHighlightTexture("Interface\\HelpFrame\\HelpFrameButton-Highlight")
|
|
row:GetHighlightTexture():SetTexCoord(0, 1, 0, 0.578125)
|
|
|
|
row:RegisterForClicks("AnyUp")
|
|
row:SetScript('OnClick', OnClick)
|
|
row:RegisterForDrag("LeftButton")
|
|
row:SetScript('OnDragStart', function(self, button)
|
|
MerchantFrame.extendedCost = nil
|
|
PickupMerchantItem(self:GetID())
|
|
if self.extendedCost then MerchantFrame.extendedCost = self end
|
|
end)
|
|
|
|
local backdrop = row:CreateTexture(nil, "BACKGROUND")
|
|
backdrop:SetAllPoints()
|
|
backdrop:SetTexture("Interface\\Tooltips\\UI-Tooltip-Background")
|
|
row.backdrop = backdrop
|
|
|
|
local icon = CreateFrame('Frame', nil, row)
|
|
icon:SetHeight(ICONSIZE)
|
|
icon:SetWidth(ICONSIZE)
|
|
icon:SetPoint('LEFT', 2, 0)
|
|
|
|
row.icon = icon:CreateTexture(nil, "BORDER")
|
|
row.icon:SetAllPoints()
|
|
|
|
local ItemName = row:CreateFontString(nil, nil, "GameFontNormalSmall")
|
|
ItemName:SetPoint('LEFT', icon, "RIGHT", GAP, 0)
|
|
ItemName:SetJustifyH('LEFT')
|
|
row.ItemName = ItemName
|
|
|
|
local popout = CreateFrame("Button", nil, row)
|
|
popout:SetPoint("RIGHT")
|
|
popout:SetWidth(ROWHEIGHT/2) popout:SetHeight(ROWHEIGHT)
|
|
popout:SetNormalTexture("Interface\\PaperDollInfoFrame\\UI-GearManager-FlyoutButton")
|
|
popout:SetHighlightTexture("Interface\\PaperDollInfoFrame\\UI-GearManager-FlyoutButton")
|
|
popout:GetNormalTexture():SetTexCoord(0.15625, 0.5, 0.84375, 0.5, 0.15625, 0, 0.84375, 0)
|
|
popout:GetHighlightTexture():SetTexCoord(0.15625, 1, 0.84375, 1, 0.15625, 0.5, 0.84375, 0.5)
|
|
popout:SetScript("OnClick", PopoutOnClick)
|
|
popout.SplitStack = PopoutSplitStack
|
|
row.popout = popout
|
|
|
|
local ItemPrice = row:CreateFontString(nil, nil, "NumberFontNormal")
|
|
ItemPrice:SetPoint('RIGHT', popout, "LEFT", -2, 0)
|
|
row.ItemPrice = ItemPrice
|
|
|
|
row.altframes = {}
|
|
row.AddAltCurrency, row.GetAltCurrencyFrame = AddAltCurrency, GetAltCurrencyFrame
|
|
|
|
row:SetScript('OnEnter', function(self)
|
|
GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
|
|
GameTooltip:SetMerchantItem(self:GetID())
|
|
GameTooltip_ShowCompareItem()
|
|
MerchantFrame.itemHover = self:GetID()
|
|
if IsModifiedClick("DRESSUP") then ShowInspectCursor() else ResetCursor() end
|
|
end)
|
|
row:SetScript('OnLeave', function()
|
|
GameTooltip:Hide()
|
|
ResetCursor()
|
|
MerchantFrame.itemHover = nil
|
|
end)
|
|
|
|
rows[i] = row
|
|
end
|
|
|
|
|
|
local RECIPE = GetItemClassInfo(LE_ITEM_CLASS_RECIPE)
|
|
local MISC = GetItemClassInfo(LE_ITEM_CLASS_MISCELLANEOUS)
|
|
local GARRISON_ICON = {[1001489] = true, [1001490] = true, [1001491] = true}
|
|
local function Knowable(link)
|
|
local name, link2, quality, iLevel, reqLevel, class, subclass, maxStack, equipSlot, texture, vendorPrice = GetItemInfo(link)
|
|
local id = ns.ids[link]
|
|
|
|
if C_Heirloom.IsItemHeirloom(id) then return true end
|
|
if class == MISC and select(2, C_ToyBox.GetToyInfo(id)) then return true end
|
|
if class == RECIPE or GARRISON_ICON[texture] then return true end
|
|
end
|
|
|
|
|
|
local default_grad = {0,1,0,0.75, 0,1,0,0} -- green
|
|
local grads = setmetatable({
|
|
red = {1,0,0,0.75, 1,0,0,0},
|
|
[1] = {1,1,1,0.75, 1,1,1,0}, -- white
|
|
[2] = default_grad, -- green
|
|
[3] = {0.5,0.5,1,1, 0,0,1,0}, -- blue
|
|
[4] = {1,0,1,0.75, 1,0,1,0}, -- purple
|
|
[7] = {1,.75,.5,0.75, 1,.75,.5,0}, -- heirloom
|
|
}, {__index = function(t,i) t[i] = default_grad return default_grad end})
|
|
local quality_colors = setmetatable({}, {__index = function() return "|cffffffff" end})
|
|
for i=0,7 do quality_colors[i] = "|c".. select(4, GetItemQualityColor(i)) end
|
|
|
|
local function ShowMerchantItem(row, i)
|
|
local name, itemTexture, itemPrice, itemStackCount, numAvailable, isUsable, extendedCost = GetMerchantItemInfo(i)
|
|
local link = GetMerchantItemLink(i)
|
|
local color = quality_colors.default
|
|
row.backdrop:Hide()
|
|
|
|
if not isUsable then
|
|
row.backdrop:SetGradientAlpha("HORIZONTAL", unpack(grads.red))
|
|
row.backdrop:Show()
|
|
end
|
|
|
|
if link then
|
|
local name, link2, quality, iLevel, reqLevel, class, subclass, maxStack, equipSlot, texture, vendorPrice = GetItemInfo(link)
|
|
local id = ns.ids[link]
|
|
local is_heirloom = C_Heirloom.IsItemHeirloom(id)
|
|
color = quality_colors[quality]
|
|
|
|
if Knowable(link) then
|
|
if ns.knowns[link] then
|
|
color = quality_colors[0]
|
|
row.backdrop:Hide()
|
|
else
|
|
row.backdrop:SetGradientAlpha("HORIZONTAL", unpack(grads[quality]))
|
|
row.backdrop:Show()
|
|
end
|
|
end
|
|
end
|
|
|
|
row.icon:SetTexture(itemTexture)
|
|
row.ItemName:SetText((numAvailable > -1 and ("["..numAvailable.."] ") or "").. color.. (name or "<Loading item data>").. (itemStackCount > 1 and ("|r x"..itemStackCount) or ""))
|
|
|
|
for i,v in pairs(row.altframes) do v:Hide() end
|
|
row.altcurrency = extendedCost
|
|
if extendedCost then
|
|
row:AddAltCurrency(i)
|
|
row.link, row.texture, row.extendedCost = link, itemTexture, true
|
|
end
|
|
if itemPrice > 0 then
|
|
row.ItemPrice:SetText(ns.GSC(itemPrice))
|
|
row.Price = itemPrice
|
|
end
|
|
if extendedCost and (itemPrice <= 0) then
|
|
row.ItemPrice:SetText()
|
|
row.Price = 0
|
|
elseif extendedCost and (itemPrice > 0) then
|
|
row.ItemPrice:SetText(ns.GSC(itemPrice))
|
|
else
|
|
row.ItemName:SetPoint("RIGHT", row.ItemPrice, "LEFT", -GAP, 0)
|
|
row.extendedCost = nil
|
|
end
|
|
|
|
if isUsable then row.icon:SetVertexColor(1, 1, 1) else row.icon:SetVertexColor(.9, 0, 0) end
|
|
row:SetID(i)
|
|
row:Show()
|
|
end
|
|
|
|
|
|
local scrollbar = LibStub("tekKonfig-Scroll").new(GVS, 0, SCROLLSTEP)
|
|
local offset = 0
|
|
local searchstring
|
|
local function Refresh()
|
|
local n = GetMerchantNumItems()
|
|
local row, n_searchmatch = 1, 0
|
|
for i=1,n do
|
|
local link = GetMerchantItemLink(i)
|
|
if ItemSearch:Find(link, searchstring) then
|
|
if n_searchmatch >= offset and n_searchmatch < offset + NUMROWS then
|
|
ShowMerchantItem(rows[row], i)
|
|
row = row + 1
|
|
end
|
|
n_searchmatch = n_searchmatch + 1
|
|
end
|
|
end
|
|
scrollbar:SetMinMaxValues(0, math.max(0, n_searchmatch - NUMROWS))
|
|
for i=row,NUMROWS do
|
|
rows[i]:Hide()
|
|
end
|
|
end
|
|
GVS.CURRENCY_DISPLAY_UPDATE = Refresh
|
|
GVS.BAG_UPDATE = Refresh
|
|
GVS.MERCHANT_UPDATE = Refresh
|
|
|
|
|
|
local editbox = CreateFrame('EditBox', nil, GVS)
|
|
editbox:SetAutoFocus(false)
|
|
editbox:SetPoint("BOTTOMLEFT", GVS, "TOPLEFT", 55, 9)
|
|
editbox:SetWidth(105)
|
|
editbox:SetHeight(32)
|
|
editbox:SetFontObject('GameFontHighlightSmall')
|
|
|
|
local left = editbox:CreateTexture(nil, "BACKGROUND")
|
|
left:SetWidth(8) left:SetHeight(20)
|
|
left:SetPoint("LEFT", -5, 0)
|
|
left:SetTexture("Interface\\Common\\Common-Input-Border")
|
|
left:SetTexCoord(0, 0.0625, 0, 0.625)
|
|
|
|
local right = editbox:CreateTexture(nil, "BACKGROUND")
|
|
right:SetWidth(8) right:SetHeight(20)
|
|
right:SetPoint("RIGHT", 0, 0)
|
|
right:SetTexture("Interface\\Common\\Common-Input-Border")
|
|
right:SetTexCoord(0.9375, 1, 0, 0.625)
|
|
|
|
local center = editbox:CreateTexture(nil, "BACKGROUND")
|
|
center:SetHeight(20)
|
|
center:SetPoint("RIGHT", right, "LEFT", 0, 0)
|
|
center:SetPoint("LEFT", left, "RIGHT", 0, 0)
|
|
center:SetTexture("Interface\\Common\\Common-Input-Border")
|
|
center:SetTexCoord(0.0625, 0.9375, 0, 0.625)
|
|
|
|
editbox:SetScript("OnEscapePressed", editbox.ClearFocus)
|
|
editbox:SetScript("OnEnterPressed", editbox.ClearFocus)
|
|
editbox:SetScript("OnEditFocusGained", function(self)
|
|
if not searchstring then
|
|
self:SetText("")
|
|
self:SetTextColor(1,1,1,1)
|
|
end
|
|
end)
|
|
editbox:SetScript("OnEditFocusLost", function(self)
|
|
if self:GetText() == "" then
|
|
self:SetText("Search...")
|
|
self:SetTextColor(0.75, 0.75, 0.75, 1)
|
|
end
|
|
end)
|
|
editbox:SetScript("OnTextChanged", function(self)
|
|
local t = self:GetText()
|
|
searchstring = t ~= "" and t ~= "Search..." and t:lower() or nil
|
|
Refresh()
|
|
end)
|
|
editbox:SetScript("OnShow", function(self)
|
|
self:SetText("Search...")
|
|
self:SetTextColor(0.75, 0.75, 0.75, 1)
|
|
end)
|
|
editbox:SetScript("OnEnter", function(self)
|
|
GameTooltip:SetOwner(self, "ANCHOR_BOTTOMRIGHT")
|
|
GameTooltip:AddLine("Enter an item name to search")
|
|
GameTooltip:AddLine(" ")
|
|
GameTooltip:AddDoubleLine("Type search:", "bop boe bou", nil,nil,nil, 255,255,255)
|
|
GameTooltip:AddDoubleLine(" ", "boa quest", 255,255,255, 255,255,255)
|
|
GameTooltip:AddDoubleLine(" ", "ilvl>=378 ilvl=359", 255,255,255, 255,255,255)
|
|
GameTooltip:AddDoubleLine(" ", "q=rare q<4", 255,255,255, 255,255,255)
|
|
GameTooltip:AddDoubleLine(" ", "t:leather t:shield", 255,255,255, 255,255,255)
|
|
GameTooltip:AddDoubleLine("Modifiers:", "& Match both", nil,nil,nil, 255,255,255)
|
|
GameTooltip:AddDoubleLine(" ", "| Match either", 255,255,255, 255,255,255)
|
|
GameTooltip:AddDoubleLine(" ", "! Do not match", 255,255,255, 255,255,255)
|
|
GameTooltip:Show()
|
|
end)
|
|
editbox:SetScript("OnLeave", function(self)
|
|
GameTooltip:Hide()
|
|
end)
|
|
|
|
local f = scrollbar:GetScript("OnValueChanged")
|
|
scrollbar:SetScript("OnValueChanged", function(self, value, ...)
|
|
offset = math.floor(value)
|
|
Refresh()
|
|
return f(self, value, ...)
|
|
end)
|
|
|
|
|
|
local offset = 0
|
|
GVS:EnableMouseWheel(true)
|
|
GVS:SetScript("OnMouseWheel", function(self, value) scrollbar:SetValue(scrollbar:GetValue() - value * SCROLLSTEP) end)
|
|
GVS:SetScript("OnShow", function(self, noreset)
|
|
local max = math.max(0, GetMerchantNumItems() - NUMROWS)
|
|
scrollbar:SetMinMaxValues(0, max)
|
|
scrollbar:SetValue(noreset and math.min(scrollbar:GetValue(), max) or 0)
|
|
Refresh()
|
|
|
|
GVS:RegisterEvent("BAG_UPDATE")
|
|
GVS:RegisterEvent("MERCHANT_UPDATE")
|
|
GVS:RegisterEvent("CURRENCY_DISPLAY_UPDATE")
|
|
end)
|
|
GVS:SetScript("OnHide", function()
|
|
GVS:UnregisterEvent("BAG_UPDATE")
|
|
GVS:UnregisterEvent("MERCHANT_UPDATE")
|
|
GVS:UnregisterEvent("CURRENCY_DISPLAY_UPDATE")
|
|
if StackSplitFrame:IsVisible() then StackSplitFrame:Hide() end
|
|
end)
|
|
|
|
|
|
-- Reanchor the buyback button, it acts weird when switching tabs otherwise...
|
|
MerchantBuyBackItem:ClearAllPoints()
|
|
MerchantBuyBackItem:SetPoint("BOTTOMRIGHT", -7, 33)
|
|
|
|
|
|
local function Show()
|
|
for i=1,12 do _G["MerchantItem"..i]:Hide() end
|
|
if GVS:IsShown() then GVS:GetScript("OnShow")(GVS, true) else GVS:Show() end
|
|
end
|
|
hooksecurefunc("MerchantFrame_UpdateMerchantInfo", Show)
|
|
|
|
|
|
hooksecurefunc("MerchantFrame_UpdateBuybackInfo", function()
|
|
GVS:Hide()
|
|
for i=1,12 do _G["MerchantItem"..i]:Show() end
|
|
end)
|
|
|
|
|
|
if MerchantFrame:IsVisible() and MerchantFrame.selectedTab == 1 then Show() end
|
|
|
|
|
|
LibStub("tekKonfig-AboutPanel").new(nil, "GnomishVendorShrinker")
|