Module:CharacterToken

--[=[ Lua script replacement for wikitext template

t-.png

Parameters: 1: Token = (character,token type,count) count is optional Separate multiple items with dollar sign "$" if the item is blank or "&", line break " " will be inserted instead. if the string "multi" is input then lists all tokens of rarity specified in parameter 2 2: Size in pixels (or token rarity in case of "multi") optional, defaults to 25 If equal to "N", includes the token Name Link also 3: Option For normal, if non-blank, will automatically insert line breaks " " after every 4 tokens. Any specified line breaks ("&") are ignored. For "multi", if non-blank, specifies the string to strip from the end of the token name.

The list of available tokens is kept in the module data

Unknown Token is returned if Token Type is not in data. --]=]

local p = {}

local util = require("Module:Utility")

---[==[ For testing purposes local tokenData = mw.loadData('Module:CharacterToken/data') --[===[]==] local tokenData = { -- Toy Story -- ["ip-ts"] = { ["F"] = "ip-toy story", ["0"] = {"Pixar Ball", 0} },   ["jessie"] = { ["2"] = {"Lasso", 2}, ["3"] = {"Jessie Ears Hat", 3} },   ["sarge"] = { ["2"] = {"Sarge's Bucket", 2}, ["3"] = {"Sarge Ears Hat", 3} },   ["woody"] = { ["2"] = {"Sheriff Star", 2}, ["3"] = {"Woody Ears Hat", 2} },   ["the child"] = { ["2"] = {"The Child Hover Pram", 104}, ["3"] = {"The Child Ears Hat", 104} }, } --]===] local rarityType = { ["collection"]	= 0, ["common"]		= 1, ["uncommon"]	= 2, ["rare"]		= 3, ["epic"]		= 4, ["legendary"]	= 5, ["fabric"]		= 6, ["blueprint"]	= 7, ["relic"]		= 8, ["event"]		= 9, ["npc"]			= 10, }

-- Display Token Icon(s) local function tokenIcon(token, size, addbreaks) local outType = ""

if not tonumber(size) then outType = size size = 25 end

local autoBreaks = false if addbreaks and addbreaks ~= "" then autoBreaks = true end

token = mw.ustring.gsub(mw.ustring.lower(token),               "^%s*(.-)%s*$", "%1") or ''

local tAll = {} local space = ""

-- get the current page/token name local pagename = mw.title.getCurrentTitle.text:match("(.+)%s+Token$") or "" -- count of icons on 1 row to insert line break local iconCount = 0

for tok in mw.text.gsplit(token, "%s*[!%$]%s*") do       if tok == "" or tok == "&" then if not autoBreaks then space = " " end else local addThis = false local tToken = {space, "", "", "", "", "", "", "t-", "", "",		   				"", ".png", "", "", "", ""		   				}

local cName, tokenType, count = mw.ustring.match(tok,                                "^([^,]-)%s*,%s*(%d+)%s*,*%s*([\/%d]*)$") if not cName then cName, count = mw.ustring.match(tok, "^([^,]-)%s*,%s*,*%s*([\/%d]*)$") if not cName then cName = tok end end if not tokenType or tokenType == "" then tokenType = "0" end if tokenData[cName] and tokenData[cName][tokenType] then local tokName = tokenData[cName][tokenType][1] if pagename ~= tokName then addThis = true -- not current token so add to output if outType == "N" then tToken[ 2] = ""						tToken[ 5] = tokName						tToken[ 6] = " ("						tToken[19] = ")" end tToken[ 9] = mw.ustring.gsub(tokenData[cName].F or cName, " ", "_") if tokenType ~= "0" then tToken[10] = "-" tToken[11] = tokenType end tToken[15] = tokName tToken[17] = tokName end else addThis = true tToken[ 8] = "" tToken[ 9] = "work_in_progress" tToken[15] = mw.ustring.upper(cName) tToken[17] = "Work In Progress" end if count and count ~= "" then tToken[20] = "'''" tToken[21] = count tToken[22] = "'''" end

if addThis then if autoBreaks and iconCount >= 4 then tToken[ 1] = " " iconCount = 0 end iconCount = iconCount + 1

table.insert(tAll, table.concat(tToken)) if outType == "N" then space = ", " else space = " " end end end end return table.concat(tAll) end

-- Dislplay list if token links local function tokenList(rarity, stripend) local nRarity = tonumber(rarity) if not nRarity then if rarityType[string.lower(rarity or "")] then nRarity = rarityType[string.lower(rarity)] end end

local tAll = {}

for _, data in pairs(tokenData) do		for _, tok in pairs(data) do			if type(tok) == "table" then if not nRarity or (tok[2] and nRarity == math.mod(tok[2], 100)) then local sortkey = tok[1]:lower:gsub("[\"']", "")					table.insert(tAll, {sortkey, tok[1], tok[2]})				end			end		end	end

table.sort(tAll, function(a,b) return a[1] < b[1] end)

local tOut = {} local space = ""

for _, data in ipairs(tAll) do		local limited = "" if data[3] and math.floor(data[3]/100) == 1 then limited = "''" end tLink = {space, limited, "", "", "", limited} tLink[4] = data[2] local name = data[2] for strip in mw.text.gsplit(stripend, "%s*%$%s*") do name = name:gsub(" ".. strip .. "$", "") end tLink[7] = name table.insert(tOut, table.concat(tLink)) space = " · " end return table.concat(tOut) end

-- External Invokable Functions function p.getToken(frame) local tArgs = util.getArgs(frame)

local token = tArgs[1] or "" -- size is rarity for multi token list local size = tArgs[2] -- for multi token list the string to strip from end of name -- otherwise, if present then automatically add line breaks local stripend = tArgs[3] or ""

if token:lower:match("^multi") then return tokenList(size, stripend) else return tokenIcon(token, size, stripend) end end

return p

-- --