Changes

Created page with "local shipmodule = {} local shipdb = require("Module:ShipDatabase") shipdata = shipdb.data function shipmodule.KanmusuInfo(frame) -- Kanmusu Info Template local shipNum =..."
local shipmodule = {}
local shipdb = require("Module:ShipDatabase")
shipdata = shipdb.data

function shipmodule.KanmusuInfo(frame) -- Kanmusu Info Template
local shipNum = frame.args[1]
local shipInfo = assert(shipdata[shipNum], "This KanMusu ID doesn't contains any data")

local CardImg = '<div style="text-align: center;">[[File:KanMusu' .. shipNum .. 'Card.png|' .. shipdata[shipNum]["name"][3] .. 'Card]]</div>'
local CardDmgImg = '<div style="text-align: center;">[[File:KanMusu' .. shipNum .. 'CardDmg.png|' .. shipdata[shipNum]["name"][3] .. 'Damaged Card]]</div>'
local BannerImg = '<div style="text-align: center; width: 100%;">[[File:KanMusu' .. shipNum .. 'Banner.png|' .. shipdata[shipNum]["name"][3] .. 'Banner|class=imageCenter]]</div>'
local BannerDmgImg = '<div style="text-align: center; width: 100%;">[[File:KanMusu' .. shipNum .. 'BannerDmg.png|' .. shipdata[shipNum]["name"][3] .. 'Damaged Banner|class=imageCenter]]</div>'

local Cards = '<td rowspan="10" style="text-align: center;">' .. frame:extensionTag('slideshow', CardImg .. CardDmgImg, {sequence = 'forward', transition = 'fade', refresh = '5000'}) .. '</td>'
local Banners = '<td colspan="3" style="text-align: center;">' .. frame:extensionTag('slideshow', BannerImg .. BannerDmgImg, {sequence = 'forward', transition = 'fade', refresh = '5000'}) .. '</td>'

local row1 = '<tr>' .. Cards .. '<th style="text-align: center;">' .. shipNum .. '</th>' .. Banners .. '</tr>'
local JaName = '<ruby lang="ja" xml:lang="ja"><rb>' .. shipdata[shipNum]["name"][1] .. '</rb><rp> (</rp><rt>' .. shipdata[shipNum]["name"][2] .. '</rt><rp>) </rp></ruby>'

local row2 = '<tr><th colspan="2">' .. JaName .. '</th><th colspan="2">' .. shipdata[shipNum]["name"][3] .. '</th></tr>'
local row3 = '<tr><td colspan="4" style="text-align: center;">' .. shipdata[shipNum]["class"] .. shipdata[shipNum]["type"] .. '</td></tr>'
local row4 = '<tr><td colspan="4"><hr style="border: 0; height: 1px; background-image: linear-gradient(to right, rgba(0,0,0,0), rgba(0,0,0,0.75), rgba(0,0,0,0));" /></td></tr>'

local statLabel = '<th style="width: 65px; {{border-radius|12px 4px 4px 12px}} padding-left: 5px; padding-right: 5px; background-color: #efe6d7; color: #a3965c; text-align: right; vertical-align: baseline;">'
local statBox = '<td style="{{border-radius|4px 12px 12px 4px}} padding-left: 5px; padding-right: 5px; border: 1px solid #a3965c; text-align: left; vertical-align: baseline;">'

local HPinfo = statLabel .. 'HP [[File:IcoHP.png|HP]]</th>' .. statBox .. shipdata[shipNum]["hp"] .. '</td>'
local FPinfo = statLabel .. 'ATK [[File:IcoAtk.png|Firepower]]</th>' .. statBox .. shipdata[shipNum]["fp"][1] .. '→' .. shipdata[shipNum]["fp"][2] .. '</td>'

local row5 = '<tr>' .. HPinfo .. FPinfo .. '</tr>'

local Armorinfo = statLabel .. 'DEF [[File:IcoArmor.png|Armor]]</th>' .. statBox .. shipdata[shipNum]["armor"][1] .. '→' .. shipdata[shipNum]["armor"][2] .. '</td>'
local Torpedoinfo = statLabel .. 'TORP [[File:IcoTorpedo.png|Torpedo]]</th>' .. statBox
if shipdata[shipNum]["torpedo"] == 0 then
Torpedoinfo = Torpedoinfo .. shipdata[shipNum]["torpedo"]
else
Torpedoinfo = Torpedoinfo .. shipdata[shipNum]["torpedo"][1] .. '→' .. shipdata[shipNum]["torpedo"][2]
end

local row6 = '<tr>' .. Armorinfo .. Torpedoinfo .. '</tr>'

