Module:UŊMAO

Functions for the UŊMAO page

---

local def, _a do local u = require("Module:Utils") def, _a = u.def, u._a end

local _m = {}

_m.resource_table = function(frame)
	local out = [=[<table class="wikitable sortable"><tr><th>Code</th><th>Resource</th><th>Value (in [[slablet]]s)</th><th>Traded at the [[Slab Exchange]]</th></tr>]=]
	local resources = require("Module:Data/UŊMAO/Resources")
	for _, v in ipairs(resources) do
		out = out .. "<tr><td>" .. v.code .. "</td><td>" .. v.name .. "</td><td>" .. v.value .. "</td><td>" .. (v.sxg and "yes" or "no") .. "</td></tr>"
	end
	out = out .. "</table>"
	return out
end

local function formatval(v)
	if type(v) ~= "number" then return v end
	return string.format("%.6f", v)
end

_m.current_currencies = function(frame)
	local out = [=[<table class="wikitable sortable"><tr><th>Code</th><th>Place</th><th>Name</th><th>Backing</th><th>Value (in the B.R.)</th><th>Value (in [[slablet]]s)</th></tr>]=]
	local c = require"Module:Data/UŊMAO/Currencies"
	for _, v in ipairs(c) do
		if not v.discontinued then
			out = out ..
				"<tr><td>" .. v.code ..
				"</td><td>[[" .. v.place ..
				"]]</td><td>[[" .. v.name ..
				"]]</td><td>" .. v.backed ..
				"</td><td>" .. formatval(v.brval) ..
				"</td><td>" .. formatval(c._get_nval(v.code)) ..
				"</td></tr>"
		end
	end
	return out .. "</table>"
end

_m.withdrawn_currencies = function(frame)
	local out = [=[<table class="wikitable sortable"><tr><th>Code</th><th>Place</th><th>Name</th><th>Backing</th><th>Value (in the B.R.)</th><th>Value (in [[slablet]]s) at the time of withdrawal</th><th>Reason for withdrawal</th></tr>]=]
	local c = require"Module:Data/UŊMAO/Currencies"
	for _, v in ipairs(c) do
		if v.discontinued then
			out = out ..
				"<tr><td>" .. v.code ..
				"</td><td>[[" .. v.place ..
				"]]</td><td>[[" .. v.name ..
				"]]</td><td>" .. v.backed ..
				"</td><td>" .. formatval(v.brval) ..
				"</td><td>" .. formatval(v.nval) ..
				"</td><td>" .. tostring(v.discontinued) ..
				"</td></tr>"
		end
	end
	return out .. "</table>"
end

_m.curency_map = function(frame)
	local c = require"Module:Data/UŊMAO/Currencies"
	out = [=[<table class="wikitable"><tr><td>TO →</br>↓ FROM</td>]=]
	for _, v in ipairs(c) do if not v.discontinued then
		out = out .. "<th>" .. v.code .. "</th>"
	end end
	out = out .. "</tr>"
	for _, vf in ipairs(c) do if not vf.discontinued then
		out = out .. "<tr><th>" .. vf.code .. "</th>"
		for _, vt in ipairs(c) do if not vt.discontinued then
			out = out .. "<td>" .. formatval(c._get_nval(vt.code)/c._get_nval(vf.code)) .. "</td>"
		end end
		out = out .. "</tr>"
	end end
	return out
end
return _m