Module:Percentage

From Zoophilia Wiki
Revision as of 13:07, 20 October 2019 by meta>Frietjes (working on a lua version of Template:Percentage)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigationJump to search

Documentation for this module may be created at Module:Percentage/doc

--
-- This module implements [[Template:Percentage]]
--
local p = {}

local math_module = require( "Module:Math" )
local precision = math_module._precision
local sortkey = require( "Module:Sortkey" )

local function rnd(num, digits)
	-- This function implements {{rnd}}
	return math_module._precision_format(tostring(num), tostring(digits))
end

local function oom(num)
	-- This function implements {{order of magnitude}}
	return math_module.__order(tostring(num))
end

function percentage(n1, n2, suffix, prec, pad, sigfig)
	local pct = tonumber(n1)/tonumber(n2)
	skey = '<span style="display:none" data-sort-value="'
			.. sortkey._sortKeyForNumber(pct) .. '♠"></span>'
	if sigfig ~= '' then
		return skey .. rnd(pct, tonumber(sigfig) - oom(pct) - 1) .. suffix
	end
	if pad ~= '' then
		return skey .. rnd(pct, prec) .. suffix
	end
	if pct > 0 then
		pct = math.floor(pct / 10^prec + 0.5) * 10^prec
	else
		pct = math.floor(pct / 10^prec - 0.5) * 10^prec
	end
	
	return skey .. pct .. suffix
end

function p.main(frame)
	return percentage(frame.args[1] or '0', frame.args[2] or '100', tonumber(frame.args[3]) or 0, frame.args['%'] or '%', frame.args['pad'] or '', frame.args['sigfig'] or '')
end

return p