Editing Module:Sandbox/User:Alsang/NodeDescriptionChecker

Jump to navigation Jump to search
Warning: You are not logged in. Your IP address will be publicly visible if you make any edits. If you log in or create an account, your edits will be attributed to your username, along with other benefits.

The edit can be undone. Please check the comparison below to verify that this is what you want to do, and then publish the changes below to finish undoing the edit.

Latest revision Your text
Line 1: Line 1:
require('strict')
p = {}
require('Module:Mw.html extension')
local recipe = require('Module:Infobox Recipe') -- to make use of its extensive material searching function
local param = require( 'Module:Paramtest' )
local currency = require('Module:Currency')
local lang = mw.getContentLanguage()


local p = {}
function p.main()


-- non dynamic module, no inputs
local query = {'[[~*(skill node)]]',
function p.main()
'?= node',
-- returns only directly needed parameter needed for the row,
'?Description=nodeDesc',
-- other parameters are determined by subqueries of chained pages
'?Has subobject.Dropped item = item',
local query = {
'?Has subobject.Dropped item.Description=itemDesc',
'[[-Sold item.Sold by::Head Chef (shop)]]',
'limit=500',
'sort=Variant of,Profession Level A'
'?Profession Level A = lvl',
'? #- = name',
'?Recipe JSON = recipeJSON',
'?Activity XP = XP',
'?Activity duration = duration',
'?Value = sell',
'sort = Profession Level A',
'limit = 500'
}
}
local results = mw.smw.ask(query)
local results = mw.smw.ask(query)


results = p.formatResults(results)
local same = {}

local onlyitem = {}
return p.displayTable(results)
local onlynode = {}
local neither = {}
local different = {}
for _,page in ipairs(results) do
if page.nodeDesc == nil and page.itemDesc == nil then
table.insert(neither,page)
elseif page.nodeDesc == nil and page.itemDesc ~= nil then
table.insert(onlyitem,page)
elseif page.nodeDesc ~= nil and page.itemDesc == nil then
table.insert(onlynode,page)
elseif page.nodeDesc == page.itemDesc then
table.insert(same,page)
else
table.insert(different,page)
end
end
--return p.generateLogTable()
local onlyitemN = 0
for _,_ in ipairs(onlyitem) do
onlyitemN = onlyitemN + 1
end
--for debugging
local onlynodeN = 0
--return '<pre>'..mw.text.jsonEncode(results, mw.text.JSON_PRETTY)..'</pre>'
for _,_ in ipairs(onlynode) do

onlynodeN = onlynodeN + 1
end

-- makes the html for the cells containing currency directly
-- Replaces nil with an "unknown" cell
local function currency_cell(amount)
if not amount then
return mw.html.create('td')
:addClass('table-bg-gray')
:css{ ['text-align'] = 'center' }
:attr{ colspan = '10' }
:wikitext("''unknown''")
:done()
end
end
return currency._cell(amount, { html = 'yes' })
end
local neitherN = 0

for _,_ in ipairs(neither) do
-- do calculations and determine strings to go in cells
neitherN = neitherN + 1
function p.formatResults(results)

-- iterate through potions
for _, item in ipairs(results) do
-- recipe in a workable format
local unpackJSON = mw.text.jsonDecode(item.recipeJSON)
item.outputQuantity = unpackJSON.output[1].quantity

-- call the module:infobox recipe to extensively search for
-- all raw materials (to add to prices)
-- all intermediate materials (for intermediate XP and duration)
local Materials = recipe._getTrueRawMaterials(unpackJSON.materials)
if next(Materials) ~= nil then
item.reagents = Materials.rawMaterials
item.intermediates = Materials.intermediateMaterials
end
-- iterate through reagents, adding buy price to running total (individuals not needed)
item.buy = 0
for _, reagent in ipairs(item.reagents) do
--shamelessley lifted from Module:Products
local shopPriceQuery = '[[:+]][[Sold item::' .. reagent.name .. ']]|?Shop buy price|mainlabel=' .. reagent.name
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
else
item.buy = nil
end

item.buy = item.buy and item.buy + shopPrice * reagent.quantity
end
-- iterate through intermediaries to add to XP and duration parameters
for _, intermediate in ipairs(item.intermediates) do
-- look up activity XP and add it to running total
local XPQuery = '[[Recipe output::' .. intermediate.name .. ']]|?Activity XP|mainlabel=' .. intermediate.name
local XPResult = mw.smw.ask(XPQuery) or {}
local XPIncrease = 0
if XPResult[1] and XPResult[1]["Activity XP"] then
XPIncrease = tonumber(XPResult[1]["Activity XP"]) or 0
else
XPIncrease = nil
end
-- need to look up both the amount of the item used in this recipe and created in its own recipe to know how much of this xp to use
local QTYused = intermediate.quantity