local Evasioninfo = statLabel .. 'EVA [[File:IcoEvasion.png|Evasion]]</th>' .. statBox .. shipdata[shipNum]["evasion"][1] .. '→' .. shipdata[shipNum]["evasion"][2] .. '</td>'
local AAinfo = statLabel .. 'AA [[File:IcoAA.png|Anti-Air]]</th>' .. statBox
if shipdata[shipNum]["aa"] == 0 then
AAinfo = AAinfo .. shipdata[shipNum]["aa"]
else
AAinfo = AAinfo .. shipdata[shipNum]["aa"][1] .. '→' .. shipdata[shipNum]["aa"][2]
end

local row7 = '<tr>' .. Evasioninfo .. AAinfo .. '</tr>'

local aircraftTotal = 0
if shipdata[shipNum]["aircraft"] ~= "" then
local aircraftslot = {0, 0, 0, 0}
for i = 1, 4, 1 do
if shipdata[shipNum]["aircraft"][i] ~= nil then
aircraftslot[i] = shipdata[shipNum]["aircraft"][i]
else
aircraftslot[i] = 0
end
end
aircraftTotal = aircraftslot[1] + aircraftslot[2] + aircraftslot[3] + aircraftslot[4]
else
aircraftTotal = 0
end
local Planeinfo = statLabel .. 'PLA [[File:IcoAircraft.png|Aircraft]]</th>' .. statBox .. aircraftTotal .. '</td>'
local ASWinfo = statLabel .. 'ASW [[File:IcoASW.png|Anti-Submarine Warfare]]</th>' .. statBox
if shipdata[shipNum]["asw"] == 0 then
ASWinfo = ASWinfo .. shipdata[shipNum]["asw"]
else
ASWinfo = ASWinfo .. shipdata[shipNum]["asw"][1] .. '→' .. shipdata[shipNum]["asw"][2]
end

local row8 = '<tr>' .. Planeinfo .. ASWinfo .. '</tr>'

local Speedinfo = statLabel .. 'SPD [[File:IcoSpeed.png|Speed]]</th>' .. statBox .. shipdata[shipNum]["spd"] .. '</td>'
local LOSinfo = statLabel .. 'LOS [[File:IcoLOS.png|Line of Sight]]</th>' .. statBox .. shipdata[shipNum]["los"][1] .. '→' .. shipdata[shipNum]["los"][2] .. '</td>'

local row9 = '<tr>' .. Speedinfo .. LOSinfo .. '</tr>'

local Rangeinfo = statLabel .. 'RGE [[File:IcoRange.png|Range]]</th>' .. statBox .. shipdata[shipNum]["range"] .. '</td>'
local Luckinfo = statLabel .. 'LUK [[File:IcoLuck.png|Luck]]</th>' .. statBox .. shipdata[shipNum]["luck"][1] .. '→' .. shipdata[shipNum]["luck"][2] .. '</td>'

local row10 = '<tr>' .. Rangeinfo .. Luckinfo .. '</tr>'
local StatTable = '<table>' .. row1 .. row2 .. row3 .. row4 .. row5 .. row6 .. row7 .. row8 .. row9 .. row10 .. '</table>'

-- Upper part complete

local RscHeader = '<th style="white-space: nowrap; {{border-radius|12px 4px 4px 12px}} background-color: #3baef5; color: #ffffff; padding-left: 5px; padding-right: 5px; text-align: right;">'
local RscData = '<td style="white-space: nowrap; text-align: center;">'
local RscData2 = '<td colspan="3" style="white-space: nowrap; text-align: center;">'

local constrheader = ''
local constrdata = ''

if shipdata[shipNum]["remodellv"] ~= nil and shipdata[shipNum]["remodellv"] ~= "" then
constrheader = 'Remodel Level'
constrdata = shipdata[shipNum]["remodellv"]
else
constrheader = 'Build Time'
if shipdata[shipNum]["buildtime"] == nil or shipdata[shipNum]["buildtime"] == "" then
constrdata = 'Not Buildable'
else
constrdata = shipdata[shipNum]["buildtime"]
end
end

local remodelsteel = '[[File:IcoSteel.png|18px|Steel]]'
local remodelammo = '[[File:IcoAmmo.png|18px|Ammo]]'
local remodelinfo = ''
if shipdata[shipNum]["remodelreq"] ~= "" then
remodelsteel = remodelsteel .. ' ' .. shipdata[shipNum]["remodelreq"][1]
remodelammo = remodelammo .. ' ' .. shipdata[shipNum]["remodelreq"][2]
remodelinfo = remodelsteel .. ' ' .. remodelammo
end

