Difference between revisions of "Module:Sandbox/Arcangelus"

From RimWorld Wiki
Jump to navigation Jump to search
m
m
 
(18 intermediate revisions by the same user not shown)
Line 1: Line 1:
local yesno, getArgs -- lazily initialized
 
local p = {}
 
local wrap = {} -- Holds wrapper functions that process arguments from #invoke. These act as intemediary between functions meant for #invoke and functions meant for Lua.
 
 
--Copied from https://en.wikipedia.org/wiki/Module:Math
 
local function err(msg)
 
-- Generates wikitext error messages.
 
return mw.ustring.format('<strong class="error">Formatting error: %s</strong>', msg)
 
end
 
 
local function unpackNumberArgs(args)
 
-- Returns an unpacked list of arguments specified with numerical keys.
 
local ret = {}
 
for k, v in pairs(args) do
 
if type(k) == 'number' then
 
table.insert(ret, v)
 
end
 
end
 
return unpack(ret)
 
end
 
 
local function makeArgArray(...)
 
-- Makes an array of arguments from a list of arguments that might include nils.
 
local args = {...} -- Table of arguments. It might contain nils or non-number values, so we can't use ipairs.
 
local nums = {} -- Stores the numbers of valid numerical arguments.
 
local ret = {}
 
for k, v in pairs(args) do
 
v = p._cleanNumber(v)
 
if v then
 