local QTYQuery = '[[Recipe output::' .. intermediate.name .. ']]|?Recipe JSON|mainlabel=' .. intermediate.name
local QTYResult = mw.smw.ask(QTYQuery) or {}
local QTYmade = 0
if QTYResult[1] and QTYResult[1]["Recipe JSON"] then
QTYmade = mw.text.jsonDecode(QTYResult[1]["Recipe JSON"]) or {}
end
QTYmade = QTYmade.output[1].quantity
item.XP = item.XP and XPIncrease and item.XP + XPIncrease * QTYused / QTYmade;
-- look up activity duration and add it to running total
local durationQuery = '[[Recipe output::' .. intermediate.name .. ']]|?Activity duration|mainlabel=' .. intermediate.name
local durationResult = mw.smw.ask(durationQuery) or {}
local durationIncrease = 0
if durationResult[1] and durationResult[1]["Activity duration"] then
durationIncrease = tonumber(durationResult[1]["Activity duration"]) or 0
else
durationIncrease = nil
end
item.duration = item.duration and durationIncrease and item.duration + durationIncrease * intermediate.quantity
end
-- direct values
item.sell = item.sell and item.outputQuantity and item.sell * item.outputQuantity
item.profit = item.sell and item.buy and item.sell - item.buy
item.profitPerXP = item.profit and item.XP and math.floor(item.profit / item.XP * 100) / 100

-- 40 seconds to buy new supplies and travel and deposit and everything, per 12 potions
local batchSize = 12
local downtime = 60
item.duration = item.duration and item.duration + downtime/batchSize
item.potionPerHour = item.duration and 1 / item.duration * 3600

-- properties per hour
item.XPPerHour = item.XP and item.potionPerHour and math.floor(item.XP * item.potionPerHour)
item.profitPerHour = item.profit and item.potionPerHour and math.floor(item.profit * item.potionPerHour)
end
end

return results
local differentN = 0
end
for _,_ in ipairs(different) do

differentN = differentN + 1
-- make the table
end
function p.displayTable(results)
local out = mw.html.create('table')
local out = mw.html.create('table')
:addClass('wikitable sortable')
:addClass('wikitable sortable')
:tag('tr')
:tag('tr')
:tag('th')
:tag('th')
:wikitext('[[File:Carpenter small icon.png|15px]] Level')
:attr{ colspan = '3' }
:wikitext('Nodes with no descriptions')
:done()
:done()
:tag('td')
:wikitext(onlyitemN)
:done()
:done()
:tag('tr')
:tag('th')
:tag('th')
:wikitext('Node')
:attr{ colspan = '3' }
:wikitext('Potion')
:done()
:done()
:tag('th')
:tag('th')
:wikitext('Node description')
:wikitext('Reagents')
:done()
:done()
:tag('th')
:tag('th')
:wikitext('Item')
:attr{ colspan = '10' }
:wikitext('Buy Value')
:done()
:done()
:tag('th')
:tag('th')
:attr{ colspan = '10' }
:wikitext('Item description')
:wikitext('Sell Value')
:done()
:done()
:done()
for _,page in ipairs(onlyitem) do
out:tag('tr')
:tag('td')
:wikitext(page.node)
:done()
:tag('td')
:wikitext(page.nodeDesc)
:done()
:tag('td')
:wikitext(page.item)
:done()
:tag('td')
:wikitext(page.itemDesc)
:done()
:done()
end
out:tag('tr')
:tag('th')
:tag('th')
:attr{ colspan = '3' }
:attr{ colspan = '10' }
:wikitext('Items with no descriptions')
:wikitext('Profit')
:done()
:done()
:tag('td')
:wikitext(onlynodeN)
:done()
:done()
:tag('tr')
:tag('th')
:tag('th')
:wikitext('Node')
:attr{ colspan = '10' }
:wikitext('Profit/hr')
:done()
:done()
:tag('th')
:tag('th')
:wikitext('Node description')
:wikitext('XP')
:done()
:done()
:tag('th')
:tag('th')
:wikitext('Item')
:wikitext('XP/hr')
:done()
:done()
:tag('th')
:tag('th')
:attr{ colspan = '10' }
:wikitext('Item description')
:wikitext('Coins/XP')
:done()
:done()
:done()
:done()

local unknown_value_cell = mw.html.create('td')
for _,page in ipairs(onlynode) do
out:tag('tr')
:addClass('table-bg-gray')
:css{ ['text-align'] = 'center' }
:wikitext("''unknown''")

for i, item in ipairs(results) do
local row = out:tag('tr')
:IF(item.lvl)
:tag('td')
:tag('td')
:css{ ['text-align'] = 'center' }
:wikitext(page.node)
:done()
:wikitext(item.lvl)
:tag('td')
:wikitext(page.nodeDesc)
:done()
:tag('td')
:wikitext(page.item)
:done()
:tag('td')
:wikitext(page.itemDesc)
:done()
:done()
:ELSE()
:node(unknown_value_cell)
:END()

