Module:Sandbox/User:CephHunter
Jump to navigation
Jump to search
Documentation for this module may be created at Module:Sandbox/User:CephHunter/doc
local p = {}
--imports
local gePrice = require('Module:Exchange')._price
local minutesToTime = require('Module:Time')._m_to_c
local paramtest = require('Module:Paramtest')
local yesno = require('Module:Yesno')
local round = require('Module:Number')._round
local currency = require('Module:Currency')
local sc = require('Module:Skill clickpic')._main
local vdf = mw.ext.VariablesLua.vardefine
local lang = mw.getContentLanguage()
-- Config constants, change as needed
MAX_INPUTS = 50
MAX_OUTPUTS = 50
MAX_XP = 50
MEM_ICON = {
[false] = "[[File:F2P icon.png|20px|center|link=Free-to-play]]",
[true] = "[[File:P2P icon.png|20px|center|link=Members]]"
}
local cur_frame = mw.getCurrentFrame()
function p.testmmgtable(args)
return p._mmgtable(cur_frame, args)
end
function p.mmgtable(frame)
local args = frame:getParent().args
return p._mmgtable(frame, args)
end
-- Create an MMG table.
-- Frame is the frame the module was invoked from.
-- Args are the template arguments used when creating the table.
function p._mmgtable(frame, args)
local isperkill = yesno(args.isperkill)
local tblattr, dyndef = {}, {}
if isperkill then
local tmpdyn = handleDynamics(args)
tblattr = tmpdyn.attr
dyndef = tmpdyn.defs
end
local parsedInput = handleInputs(args, dyndef)
local parsedOutput = handleOutputs(args, dyndef)
local parsedXP = handleXP(args)
local ret = mw.html.create('')
--mw.logObject(dyndef)
--mw.logObject(parsedInput)
--mw.logObject(parsedOutput)
local tbl = ret:tag('table')
:addClass('wikitable')
:addClass('mmgtable')
:attr('style', 'width: 100%; text-align: center;')
:tag('caption')
-- Members status (default to yes)
:wikitext(MEM_ICON[yesno(args['Members'] or 'yes', true)])
:wikitext(args['Activity'] or '{{{Activity}}}')
:done()
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext('Requirements')
:done()
:tag('td')
:addClass('image-container')
:attr('rowspan', '9')
:wikitext(paramtest.default_to(args['Image'], '{{{Image}}}'))
:done()
:done()
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext('Skills')
:done()
:done()
:tag('tr')
:tag('td')
:attr('colspan', '2')
-- Can leave blank if no reqs.
:wikitext(paramtest.default_to(args['Skill'], 'None'))
:done()
:done()
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext('Items')
:done()
:done()
:tag('tr')
:tag('td')
:attr('colspan', '2')
-- Can leave blank if no reqs.
:wikitext(paramtest.default_to(args['Item'], 'None'))
:done()
:done()
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext('Quest')
:done()
:done()
:tag('tr')
:tag('td')
:attr('colspan', '2')
-- Can leave blank if no reqs
:wikitext(paramtest.default_to(args['Quest'], 'None'))
:done()
:done()
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext('Other')
:done()
:done()
:tag('tr')
:tag('td')
:attr('colspan', '2')
-- Can leave blank if no reqs
:wikitext(paramtest.default_to(args['Other'], 'None'))
:done()
:done()
:tag('tr')
:tag('th')
:attr('colspan', '3')
:wikitext('Results')
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Profit')
:done()
:tag('th')
:wikitext('[[wikipedia:Return on investment|ROI]]')
:done()
:tag('th')
:wikitext('Experience gained')
:done()
:done()
:tag('tr')
:tag('td')
if args['Profit'] then
tbl:wikitext(coins(args['Profit']))
elseif isperkill then
tbl
:addClass('mmg-varieswithkph')
:attr('data-mmg-cost-ph', parsedOutput.valueph - parsedInput.valueph)
:attr('data-mmg-cost-pk', parsedOutput.valuepk - parsedInput.valuepk)
:wikitext(coins(autoround(parsedOutput.value - parsedInput.value)))
else
tbl:wikitext(coins(autoround(parsedOutput.value - parsedInput.value)))
end
tbl = tbl
:done()
:tag('td')
if args['Profit'] then
tbl:wikitext(tostring(args['Profit'] / args['Input'] * 100)..'%')
elseif isperkill then
tbl
:addClass('mmg-varieswithkph mmg-roi')
:attr({
['data-mmg-roi-out-ph'] = parsedOutput.valueph,
['data-mmg-roi-in-ph'] = parsedInput.valueph,
['data-mmg-roi-out-pk'] = parsedOutput.valuepk,
['data-mmg-roi-in-pk'] = parsedInput.valuepk
})
:wikitext(autoround((parsedOutput.value - parsedInput.value) / parsedInput.value * 100)..'%')
else
tbl:wikitext(autoround((parsedOutput.value - parsedInput.value) / parsedInput.value * 100)..'%')
end
tbl = tbl
:done()
:tag('td')
if args['Other Benefits'] then
tbl:wikitext(args['Other Benefits'])
elseif #parsedXP.spans > 0 then
for _, v in ipairs(parsedXP.spans) do
tbl:node(v)
end
else
tbl:wikitext('None')
end
tbl = tbl
:done()
:done()
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext('Inputs')
if parsedInput.value ~= 0 then
tbl:wikitext(' (')
if isperkill then
tbl
:tag('span')
:addClass('mmg-varieswithkph')
:addClass('mmg-input-sum')
:attr('data-mmg-cost-ph', parsedInput.valueph)
:attr('data-mmg-cost-pk', parsedInput.valuepk)
:wikitext(coins(autoround(parsedInput.value)))
:done()
else
tbl:wikitext(coins(autoround(parsedInput.value)))
end
tbl:wikitext(')')
end
tbl = tbl
:done()
:tag('th')
:wikitext('Outputs')
if parsedOutput.value ~= 0 then
tbl:wikitext(' (')
if isperkill then
tbl
:tag('span')
:addClass('mmg-varieswithkph')
:addClass('mmg-output-sum')
:attr('data-mmg-cost-ph', parsedOutput.valueph)
:attr('data-mmg-cost-pk', parsedOutput.valuepk)
:wikitext(coins(autoround(parsedOutput.value)))
:done()
else
tbl:wikitext(coins(autoround(parsedOutput.value)))
end
tbl:wikitext(')')
end
tbl = tbl
:done()
:done()
:tag('tr')
:tag('td')
:attr('colspan', '2')
if args['Inputs'] then
tbl:wikitext(args['Inputs'])
elseif #parsedInput.spans > 0 then
tbl:css('padding', '0'):css('vertical-align', 'top')
local inputTable = mw.html.create('table')
inputTable:addClass('wikitable')
:addClass('sortable')
:css('font-size', '1em')
:css('width', 'calc(100% + 2px)')
:css('margin', '-1px')
:css('text-align', 'center')
:tag('tr')
:tag('th')
:addClass('unsortable')
:done()
:tag('th')
:wikitext('Item')
:done()
:tag('th')
:wikitext('Quantity')
:done()
:tag('th')
:wikitext('GE Price')
:done()
:tag('th')
:addClass('unsortable')
:wikitext('Note')
:done()
:done()
for _, v in ipairs(parsedInput.spans_tableRow) do
inputTable:node(v)
end
tbl:node(inputTable)
elseif parsedInput.text then
tbl:wikitext(parsedInput.text)
else
tbl:wikitext('None')
end
tbl = tbl
:done()
:tag('td')
if args['Outputs'] then
tbl:wikitext(args['Outputs'])
elseif #parsedOutput.spans > 0 then
tbl:css('padding', '0'):css('vertical-align', 'top')
local outputTable = mw.html.create('table')
outputTable:addClass('wikitable')
:addClass('sortable')
:css('font-size', '1em')
:css('width', 'calc(100% + 2px)')
:css('margin', '-1px')
:css('text-align', 'center')
:tag('tr')
:tag('th')
:addClass('unsortable')
:done()
:tag('th')
:wikitext('Item')
:done()
:tag('th')
:wikitext('Quantity')
:done()
:tag('th')
:wikitext('GE Price')
:done()
:tag('th')
:addClass('unsortable')
:wikitext('Note')
:done()
:done()
for _, v in ipairs(parsedOutput.spans_tableRow) do
outputTable:node(v)
end
tbl:node(outputTable)
elseif parsedOutput.text then
tbl:wikitext(parsedOutput.text)
else
tbl:wikitext('None')
end
tbl = tbl
:done()
:done()
if isperkill then
tbl
:addClass('mmg-isdynamic')
--:attr('data-default-kph', args.kph)
--:attr('data-default-kph-name', args['kph name'] or 'Kills per hour')
:attr(tblattr)
end
if not(yesno(args.noexports)) then
if yesno(args.isperkill) then
vdf('kph', string.format('<span class="mmg-variable mmg-kph">%s</span>', args.kph))
vdf('default_kph', args.kph)
vdf('inputPH', string.format('<span class="mmg-variable mmg-input-ph" data-mmg-cost-ph="%s">%s</span>', parsedInput.valueph, nocoins(autoround(parsedInput.valueph))))
vdf('inputPK', string.format('<span class="mmg-variable mmg-input-pk" data-mmg-cost-pk="%s">%s</span>', parsedInput.valuepk, nocoins(autoround(parsedInput.valuepk))))
vdf('input', string.format('<span class="mmg-variable mmg-input" data-mmg-cost-ph="%s" data-mmg-cost-pk="%s">%s</span>', parsedInput.valueph, parsedInput.valuepk, nocoins(autoround(parsedInput.value))))
vdf('outputPH', string.format('<span class="mmg-variable mmg-output-ph" data-mmg-cost-ph="%s">%s</span>', parsedOutput.valueph, nocoins(autoround(parsedOutput.valueph))))
vdf('outputPK', string.format('<span class="mmg-variable mmg-output-pk" data-mmg-cost-pk="%s">%s</span>', parsedOutput.valuepk, nocoins(autoround(parsedOutput.valuepk))))
vdf('output', string.format('<span class="mmg-variable mmg-varieswithkph mmg-output" data-mmg-cost-ph="%s", data-mmg-cost-pk="%s">%s</span>', parsedOutput.valueph, parsedOutput.valuepk, nocoins(autoround(parsedOutput.value))))
vdf('profitPH', string.format('<span class="mmg-variable mmg-profit-ph" data-mmg-cost-ph="%s">%s</span>', parsedOutput.valueph-parsedInput.valueph, nocoins(autoround(parsedOutput.valueph-parsedInput.valueph))))
vdf('profitPK', string.format('<span class="mmg-variable mmg-profit-pk" data-mmg-cost-pk="%s">%s</span>', parsedOutput.valuepk-parsedInput.valuepk, nocoins(autoround(parsedOutput.valuepk-parsedInput.valuepk))))
vdf('profit', string.format('<span class="mmg-variable mmg-varieswithkph mmg-profit" data-mmg-cost-ph="%s" data-mmg-cost-pk="%s">%s</span>', parsedOutput.valueph-parsedInput.valueph, parsedOutput.valuepk-parsedInput.valuepk, nocoins(autoround(parsedOutput.value-parsedInput.value))))
vdf('roi', string.format('<span class="mmg-variable mmg-varieswithkph mmg-roi" data-mmg-roi-out-ph="%s" data-mmg-roi-in-ph="%s" data-mmg-roi-out-pk="%s" data-mmg-roi-in-pk="%s">%s</span>', parsedOutput.valueph, parsedInput.valueph, parsedOutput.valuepk, parsedInput.valuepk, nocoins(autoround((parsedOutput.value-parsedInput.value)/parsedInput.value*100))))
else
vdf('input', string.format('<span class="mmg-input">%s</span>', parsedInput.value, nocoins(autoround(parsedInput.value))))
vdf('output', string.format('<span class="mmg-output">%s</span>', parsedOutput.value, nocoins(autoround(parsedOutput.value))))
vdf('profit', string.format('<span class="mmg-profit">%s</span>', parsedOutput.value - parsedInput.value, nocoins(autoround(parsedOutput.value-parsedInput.value))))
vdf('roi', string.format('<span class="mmg-roi">%s</span>', nocoins(autoround((parsedOutput.value-parsedInput.value)/parsedInput.value*100))))
vdf('input_raw', parsedInput.value)
vdf('output_raw', parsedOutput.value)
vdf('profit_raw', parsedOutput.value-parsedInput.value)
vdf('roi_raw', (parsedOutput.value-parsedInput.value)/parsedInput.value*100)
end
end
if args['Profit'] or args['Inputs'] or args['Outputs'] then
ret:wikitext('[[Category:Pages with deprecated parameters]]')
end
return ret
end
-- Calculate the profit and do nothing else.
function p.profit(frame)
local frame = frame or cur_frame
local args = frame:getParent().args -- Template args, NOT #invoke args
local isperkill = yesno(args.isperkill)
local dyndef = {}
if isperkill then
local tmpdyn = handleDynamics(args)
dyndef = tmpdyn.defs
end
local i = handleInputs(args, dyndef).value
local o = handleOutputs(args, dyndef).value
return o - i
end
-- Calculate the cost and do nothing else.
function p.cost(frame)
local frame = frame or cur_frame
local args = frame:getParent().args -- Template args, NOT #invoke args
local isperkill = yesno(args.isperkill)
local dyndef = {}
if isperkill then
local tmpdyn = handleDynamics(args)
dyndef = tmpdyn.defs
end
return handleInputs(args, dyndef).value
end
-- Generate the line(s) of experience gained
-- Used by {{Mmgtable/row2}}
function p.xp(frame)
local frame = frame or cur_frame
local args = frame:getParent().args
local ret = {}
local items = handleXP(args).spans
if #items > 0 then
for _, v in ipairs(items) do
table.insert(ret, tostring(v))
end
end
return table.concat(ret)
end
-- Implements handleInputs and handleOutputs
-- See those functions for further details
function handleIteratedArgs(args, dyndef, prefix, max_iters)
local items = {}
local total_item_value = 0
local textlines = {}
local textlines_tableRow = {}
local is_per_kill = yesno(args.isperkill)
local has_dynam_inp = paramtest.has_content(args['UInput1text'])
local defaultKPH = tonumber(args.kph) or 1
local value_per_kill = 0
local value_per_hour = 0
for i=1,max_iters,1 do
local pri = prefix..i
if paramtest.is_empty(args[pri]) then break end
local span = mw.html.create('div')
span:addClass('mmg-itemline mmg-'..prefix:lower())
local tableRow = mw.html.create('tr')
tableRow:addClass('mmg-itemline mmg-'..prefix:lower())
local name = args[pri]
local qty_param = args[pri..'num']
local actual_qty = nil
local value_param = args[pri..'value']
local actual_value = nil
local is_per_hour = not is_per_kill
if is_per_kill and yesno(args[pri..'isph']) then
is_per_hour = true
end
-- Keep track of sanity check states - we want to handle them gracefully later.
local invalid_qty_present = false
local invalid_value_present = false
local failed_ge_lookup = false
if paramtest.has_content(qty_param) then
actual_qty = tonumber(qty_param) or expr(qty_param)
invalid_qty_present = not actual_qty
actual_qty = actual_qty or 1
-- If the given quantity doesn't look like a number, we'll default to 1
-- but we should probably alert the user
-- since they might want to fix that
else
-- Default value of 1
actual_qty = 1
end
if paramtest.has_content(value_param) then
-- Again, if it was specified, it should be a number
-- If it isn't, we pretend it wasn't specified
-- but we alert the user because it's probably not what they want
actual_value = tonumber(value_param) or expr(value_param)
invalid_value_present = not actual_value
end
-- If we got the value earlier, skip this part
if not actual_value then
-- Here we try to find an exchange price
-- If we get here, and we can't get an exchange price
-- we default to 0.
-- This is almost certainly not what the user wants,
-- so we warn them about it.
local success, price = pcall(gePrice, name)
actual_value = success and tonumber(price) -- This is awful but still pleasant somehow
failed_ge_lookup = not actual_value
actual_value = actual_value or 0
end
local this_item_value, this_item_qty, attrName
local attrVal = actual_qty * actual_value
if is_per_kill and not is_per_hour then
span:addClass('mmg-varieswithkph')
tableRow:addClass('mmg-varieswithkph')
if args[pri..'dynam'] then
span:addClass('mmg-variesdynm')
span:attr('data-dynam-inputs', args[pri..'dynam'])
tableRow:addClass('mmg-variesdynm')
tableRow:attr('data-dynam-inputs', args[pri..'dynam'])
local mult = 1
for j in string.gmatch(args[pri..'dynam'], "%d+") do
--mw.logObject(dyndef)
if dyndef['dyn'..j][3] then
mult = mult * dyndef['dyn'..j][2] / dyndef['dyn'..j][1]
else
mult = mult * dyndef['dyn'..j][1] * dyndef['dyn'..j][2]
end
end
this_item_qty = actual_qty * defaultKPH * mult
this_item_value = attrVal * defaultKPH * mult
else
this_item_qty = actual_qty * defaultKPH
this_item_value = attrVal * defaultKPH
end
value_per_kill = value_per_kill + attrVal
attrName = 'data-mmg-cost-pk'
else
if args[pri..'dynam'] then
span:addClass('mmg-variesdynm')
span:attr('data-dynam-inputs', args[pri..'dynam'])
tableRow:addClass('mmg-variesdynm')
tableRow:attr('data-dynam-inputs', args[pri..'dynam'])
local mult = 1
for i in string.gmatch(args[pri..'dynam'], "%d+") do
if dyndef['dyn'..i][3] then
mult = mult * dyndef['dyn'..i][2] / dyndef['dyn'..i][1]
else
mult = mult * dyndef['dyn'..i][1] * dyndef['dyn'..i][2]
end
end
this_item_qty = actual_qty * mult
this_item_value = attrVal * mult
else
this_item_qty = actual_qty
this_item_value = attrVal
end
value_per_hour = value_per_hour + attrVal
attrName = 'data-mmg-cost-ph'
end
total_item_value = total_item_value + this_item_value
span:tag('span'):addClass('mmg-quantity'):attr('data-mmg-qty', actual_qty):wikitext(autoround(this_item_qty, true))
local tableRow_qty = mw.html.create('td')
tableRow_qty:addClass('mmg-quantity'):attr('data-mmg-qty', actual_qty):wikitext(autoround(this_item_qty, true))
if invalid_qty_present then
span:node(warning('Could not interpret \''..qty_param..'\' as a number, defaulting to 1'))
tableRow_qty:node(warning('Could not interpret \''..qty_param..'\' as a number, defaulting to 1'))
end
tableRow_qty:done()
span:wikitext(string.format(' × [[File:%s.png|link=%s]] [[%s]] (', name, name, name))
local tableRow_img = mw.html.create('td')
tableRow_img:wikitext(string.format('[[File:%s.png|link=%s]]', name, name)):done()
local tableRow_item = mw.html.create('td')
tableRow_item:css('text-align','left'):wikitext(string.format('[[%s]]', name)):done()
span:tag('span'):addClass('mmg-cost'):attr(attrName, attrVal):wikitext(nocoins(autoround(this_item_value)))
span:wikitext(')')
local tableRow_cost = mw.html.create('td')
tableRow_cost:addClass('mmg-cost'):attr(attrName, attrVal):css('text-align','right'):wikitext(nocoins(autoround(this_item_value)))
if invalid_value_present then
span:node(warning('Could not interpret \''..value_param..'\' as a number, ignoring.'))
tableRow_cost:node(warning('Could not interpret \''..value_param..'\' as a number, ignoring.'))
end
if failed_ge_lookup then
span:node(warning('Could not find exchange price for item \''..name..'\', please double-check the spelling'))
span:wikitext('[[Category:Money making guides with a failed GE lookup]]')
tableRow_cost:node(warning('Could not find exchange price for item \''..name..'\', please double-check the spelling'))
tableRow_cost:wikitext('[[Category:Money making guides with a failed GE lookup]]')
end
tableRow_cost:done()
local tableRow_note = mw.html.create('td'):css('text-align','left')
tableRow_note:addClass('mmg-note')
if paramtest.has_content(args[pri..'note']) then
span:tag('span'):addClass('mmg-note'):wikitext(' ',args[pri..'note'])
tableRow_note:wikitext(' ',args[pri..'note'])
end
tableRow_note:done()
tableRow:node(tableRow_img):node(tableRow_item):node(tableRow_qty):node(tableRow_cost):node(tableRow_note):done()
table.insert(textlines, span)
table.insert(textlines_tableRow, tableRow)
table.insert(items, {name = name, qty = actual_qty, value = actual_value, isph = is_per_hour})
end
return {value = total_item_value, valuepk = value_per_kill, valueph = value_per_hour, spans = textlines, spans_tableRow = textlines_tableRow, list = items}
end
-- args are the args supplied to the template, (or a subset of them contining all input arguments)
-- Returns a table. The table has three keys: 'value', 'text', and 'as_table'
---- 'value' contains the total value of the inputs specified by args
---- 'text' contains a formatted string based on the inputs specified by args. This can be directly plugged into the HTML table.
---- 'list' contains all the inputs as a Lua list. Each input is represented by a table with the following keys
------ 'name' being the name of the item
------ 'value' being the value of the item in question
------ 'qty' being the quantity specified for the item
function handleInputs(args, dyndef)
return handleIteratedArgs(args, dyndef, 'Input', MAX_INPUTS)
end
-- args are the args supplied to the template, (or a subset of them contining all output arguments)
-- Returns a table. The table has two keys: 'value', and 'text'
---- 'value' contains the total value of the outputs specified by args
---- 'text' contains a formatted string based on the outputs specified by args. This can be directly plugged into the HTML table.
---- 'list' contains all the outputs as a Lua list. Each output is represented by a table with the following keys
------ 'name' being the name of the item
------ 'value' being the value of the item in question
------ 'qty' being the quantity specified for the item
function handleOutputs(args, dyndef)
return handleIteratedArgs(args, dyndef, 'Output', MAX_OUTPUTS)
end
function handleDynamics(args)
local attr = { ['data-default-kph'] = args.kph }
attr['data-default-kph-name'] = args['kph name'] or 'Kills per hour'
local defs = {}
if paramtest.has_content(args['UInput1text']) then
local i = 1
while paramtest.has_content(args['UInput'..i..'text']) do
attr['data-dynam'..i..'-text'] = args['UInput'..i..'text']
attr['data-dynam'..i..'-def'] = tonumber(args['UInput'..i..'def']) or 1
attr['data-dynam'..i..'-fact'] = tonumber(args['UInput'..i..'fact']) or 1
local isdiv = yesno(args['UInput'..i..'isdiv'], false)
attr['data-dynam'..i..'-isdiv'] = tostring(isdiv)
defs['dyn'..i] = {(tonumber(args['UInput'..i..'def']) or 1), (tonumber(args['UInput'..i..'fact']) or 1), isdiv}
attr['data-num-dynamics'] = i
i = i + 1
end
end
return { defs = defs, attr = attr }
end
-- Creates a neat little warning message
function warning(msg)
return cur_frame:expandTemplate{title='Hover', args={'*', msg, 'border-bottom: 1px red dotted; color: red; cursor: help;'}}
end
function p.recurringTable(frame)
return p._recurringTable(frame, frame:getParent().args)
end
function p._recurringTable(frame, args)
local parsedInput = handleInputs(args)
local parsedOutput = handleOutputs(args)
local timeAsString = nil
local numMinutes = tonumber(expr(args['Activity Time'])) or 1
local ret = mw.html.create('')
local tbl = ret:tag('table')
if numMinutes < 1 then
local seconds = numMinutes * 60
timeAsString = seconds..' '..lang:plural(seconds, 'second', 'seconds')
else
timeAsString = numMinutes..' '..lang:plural(numMinutes, 'minute', 'minutes')
end
tbl = tbl
:addClass('wikitable')
:addClass('mmgtable')
:attr('style', 'width: 100%; text-align: center;')
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext(MEM_ICON[yesno(args['Members'] or 'yes', true)])
:wikitext(args['Activity'])
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Profit per instance')
:done()
:tag('td')
:addClass('image-container')
:attr('rowspan', '8')
:wikitext(args['Image'])
:done()
:done()
:tag('tr')
:tag('td')
if args['Profit'] then
tbl:wikitext(coins(round(args['Profit'], 0)))
else
tbl:wikitext(coins(round(parsedOutput.value - parsedInput.value), 0), ' per instance')
end
tbl = tbl
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Activity time')
:done()
:done()
:tag('tr')
:tag('td')
:wikitext(timeAsString)
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Minimum recurrence time')
:done()
:done()
:tag('tr')
:tag('td')
:wikitext(args['Recurrence Time'])
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Effective profit')
:done()
:done()
:tag('tr')
:tag('td')
if args['Profit'] then
tbl:wikitext(coins('('..args['Profit']..') * 60 / ('..args['Activity Time']..') round 0'))
else
-- A bit messy but it should do the job. Assuming Activity Time is a well-behaved number, of course.
tbl:wikitext(coins(tostring(parsedOutput.value - parsedInput.value)..' * 60 / ('..args['Activity Time']..') round 0'))
end
tbl = tbl:wikitext(' per hour')
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Skill requirements')
:done()
:tag('th')
:wikitext('Quest requirements')
:done()
:done()
:tag('tr')
:tag('td')
:wikitext(paramtest.default_to(args['Skill'], 'None'))
:done()
:tag('td')
:wikitext(paramtest.default_to(args['Quest'], 'None'))
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Item requirements')
:done()
:tag('th')
:wikitext('Other requirements')
:done()
:done()
:tag('tr')
:tag('td')
:wikitext(paramtest.default_to(args['Item'], 'None'))
:done()
:tag('td')
:wikitext(paramtest.default_to(args['Other'], 'None'))
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Experience gained')
:done()
:tag('th')
:wikitext('Location')
:done()
:done()
:tag('tr')
:tag('td')
:wikitext(paramtest.default_to(args['Other Benefits'], 'None'))
:done()
:tag('td')
-- Sensible enough as a default
:wikitext(paramtest.default_to(args['Location'], 'Anywhere'))
:done()
:done()
:tag('tr')
:tag('th')
:wikitext('Inputs')
if parsedInput.value ~= 0 then
tbl:wikitext(' (', coins(round(parsedInput.value, 0)), ')')
end
tbl = tbl
:done()
:tag('th')
:wikitext('Outputs')
if parsedOutput.value ~= 0 then
tbl:wikitext(' (', coins(round(parsedOutput.value, 0)), ')')
end
tbl = tbl
:done()
:done()
:tag('tr')
:tag('td')
if args['Inputs'] then
tbl:wikitext(args['Inputs'])
elseif #parsedInput.spans > 0 then
for _, v in ipairs(parsedInput.spans) do
tbl:node(v)
end
elseif parsedInput.text then
tbl:wikitext(parsedInput.text)
else
tbl:wikitext('None')
end
tbl = tbl
:done()
:tag('td')
if args['Outputs'] then
tbl:wikitext(args['Inputs'])
elseif #parsedOutput.spans > 0 then
for _, v in ipairs(parsedOutput.spans) do
tbl:node(v)
end
elseif parsedOutput.text then
tbl:wikitext(parsedOutput.text)
else
tbl:wikitext('None')
end
tbl = tbl
:done()
:done()
:tag('tr')
:tag('th')
:attr('colspan', '2')
:wikitext('Details')
:done()
:done()
:done()
if args['Profit'] or args['Inputs'] or args['Outputs'] then
ret:wikitext('[[Category:Pages with deprecated parameters]]')
end
return ret
end
-- Local utility functions
function coins(v)
return currency._amount(v, 'coins')
end
function nocoins(v)
return currency._amount(v, 'nocoins')
end
function expr(x)
local e_g, e = pcall(mw.ext.ParserFunctions.expr, x)
if e_g then
return e
end
return nil
end
function sigfig(x, p)
local x_sign = x < 0 and -1 or 1
local x = math.abs(x)
local n = math.floor(math.log10(x)) + 1 - p
return x_sign * math.pow(10, n) * round(x / math.pow(10, n), 0)
end
function autoround(x, f)
x = tonumber(x) or 0
local _x
if x == 0 then
_x = 0
elseif math.abs(x) < 0.1 then
_x = sigfig(x, 2)
elseif math.abs(x) > 999 then
_x = round(x, 0)
else
_x = round(x, 2)
end
if f then
return lang:formatNum(_x)
end
return _x
end
function handleXP(args)
local items = {}
local textlines = {}
local is_per_kill = yesno(args.isperkill)
local defaultKPH = tonumber(args.kph) or 1
for i=1,MAX_XP,1 do
if not args['Experience'..i] then break end
local pri = 'Experience'..i
local span = mw.html.create('div')
span:addClass('mmg-xpline')
local skill = args[pri]
local qty_param = args[pri..'num']
local actual_qty = tonumber(qty_param) or expr(qty_param) or 0
local is_per_hour = not is_per_kill
if is_per_kill and yesno(args[pri..'isph']) then
is_per_hour = true
end
local this_item_value, attrName
if is_per_kill and not is_per_hour then
span:addClass('mmg-varieswithkph')
this_item_value = actual_qty * defaultKPH
attrName = 'data-mmg-xp-pk'
else
this_item_value = actual_qty
attrName = 'data-mmg-xp-ph'
end
span:attr(attrName, actual_qty)
:wikitext(sc(skill, autoround(this_item_value, true)))
if paramtest.has_content(args[pri..'note']) then
span:tag('span'):addClass('mmg-note'):wikitext(' ',args[pri..'note'])
end
table.insert(textlines, span)
table.insert(items, { skill = skill, xp = actual_qty, isph = is_per_hour })
end
return { spans = textlines, items = items }
end
return p