Split MainFrame into its own file

frames/MainFrame.lua

@@ -0,0 +1,79 @@
+
+local myname, ns = ...
+
+
+local ItemSearch = ns.LibItemSearch
+ns.LibItemSearch = nil
+
+
+local NUMROWS = 14
+
+
+function ns.NewMainFrame()
+	local GVS = CreateFrame("frame", nil, MerchantFrame)
+
+	local rows = {}
+	for i=1,NUMROWS do
+		local row = ns.NewMerchantItemFrame(GVS)
+
+		if i == 1 then
+			row:SetPoint("TOPLEFT")
+			row:SetPoint("RIGHT", -19, 0)
+		else
+			row:SetPoint("TOPLEFT", rows[i-1], "BOTTOMLEFT")
+			row:SetPoint("RIGHT", rows[i-1])
+		end
+
+		rows[i] = row
+	end
+
+
+	local scrollbar = ns.NewScrollBar(GVS, 0, 5)
+	function scrollbar:Refresh()
+		local offset = scrollbar:GetValue()
+		local n = GetMerchantNumItems()
+		local row, n_searchmatch = 1, 0
+		for i=1,n do
+			local link = GetMerchantItemLink(i)
+			if ItemSearch:Find(link, GVS.searchstring) then
+				if n_searchmatch >= offset and n_searchmatch < offset + NUMROWS then
+					rows[row]:SetValue(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
+
+
+	ns.MakeSearchField(GVS, scrollbar.Refresh)
+
+
+	GVS:EnableMouseWheel(true)
+	GVS:SetScript("OnMouseWheel", function(self, value)
+		if value > 0 then
+			scrollbar:Decrement()
+		else
+			scrollbar:Increment()
+		end
+	end)
+	GVS:SetScript("OnEvent", scrollbar.Refresh)
+	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)
+		scrollbar.Refresh()
+
+		GVS:RegisterEvent("BAG_UPDATE")
+		GVS:RegisterEvent("MERCHANT_UPDATE")
+		GVS:RegisterEvent("CURRENCY_DISPLAY_UPDATE")
+	end)
+	GVS:SetScript("OnHide", function()
+		GVS:UnregisterAllEvents()
+		if StackSplitFrame:IsVisible() then StackSplitFrame:Hide() end
+	end)
+
+	return GVS
+end