Module:Sandbox/User:Alsang: Difference between revisions

no edit summary
No edit summary
No edit summary
(26 intermediate revisions by the same user not shown)
Line 1:
require('strict')
p = {}
require('Module:Mw.html extension')
local param = require( 'Module:Paramtest' )
local currency = require('Module:Currency')
local lang = mw.getContentLanguage()
local xpdata = mw.loadData('Module:Experience/data')
 
local p = {}
 
-- non dynamic module, no inputs
function p.main()
return nil
-- returns only directly needed parameter needed for the row,
end
-- other parameters are determined by subqueries of chained pages
local query = {
'[[Activity JSON::~*]]',
'? = name',
'?Activity JSON = activityJSON',
'limit = 1500'
}
local results = mw.smw.ask(query)
results = p.screenResults(results)
 
return p.displayTable(results)
function p.stone()
return p.makeTable('stone')
--for debugging
end
--return '<pre>'..mw.text.jsonEncode(results, mw.text.JSON_PRETTY)..'</pre>'
 
function p.metal()
return p.makeTable('metal')
end
 
-- goes through a list of results and culls the ones which are not needed for this table
function p.bone()
function p.screenResults(results)
return p.makeTable('bone')
local resultsScreened = {}
end
-- iterate through products
function p.makeTable(args)
for _, item in ipairs(results) do
local variants = {'basic','moderate','fine','strong','superior','perfect'}
local variants2 = {'Basic','Moderate','Fine','Strong','Superior','Perfect'}
local weaponsStone = {
'Hammerfist',
'Throwing Stones',
'Stone Slab Shield',
'Stone Mace',
'Stone Discs',
'War Hammer',
'Bolas',
'Stone Chunk Shield',
'Double Headed Hammer',
'Throwing Clubs',
'Great Stone Mace',
' Polished Stone Shield',
'Throwing Hammers',
'Great Hammer',
'Sling'}
local weaponsMetal = {
'Rapier ',
'Throwing Twinblades',
'Metal Kite Shield',
'Flanged Mace',
'Throwing Rings',
'Shortsword',
'Metal Javelins',
'Metal Heater Shield',
'Longsword',
'Throwing Knives',
'Broadsword',
'Metal Buckler',
'Throwing Axes',
'Battleaxe',
'Metal Bow'}
local weaponsBone = {
'Truncheon',
'Blowpipe',
'Wooden Round Shield',
'Cudgel',
'Javelins',
'Club',
'Light Crossbow',
'Wooden Square Shield',
'Quarterstaff',
'Recurve Bow',
'Spear',
'Wooden Hexagon Shield',
'Longbow',
'Poleaxe',
'Heavy Crossbow'}
if args=='stone' then
weapons = weaponsStone
elseif args=='metal' then
weapons = weaponsMetal
elseif args=='bone' then
weapons = weaponsBone
else
return nil
end
-- if theres only one activity, wrap in table
local allWeapons = {}
if type(item.activityJSON)=='string' then
item.activityJSON = { item.activityJSON }
for j,wep in ipairs(weapons) do
table.insert(allWeapons,{page='[[' .. wep .. ']]'})
end
 
for i,var in ipairs(variants) do
for j,wep in ipairs(weapons) do
table.insert(allWeapons,{page='[[' .. wep .. ' (' .. var .. ')]]',wrongPage1='[[' .. wep .. ' (' .. variants2[i] .. ')]]',wrongPage2='[[' .. var .. ' ' .. wep .. ']]'})
end
end
for i,item in ipairs(allWeapons) do
for j,json in ipairs(item.activityJSON) do
local query = mw.smw.ask(item.page .. '|?Name #- = data|mainlabel=-')
if type(query)=='table' then
local activityJSON = mw.text.jsonDecode(json)
item.item = query[1].data
end
if activityJSON.duration and tonumber(activityJSON.duration)==20 then
local query = mw.smw.ask(item.page .. '|?Uses facility #- = data|mainlabel=-')
local itemNew = {}
if type(query)=='table' then
item itemNew.facilityname = query[1]item.dataname
itemNew.XP = activityJSON.xp
itemNew.lvl = activityJSON.level
itemNew.profession = activityJSON.profession
itemNew.duration = activityJSON.duration
itemNew.product = activityJSON.output[1].name
itemNew.XPperHour = itemNew.XP and tonumber(itemNew.XP) and itemNew.duration and tonumber(itemNew.duration) and tonumber(itemNew.XP) * 3600 / tonumber(itemNew.duration)
itemNew.fitXP = xpdata.knowledge[itemNew.lvl]*4*0.0005
if itemNew.lvl>=200 then
itemNew.fitXP = itemNew.fitXP * 4
end
itemNew.fitXP = math.floor(itemNew.fitXP * 100 ) / 100
local query = mw.smw.ask('[[Sold item::' .. itemNew.product .. ']][[Shop sell price::!~N/A]]|?Shop sell price=data|mainlabel=-')
if type(query)=='table' then
-- price is returned as a number
itemNew.productSellPrice = tonumber(query[1].data)*0.005
else
-- will return nil if the item is not in a shop, or if it is in a shop but can only be sold to the shop
itemNew.productSellPrice = nil
end
table.insert(resultsScreened,itemNew)
end
end
end
-- sort the results by recipe level
table.sort(resultsScreened, function(item1, item2)
local lvl1 = item1.lvl
local lvl2 = item2.lvl
if (lvl1 == nil) ~= (lvl2 == nil) then --one of two are empty
return lvl2 == nil -- true if lvl2 is nil but not lvl1, false if lvl1 is nil but not lvl2
end
if lvl1 == nil then
return false -- Both empty, equivalent
end
return lvl1 < lvl2 -- normal comparison
end)
 
return resultsScreened
 
end
 
-- make the table
function p.displayTable(results)
local out = mw.html.create('table')
:addClass('wikitable sortable')
:tag('tr')
:tag('th')
:wikitext('Name of pagePage')
:done()
:tag('th')
:wikitext('Item on pageProduct')
:done()
:tag('th')
:wikitext('Recipe FacilityProfession')
:done()
:tag('th')
:wikitext('Incorrect page namesLevel')
:done()
:tag('th')
:wikitext('XP')
:done()
:tag('th')
:wikitext('0.0005 of levelup XP')
:done()
:tag('th')
:wikitext('sell price<br>per action')
:done()
-- :tag('th')
-- :wikitext('Duration')
-- :done()
-- :tag('th')
-- :wikitext('XP/hr')
-- :done()
:done()
 
for i, item in ipairs(results) do
local row = out:tag('tr')
--level
for i,item in ipairs(allWeapons) do
local row = out:tag('trtd')
:tagwikitext('td'item.name)
:wikitext(item.page)
:done()
:tag('td')
:wikitext(item.item)
:done()
:tag('td')
:wikitext(item.facility)
:done()
:tag('td')
:wikitext(item.wrongPage1)
:wikitext('<br>')
:wikitext(item.wrongPage2)
:done()
:done()
:tag('td')
:wikitext('[[' .. item.product .. ']]')
:done()
:tag('td')
end
:wikitext('[[' .. item.profession .. ']]')
:done()
:tag('td')
:wikitext(item.lvl)
:done()
:tag('td')
:wikitext(item.XP)
:done()
:tag('td')
:wikitext(item.fitXP)
:done()
:tag('td')
:wikitext(item.productSellPrice)
:done()
-- :tag('td')
-- :wikitext(item.duration)
-- :done()
-- :tag('td')
-- :wikitext(item.XPperHour)
-- :done()
 
:done()
end
 
return out
end
 
19,555

edits