Module:Products

Module documentation

This documentation is transcluded from Module:Products/doc. [edit] [history] [purge]

This module does not have any documentation. Please consider adding documentation at Module:Products/doc. [edit]

Module:Products's function main is invoked by Template:Products.

Module:Products requires Module:Currency.

Module:Products requires Module:Mw.

---

local p = {}

function p.main(frame)
	return p._main(frame:getParent().args)
end

function p._main(args)
	args = args or {}
    args.item = args.item or mw.title.getCurrentTitle().text
    local showPrices = args.showPrices or false
    local showValues = args.showValues or false
    local products = p.getProducts(args)
    if products ~= 0 then
    	local recipeNames = p.extractRecipeNames(products)
    	local prodprices = p.getShopBuyPrices(products)
    	-- Generate and return a table containing the product information
    	local output = p.displayProductTable(prodprices, showPrices, showValues)
    	return output
    else
    	return "There are no known products for item '''args.item'''"
    end
end

function p.extractRecipeNames(products)
    local recipeNames = {}
    for _, recipeInfo in ipairs(products) do
        local recipeLink = recipeInfo["Recipe"]
        if recipeLink then
            local displayName = recipeLink:match("%[%[.-|(.+)%]%]")
            if displayName then
                table.insert(recipeNames, displayName)
            end
        end
    end
    return recipeNames
end

function p.getProducts(args)
    local item = mw.smw.ask('[[:+]][[Uses item::' .. args.item .. ']]|?Uses item |?Uses item and quantity |?Profession A |?Profession Level A|?Value |mainlabel=Recipe') or 0
    return item
end

function p.getShopBuyPrices(products)
    local mw = require('mw')

    for _, product in ipairs(products) do
        local usesItems = product["Uses item and quantity"]
        if type(usesItems) == "table" then
            for _, item in ipairs(usesItems) do
                -- Extract item name and quantity from the "item,#" format
                local itemName, quantity = item:match("([^,]+),(%d+)")
                quantity = tonumber(quantity) or 1 -- Default to 1 if quantity is missing

                if itemName then
                    -- Query for the shop buy price of the item
                    local shopPriceQuery = '[[:+]][[Sold item::' .. itemName .. ']]|?Shop buy price|mainlabel=' .. itemName
                    local shopPriceResult = mw.smw.ask(shopPriceQuery) or {}
                    local shopPrice = 0

                    if shopPriceResult[1] and shopPriceResult[1]["Shop buy price"] then
                        shopPrice = tonumber(shopPriceResult[1]["Shop buy price"]) or 0
                    end

                    -- Multiply the price by the quantity
                    local totalPrice = shopPrice * quantity

                    -- Update the product with the formatted string and total price
                    product[itemName .. "_Shop_buy_price"] = totalPrice > 0 and totalPrice or "N/A"
                    product[itemName .. "_Formatted"] = quantity .. " x " .. itemName
                end
            end
        elseif type(usesItems) == "string" then
            -- Handle single uses item_and_quantity (not a table)
            local itemName, quantity = usesItems:match("([^,]+),(%d+)")
            quantity = tonumber(quantity) or 1 -- Default to 1 if quantity is missing

            if itemName then
                -- Query for the shop buy price of the item
                local shopPriceQuery = '[[:+]][[Sold item::' .. itemName .. ']]|?Shop buy price|mainlabel=' .. itemName
                local shopPriceResult = mw.smw.ask(shopPriceQuery) or {}
                local shopPrice = 0

                if shopPriceResult[1] and shopPriceResult[1]["Shop buy price"] then
                    shopPrice = tonumber(shopPriceResult[1]["Shop buy price"]) or 0
                end

                -- Multiply the price by the quantity
                local totalPrice = shopPrice * quantity

                -- Update the product with the formatted string and total price
                product[itemName .. "_Shop_buy_price"] = totalPrice > 0 and totalPrice or "N/A"
                product[itemName .. "_Formatted"] = quantity .. " x " .. itemName
            end
        end
    end
    return products
