wow/itemauditor: Modules/Crafting.lua comparison

comparison Modules/Crafting.lua @ 133:5eefa40e2a29

Trimmed trailing spaces

author	Asa Ayers <Asa.Ayers@Gmail.com>
date	Wed, 15 Sep 2010 21:34:57 -0700
parents	78c6d905c2e1
children	a529a4a4ccbe

comparison

equal deleted inserted replaced

-:0eaec1b52a63
+:5eefa40e2a29
 function Crafting.GetQueueDestination()
 	local dest = ItemAuditor.db.profile.queue_destination
 	if dest and queueDestinations[dest] then
 		return queueDestinations[dest], dest
 	end
 	-- If there is none selected or the selected option has
 	-- dissapeared, choose the first one in the list
 	for name, func in pairs(queueDestinations) do
 		if dest then
 			ItemAuditor:Print("%s is no longer available as a queue destination. %s is the new default", dest, name)
 		end
 		ItemAuditor.db.profile.queue_destination = name
 		return func, name
 	end
 	error('Unable to determine queue destination.')
 end
 function ItemAuditor:GetCraftingThreshold()
 	return self.db.char.profitable_threshold
 		if money then
 			cellFrame.text:SetText(ItemAuditor:FormatMoney(tonumber(money)))
 		else
 			cellFrame.text:SetText("")
 		end
 	end
 end
 local craftingCols = {
 	{ name= "Item", width = 200, defaultsort = "desc",
 				local data = realData[realrow]
 				cellFrame.text:SetText(data.link)
 			end
 		end,
 	},
 	{ name= "Cost Each", width = 100, align = "RIGHT",
 		['DoCellUpdate'] = displayMoney,
 	},
 	{ name= "Est Sale Each", width = 100, align = "RIGHT",
 		['DoCellUpdate'] = displayMoney,
 	},
 	{ name= "Decided By", width = 125, align = "RIGHT",
 	},
 	{ name= "craft", width = 50, align = "RIGHT",
 	},
 	{ name= "Have Mats", width = 60, align = "RIGHT",
 	},
 	{ name= "Profit Each", width = 100, align = "RIGHT",
 		['DoCellUpdate'] = displayMoney,
 	},
 }
 function Crafting.ExportToSkillet(data)
 	local skillString = select(3, string.find(data.recipeLink, "^|%x+|H(.+)|h%[.+%]"))
 	local _, skillId = strsplit(":", skillString)
 	ItemAuditor:AddToQueue(skillId,tradeSkillIndex, data.queue)
 end
 Crafting.RegisterQueueDestination('Skillet', Crafting.ExportToSkillet)
 	elseif type(destination) == 'string' then
 		destination = queueDestinations[destination]
 	else
 		error('destination must be a function or a string')
 	end
 	local index = 1
 	local data = ItemAuditor:GetCraftingRow(index)
 	while data do
 		if data.queue > 0 then
 			destination(data)
 		end
 		index = index + 1
 		data = ItemAuditor:GetCraftingRow(index)
 	end
 end
 -- ItemAuditor:GetModule('Crafting').filter_queued = false
 Crafting.filter_have_mats = false
 local btnProcess = false
 local function ShowCrafting(container)
 	if craftingContent == false then
 		local window  = container.frame
 		craftingContent = CreateFrame("Frame",nil,window)
 		craftingContent:SetBackdropColor(0, 0, 1, 0.5)
 		craftingContent:SetBackdropBorderColor(1, 0, 0, 1)
 		craftingContent:SetPoint("TOPLEFT", window, 10, -50)
 		craftingContent:SetPoint("BOTTOMRIGHT",window, -10, 10)
 		craftingTable = ScrollingTable:CreateST(craftingCols, 22, nil, nil, craftingContent )
 		IAcc = craftingContent
 		IAccWindow = window
 		craftingTable.frame:SetPoint("TOPLEFT",craftingContent, 0,0)
 		craftingTable.frame:SetPoint("BOTTOMRIGHT", craftingContent, 0, 30)
 		craftingTable:RegisterEvents({
 			["OnEnter"] = function (rowFrame, cellFrame, data, cols, row, realrow, column, scrollingTable, ...)
 				if realrow then
 					if column == 1 then
 						local data = realData[realrow]
 			end,
 			["OnLeave"] = function (rowFrame, cellFrame, data, cols, row, realrow, column, scrollingTable, ...)
 				  GameTooltip:Hide()
 			end,
 		});
 		local craftingView = CreateFrame("Button", nil, craftingContent, "UIPanelButtonTemplate")
 		craftingView:SetText("View")
 		craftingView:SetSize(50, 25)
 		craftingView:SetPoint("BOTTOMLEFT", craftingContent, 0, 0)
 		end)
 		btnProcess = CreateFrame("Button", nil, craftingContent, "UIPanelButtonTemplate")
 		btnProcess:SetText("Process")
 		btnProcess:SetSize(100, 25)
 		btnProcess:SetPoint("BOTTOMRIGHT", craftingContent, 0, 0)
 		btnProcess:RegisterForClicks("LeftButtonUp");
 		local function UpdateProcessTooltip(btn)
 			local data = ItemAuditor:GetCraftingRow(1)
 			if data then
 				GameTooltip:SetOwner(this, "ANCHOR_CURSOR")
 				GameTooltip:SetText(format('Create %sx%s', data.link, data.queue))
 			end
 			if vellumLevelMap[vellumID] then
 				return useVellum(vellumLevelMap[vellumID], idealVellum or vellumID)
 			end
 		end
 		btnProcess:SetScript("OnClick", function (self, button, down)
 			local data = ItemAuditor:GetCraftingRow(1)
 			if data then
 				-- This will make sure the correct tradeskill window is open.
 				local tradeskillName = GetTradeSkillLine()
 				if data.tradeskillName ~= tradeskillName then
 					CastSpellByName(data.tradeskillName)
 				end
 				local queue = data.queue
 				local vellumID = nil
 				_, _, _, _, altVerb = GetTradeSkillInfo(data.tradeSkillIndex)
 				if altVerb == 'Enchant' and LSW.scrollData[data.recipeID] ~= nil then
 					vellumID = LSW.scrollData[data.recipeID]["vellumID"]
 		btnProcess:SetScript("OnEnter", UpdateProcessTooltip)
 		btnProcess:SetScript("OnLeave", function()
 			GameTooltip:Hide()
 		end)
 		btnSkillet = CreateFrame("Button", nil, craftingContent, "UIPanelButtonTemplate")
 		btnSkillet:SetSize(125, 25)
 		btnSkillet:SetPoint("BOTTOMRIGHT", btnProcess, 'BOTTOMLEFT', 0, 0)
 		btnSkillet:RegisterForClicks("LeftButtonUp");
 		btnSkillet:SetScript("OnClick", function (self, button, down)
 			Crafting.Export()
 		end)
 	end
 	local destination = select(2, Crafting.GetQueueDestination())
 	btnSkillet:SetText("Export to "..destination)
 	craftingContent:Show()
 	if container.parent then
 		local width = 80
 		for i, data in pairs(craftingCols) do
 			width = width + data.width
 		end
 		container.parent:SetWidth(width);
 	end
 	ItemAuditor:RegisterEvent("TRADE_SKILL_SHOW", function()
 		if craftingContent and craftingContent:IsVisible() then
 			ItemAuditor:UpdateCraftingTable()
 		end
 	end)
 	ItemAuditor:UpdateCraftingTable()
 	return craftingContent
 end
 ItemAuditor:RegisterTab('Crafting', 'tab_crafting', ShowCrafting)
 function ItemAuditor:DisplayCrafting()
 local craftingDeciders = {}
 function Crafting.RegisterCraftingDecider(name, decider, options)
 	craftingDeciders[name] = decider
 	ItemAuditor.Options.args.crafting_options.args['chk'..name] = {
 		type = "toggle",
 		name = "Enable "..name,
 		get = function() return not ItemAuditor.db.profile.disabled_deciders[name] end,
 		set = function(info, value) ItemAuditor.db.profile.disabled_deciders[name] = not value end,
 		order = 11,
 	}
 	if options then
 		ItemAuditor.Options.args.crafting_options.args['decider_'..name] = {
 			handler = {},
 			name = name,
 			type = 'group',
 	local newDecision = 0
 	local reason = ""
 	for name, decider in pairs(craftingDeciders) do
 		if not ItemAuditor.db.profile.disabled_deciders[name] and name ~= lastWinner then
 			newDecision, reason = decider(data)
 			if newDecision > data.queue then
 				data.queue = newDecision
 				lastWinner = (reason or name)
 				return Decide(data)
 			elseif newDecision < 0 then
 				lastWinner = ""
 				return 'VETO: '..(reason or name), -1
 			end
 		end
 	end
 	winner = lastWinner
 	lastWinner = ""
 	data.queue = ceil(data.queue / GetTradeSkillNumMade(data.tradeSkillIndex))
 	return winner, data.queue
 end
 local function isProfitable(data)
 	if data.profit > 0 and data.profit > ItemAuditor:GetCraftingThreshold() then
 		return
 	end
 	local tradeskillName = GetTradeSkillLine()
 	Crafting.ClearProfession(tradeskillName)
 	shoppingList = nil
 	wipe(tableData)
 	local profitableItems = {}
 	local profitableIndex = 1
 	local numChecked = 0
 	local row = #(realData)+1
 	local numTradeSkills = GetNumTradeSkills()
 	if tradeskillName == 'UNKNOWN' then
 		numTradeSkills  = 0
 	end
 	for i = 1, numTradeSkills do
 		local itemLink = GetTradeSkillItemLink(i)
 		local itemId = Utils.GetItemID(itemLink)
 		local vellumID = nil
 		local spellName = itemName
 		--Figure out if its an enchant or not
 		_, _, _, _, altVerb = GetTradeSkillInfo(i)
 		if LSW.scrollData[itemId] ~= nil and altVerb == 'Enchant' then
 		local recipeLink = GetTradeSkillRecipeLink(i)
 		local stackSize  = 1
 		if recipeLink ~= nil and itemId ~= nil then
 			local skillName, skillType, numAvailable, isExpanded, altVerb = GetTradeSkillInfo(i)
 			local itemName, itemLink= GetItemInfo(itemId)
 			-- This check has to be here for things like Inscription Research that don't produce an item.
 			if itemLink then
 				local count = ItemAuditor:GetItemCount(itemId)
 				local reagents = {}
 				local totalCost = 0
 				for reagentId = 1, GetTradeSkillNumReagents(i) do
 					local reagentName, _, reagentCount = GetTradeSkillReagentInfo(i, reagentId);
 					local reagentLink = GetTradeSkillReagentItemLink(i, reagentId)
 					local reagentTotalCost = self:GetReagentCost(reagentLink, reagentCount)
 					reagents[reagentId] = {
 						link = reagentLink,
 						itemID = Utils.GetItemID(reagentLink),
 						name = reagentName,
 						count = reagentCount,
 					tradeSkillIndex = i,
 					queue = 0,
 					winner = "",
 					tradeskillName = tradeskillName,
 				}
 				data.winner, data.queue = Decide(data)
 				--[[
 					If it wasn't vetoed we need to reduce the number by how many are owned
 					but this should not go below 0
 				]]
 				if data.queue > 0 then
 					data.queue = max(0, data.queue - count)
 				end
 				-- If a tradeskill makes 5 at a time and something asks for 9, we should only
 				-- craft twice to get 10.
 				data.queue = ceil(data.queue / GetTradeSkillNumMade(i))
 				realData[row] = data
 				nameMap[skillName] = row
 					need = 0,
 					characters = {}
 				}
 				local slItem = shoppingList[reagent.itemID]
 				if numOwned[reagent.link] < 0 and not vellumLevelMap[reagent.itemID] then
 					reagent.need = min(reagent.count, abs(numOwned[reagent.link]))
 				elseif numOwned[reagent.link] >= 0 then
 					reagent.need = 0
 				end
 			data.haveMaterials,
 			data.profit,
 		}
 	end
 	craftingTable:SetData(tableData, true)
 	if self:GetCraftingRow(1) then
 		btnProcess:Enable()
 	else
 		btnProcess:Disable()
 	end

Mercurial > wow > itemauditor

comparison Modules/Crafting.lua @ 133:5eefa40e2a29