:tag('td')
:css{ ['border-right'] = '0', ['padding-right'] = '0', ['text-align'] = 'right' }
:attr{ ['data-sort-value'] = item.name }
:wikitext(item.outputQuantity .. ' &times;')
:done()
:done()
:tag('td')
end
:addClass('plinkt-image no-border')
:css{ ['border-left'] = '0', ['padding-left'] = '0' }
out:tag('tr')
:wikitext('[[File:' .. item.name .. '.png|link=' .. item.name .. '|30px]]')
:tag('th')
:attr{ colspan = '3' }
:wikitext('Niether Node nor Item has description')
:done()
:done()
:tag('td')
:tag('td')
:addClass('plinkt-link no-border')
:wikitext(neitherN)
:wikitext('[[' .. item.name .. ']]')
:done()
:done()

:done()
local reagentCell = row:tag('td')

for i, _ in ipairs(item.reagents) do
reagentCell:wikitext(item.reagents[i].quantity .. '&times; [[File:' .. item.reagents[i].name .. '.png|18px|link=' .. item.reagents[i].name .. ']]' .. '[[' .. item.reagents[i].name .. ']]<br>')
end
row
:tag('tr')
:node(currency_cell(item.buy))
:tag('th')
:node(currency_cell(item.sell))
:wikitext('Node')
:node(currency_cell(item.profit))
:done()
:node(currency_cell(item.profitPerHour))
:tag('th')

:wikitext('Node description')
:done()
:IF(item.XP)
:tag('th')
:wikitext('Item')
:done()
:tag('th')
:wikitext('Item description')
:done()
:done()
for _,page in ipairs(neither) do
out:tag('tr')
:tag('td')
:tag('td')
:wikitext(page.node)
:wikitext(item.XP and lang:formatNum(tonumber(item.XP)))
:done()
:done()
:ELSE()
:node(unknown_value_cell)
:END()

:IF(item.XPPerHour)
:tag('td')
:tag('td')
:wikitext(page.nodeDesc)
:wikitext(item.XPPerHour and lang:formatNum(tonumber(item.XPPerHour)))
:done()
:done()
:tag('td')
:ELSE()
:wikitext(page.item)
:node(unknown_value_cell)
:done()
:END()

:tag('td')
:node(currency_cell(item.profitPerXP))
:wikitext(page.itemDesc)

:done()
:done()
end
out:tag('tr')
:tag('th')
:attr{ colspan = '3' }
:wikitext('Node and Item both have descriptions, but they are different')
:done()
:tag('td')
:wikitext(differentN)
:done()
:done()
:done()
end

return out
end

function p.generateLogTable()
-- looks to see which logs, planks, poles, staves, and posts have pages and recipes

local woodTypes = {'Ash','Oak','Pine','Hickory','Juniper','Poplar','Suave','Yew'}
local variantTypes = {'Coarse','Rugged','Average','Fine','Sturdy','Perfect'}
local itemTypes = {'Log','Post','Pole'}
local itemTypesAsh = {'Log','Plank'}
local itemTypesJuniper = {'Log','Stave'}
local out = mw.html.create('table')
:addClass('wikitable')
for i, variant in ipairs(variantTypes) do
:tag('tr')
:tag('th')
local row = out:tag('tr')
:wikitext('Node')
:done()
:tag('th')
:wikitext('Node description')
:done()
:tag('th')
:wikitext('Item')
:done()
:tag('th')
:wikitext('Item description')
:done()
:done()
for _,page in ipairs(different) do
for j, wood in ipairs(woodTypes) do
out:tag('tr')
local cell = row:tag('td')
:tag('td')
local itemTypesThis = itemTypes
:wikitext(page.node)
if wood == 'Ash' then
:done()
itemTypesThis = itemTypesAsh
:tag('td')
elseif wood == 'Juniper' then
:wikitext(page.nodeDesc)
itemTypesThis = itemTypesJuniper
:done()
:tag('td')
end

:wikitext(page.item)
for k, item in ipairs(itemTypesThis) do
:done()
:tag('td')
local name = variant .. ' ' .. wood .. ' ' .. item
:wikitext(page.itemDesc)
cell:wikitext('[[' .. name .. ']]')
:done()
:done()
if not(item=='Log') then
local query = mw.smw.ask('[[Name::' .. name .. ']][[Recipe JSON::~*]]|?#-')
local result = tostring(query)
if result=='table' then
--cell:wikitext('&nbsp;has&nbsp;recipe') -- do nothing
elseif result=='nil' then
cell:wikitext('&nbsp;needs&nbsp;recipe')
else
cell:wikitext(result)
end
end
cell:wikitext('<br>')
end
end
end
end
return out
return out
end
end



return p
return p
Please note that all contributions to Brighter Shores Wiki are considered to be released under the CC BY-NC-SA 3.0 (see Brighter Shores:Copyrights for details). If you do not want your writing to be edited mercilessly and redistributed at will, then do not submit it here.
You are also promising us that you wrote this yourself, or copied it from a public domain or similar free resource. Do not submit copyrighted work without permission!
Cancel Editing help (opens in new window)
Preview page with this template

Templates used on this page:

This page is a member of a hidden category:

Retrieved from ‘https://brightershoreswiki.org/w/Module:Sandbox/User:Alsang/NodeDescriptionChecker’