Module:Navbar

Module documentation[view] [edit] [history] [purge]

This module depends on the following other modules: Module: Ordinal Module: Yesno

This module is used to store functions for templates that generate a navigation bar:

• Template:Navbox Lumatone
• Template:Navbox fractional-octave

Template:Navbar also uses this module, even though it only generates View/Talk/Edit links.

To include this module in other modules, use local navbar = require("Module:Navbar")._navbar.

See also

• Module:Navbox

---

local ordinal = require("Module:Ordinal")._ordinal

local p = {}

function p.navbar(name, mode, text)
	return "<span style=\"font-size: 0.75em; \">"
		.. ((mode == "mini")
			and "[[Template:" .. name .. "|V]] &bull; " .. "[[Template talk:" .. name .. "|T]] &bull; " .. "[[Special:EditPage/Template:" .. name .. "|E]]"
			or "[[Template:" .. name .. "|View]] &bull; " .. "[[Template talk:" .. name .. "|Talk]] &bull; " .. "[[Special:EditPage/Template:" .. name .. "|Edit]]")
		.. "</span>"
end

function p.lumatone_map(frame)
	local root_page_name = frame:preprocess("{{ROOTPAGENAME}}")
	local a = root_page_name:match("[Ll]umatone%s*[Mm]apping%s*[Ff]or%s*(%d+)%s*[Ee][Dd][2Oo]")
	local x = tonumber(frame.args["edo"]) or tonumber(a)
	local thresh = 5
	
	local out_str = frame:preprocess("{{Navbox"
		.. "|name=Lumatone mapping navigation"
		.. "|Title=[[Lumatone|Lumatone mappings]]"
		.. "|Data 1=<div style=\"text-align: center;\"><div style=\"margin: auto auto auto auto;\">"
		.. ((x >= thresh + 4) and "'''&larr;''' " or "")
		.. ((x >= thresh + 3) and "[[Lumatone mapping for " .. (x - 3) .. "edo|" .. (x - 3) .. "edo]] &bull; " or "")
		.. ((x >= thresh + 2) and "[[Lumatone mapping for " .. (x - 2) .. "edo|" .. (x - 2) .. "edo]] &bull; " or "")
		.. ((x >= thresh + 1) and "[[Lumatone mapping for " .. (x - 1) .. "edo|" .. (x - 1) .. "edo]] &bull; " or "")
		.. "'''Lumatone mapping for " .. x .. "edo''' &bull; "
		.. "[[Lumatone mapping for " .. (x + 1) .. "edo|" .. (x + 1) .. "edo]] &bull; "
		.. "[[Lumatone mapping for " .. (x + 2) .. "edo|" .. (x + 2) .. "edo]] &bull; "
		.. "[[Lumatone mapping for " .. (x + 3) .. "edo|" .. (x + 3) .. "edo]] '''&rarr;'''</div></div>}}")
	
	if string.lower(root_page_name) ~= "lumatone mapping navigation" then
		out_str = out_str .. " [[Category:Lumatone mappings]] [[Category:" .. x .. "edo]]"
	end

	return out_str
end

function p.frac_octave(frame)
	local root_page_name = frame:preprocess("{{ROOTPAGENAME}}")
	local a = root_page_name:match("(%d+)%a+[%s%-]*[Oo]ctave%s*[Tt]emperament[s]?")
	local x = tonumber(frame.args["f"]) or tonumber(a)
	
	local out_str = frame:preprocess("<br />{{Navbox"
		.. "|name=Navbox fractional-octave"
		.. "|Title=[[Fractional-octave temperaments]]"
		.. "|Data 1=<div style=\"text-align: center;\"><div style=\"margin: auto auto auto auto;\">"
		.. ((x >= 5) and "'''&larr;''' " or "")
		.. ((x >= 4) and "[[" .. ordinal(x - 3) .. "-octave temperaments|" .. ordinal(x - 3) .. "]] &bull; " or "")
		.. ((x >= 3) and "[[" .. ordinal(x - 2) .. "-octave temperaments|" .. ordinal(x - 2) .. "]] &bull; " or "")
		.. ((x >= 2) and "[[" .. ordinal(x - 1) .. "-octave temperaments|" .. ordinal(x - 1) .. "]] &bull; " or "")
		.. "'''" .. ordinal(x) .. "-octave''' &bull; "
		.. "[[" .. ordinal(x + 1) .. "-octave temperaments|" .. ordinal(x + 1) .. "]] &bull; "
		.. "[[" .. ordinal(x + 2) .. "-octave temperaments|" .. ordinal(x + 2) .. "]] &bull; "
		.. "[[" .. ordinal(x + 3) .. "-octave temperaments|" .. ordinal(x + 3) .. "]] '''&rarr;'''</div></div>}}")
	return out_str
end

return p