Módulo:Ordinal

La documentación para este módulo puede ser creada en Módulo:Ordinal/doc

--[[  
 
This template will add the appropriate ordinal suffix to a given integer.
 
Please do not modify this code without applying the changes first at
Module:Ordinal/sandbox and testing.
 
]]

local p = {}

local yesno     = require('Module:Yesno') -- boolean value interpretation

--[[
This function converts an integer value into a numeral followed by ordinal indicator.
The output string might contain HTML tags.
 
Usage:
{{#invoke:Ordinal|ordinal|1=|2=|sup=}}
{{#invoke:Ordinal|ordinal}} - uses the caller's parameters
 
Parameters
    1: Any number or string.
    2: Set to "d" if the module should display "d" instead of "nd" and "rd".
    sup: Set to yes/no to toggle superscript ordinal suffix.
]]
function p.ordinal(frame)
	local args = frame.args
    if args[1] == nil then
        args = frame:getParent().args
    end
    if args[1] == nil then
    	args[1] = "{{{1}}}"
    end
    return p._ordinal(args[1], (args[2] == 'd'), yesno(args.sup))
end

function p._ordinal(n, d, sup)
	local x = tonumber(mw.ustring.match(n, "(%d*)%W*$"))
	local suffix = "º"
	-- If tonumber(n) worked:
	if x then
		local mod10 = math.abs(x) % 10
		local mod100 = math.abs(x) % 100
		if     mod10 == 1 and mod100 ~= 11 then
			suffix = "er"
		elseif mod10 == 2 and mod100 ~= 12 then
			if d then suffix = "d" else suffix = "do" end
		elseif mod10 == 3 and mod100 ~= 13 then
			if d then suffix = "d" else suffix = "er" end
		elseif mod10 == 4 and mod100 ~= 14 then
			if d then suffix = "d" else suffix = "to" end
		elseif mod10 == 5 and mod100 ~= 15 then
			if d then suffix = "d" else suffix = "to" end
		elseif mod10 == 6 and mod100 ~= 16 then
			if d then suffix = "d" else suffix = "to" end
		elseif mod10 == 7 and mod100 ~= 17 then
			if d then suffix = "d" else suffix = "mo" end
		elseif mod10 == 9 and mod100 ~= 19 then
			if d then suffix = "d" else suffix = "no" end
		elseif mod10 == 10 and mod100 ~= 20 then
			if d then suffix = "d" else suffix = "mo" end
		elseif mod10 == 11 and mod100 ~= 21 then
			if d then suffix = "d" else suffix = "vo" end
		elseif mod10 == 12 and mod100 ~= 22 then
			if d then suffix = "d" else suffix = "vo" end
		elseif mod10 == 13 and mod100 ~= 23 then
			if d then suffix = "d" else suffix = "vo" end
		elseif mod10 == 14 and mod100 ~= 24 then
			if d then suffix = "d" else suffix = "vo" end
		end
	end
	if sup then
		suffix = "<sup>" .. suffix .. "</sup>"
	end
	return n .. suffix
end

return p