মডিউল:nd-common
এই মডিউলের জন্য মডিউল:nd-common/নথি-এ নথিপত্র তৈরি করা হয়ে থাকতে পারে
local export = {}
local u = mw.ustring.char
local ACUTE = u(0x0301)
local CIRC = u(0x0302)
local SYLL = u(0x0324)
export.diacritic = ACUTE .. CIRC
export.toneless_vowel = "aeiouAEIOU" .. SYLL
export.vowel = export.toneless_vowel .. "áéíóúḿâêîôûÁÉÍÓÚḾÂÊÎÔÛ" .. export.diacritic
function export.split_syllables(word)
local syllables = {}
for syll in mw.ustring.gmatch(word, "[^" .. export.vowel .. "]*[" .. export.vowel .. "]+") do
table.insert(syllables, syll)
end
syllables[#syllables] = syllables[#syllables] .. mw.ustring.match(word, "[^" .. export.vowel .. "]*$")
return syllables
end
function export.apply_tone(word, pattern)
word = export.split_syllables(word)
pattern = mw.text.split(pattern or mw.ustring.rep("L", #word), "")
if #word ~= #pattern then
error("The word \"" .. table.concat(word) .. "\" and the tone pattern " .. table.concat(pattern) .. " have different numbers of syllables.")
end
for i, tone in ipairs(pattern) do
if tone == "F" then
word[i] = mw.ustring.gsub(word[i], "([" .. export.toneless_vowel .. "])", "%1" .. CIRC)
elseif tone == "H" then
word[i] = mw.ustring.gsub(word[i], "([" .. export.toneless_vowel .. "])", "%1" .. ACUTE)
elseif tone ~= "L" then
error("Invalid character \"" .. tone .. "\" in tone pattern string.")
end
end
return (mw.ustring.gsub(mw.ustring.toNFC(table.concat(word)), "̩", ""))
end
return export