local row11 = ''
if constrheader == 'Build Time' then
row11 = '<tr>' .. RscHeader .. constrheader .. '</th>' .. RscData .. constrdata .. '</td><td colspan="2">&nbsp;</td></tr>'
else
row11 = '<tr>' .. RscHeader .. constrheader .. '</th>' .. RscData .. constrdata .. '</td>' .. RscHeader .. 'Remodel Req</th>' .. RscData .. remodelinfo .. '</td></tr>'
end

local consfuel = '[[File:IcoFuel.png|18px|Fuel]] ' .. shipdata[shipNum]["consumption"][1]
local consammo = '[[File:IcoAmmo.png|18px|Ammo]] ' .. shipdata[shipNum]["consumption"][2]

local row12 = '<tr>' .. RscHeader .. 'Consumption</th>' .. RscData .. consfuel .. ' ' .. consammo .. '</td>'

local scrapfuel = '[[File:IcoFuel.png|18px|Fuel]] ' .. shipdata[shipNum]["dismantle"][1]
local scrapammo = '[[File:IcoAmmo.png|18px|Ammo]] ' .. shipdata[shipNum]["dismantle"][2]
local scrapsteel = '[[File:IcoSteel.png|18px|Steel]] ' .. shipdata[shipNum]["dismantle"][3]
local scrapbauxite = '[[File:IcoBauxite.png|18px|Bauxite]] ' .. shipdata[shipNum]["dismantle"][4]
local scrapinfo = scrapfuel .. ' ' .. scrapammo .. ' ' .. scrapsteel .. ' ' .. scrapbauxite
local row12 = row12 .. RscHeader .. 'Dismantle</th>' .. RscData .. scrapinfo .. '</td></tr>'

local modFP = '[[File:IcoAtkRemodel.png|25px|Firepower]] ' .. shipdata[shipNum]["modernization"][1]
local modTorp = '[[File:IcoTorpedoRemodel.png|25px|Torpedo]] ' .. shipdata[shipNum]["modernization"][2]
local modAA = '[[File:IcoAARemodel.png|25px|Anti-Air]] ' .. shipdata[shipNum]["modernization"][3]
local modArmor = '[[File:IcoArmorRemodel.png|25px|Armor]] ' .. shipdata[shipNum]["modernization"][4]
local modLuck = ''
if shipdata[shipNum]["modernization"][5] ~= nil and shipdata[shipNum]["modernization"][5] ~= "" then
modLuck = '[[File:IcoLuck|18px|Luck]] ' .. shipdata[shipNum]["modernization"][5]
end

local modInfo = modFP .. ' ' .. modTorp .. ' ' .. modAA .. ' ' .. modArmor
if modLuck ~= '' then
modInfo = modInfo .. ' ' .. modLuck
end
local row13 = '<tr>' .. RscHeader .. 'Modernization</th>' .. RscData2 .. modInfo .. '</td></tr>'

local illustrator = ''
local voiceactor = ''
local cat = '[[Category:Ships]]'
if shipdata[shipNum]["artist"] ~= "Unknown" and shipdata[shipNum]["artist"] ~= "" then
illustrator = '[[:Category:' .. shipdata[shipNum]["artist"] .. '|<span lang="ja">' .. shipdata[shipNum]["artist"] .. '</span>]]'
cat = cat .. '[[Category:' .. shipdata[shipNum]["artist"] .. ']]'
else
illustrator = 'Unknown'
end
if shipdata[shipNum]["seiyuu"] ~= "Unknown" and shipdata[shipNum]["seiyuu"] ~= "" then
voiceactor = '[[:Category:' .. shipdata[shipNum]["seiyuu"] .. '|' .. shipdata[shipNum]["seiyuu"] .. ']]'
cat = cat .. '[[Category:' .. shipdata[shipNum]["seiyuu"] .. ']]'
else
voiceactor = 'Unknown'
end
local row14 = '<tr>' .. RscHeader .. 'Artist</th>' .. RscData .. illustrator .. '</td>' .. RscHeader .. 'Seiyuu</th>' .. RscData .. voiceactor .. '</td></tr>'

