This module formats a number in the local format, based on mediawiki data. This module is used by Template:Formatnum. For usage instructions, please take a look at Template:Formatnum.
Limits:
- Numbers with more than 16 characters are not supported
- Does not allow more than 20 different languages on one page. This means that you can have at a maxium 20 module transclusions, where each of them is formating a number into a different language.
-- This module is intended to replace the functionality of Template:Formatnum and related templates.
local p = {}
function p.main(frame)
local pframe = frame:getParent()
local config = frame.args
local args = pframe.args
-- Preprocessing prec
if tonumber(args.prec) ~= nil and tonumber(args.prec) > 0 and tonumber(args[1]) ~= nil then
if string.find(tostring(args[1]), "%.") ~= nil then
if (string.len(args[1]) - string.find(tostring(args[1]), "%.")) < tonumber(args.prec) then
precnumber = "" .. args[1] .. string.rep("0", tonumber(args.prec) - (string.len(args[1]) - string.find(tostring(args[1]), "%.")))
elseif (string.len(args[1]) - string.find(tostring(args[1]), "%.")) > tonumber(args.prec) then
local proc = string.gsub(args[1], "0+$", "")
if (string.len(proc) - string.find(tostring(proc), "%.")) < tonumber(args.prec) then
precnumber = proc .. string.rep("0", tonumber(args.prec) - (string.len(proc) - string.find(tostring(proc), "%.")))
else
precnumber = proc
end
elseif (string.len(args[1]) - string.find(tostring(args[1]), "%.")) == tonumber(args.prec) then
precnumber = args[1]
end
else
precnumber = "" .. args[1] .. "." .. string.rep("0", args.prec)
end
number = precnumber .. "1"
precA = "true"
else
number = args[1]
end
local digitml = {
["0"] = '൦',
["1"] = '൧',
["2"] = '൨',
["3"] = '൩',
["4"] = '൪',
["5"] = '൫',
["6"] = '൬',
["7"] = '൭',
["8"] = '൮',
["9"] = '൯'
}
local digitmn = {
["0"] = '᠐',
["1"] = '᠑',
["2"] = '᠒',
["3"] = '᠓',
["4"] = '᠔',
["5"] = '᠕',
["6"] = '᠖',
["7"] = '᠗',
["8"] = '᠘',
["9"] = '᠙'
}
local digitte = {
["0"] = '౦',
["1"] = '౧',
["2"] = '౨',
["3"] = '౩',
["4"] = '౪',
["5"] = '౫',
["6"] = '౬',
["7"] = '౭',
["8"] = '౮',
["9"] = '౯'
}
local digitth = {
["0"] = '๐',
["1"] = '๑',
["2"] = '๒',
["3"] = '๓',
["4"] = '๔',
["5"] = '๕',
["6"] = '๖',
["7"] = '๗',
["8"] = '๘',
["9"] = '๙'
}
if args[2] == "arabic-indic" then
language = "ks"
elseif args[2] == "ml-old" then
language = "ml"
else
language = args[2]
end
-- Formatnum
if tonumber(number) ~= nil and mw.language.isKnownLanguageTag(language or "") == true then
formatnum = mw.getLanguage( language ):formatNum( tonumber(number) )
elseif tonumber(number) ~= nil then
formatnum = mw.getLanguage(frame:preprocess( "{{int:lang}}" )):formatNum(tonumber(number))
else
formatnum = number
formatA = "true"
end
-- Formatnum, special cases
local numsc = formatnum
if args[2] == "ml-old" then
for en, ml in pairs(digitml) do
numsc = mw.ustring.gsub(numsc, en, ml)
end
elseif args[2] == "mn" then
for en, mn in pairs(digitmn) do
numsc = mw.ustring.gsub(numsc, en, mn)
end
elseif args[2] == "te" then
for en, te in pairs(digitte) do
numsc = mw.ustring.gsub(numsc, en, te)
end
elseif args[2] == "th" then
for en, th in pairs(digitth) do
numsc = mw.ustring.gsub(numsc, en, th)
end
end
--Postprocessing prec
if precA == "true" then
postprec = mw.ustring.sub(numsc, 1, (mw.ustring.len(numsc) - 1))
else
postprec = numsc
end
-- separator
if args.sep ~= nil and args.sep ~= "" and formatA ~= "true" then
local replace = mw.ustring.gsub( "", "%%", "%%%%" )
if mw.language.isKnownLanguageTag(language or "") == true then
local separator = mw.ustring.sub(mw.getLanguage(language):formatNum(tonumber("10000")), 3, 3)
if tostring(mw.ustring.find(separator, "%s")) == "1" then
pattern = mw.ustring.format(separator, "%s")
elseif tostring(mw.ustring.find(separator, "%p")) == "1" then
pattern = mw.ustring.gsub(separator, "([%(%)%.%%%+%-%*%?%[%^%$%]])", "%%%1")
else
pattern = ""
end
return tostring(mw.ustring.gsub( postprec, pattern, replace ))
else
local separator = mw.ustring.sub(mw.getLanguage(frame:preprocess("{{int:lang}}")):formatNum(tonumber("10000")), 3, 3)
if tostring(mw.ustring.find(separator, "%s")) == "1" then
pattern = mw.ustring.format(separator, "%s")
elseif tostring(mw.ustring.find(separator, "%p")) == "1" then
pattern = mw.ustring.gsub(separator, "([%(%)%.%%%+%-%*%?%[%^%$%]])", "%%%1")
else
pattern = ""
end
return tostring(mw.ustring.gsub( postprec, pattern, replace ))
end
else
return postprec
end
end
return p