local Quality = { [0] = "Junk", [1]= "Common", [2] = "Uncommon", [3] = "Rare", [4] = "Epic", }

local function Initialize()
	ProspectMe.FormatPrice = function (value)

		local GSC_GOLD="ffffd100"
		local GSC_SILVER="ffe6e6e6"
		local GSC_COPPER="ffc8602c"

		local g, s, c
		local digits = 0
		local gsc

		g = math.floor(value/10000)
		s = math.fmod(math.floor(value/100),100)
		c = math.fmod(value,100)


		digits = math.floor(math.log10(value)+1)

		if ( digits < 3 ) then
			gsc = string.format("   |c%s%2d|r",  GSC_COPPER, c)
		elseif ( digits < 5 ) then
			gsc = string.format("|c%s%2d|r |c%s%02d|r", GSC_SILVER, s, GSC_COPPER, c)
		elseif ( digits < 7 ) then
			gsc = string.format("|c%s%2d|r |c%s%02d|r", GSC_GOLD, g, GSC_SILVER, s)
		elseif ( digits < 9 ) then
			gsc = string.format("|c%s%5d|r", GSC_GOLD, g)
		else
			gsc = string.format("|c%s%2.1fk|r", GSC_GOLD, g/1000)
		end

		return gsc
	end

	ProspectMe.GetReturn = function (containerID)
		local averageReturn = 0
		if ProspectMe.Results[containerID].TimesProspected > 0 then
			for itemID, num in pairs(ProspectMe.Results[containerID]) do
				if itemID ~= "TimesProspected" then
					averageReturn = averageReturn + ProspectMe.GetItemValue(itemID) * num 
				end
			end
			averageReturn = averageReturn/ProspectMe.Results[containerID].TimesProspected
		end
			return tonumber(string.format("%.0f", averageReturn))
	end
end

local cleared = true
local function OnTooltipCleared(self)
   cleared = true   
end
 
local function OnTooltipSetItem(self)
	if cleared then
		local tooltipLink = select(2, self:GetItem())
		local spellid = select(3, self:GetSpell())
		local item = nil
		if spellid == 225902 then
			item = 123918
		elseif spellid == 225904 then
			item = 123919
		elseif spellid == 210116 then
			item = 128304
		elseif tooltipLink then 
			item = tonumber(tooltipLink:match("Hitem:(%d+)"))
			spellid = nil
		else
			item = nil
			spellid = nil
		end
		if item then
			if ProspectMe.Results[item] then
				local price = ProspectMe.GetItemValue(item)
				local lifetimeReturn = ProspectMe.GetReturn(item)
				local subclass = select(7,GetItemInfo(item))
				local ctp = price * 5
				--NumofEachQuality, Percent of Each Quality
				self:AddLine(" ")
				local color
				if ProspectMe.Results[item].TimesProspected < 100 then
					color = "|cffff0000"
				elseif ProspectMe.Results[item].TimesProspected < 200 then
					color = "|cffffff00"
				else
					color = "|cff00ff00"
				end
				
				-- SKill Text Block ""
				local skilltext
				if spellid == 225902 or spellid == 225904 or subclass == ProspectMe.Vars.ORE then
					skilltext = "Prospected"
				elseif spellid == 210116 or subclass == ProspectMe.Vars.HERB then
					skilltext = "Milled"
				else
					skilltext = "Processed"
				end
				self:AddDoubleLine("Prospect Me","Times " .. skilltext .. ":  " .. color .. ProspectMe.Results[item].TimesProspected,1,0.82,0,1,1,1)
				self:AddLine(" ")
				
				-- Economics Text Block
				local spelltext
				if spellid == 225902 or spellid == 225904 then
					spelltext = "Mass Prospect"
				elseif spellid == 210116 then
					spelltext = "Mass Mill"
				elseif subclass == ProspectMe.Vars.ORE then
					spelltext = "Prospect"
				elseif subclass == ProspectMe.Vars.HERB then
					spelltext = "Mill" 
				else
					spelltext = "Process"
				end
				if spellid then
					ctp = price * 20
					lifetimeReturn = lifetimeReturn * 4
				end
				local profit = lifetimeReturn - ctp
				local margin = (lifetimeReturn / ctp * 100) - 100
				self:AddDoubleLine("Estimated Profit:  " .. ProspectMe.FormatPrice(profit), "Cost to " .. spelltext .. ":  " .. ProspectMe.FormatPrice(ctp),1,1,1,1,1,1)
				if margin < 30 then
					color = "|cffffff00"
				elseif margin < 15 then
					color = "|cffff0000"
				else
					color = "|cff00ff00"
				end
				self:AddDoubleLine("Margin:  " .. color .. string.format("[%.1f%%]", margin),  "Average Return:  " .. ProspectMe.FormatPrice(lifetimeReturn),1,1,1,1,1,1)
				self:AddLine(" ")
				
				-- Results Text Block
				local t
				if IsAltKeyDown() == ProspectMe.Config.PerSession then
					t = ProspectMe.Results
					self:AddDoubleLine("Lifetime Results","Hold Alt to display",1,0.82,0,0.5,0.5,0.5)
				else
					t = ProspectMe.Session
					self:AddDoubleLine("Session Results","Hold Alt to display",1,0.82,0,0.5,0.5,0.5)
				end
				if t[item] then
					for q = 7, 0, -1 do
						for result, num in pairs(t[item]) do 
							if result ~= "TimesProspected" and select(3, GetItemInfo(result)) == q and ProspectMe.Config.ShowQualities[Quality[q]] then
								local p, n = "", ""
								if ProspectMe.Config.ShowPercent then
									p = num/t[item].TimesProspected*100
									if p < 10 then
										p = string.format("[%.1f%%]", p)
									else
										p = string.format("[%.0f%%]", p)
									end
								else
									p = ""
								end
								if ProspectMe.Config.ShowNumber then
									n = "|cffffffffx" .. num
								else
									n = ""
								end
								self:AddDoubleLine(p .. select(2, GetItemInfo(result)) .. n, ProspectMe.FormatPrice(ProspectMe.GetItemValue(result)))
							end
						end
					end
					--self:AddLine(" ")
				end
			end
			cleared = true
		end
	end
end
 
GameTooltip:HookScript("OnTooltipCleared", OnTooltipCleared)
GameTooltip:HookScript("OnTooltipSetItem", OnTooltipSetItem)
ItemRefTooltip:HookScript("OnTooltipCleared", OnTooltipCleared)
ItemRefTooltip:HookScript("OnTooltipSetItem", OnTooltipSetItem)

local frame = CreateFrame("FRAME", "ProspectMe_Value")
frame:RegisterEvent("VARIABLES_LOADED")
--frame:SetScript("OnEvent", EventHandler)
frame:SetScript("OnEvent", Initialize)