local equipHeader = ''
local planeStyle = '<td style="white-space: nowrap; text-align: center; vertical-align: top;">'
local equipStyle = ''
if shipdata[shipNum]["aircraft"] ~= "" then
equipHeader1 = '<th style="white-space: nowrap; {{border-radius|12px 4px 4px 12px}} background-color: #efe6d7; color: #a3965c;">Aircraft</th>'
equipHeader2 = '<th colspan="3" style="white-space: nowrap; {{border-radius|4px 12px 12px 4px}} background-color: #efe6d7; color: #a3965c; vertical-align: baseline;">Equipment</th>'
equipHeader = equipHeader1 .. equipHeader2
equipStyle = '<td colspan="3" style="white-space: nowrap; text-align: center; vertical-align: baseline;">'
else
equipHeader = '<th colspan="4" style="white-space: nowrap; {{border-radius|12px 12px 12px 12px}} background-color: #efe6d7; color: #a3965c; vertical-align: baseline;">Equipment</th>'
equipStyle = '<td colspan="4" style="white-space: nowrap; text-align: center; vertical-align: baseline;">'
end

local equip = {'<tr>', '<tr>', '<tr>', '<tr>'}
for i = 1, 4, 1 do
if shipdata[shipNum]["aircraft"] ~= "" then
if shipdata[shipNum]["aircraft"][i] ~= nil then
equip[i] = equip[i] .. planeStyle .. shipdata[shipNum]["aircraft"][i] .. '</td>' .. equipStyle
else
equip[i] = equip[i] .. planeStyle .. '</td>' .. equipStyle
end
if shipdata[shipNum]["equip"] ~= "" then
if shipdata[shipNum]["equip"][i] == "" or shipdata[shipNum]["equip"][i] == "Unequipped" then
equip[i] = equip[i] .. '-Unequipped-</td></tr>'
elseif shipdata[shipNum]["equip"][i] == nil then
equip[i] = equip[i] .. '\'\'-Locked-\'\'</td></tr>'
else
equip[i] = equip[i] .. '[[' .. shipdata[shipNum]["equip"][i] .. ']]</td></tr>'
end
else
equip[i] = equip[i] .. '\'\'-Locked-\'\'</td></tr>'
end
else
equip[i] = equip[i] .. equipStyle
if shipdata[shipNum]["equip"] ~= "" then
if shipdata[shipNum]["equip"][i] == "" or shipdata[shipNum]["equip"][i] == "Unequipped" then
equip[i] = equip[i] .. '-Unequipped-</td></tr>'
elseif shipdata[shipNum]["equip"][i] == nil then
equip[i] = equip[i] .. '\'\'Locked\'\'</td></tr>'
else
equip[i] = equip[i] .. '[[' .. shipdata[shipNum]["equip"][i] .. ']]</td></tr>'
end
else
equip[i] = equip[i] .. '\'\'Locked\'\'</td></tr>'
end
end
end
local DetailTable = '<table style="width: 100%">' .. equipHeader .. equip[1] .. equip[2] .. equip[3] .. equip[4] .. row11 .. row12 .. row13 .. row14 .. '</table>'

cat = cat .. '[[Category:' .. shipdata[shipNum]["class"] .. ']][[Category:' .. shipdata[shipNum]["type"] .. ']]'

local shipInfoBox = '<div style="display: inline-block; vertical-align: top;"><table style="{{border-radius|10px 10px 10px 10px}} border: 1px solid #aaaaaa; min-width: 495px">'
shipInfoBox = shipInfoBox .. '<tr><td>' .. StatTable .. '</td></tr>'
shipInfoBox = shipInfoBox .. '<tr><td>' .. DetailTable .. '</td></tr></table></div>' .. cat

return shipInfoBox
end

function shipmodule.KanmusuList(frame)
local shipType = frame.args[1]
local shipListTable = '<table class="wikitable filterable sortable" style="width: 100%; min-width: 800px;"><tr>'
shipListTable = shipListTable .. '<th style="text-align: center; background-color: SpringGreen;" class="unfilterable" data-sort-type="number">ID</th>'
shipListTable = shipListTable .. '<th style="text-align: center; background-color: SpringGreen;" class="unfilterable unsortable">Name</th>'
shipListTable = shipListTable .. '<th style="text-align: center; background-color: SpringGreen;" class="unsortable">Class</th>'
shipListTable = shipListTable .. '<th style="text-align: center; background-color: SpringGreen;" class="unsortable">Type</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: LightCoral;" class="unfilterable">[[File:IcoAtk.png|Firepower]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: LightSkyBlue;" class="unfilterable">[[File:IcoTorpedo.png|Torpedo]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: SandyBrown;" class="unfilterable">[[File:IcoAA.png|Anti-Air]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: Seashell;" class="unfilterable">[[File:IcoASW.png|Anti-Submarine Warfare]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: Aquamarine;" class="unfilterable">[[File:IcoLOS.png|Line of Sight]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: PaleGreen;" class="unfilterable">[[File:IcoLuck.png|Luck]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: Pink;" class="unfilterable">[[File:IcoHP.png|HP]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: Yellow;" class="unfilterable">[[File:IcoArmor.png|Armor]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: Violet;" class="unfilterable">[[File:IcoEvasion.png|Evasion]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: Silver;" class="unfilterable">[[File:IcoAircraft.png|Aircraft]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; vertical-align: middle; background-color: Aqua;" class="unfilterable">[[File:IcoSpeed.png|Speed]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; background-color: SpringGreen;" class="unfilterable">[[File:IcoRange.png|Range]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; background-color: SpringGreen;" class="unfilterable">[[File:IcoFuel.png|Fuel Consumption]]</th>'
shipListTable = shipListTable .. '<th style="text-align: center; background-color: SpringGreen;" class="unfilterable">[[File:IcoAmmo.png|Ammo Consumption]]</th></tr>'
local IDList = shipdb.getSortedIDList()
for num, id in pairs(IDList) do
if shipType ~= nil then
if shipType == shipdata[id]["type"] then
shipListTable = shipListTable .. shipmodule.KanmusuListEntry(id)
end
else
shipListTable = shipListTable .. shipmodule.KanmusuListEntry(id)
end
end
shipListTable = shipListTable .. '</table>'
return shipListTable
end

