Modul:peo-translit

A modult a Modul:peo-translit/doc lapon tudod dokumentálni

local export = {}

local tt = {
	["𐎠"] = "a",
	["𐎡"] = "i",
	["𐎢"] = "u",
	["𐎣"] = "k",
	["𐎤"] = "ku",
	["𐎥"] = "g",
	["𐎦"] = "gu",
	["𐎧"] = "x",
	["𐎨"] = "c",
	["𐎩"] = "j",
	["𐎪"] = "ji",
	["𐎫"] = "t",
	["𐎬"] = "tu",
	["𐎭"] = "d",
	["𐎮"] = "di",
	["𐎯"] = "du",
	["𐎰"] = "θ",
	["𐎱"] = "p",
	["𐎲"] = "b",
	["𐎳"] = "f",
	["𐎴"] = "n",
	["𐎵"] = "nu",
	["𐎶"] = "m",
	["𐎷"] = "mi",
	["𐎸"] = "mu",
	["𐎹"] = "y",
	["𐎺"] = "v",
	["𐎻"] = "vi",
	["𐎼"] = "r",
	["𐎽"] = "ru",
	["𐎾"] = "l",
	["𐎿"] = "s",
	["𐏀"] = "z",
	["𐏁"] = "š",
	["𐏂"] = "ç",
	["𐏃"] = "h",
	["𐏈"] = "AM", -- Auramazdā
	["𐏉"] = "AM", -- Auramazdā
	["𐏊"] = "AMha", -- Auramazdāha
	["𐏋"] = "XŠ", -- xšāyathiya 
	["𐏌"] = "DH", -- dahyāuš
	["𐏍"] = "DH", -- dahyāuš
	["𐏎"] = "BG", -- baga
	["𐏏"] = "BU", -- būmiš
	["𐏐"] = " ", --word devider
	["-"] = "-",
}

local numbers = {
	["𐏑"] = 1,
	["𐏒"] = 2,
	["𐏓"] = 10,
	["𐏔"] = 20,
	["𐏕"] = 100,
}

function export.convert_numbers(numeric_str)
	local total = 0
	for c in mw.ustring.gmatch(numeric_str, ".") do
		total = total + numbers[c]
	end
	return total
end

function export.tr(text, lang, sc)
	-- If the script is not Xpeo, do not transliterate
	if sc ~= "Xpeo" then
		return
	end
	
	local t = {}
	local preceding_num = false
	-- Transliterate characters
	text = mw.ustring.gsub(text,
		".",
		function(c)
			if mw.ustring.match(c, "[𐏑-𐏕]") then
				if preceding_num then
					t[#t] = t[#t] + numbers[c]
				else
					t[#t + 1] = numbers[c]
				end
				preceding_num = true
			else
				preceding_num = false
				t[#t + 1] = tt[c]
			end
		end)
		
	text = mw.ustring.gsub(table.concat(t, "-"), "%-?(%s)%-?", "%1")
	text = mw.ustring.gsub(mw.ustring.gsub(text, "^%-", ""), "%-$", "")
	
	return text
end

return export