Module:qhv-pron: Difference between revisions

no edit summary
(Created page with "local sub = mw.ustring.sub local find = mw.ustring.find local gmatch = mw.ustring.gmatch local gsub = mw.ustring.gsub local match = mw.ustring.match local export = {} local...")
 
No edit summary
Line 3: Line 3:
local gmatch = mw.ustring.gmatch
local gmatch = mw.ustring.gmatch
local gsub = mw.ustring.gsub
local gsub = mw.ustring.gsub
local match = mw.ustring.match  
local match = mw.ustring.match
local u = mw.ustring.char
local split = mw.text.split


local export = {}
local export = {}
Line 10: Line 12:
local uvular = "q"
local uvular = "q"
local consonants = "[mpbvwθntdszlrɾɲŋɴʎhɥ" .. velar .. uvular .. "]"
local consonants = "[mpbvwθntdszlrɾɲŋɴʎhɥ" .. velar .. uvular .. "]"
local vowels = "[aeiouy]"
local vowels = "[aeiouyː]"
local NONSYLLABIC = u(0x032F) -- non-syllabic, combining inverted breve below


local rules = {
local rules = {
{"rh", "ṛ"}, {"th", "θ"}, {"lj", "ʎ"}, {"ñ", "ɲ"}, {"kh", "x"}, {"[gɡ]h", "ɣ"}, {"g", "ɡ"},
{"rh", "ṛ"}, {"th", "θ"}, {"lj", "ʎ"}, {"ñ", "ɲ"}, {"kh", "x"}, {"[gɡ]h", "ɣ"}, {"g", "ɡ"},
{"", ""}, {"", ""}, {"", ""}, {"", ""},
{"([aā][eo])", "%1"..NONSYLLABIC}, {"([iu])([aāeēoō])", "%1͜%2"},  
{"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""},
{"ā", ""}, {"ē", ""}, {"ī", ""}, {"ō", ""}, {"ū", ""}, {"ȳ", ""},
{"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""}, {"", ""},  
{"n([" .. velar .. "])", "ŋ%1"}, {"n([" .. uvular .. "])", "ɴ%1"},  
}
}


local function write_stress(term)
local pattern = consonants .. vowels .. "+" .. consonants .. "-"
local syll = {}
syll = split(term, pattern)
term = table.concat(syll, "·")
term = gsub(term, "·(" .. consonant .. "·)", "%1")
return term
end


local function crux(term)
for _, rule in ipairs(rules) do
term = gsub(term, rule[1], rule[2])
end
return write_stress(term)
end
local function antique_crux(term)
local oldrules = {
{"v([ou])", "w%1"}, {"v([ay])", "ɥ%1"}, {"(" .. vowels .. ")v(" .. consonants .. ")", "u"},
{"j([iy])", "ɟ%1"},
}
term = crux(term)
for _, oldrule in ipairs(oldrules) do
term = gsub(term, oldrule[1], oldrule[2])
end
return term
end
local function format_IPA(items)
return "[[w:IPA chart|IPA]]<sup>([[IPA for Siwa|key]])</sup>:&#32;" .. IPA_span(items)
end
local function IPA_span(items)
local bits = {}
for _, item in ipairs(items) do
local bit = "<span style=\"font-size:110%;font-family:Gentium,'DejaVu Sans','Segoe UI',sans-serif>" .. item.pron .. "</span>"
table.insert(bits, bit)
end
return table.concat(bits)
end
function line_format(pronunciation, register)
local full_pronunciations = {}
local IPA_args = {{pron = '[' .. pronunciation .. ']'}}
table.insert(full_pronunciations, format_IPA(IPA_args))
return "(''" .. table.concat(register, ", ") .. "'')" .. ' ' .. table.concat(full_pronunciations, ' or ')
end
function separate_word(term, a, e, w)
local result = {}
for word in gsplit(term, " ") do
table.insert(result, export.crux(word))
end
return table.concat(result, " ")
end
function export.show(frame)
local params = {
[1] = { default = mw.title.getCurrentTitle().nsText == 'Template' and "uįo·sauṡṡi" or mw.title.getCurrentTitle().text },
}
local args = require("Module:parameters").process(frame:getParent().args, params)
local term = args[1]
local ipa = "* "
ipa = ipa .. line_format(separate_word(term), {'Modern'})
end


return export
return export