function shipmodule.KanmusuListEntry(id) -- Kanmusu List Table
local strings = '<tr>'
local aircraftTotal = 0
if shipdata[id]["aircraft"] ~= "" then
local aircraftslot = {0, 0, 0, 0}
for i = 1, 4, 1 do
if shipdata[id]["aircraft"][i] ~= nil then
aircraftslot[i] = shipdata[id]["aircraft"][i]
else
aircraftslot[i] = 0
end
end
aircraftTotal = aircraftslot[1] + aircraftslot[2] + aircraftslot[3] + aircraftslot[4]
else
aircraftTotal = 0
end

strings = strings .. '<td style="text-align: center;">' .. id .. '</td>'
strings = strings .. '<td style="text-align: center;">[[' .. shipdata[id]["name"][3] .. ']]</td>'
strings = strings .. '<td style="text-align: center;">' .. shipdata[id]["class"] .. '</td>'
strings = strings .. '<td style="text-align: center;">' .. shipdata[id]["type"] .. '</td>'
strings = strings .. '<td style="text-align: center; background-color: #f0bbbb;">' .. shipdata[id]["fp"][1] .. '</td>'
if shipdata[id]["torpedo"] == 0 then
strings = strings .. '<td style="text-align: center; background-color: #99eefa;">' .. shipdata[id]["torpedo"] .. '</td>'
else
strings = strings .. '<td style="text-align: center; background-color: #99eefa;">' .. shipdata[id]["torpedo"][1] .. '</td>'
end
if shipdata[id]["aa"] == 0 then
strings = strings .. '<td style="text-align: center; background-color: #faccaa;">' .. shipdata[id]["aa"] .. '</td>'
else
strings = strings .. '<td style="text-align: center; background-color: #faccaa;">' .. shipdata[id]["aa"][1] .. '</td>'
end
if shipdata[id]["asw"] == 0 then
strings = strings .. '<td style="text-align: center; background-color: #fff5ee;">' .. shipdata[id]["asw"] .. '</td>'
else
strings = strings .. '<td style="text-align: center; background-color: #fff5ee;">' .. shipdata[id]["asw"][1] .. '</td>'
end
strings = strings .. '<td style="text-align: center; background-color: #afffee;">' .. shipdata[id]["los"][1] .. '</td>'
strings = strings .. '<td style="text-align: center; background-color: #cbfbcb;">' .. shipdata[id]["luck"][1] .. '</td>'
strings = strings .. '<td style="text-align: center; background-color: #ffe0eb;">' .. shipdata[id]["hp"] .. '</td>'
strings = strings .. '<td style="text-align: center; background-color: #ffffaa;">' .. shipdata[id]["armor"][1] .. '</td>'
strings = strings .. '<td style="text-align: center; background-color: #eeccee;">' .. shipdata[id]["evasion"][1] .. '</td>'
strings = strings .. '<td style="text-align: center; background-color: #d9d9d9;">' .. aircraftTotal .. '</td>'
strings = strings .. '<td style="text-align: center; background-color: #aaffff;">' .. shipdata[id]["spd"] .. '</td>'
strings = strings .. '<td style="text-align: center;">' .. shipdata[id]["range"] .. '</td>'
strings = strings .. '<td style="text-align: center;">' .. shipdata[id]["consumption"][1] .. '</td>'
strings = strings .. '<td style="text-align: center;">' .. shipdata[id]["consumption"][2] .. '</td></tr>'
return strings
end

return shipmodule
6,043

edits