end

function p.displayProductTable(products, showPrices, showValues)
	local currency = require('Module:Currency').parse
    local out = {}
    table.insert(out, '{| class="wikitable"')
    
    local headerRow = {}
    table.insert(headerRow, '!colspan="2" | Recipe')
    table.insert(headerRow, '!! Level')

	if showValues then
    	table.insert(headerRow, '!! Value')
	end

	table.insert(headerRow, '!! Ingredients')

	if showPrices then
    	table.insert(headerRow, '!! Price')
	end

	table.insert(out, table.concat(headerRow, ' '))

    for _, product in ipairs(products) do
    	local recipeRawText = product["Recipe"]:match("%[%[.-|(.+)%]%]")
    	local recipeImage = "[[File:" .. recipeRawText .. ".png|30px]]"
        local recipe = product["Recipe"] or "Unknown"
        local professionName = product["Profession A"]:match("%[%[.-|(.+)%]%]") or product["Profession A"]:match("%[%[(.-)%]%]") or product["Profession A"] or "Unknown"
        local professionLevel = "[[File:" .. professionName .. " small icon.png|15px]]  " .. (product["Profession Level A"] or "Unknown")
        local usesItems = product["Uses item"] or {}
        local value = currency(product["Value"]) or "Unknown"

        -- Concatenate uses items and their shop buy prices in unordered lists
        local usesItemStr = "<ul style='list-style:none; margin:0; padding-left:0;'>"
        local shopBuyPriceStr = "<ul style='list-style:none; margin:0; padding-left:0; text-align:right;'>"

        if type(usesItems) == "table" then
            for _, item in ipairs(usesItems) do
                local itemName = item:match("%[%[.-|(.+)%]%]") or item:match("%[%[(.-)%]%]") or item
                usesItemStr = usesItemStr .. "<li>" .. product[itemName .. "_Formatted"] .. "</li>"
                local shopBuyPrice = product[itemName .. "_Shop_buy_price"] or 0
                if shopBuyPrice == "N/A" then shopBuyPrice = 0 end
                shopBuyPriceStr = shopBuyPriceStr .. "<li>" .. currency(shopBuyPrice) .. "</li>"
            end
        elseif type(usesItems) == "string" then
            local itemName = usesItems:match("%[%[.-|(.+)%]%]") or usesItems:match("%[%[(.-)%]%]") or usesItems
            usesItemStr = usesItemStr .. "<li>" .. product[itemName .. "_Formatted"] .. "</li>"
            local shopBuyPrice = product[itemName .. "_Shop_buy_price"] or 0
            if shopBuyPrice == "N/A" then shopBuyPrice = 0 end
            shopBuyPriceStr = shopBuyPriceStr .. "<li>" .. currency(shopBuyPrice) .. "</li>"
        end

        usesItemStr = usesItemStr .. "</ul>"
        shopBuyPriceStr = shopBuyPriceStr .. "</ul>"

        table.insert(out, '|-')
        
        local valuesRow = {}
        
        table.insert(valuesRow, '| ' .. recipeImage)
        table.insert(valuesRow, '|| ' .. recipe)
		table.insert(valuesRow, '|| ' .. professionLevel)

		if showValues then
    		table.insert(valuesRow, '|| ' .. value)
		end

		table.insert(valuesRow, '|| ' .. usesItemStr)

		if showPrices then
    		table.insert(valuesRow, '|| ' .. shopBuyPriceStr)
		end

		table.insert(out, table.concat(valuesRow, ' '))
		
        
        --table.insert(out, '| ' .. recipe .. ' || ' .. professionLevel .. ' || ' .. value .. ' || ' .. usesItemStr .. ' || ' .. shopBuyPriceStr)
    end

    table.insert(out, '|}')
    return table.concat(out, '\n')
end

return p