nums[#nums + 1] = k
 
args[k] = v
 
end
 
end
 
table.sort(nums)
 
for i, num in ipairs(nums) do
 
ret[#ret + 1] = args[num]
 
end
 
return ret
 
end
 
 
local function fold(func, ...)
 
-- Use a function on all supplied arguments, and return the result. The function must accept two numbers as parameters,
 
-- and must return a number as an output. This number is then supplied as input to the next function call.
 
local vals = makeArgArray(...)
 
local count = #vals -- The number of valid arguments
 
if count == 0 then return
 
-- Exit if we have no valid args, otherwise removing the first arg would cause an error.
 
nil, 0
 
end
 
local ret = table.remove(vals, 1)
 
for _, val in ipairs(vals) do
 
ret = func(ret, val)
 
end
 
return ret, count
 
end
 
 
--[[
 
function p.hello()
 
    return 'Hola'
 
end
 
 
aname=string.match("Blood Filtration Limit",' %(.*)% ')
 
 
return p
 
]]
 
 
--[[
 
Fold arguments by selectively choosing values (func should return when to choose the current "dominant" value).
 
]]
 
local function binary_fold(func, ...)
 
local value = fold((function(a, b) if func(a, b) then return a else return b end end), ...)
 
return value
 
end
 
 
--[[
 
sum
 
 
Finds the sum
 
 
Usage:
 
{{#invoke:Math| sum | value1 | value2 | ... }}
 
OR
 
{{#invoke:Math| sum }}
 
 
Note, any values that do not evaluate to numbers are ignored.
 
]]
 
 
function wrap.sum(args)
 
return p._sum(unpackNumberArgs(args))
 
end
 
 
function p._sum(...)
 
local sums, count = fold((function(a, b) return a + b end), ...)
 
if not sums then
 
return 0
 
else
 
return sums
 
end
 
end
 
 
--[[
 
average
 
 
Finds the average
 
 
Usage:
 
{{#invoke:Math| average | value1 | value2 | ... }}
 
OR
 
{{#invoke:Math| average }}
 
 
Note, any values that do not evaluate to numbers are ignored.
 
]]
 
 
function wrap.average(args)
 
return p._average(unpackNumberArgs(args))
 
end
 
 
function p._average(...)
 
local sum, count = fold((function(a, b) return a + b end), ...)
 
if not sum then
 
return 0
 
else
 
return sum / count
 
end
 
end
 
 
--[[
 
round
 
 
Rounds a number to specified precision
 
 
Usage:
 
{{#invoke:Math | round | value | precision }}
 
 
--]]
 
 
function wrap.round(args)
 
local value = p._cleanNumber(args[1] or args.value or 0)
 
local precision = p._cleanNumber(args[2] or args.precision or 0)
 
if value == nil or precision == nil then
 
return err('round input appears non-numeric')
 
else
 
return p._round(value, precision)
 
end
 
end
 
 
function p._round(value, precision)
 
local rescale = math.pow(10, precision or 0);
 
return math.floor(value * rescale + 0.5) / rescale;
 
end
 
 
 
--[[
 
--[[
log10
+
-- A proper solution needs to consider PC, PlayStation 4 and Xbox One. Maybe Steam deck as well.
  
returns the log (base 10) of a number
+
-- This solution uses images: https://splatoonwiki.org/wiki/Module:Button
 +
-- Switch: https://splatoonwiki.org/w/index.php?title=Special%3APrefixIndex&prefix=Switch_Icon_&namespace=6
 +
--
 +
-- Possible to get icons from wikipedia, if needed.
 +
-- For Xbox:
 +
-- https://commons.wikimedia.org/wiki/Category:Xbox_controller_buttons
 +
-- https://commons.wikimedia.org/wiki/Category:Xbox_Series_Controller_icons
 +
-- For PlayStation 4:
 +
-- https://commons.wikimedia.org/wiki/Category:PlayStation_controller_buttons
 +
--
 +
-- Other possible sources (Creative Commons Attribution):
 +
-- https://zacksly.itch.io/ps5-button-icons-and-controls ; https://zacksly.itch.io/xbox-series-button-icons-and-controls
  
Usage:
+
-- Below this line was taken from https://en.wikipedia.org/wiki/Module:Key. As the CSS was was not copied ovee, this is incomplete and only kinda works. Not properly implemented as I'm not happy on the handling of console inputs (controller)
{{#invoke:Math | log10 | x }}
+
-- Aditionally, there seems to be some kind of issue with dark mode. See here to avoid it: https://www.mediawiki.org/wiki/Recommendations_for_night_mode_compatibility_on_Wikimedia_wikis?minervanightmode=1 ]]
]]
+
--------------------------------------------------
 +
-- This module implements {{key press}}.
  
function wrap.log10(args)
+
local kbdPrefix = '<kbd class="keyboard-key nowrap">'
return math.log10(args[1])
 
end
 
  
--[[
+
local kbdSuffix = '</kbd>'
mod
 
  
Implements the modulo operator
+
local keyText = {
 +
['caps lock'] = '⇪ Caps Lock',
 +
['[[caps lock]]'] = '⇪ [[Caps Lock]]',
 +
['shift'] = '⇧ Shift',
 +
['[[shift key|shift]]'] = '⇧ [[Shift key|Shift]]',
 +
['enter'] = '↵ Enter',
 +
['[[enter key|enter]]'] = '↵ [[Enter key|Enter]]',
 +
['cmd'] = '⌘ Cmd',
 +
['[[command key|cmd]]'] = '⌘ [[Command key|Cmd]]',
 +
['command'] = '⌘ Command',
 +
['[[command key|command]]'] = '⌘ [[Command key|Command]]',
 +
['opt'] = '⌥ Opt',
 +
['[[option key|opt]]'] = '⌥ [[Option key|Opt]]',
 +
['option'] = '⌥ Option',
 +
['[[option key|option]]'] = '⌥ [[Option key|Option]]',
 +
['tab'] = 'Tab ↹',
 +
['[[tab key|tab]]'] = '[[Tab key|Tab]] ↹',
 +
['backspace'] = '← Backspace',
 +
['[[backspace]]'] = '← [[Backspace]]',
 +
['win'] = '⊞ Win',
 +
['[[windows key|win]]'] = '⊞ [[Windows key|Win]]',
 +
['menu'] = '≣ Menu',
 +
['[[menu key|menu]]'] = '≣ [[Menu key|Menu]]',
 +
['up'] = '↑',
 +
['[[arrow keys|up]]'] = '[[Arrow keys|↑]]',
 +
['down'] = '↓',
 +
['[[arrow keys|down]]'] = '[[Arrow keys|↓]]',
 +
['left'] = '←',
 +
['[[arrow keys|left]]'] = '[[Arrow keys|←]]',
 +
['right'] = '→',
 +
['[[arrow keys|right]]'] = '[[Arrow keys|→]]',
 +
['asterisk'] = '&#42;',
 +
['hash'] = '&#35;',
 +
['[[#]]'] = '[[Number sign|#]]',
 +
['colon'] = '&#58;',
 +
['[[:]]'] = '[[Colon (punctuation)|:]]',
 +
['pipe'] = '&#124;',
 +
['[[|]]'] = '[[Pipe symbol|&#124;]]',
 +
['semicolon'] = '&#59;',
 +
['[[;]]'] = '[[Semi-colon|&#59;]]',
 +
['equals'] = '&#61;',
  
Usage:
+
-- Left & right analog sticks.
{{#invoke:Math | mod | x | y }}
+
['l up'] = 'L↑',
 +
['l down'] = 'L↓',
 +
['l left'] = 'L←',
 +
['l right'] = 'L→',
 +
['l ne'] = 'L↗',
 +
['l se'] = 'L↘',
 +
['l nw'] = 'L↖',
 +
['l sw'] = 'L↙',
  
--]]
+
['r up'] = 'R↑',
 +
['r down'] = 'R↓',
 +
['r left'] = 'R←',
 +
['r right'] = 'R→',
 +
['r ne'] = 'R↗',
 +
['r se'] = 'R↘',
 +
['r nw'] = 'R↖',
 +
['r sw'] = 'R↙',
  
function wrap.mod(args)
+
-- PlayStation.
local x = p._cleanNumber(args[1])
+
['ex'] = '×',
local y = p._cleanNumber(args[2])
+
['circle'] = '○',
if not x then
+
['square'] = '',
return err('first argument to mod appears non-numeric')
+
['triangle'] = '',
elseif not y then
 
return err('second argument to mod appears non-numeric')
 
else
 
return p._mod(x, y)
 
end
 
end
 
  
function p._mod(x, y)
+
-- Nintendo 64 and GameCube.
local ret = x % y
+
['c up'] = 'C↑',
if not (0 <= ret and ret < y) then
+
['c down'] = 'C↓',
ret = 0
+
['c left'] = 'C←',
end
+
['c right'] = 'C→',
return ret
+
['c ne'] = 'C↗',
end
+
['c se'] = 'C↘',
 +
['c nw'] = 'C↖',
 +
['c sw'] = 'C↙',
 +
}
  
--[[
+
local keyAlias = {
gcd
+
-- ['alternate name for key (alias)'] = 'name for key used in key table'
 
+
['[[cmd key|cmd]]'] = '[[command key|cmd]]',
Calculates the greatest common divisor of multiple numbers
+
['[[cmd key|command]]'] = '[[command key|command]]',
 
+
['[[opt key|opt]]'] = '[[option key|opt]]',
Usage:
+
['[[option key]]'] = '[[option key|option]]',
{{#invoke:Math | gcd | value 1 | value 2 | value 3 | ... }}
+
['[[opt key|option]]'] = '[[option key|option]]',
--]]
+
['[[win key|win]]'] = '[[windows key|win]]',
 
+
['*'] = 'asterisk',
function wrap.gcd(args)
+
['#'] = 'hash',
return p._gcd(unpackNumberArgs(args))
+
[':'] = 'colon',
end
+
[';'] = 'semicolon',
 +
['l-up'] = 'l up',
 +
['l-down'] = 'l down',
 +
['l-left'] = 'l left',
 +
['l-right'] = 'l right',
 +
['l-ne'] = 'l ne',
 +
['l-se'] = 'l se',
 +
['l-nw'] = 'l nw',
 +
['l-sw'] = 'l sw',
 +
['r-up'] = 'r up',
 +
['r-down'] = 'r down',
 +
['r-left'] = 'r left',
 +
['r-right'] = 'r right',
 +
['r-ne'] = 'r ne',
 +
['r-se'] = 'r se',
 +
['r-nw'] = 'r nw',
 +
['r-sw'] = 'r sw',
 +
['ps x'] = 'ex',
 +
['ps c'] = 'circle',
 +
['ps s'] = 'square',
 +
['ps t'] = 'triangle',
 +
['c-up'] = 'c up',
 +
['c-down'] = 'c down',
 +
['c-left'] = 'c left',
 +
['c-right'] = 'c right',
 +
['c-ne'] = 'c ne',
 +
['c-se'] = 'c se',
 +
['c-nw'] = 'c nw',
 +
['c-sw'] = 'c sw',
 +
}
  
function p._gcd(...)
+
local Collection = {}
local function findGcd(a, b)
+
Collection.__index = Collection
local r = b
+
do
local oldr = a
+
function Collection:add(item)
while r ~= 0 do
+
if item ~= nil then
local quotient = math.floor(oldr / r)
+
self.n = self.n + 1
oldr, r = r, oldr - quotient * r
+
self[self.n] = item
end
 
if oldr < 0 then
 
oldr = oldr * -1
 
 
end
 
end
return oldr
 
 
end
 
end
local result, count = fold(findGcd, ...)
+
function Collection:join(sep)
return result
+
return table.concat(self, sep)
end
 
 
 
--[[
 
precision_format
 
 
 
Rounds a number to the specified precision and formats according to rules
 
originally used for {{template:Rnd}}.  Output is a string.
 
 
 
Usage:
 
{{#invoke: Math | precision_format | number | precision }}
 
]]
 
 
 
function wrap.precision_format(args)
 
local value_string = args[1] or 0
 
local precision = args[2] or 0
 
return p._precision_format(value_string, precision)
 
end
 
 
 
function p._precision_format(value_string, precision)
 
-- For access to Mediawiki built-in formatter.
 
local lang = mw.getContentLanguage();
 
 
 
local value
 
value, value_string = p._cleanNumber(value_string)
 
precision = p._cleanNumber(precision)
 
 
 
-- Check for non-numeric input
 
if value == nil or precision == nil then
 
return err('invalid input when rounding')
 
end
 
 
 
local current_precision = p._precision(value)
 
local order = p._order(value)
 
 
 
-- Due to round-off effects it is neccesary to limit the returned precision under
 
-- some circumstances because the terminal digits will be inaccurately reported.
 
if order + precision >= 14 then
 
if order + p._precision(value_string) >= 14 then
 
precision = 13 - order;
 
end
 
end
 
 
 
-- If rounding off, truncate extra digits
 
if precision < current_precision then
 
value = p._round(value, precision)
 
current_precision = p._precision(value)
 
end
 
 
 
local formatted_num = lang:formatNum(math.abs(value))
 
local sign
 
 
 
-- Use proper unary minus sign rather than ASCII default
 
if value < 0 then
 
sign = '−'
 
else
 
sign = ''
 
 
end
 
end
 
+
function Collection:sort(comp)
-- Handle cases requiring scientific notation
+
table.sort(self, comp)
if string.find(formatted_num, 'E', 1, true) ~= nil or math.abs(order) >= 9 then
 
value = value * math.pow(10, -order)
 
current_precision = current_precision + order
 
precision = precision + order
 
formatted_num = lang:formatNum(math.abs(value))
 
else
 
order = 0;
 
 
end
 
end
formatted_num = sign .. formatted_num
+
function Collection.new()
 
+
return setmetatable({n = 0}, Collection)
-- Pad with zeros, if needed
 
if current_precision < precision then
 
local padding
 
if current_precision <= 0 then
 
if precision > 0 then
 
local zero_sep = lang:formatNum(1.1)
 
formatted_num = formatted_num .. zero_sep:sub(2,2)
 
 
 
padding = precision
 
if padding > 20 then
 
padding = 20
 
end
 
 
 
formatted_num = formatted_num .. string.rep('0', padding)
 
end
 
else
 
padding = precision - current_precision
 
if padding > 20 then
 
padding = 20
 
end
 
formatted_num = formatted_num .. string.rep('0', padding)
 
end
 
 
end
 
end
 
-- Add exponential notation, if necessary.
 
if order ~= 0 then
 
-- Use proper unary minus sign rather than ASCII default
 
if order < 0 then
 
order = '−' .. lang:formatNum(math.abs(order))
 
else
 
order = lang:formatNum(order)
 
end
 
 
formatted_num = formatted_num .. '<span style="margin:0 .15em 0 .25em">×</span>10<sup>' .. order .. '</sup>'
 
end
 
 
return formatted_num
 
end
 
 
--[[
 
divide
 
 
Implements the division operator
 
 
Usage:
 
{{#invoke:Math | divide | x | y | round= | precision= }}
 
 
--]]
 
function wrap.divide(args)
 
local x = args[1]
 
local y = args[2]
 
local round = args.round
 
local precision =  args.precision
 
if not yesno then
 
yesno = require('Module:Yesno')
 
end
 
return p._divide(x, y, yesno(round), precision)
 
 
end
 
end
  
function p._divide(x, y, round, precision)
+
local function keyPress(args)
if y == nil or y == "" then
+
local chainNames = {
return err("Empty divisor")
+
'chain first',
elseif not tonumber(y) then
+
'chain second',
if type(y) == 'string' and string.sub(y, 1, 1) == '<' then
+
'chain third',
return y
+
'chain fourth',
else
+
'chain fifth',
return err("Not a number: " .. y)
+
'chain sixth',
end
+
'chain seventh',
elseif x == nil or x == "" then
+
'chain eighth',
return err("Empty dividend")
+
'chain ninth',
elseif not tonumber(x) then
+
}
if type(x) == 'string' and string.sub(x, 1, 1) == '<' then
+
local result = Collection.new()
return x
+
local chainDefault = args.chain or '+'
else
+
for i, id in ipairs(args) do
return err("Not a number: " .. x)
+
if i > 1 then
end
+
result:add(args[chainNames[i - 1]] or chainDefault)
else
 
local z = x / y
 
if round then
 
return p._round(z, 0)
 
elseif precision then
 
return p._round(z, precision)
 
else
 
return z
 
 
end
 
end
 +
local lc = id:lower()
 +
local text = keyText[lc] or keyText[keyAlias[lc]] or id
 +
result:add(kbdPrefix .. text .. kbdSuffix)
 
end
 
end
 +
return result:join()
 +
--mw.getCurrentFrame():extensionTag{
 +
-- name = 'templatestyles', args = { src = 'Template:Key press/styles.css'}
 +
-- }..result:join()
 +
 
end
 
end
  
--[[
+
local function keypress(frame)
Helper function that interprets the input numerically.  If the
+
-- Called by "{{key press|...}}".
input does not appear to be a number, attempts evaluating it as
+
-- Using the template doubles the post‐expand include size.
a parser functions expression.
+
return keyPress(frame:getParent().args)
]]
 
 
 
function p._cleanNumber(number_string)
 
if type(number_string) == 'number' then
 
-- We were passed a number, so we don't need to do any processing.
 
return number_string, tostring(number_string)
 
elseif type(number_string) ~= 'string' or not number_string:find('%S') then
 
-- We were passed a non-string or a blank string, so exit.
 
return nil, nil;
 
end
 
 
 
-- Attempt basic conversion
 
local number = tonumber(number_string)
 
 
 
-- If failed, attempt to evaluate input as an expression
 
if number == nil then
 
local success, result = pcall(mw.ext.ParserFunctions.expr, number_string)
 
if success then
 
number = tonumber(result)
 
number_string = tostring(number)
 
else
 
number = nil
 
number_string = nil
 
end
 
else
 
number_string = number_string:match("^%s*(.-)%s*$") -- String is valid but may contain padding, clean it.
 
number_string = number_string:match("^%+(.*)$") or number_string -- Trim any leading + signs.
 
if number_string:find('^%-?0[xX]') then
 
-- Number is using 0xnnn notation to indicate base 16; use the number that Lua detected instead.
 
number_string = tostring(number)
 
end
 
end
 
 
 
return number, number_string
 
 
end
 
end
  
--TEST AREA
+
local function press(frame)
 
+
-- Called by "{{#invoke:key|press|...}}".
--Stat Factors Table Row
+
return keyPress(frame.args)
function wrap.TableRow(args)
 
return p._TableRow(unpackNumberArgs(args))
 
 
end
 
end
function p._TableRow(skillBase, skillBonus, statMin, statMax, capImportance, capLimit, resultCols, LV, Ln)
 
local argumentos={skillBase,skillBonus,statMin,statMax,capImportance,capLimit,resultCols,LV,Ln}
 
 
for i = 1,8 do --This should prevent errors if a number is not defined.
 
if type(argumentos[i])~='number' then
 
argumentos[i]=0
 
end
 
end
 
-- Do note that statMin, statMax are handled by "Template:Stat Factors Table".
 
-- While I could set fallbacks, I decided against it.
 
 
if tonumber(Ln)==nil then --Sanitizes input and allows for 0.
 
factor = skillBase + skillBonus * LV
 
else
 
factor = Ln
 
end
 
 
local Pval = math.min(math.max(factor,statMin),statMax)
 
R_Pval = tostring(math.floor(Pval*10000+0.5)/100).."%" -- This formats the number as a 2 digit percent value, rounded up.
 
if tonumber(resultCols)>1 then
 
Pval = factor * ( 1 + capImportance * math.min(capLimit-1, 0.25))
 
Pval = math.min(math.max(Pval,statMin),statMax)
 
R_Sval="<td>"..tostring(math.floor(Pval*10000+0.5)/100).."% </td>"
 
else
 
R_Sval=""
 
end
 
 
if tonumber(resultCols)>2 then
 
Pval = factor * ( 1 + capImportance * math.min(capLimit-1, 0.5))
 
Pval = math.min(math.max(Pval,statMin),statMax)
 
R_Tval="<td>"..tostring(math.floor(Pval*10000+0.5)/100).."% </td>"
 
else
 
R_Tval=""
 
end
 
 
return "|-\r\n!"..LV.."\r\n|"..R_Pval..R_Sval..R_Tval
 
-- There are more efficient ways, but this works.
 
end
 
----------------
 
----------------
 
--Inspired by some fandom site.
 
----------------
 
function identity(inp)
 
return inp
 
end
 
function wrap.spliting(frame)
 
return frame
 
-- return p._spliting(unpackNumberArgs(frame))
 
end
 
function _spliting(texto, spliter, N)
 
local exploded = mw.text.split(texto, spliter)
 
return exploded[N]
 
end
 
 
--[[ Taken from some fandom site
 
local text = "And if you tolerate this"
 
local tab = mw.text.split( text, " ")
 
print(tab[3])
 
]]
 
 
--[[
 
Wrapper function that does basic argument processing. This ensures that all functions from #invoke can use either the current
 
frame or the parent frame, and it also trims whitespace for all arguments and removes blank arguments.
 
]]
 
 
local mt = { __index = function(t, k)
 
return function(frame)
 
if not getArgs then
 
getArgs = require('Module:Arguments').getArgs
 
end
 
return wrap[k](getArgs(frame))  -- Argument processing is left to Module:Arguments. Whitespace is trimmed and blank arguments are removed.
 
end
 
end }
 
  
return setmetatable(p, mt)
+
return {
 +
keypress = keypress,
 +
press = press,
 +
}

Latest revision as of 20:50, 21 August 2024

Welcome to the RimWorld Wiki sandbox!
This sandbox is where you can experiment and practice working on a wiki page. This page will usually have little or no content. Feel free to add content or to make changes and save them to see the results.

To learn about editing and formatting start here: Help:Contents. Just start with the basics... enter some text, and learn the other pieces as you go.

Your content contributions are welcome and important. The wiki is a collaborative effort and others can help with formatting and other improvements.]

Best wishes!

Description[edit]

This is a doc attached to my sandbox. I'll use it to see the effects of my changes W/o messing something important

NOTE: LUA is usually slower than ParserFunctions for short statements. The factor varies from 7-1 to 2-1.
Lua only is an advantage to long statements, nested logic, loops (maybe others case i don't see right now).

expr only uses 1 Preprocessor visited node count, in general. Variables may change that.


function p._TableRow(skillBase, skillBonus, statMin, statMax, capImportance, capLimit, resultCols, LV, Ln)



--[[
-- A proper solution needs to consider PC, PlayStation 4 and Xbox One. Maybe Steam deck as well.

-- This solution uses images: https://splatoonwiki.org/wiki/Module:Button
-- Switch: https://splatoonwiki.org/w/index.php?title=Special%3APrefixIndex&prefix=Switch_Icon_&namespace=6
--
-- Possible to get icons from wikipedia, if needed.
-- For Xbox:
--	https://commons.wikimedia.org/wiki/Category:Xbox_controller_buttons
--	https://commons.wikimedia.org/wiki/Category:Xbox_Series_Controller_icons
-- For PlayStation 4:
--	https://commons.wikimedia.org/wiki/Category:PlayStation_controller_buttons
--
-- Other possible sources (Creative Commons Attribution):
-- https://zacksly.itch.io/ps5-button-icons-and-controls ; https://zacksly.itch.io/xbox-series-button-icons-and-controls

-- Below this line was taken from https://en.wikipedia.org/wiki/Module:Key. As the CSS was was not copied ovee, this is incomplete and only kinda works. Not properly implemented as I'm not happy on the handling of console inputs (controller)
-- Aditionally, there seems to be some kind of issue with dark mode. See here to avoid it: https://www.mediawiki.org/wiki/Recommendations_for_night_mode_compatibility_on_Wikimedia_wikis?minervanightmode=1 ]]
--------------------------------------------------
-- This module implements {{key press}}.

local kbdPrefix = '<kbd class="keyboard-key nowrap">'

local kbdSuffix = '</kbd>'

local keyText = {
	['caps lock'] = '⇪ Caps Lock',
	['[[caps lock]]'] = '⇪ [[Caps Lock]]',
	['shift'] = '⇧ Shift',
	['[[shift key|shift]]'] = '⇧ [[Shift key|Shift]]',
	['enter'] = '↵ Enter',
	['[[enter key|enter]]'] = '↵ [[Enter key|Enter]]',
	['cmd'] = '⌘ Cmd',
	['[[command key|cmd]]'] = '⌘ [[Command key|Cmd]]',
	['command'] = '⌘ Command',
	['[[command key|command]]'] = '⌘ [[Command key|Command]]',
	['opt'] = '⌥ Opt',
	['[[option key|opt]]'] = '⌥ [[Option key|Opt]]',
	['option'] = '⌥ Option',
	['[[option key|option]]'] = '⌥ [[Option key|Option]]',
	['tab'] = 'Tab ↹',
	['[[tab key|tab]]'] = '[[Tab key|Tab]] ↹',
	['backspace'] = '← Backspace',
	['[[backspace]]'] = '← [[Backspace]]',
	['win'] = '⊞ Win',
	['[[windows key|win]]'] = '⊞ [[Windows key|Win]]',
	['menu'] = '≣ Menu',
	['[[menu key|menu]]'] = '≣ [[Menu key|Menu]]',
	['up'] = '↑',
	['[[arrow keys|up]]'] = '[[Arrow keys|↑]]',
	['down'] = '↓',
	['[[arrow keys|down]]'] = '[[Arrow keys|↓]]',
	['left'] = '←',
	['[[arrow keys|left]]'] = '[[Arrow keys|←]]',
	['right'] = '→',
	['[[arrow keys|right]]'] = '[[Arrow keys|→]]',
	['asterisk'] = '&#42;',
	['hash'] = '&#35;',
	['[[#]]'] = '[[Number sign|#]]',
	['colon'] = '&#58;',
	['[[:]]'] = '[[Colon (punctuation)|:]]',
	['pipe'] = '&#124;',
	['[[|]]'] = '[[Pipe symbol|&#124;]]',
	['semicolon'] = '&#59;',
	['[[;]]'] = '[[Semi-colon|&#59;]]',
	['equals'] = '&#61;',

	-- Left & right analog sticks.
	['l up'] = 'L↑',
	['l down'] = 'L↓',
	['l left'] = 'L←',
	['l right'] = 'L→',
	['l ne'] = 'L↗',
	['l se'] = 'L↘',
	['l nw'] = 'L↖',
	['l sw'] = 'L↙',

	['r up'] = 'R↑',
	['r down'] = 'R↓',
	['r left'] = 'R←',
	['r right'] = 'R→',
	['r ne'] = 'R↗',
	['r se'] = 'R↘',
	['r nw'] = 'R↖',
	['r sw'] = 'R↙',

	-- PlayStation.
	['ex'] = '×',
	['circle'] = '○',
	['square'] = '□',
	['triangle'] = '△',

	-- Nintendo 64 and GameCube.
	['c up'] = 'C↑',
	['c down'] = 'C↓',
	['c left'] = 'C←',
	['c right'] = 'C→',
	['c ne'] = 'C↗',
	['c se'] = 'C↘',
	['c nw'] = 'C↖',
	['c sw'] = 'C↙',
}

local keyAlias = {
	-- ['alternate name for key (alias)'] = 'name for key used in key table'
	['[[cmd key|cmd]]'] = '[[command key|cmd]]',
	['[[cmd key|command]]'] = '[[command key|command]]',
	['[[opt key|opt]]'] = '[[option key|opt]]',
	['[[option key]]'] = '[[option key|option]]',
	['[[opt key|option]]'] = '[[option key|option]]',
	['[[win key|win]]'] = '[[windows key|win]]',
	['*'] = 'asterisk',
	['#'] = 'hash',
	[':'] = 'colon',
	[';'] = 'semicolon',
	['l-up'] = 'l up',
	['l-down'] = 'l down',
	['l-left'] = 'l left',
	['l-right'] = 'l right',
	['l-ne'] = 'l ne',
	['l-se'] = 'l se',
	['l-nw'] = 'l nw',
	['l-sw'] = 'l sw',
	['r-up'] = 'r up',
	['r-down'] = 'r down',
	['r-left'] = 'r left',
	['r-right'] = 'r right',
	['r-ne'] = 'r ne',
	['r-se'] = 'r se',
	['r-nw'] = 'r nw',
	['r-sw'] = 'r sw',
	['ps x'] = 'ex',
	['ps c'] = 'circle',
	['ps s'] = 'square',
	['ps t'] = 'triangle',
	['c-up'] = 'c up',
	['c-down'] = 'c down',
	['c-left'] = 'c left',
	['c-right'] = 'c right',
	['c-ne'] = 'c ne',
	['c-se'] = 'c se',
	['c-nw'] = 'c nw',
	['c-sw'] = 'c sw',
}

local Collection = {}
Collection.__index = Collection
do
	function Collection:add(item)
		if item ~= nil then
			self.n = self.n + 1
			self[self.n] = item
		end
	end
	function Collection:join(sep)
		return table.concat(self, sep)
	end
	function Collection:sort(comp)
		table.sort(self, comp)
	end
	function Collection.new()
		return setmetatable({n = 0}, Collection)
	end
end

local function keyPress(args)
	local chainNames = {
		'chain first',
		'chain second',
		'chain third',
		'chain fourth',
		'chain fifth',
		'chain sixth',
		'chain seventh',
		'chain eighth',
		'chain ninth',
	}
	local result = Collection.new()
	local chainDefault = args.chain or '+'
	for i, id in ipairs(args) do
		if i > 1 then
			result:add(args[chainNames[i - 1]] or chainDefault)
		end
		local lc = id:lower()
		local text = keyText[lc] or keyText[keyAlias[lc]] or id
		result:add(kbdPrefix .. text .. kbdSuffix)
	end
	return result:join()
	--mw.getCurrentFrame():extensionTag{
--		name = 'templatestyles', args = { src = 'Template:Key press/styles.css'} 
--	}..result:join()
	
end

local function keypress(frame)
	-- Called by "{{key press|...}}".
	-- Using the template doubles the post‐expand include size.
	return keyPress(frame:getParent().args)
end

local function press(frame)
	-- Called by "{{#invoke:key|press|...}}".
	return keyPress(frame.args)
end

return {
	keypress = keypress,
	press = press,
}