Module:Cards: Difference between revisions

Jump to navigation Jump to search

Module:Cards (view source)

Revision as of 09:33, 13 June 2024

7,989 bytes added ,  13 June
oops
mNo edit summary
(oops)
 
(42 intermediate revisions by 2 users not shown)
Line 3: Line 3:
--local KeyData = mw.loadData( 'Module:Code/data')
--local KeyData = mw.loadData( 'Module:Code/data')
local all_cards = require("Module:Cards/data").cards
local all_cards = require("Module:Cards/data").cards
local all_langs = require("Module:Other_Languages/data").cards


--[[
Usage: {{#invoke:Cards|GetStat|<card>|<stat>}}
returns the respective stat of the card.
possible values for <stat>: name health scrap attack counter other desc summoncon tribes price challenge
]]
function p.GetStat(frame)
function p.GetStat(frame)
local card = all_cards[frame.args.name or frame.args[1]]  
local card = all_cards[frame.args.name or frame.args[1]]  
Line 10: Line 17:
end
end
local stat =  frame.args.stat or frame.args[2]   
local stat =  frame.args.stat or frame.args[2]   
return frame:preprocess(_getStat(card, stat))
stat = trim(stat)
local langCode = frame:expandTemplate{ title = 'USERLANG' } or 'en'
return frame:preprocess(_getStat(card, stat, langCode))
end  
end  


function _getStat(card, stat)
function _getStat(card, stat, langCode)
local langCode = langCode or mw.getCurrentFrame():expandTemplate{ title = 'USERLANG' } or 'en'
stat = string.lower(stat)
stat = string.lower(stat)
if stat == "name" then
if stat == "name" then
return card.Name or ""
return _getName(card, langCode) or ""
elseif stat == "health" then
elseif stat == "health" then
return card.Health or ""
return card.Health or ""
Line 28: Line 38:
return card.Other or ""
return card.Other or ""
elseif stat == "description" or stat == "desc" then
elseif stat == "description" or stat == "desc" then
return card.Desc or ""
return _getDesc(card, langCode) or ""
elseif stat == "summoncon" then
elseif stat == "summoncon" then
return card.SummonCon or ""
return card.SummonCon or ""
Line 40: Line 50:
end
end
return out
return out
elseif stat == "gold" then
return card.Gold or ""
elseif stat == "price" then
return card.Price or ""
elseif stat == "unlock" then
return card.Unlock or ""
elseif stat == "challenge" then
return card.Challenge or ""
else
else
error("Argument Invalid:" .. stat)
error("Argument Invalid:" .. stat) -- why is this necessary
end
end
 
function _getOtherLangs(card)
if all_langs[card.UniqueName] then
return all_langs[card.UniqueName]
end
if all_langs[card.Name] then
return all_langs[card.Name]
end
for _, langs in pairs(all_langs) do
if langs.en.Name == card.Name then
return langs
end
end
-- if no matches, the parent functions default to en
end
 
function _getName(card, langCode)
local target = langCode or mw.getCurrentFrame():expandTemplate{ title = 'USERLANG' } or "en"
if target ~= "en" and _getOtherLangs(card) and _getOtherLangs(card)[target] then
return _getOtherLangs(card)[target].Name or ""
end
end
return card.Name or ""
end
end


function _getDesc(card, langCode)
local target = langCode or mw.getCurrentFrame():expandTemplate{ title = 'USERLANG' } or "en"
if target ~= "en" and _getOtherLangs(card) and _getOtherLangs(card)[target] then
return _getOtherLangs(card)[target].Desc or ""
end
return card.Desc or ""
end
function p.testlang(name)
mw.log(_getStat(all_cards[name], "name"), _getName(all_cards[name], "ja"))
end
--[[
Usage: {{#invoke:Cards|Table|<entry>|<header_list>}} OR
{{#invoke:Cards|Table|<entry_list>|*|<header_list>}}
returns a table based on the given paramenters.
<entry> is either a card name or type.
Types include: Boss Pet NonPetCompanion Companion Item Shade Clunker EnemyClunker Enemy Miniboss Boss ShopItem
Append a tribename before the type to filter cards exclusive to that tribe, eg "SnowdwellersCompanion"
<entry_list> is a list of valid <entry> values, input as multiple parameters, ie <entry1>|<entry2>|... etc.
<header_list> is a list of valid stats, input as multiple parameters, ie <stat1>|<stat2>|... etc.
stats include: name health scrap attack counter other desc summoncon tribes price
The first usage option is used when only 1 entry is needed, eg the only entry is a type category. otherwise, use the second option.
]]
function p.Table(frame)
function p.Table(frame)
local headers = {}
local arr = {{}, {}}
local i = 2
local i = 1
while frame.args[i] ~= nil and i < 10 do
while frame.args[i] ~= nil and trim(frame.args[i]) ~= "*" do
  table.insert(headers, string.lower(frame.args[i] or ""))
  table.insert(arr[1], trim(frame.args[i]) or "")
  i = i + 1
  i = i + 1
end
end
local type = frame.args[1]
if frame.args[i] ~= nil then
local out = type
i = i + 1
for i,hdr in ipairs(headers) do
while frame.args[i] ~= nil do
out = out.." " ..hdr
  table.insert(arr[2], string.lower(trim(frame.args[i]) or ""))
  i = i + 1
end
else
for i=2,#arr[1] do
arr[2][i-1] = string.lower(arr[1][i])
end
arr[1] = {arr[1][1]}
end
end
return frame:preprocess(_table(type, headers))
return frame:preprocess(_table(arr[1], arr[2]))
end
end


function _table(type, headers)
function p.testy()
return _table({"Pet", "SnowdwellersNonPetCompanion"}, {"name", "desc", "challenge"})
end
 
function _table(entries, headers)
  local sortByChallenge = false
 
   local out = '{| class="wikitable sortable" style="text-align:center;"\n'
   local out = '{| class="wikitable sortable" style="text-align:center;"\n'
   for i, header in ipairs(headers) do
   for i, header in ipairs(headers) do
Line 74: Line 157:
   elseif header == "summoncon" then
   elseif header == "summoncon" then
   out = out .. "!Summon conditions\n"
   out = out .. "!Summon conditions\n"
  elseif header == "challenge" then
  out = out .. "!Challenge\n"
  sortByChallenge = true
   else
   else
   out = out .. "!" .. header:gsub("^%l", string.upper) .. "\n"
   out = out .. "!" .. header:gsub("^%l", string.upper) .. "\n" --Covers all cases where the stat name and intended header are equal
   end
   end
   end
   end
    
    
   for i, card in ipairs(sortedCards()) do
  local entryList = {}
    if card.Types and card.Types[type] then
   for i, entry in ipairs(entries) do
out = out.."|-\n"
  if all_cards[entry] then
for i, header in ipairs(headers) do
  all_cards[entry].UniqueName = entry
out = out.."|"
  table.insert(entryList, all_cards[entry])
if header == "image" then
  else -- entry is a type category
out = out.."{{CardArt|".. card.UniqueName.."}}"
  local tribe = nil
elseif header == "name" then
  for _, tribename in ipairs({"Snowdwellers", "Shademancers", "Clunkmasters"}) do
local link = card.UniqueName
  if entry:sub(1, #tribename) == tribename then
if string.find(link, "(Phase 2)") then
  tribe = tribename
link = card.Name
  entry = entry:sub(1+#tribename)
end
  end
out = out.."style=\"text-align:center;\"|[[".. link .. "|" .. card.Name .."]]"
  end
elseif header == "description" or header == "desc" or header == "summoncon" then
  for i, card in ipairs(sortedCards()) do
out = out.."style=\"text-align:center;\"|".. (_getStat(card, header) or "")
  if card.Types and card.Types[entry]
elseif header == "health" and card.Health == nil and card.Scrap then
  and (tribe == nil or (tribe and card.Tribes and tableContains(card.Tribes, tribe)))
out = out.. card.Scrap .." {{Stat|Scrap}}"
  then
    table.insert(entryList, card)
    end
  end
end
  end
 
  if sortByChallenge then
  table.sort(entryList, function(a,b)
  if a.ChallengeOrder and b.ChallengeOrder then
return a.ChallengeOrder and b.ChallengeOrder and a.ChallengeOrder < b.ChallengeOrder
  elseif a.ChallengeOrder ~= b.ChallengeOrder then
return a.ChallengeOrder and true
else
return a.Name < b.Name
end
end)
  end
 
  for i, card in ipairs(entryList) do
out = out.."|-\n"
for i, header in ipairs(headers) do
out = out.."|"
if header == "image" then
if card.Types and (card.Types["Charm"] or card.Types["CursedCharm"]) then
out = out.."{{CharmArt|"
else
else
out = out .. _getStat(card, header)
out = out.."{{CardArt|"
end
end
out = out.."\n"
out = out.. (card.Image or card.UniqueName) .."}}"
elseif header == "name" then
local link = card.Link or card.UniqueName
out = out.."style=\"text-align:center;\"|[[".. link .. "|" .. _getName(card) .."]]"
elseif header == "description" or header == "desc" or header == "summoncon" then
out = out.."style=\"text-align:center;\"|".. (_getStat(card, header) or "")
elseif header == "health" and card.Health == nil and card.Scrap then
out = out.. card.Scrap .." {{Stat|Scrap}}"
else
out = out .. _getStat(card, header)
end
end
out = out.."\n"
     end
     end
   end
   end
Line 113: Line 234:
end
end
table.sort(sortedTable, function(a,b)
table.sort(sortedTable, function(a,b)
return a.UniqueName < b.UniqueName
return a.Name < b.Name
end)
end)
return sortedTable
return sortedTable
end
end


function tableContains(table, value)
  for i = 1,#table do
    if (table[i] == value) then
      return true
    end
  end
  return false
end
--[[
Usage: {{#invoke:Cards|CardInfobox|<card>|<template_params>}}
returns the infobox of the card.
<template_params> is a list of template parameters input as multiple parameters, ie <p1>=<data1>|<p2>=<data2>|... etc.
These parameters are the same parameters used by Template:Infobox
Parameters without inputs are autofilled with fitting module data, to the best of its ability.
]]
function p.CardInfobox(frame)  
function p.CardInfobox(frame)  
local card = frame.args[1]
local card = frame.args[1]
card = card:match( "^%s*(.-)%s*$" )
card = trim(card)
return frame:preprocess(_cardInfobox(all_cards[card], frame.args))
return frame:preprocess(_cardInfobox(all_cards[card], frame.args))
end
end
Line 126: Line 264:
function _cardInfobox(card, params)
function _cardInfobox(card, params)
local out = "{{infobox|category=Card"
local out = "{{infobox|category=Card"
out = out .. "|name=" .. (params.name or card.Name or "")
out = out .. "|name=" .. (params.name or _getName(card) or card.Name or "<br>")
out = out .. "|image=" .. (params.image or "")
out = out .. "|image=" .. (params.image or "")
out = out .. "|width=" .. (params.width or "")
out = out .. "|width=" .. (params.width or "")
Line 134: Line 272:
out = out .. "|hpType=scrap"
out = out .. "|hpType=scrap"
end
end
out = out .. "|health=" .. (params.health or card.Health or card.Scrap or "")
out = out .. "|health=" .. (params.health or card.Health or card.Scrap or "<br>")
out = out .. "|attack=" .. (params.attack or card.Attack or "")
out = out .. "|attack=" .. (params.attack or card.Attack or "<br>")
out = out .. "|counter=" .. (params.counter or card.Counter or "")
out = out .. "|counter=" .. (params.counter or card.Counter or "<br>")
out = out .. "|other=" .. (params.other or card.Other or "")
out = out .. "|other=<div style=\"text-align: center;\">" .. (params.other or card.Other or "<br>") .. "</div>"
out = out .. "|description=" .. (params.description or card.Desc or "")
out = out .. "|description=" .. (params.description or _getDesc(card) or card.Desc or "<br>")
out = out .. "|desCol=" .. (params.desCol or "")
if params.art then
out = out .. "|art=" .. params.art
else
out = out .. "|art=" .. (card.Image or card.UniqueName or card.Name) .. ".png"
end
out = out .. "}}"
    return out
end
 
function trim(str)
return str:match( "^%s*(.-)%s*$" )
end
 
--[[
Usage: {{#invoke:Cards|CharmInfobox|<card>|<template_params>}}
 
returns the infobox of the charm.
<template_params> is a list of template parameters input as multiple parameters, ie <p1>=<data1>|<p2>=<data2>|... etc.
These parameters are the same parameters used by Template:Infobox
Parameters without inputs are autofilled with fitting module data, to the best of its ability.
]]
function p.CharmInfobox(frame)
local card = frame.args[1]
card = trim(card)
return frame:preprocess(_charmInfobox(all_cards[card], frame.args))
end
 
function _charmInfobox(card, params)
local out = "{{infobox|category=Charm"
out = out .. "|name=" .. (params.name or _getName(card) or card.Name or "<br>")
out = out .. "|image=" .. (params.image or "")
out = out .. "|width=" .. (params.width or "")
out = out .. "|description=" .. (params.description or _getDesc(card) or card.Desc or "<br>")
out = out .. "}}"
out = out .. "}}"
     return out
     return out
end
--[[
Usage: {{#invoke:Cards|Itembox|<card>|<template_params>}}
returns the itembox of the card.
<template_params> is a list of template parameters input as multiple parameters, ie <p1>=<data1>|<p2>=<data2>|... etc.
These parameters are the same parameters used by Template:Itembox
Parameters without inputs are autofilled with fitting module data, to the best of its ability.
]]
function p.Itembox(frame)
local card = frame.args[1]
card = trim(card)
return frame:preprocess(_itembox(all_cards[card], frame.args))
end
function _itembox(card, params)
local out = "{{itembox|category=Card"
out = out .. "|name=" .. (params.name or _getName(card) or card.Name or "<br>")
out = out .. "|image=" .. (params.image or "")
out = out .. "|attack=" .. (params.attack or card.Attack or "<br>")
out = out .. "|other=<div style=\"text-align: center;\">" .. (params.other or card.Other or "<br>") .. "</div>"
out = out .. "|description=" .. (params.description or _getDesc(card) or card.Desc or "<br>")
out = out .. "|desCol=" .. (params.desCol or "")
if params.art then
out = out .. "|art=" .. params.art
else
out = out .. "|art=" .. (card.Image or card.UniqueName or card.Name) .. ".png"
end
out = out .. "}}"
    return out
end
--[[
Usage: {{#invoke:Cards|NavBoxSection|<type>}}
returns a list of links for cards of a certain type. For use in navboxes.
possible values for <type>: Boss Pet NonPetCompanion Companion Item Shade Clunker EnemyClunker Enemy Miniboss Boss ShopItem
]]
function p.NavBoxSection(frame)
local type = frame.args[1]
return frame:preprocess(_navBoxSection(type))
end
function _navBoxSection(type)
local out = ""
local first = true
for i, card in ipairs(sortedCards()) do
    if card.Types and card.Types[type] then
    if first then
    first = false
    else
    out = out .. " • "
    end
    out = out.. "<div style=\"display: inline-block;\">[[" .. (card.Link or card.UniqueName) .. "|" .. _getName(card) .. "]]</div>"
    end
    end
return out
end
end


return p
return p
Hopeless
1,291

edits

Retrieved from "https://wildfrostwiki.com/Special:MobileDiff/2683...5807"

Navigation menu