Module:anui-pron: Difference between revisions

m
no edit summary
No edit summary
mNo edit summary
 
(39 intermediate revisions by the same user not shown)
Line 11: Line 11:
local TILDE, NASAL = u(0x0303), u(0x0303) -- COMBINING TILDE ̃◌
local TILDE, NASAL = u(0x0303), u(0x0303) -- COMBINING TILDE ̃◌
local TILDEBELOW, CREAKY = u(0x0330), u(0x0330) -- COMBINING TILDE BELOW ̰◌
local TILDEBELOW, CREAKY = u(0x0330), u(0x0330) -- COMBINING TILDE BELOW ̰◌
local SPH = CREAKY .. CREAKY
local SPH = CREAKY .. CREAKY -- sphincteric or strident vowel
local GRAVE = u(0x0300) -- COMBINING GRAVE ACCENT ̀◌
local GRAVE = u(0x0300) -- COMBINING GRAVE ACCENT ̀◌
local HIGHFALL = "˥˦"
local HIGHFALL = "˥˦"
Line 27: Line 27:
local nasal_to_oral = {["ã"] = "a" .. NASAL, ["ĩ"] = "i" .. NASAL, ["ṍ"] = "ɔ" .. NASAL}
local nasal_to_oral = {["ã"] = "a" .. NASAL, ["ĩ"] = "i" .. NASAL, ["ṍ"] = "ɔ" .. NASAL}
local modal_to_glottal = {["a"] = "à", ["e"] = "è", ["i"] = "ì", ["ɔ"] = "ò", ["u"] = "ù"}
local modal_to_glottal = {["a"] = "à", ["e"] = "è", ["i"] = "ì", ["ɔ"] = "ò", ["u"] = "ù"}
local glottal_to_modal = {["à"] = "a" .. CREAKY, ["è"] = "e" .. SPH, ["ì"] = "i" .. SPH, ["ò"] = "ɔ" .. CREAKY, ["ù"] = "u" .. CREAKY}
local glottal_to_modal = {["à"] = "a" .. SPH, ["è"] = "e" .. SPH, ["ì"] = "i" .. SPH, ["ò"] = "ɔ" .. CREAKY, ["ù"] = "u" .. CREAKY}
local nasalized = "[ãĩṍᴍ]"
local nasalized = "[ãĩṍᴍ]"
local glottalic = "[àèìòù]"
local glottalic = "[àèìòù]"
local oral = "[aeiouàèìòù]"
local oral = "[aeiouàèìòù]"


local click = "[ǀǃʘǂǁ]"
local sonorant = "[rmnɳɖɲlŋᴟ]"
local click = "ǀǃʘǂǁ"


local function same(foo, bar)
local function same(foo, bar)
Line 44: Line 45:
local rules = {
local rules = {
{"ʇ", "ǀ"}, {"õ", "ṍ"}, {"o", "ɔ"}, {"ṭ", "ʈ"}, {"j", "ɟ"}, {"ñ", "ɲ"}, {"ch", "tʃ"}, {"ʈr", "ʈʂ"}, {"ṇ", "ɳ"}, {"ṣ", "ʂ"},  {"š", "ʃ"},
{"ʇ", "ǀ"}, {"õ", "ṍ"}, {"o", "ɔ"}, {"ṭ", "ʈ"}, {"j", "ɟ"}, {"ñ", "ɲ"}, {"ch", "tʃ"}, {"ʈr", "ʈʂ"}, {"ṇ", "ɳ"}, {"ṣ", "ʂ"},  {"š", "ʃ"},
{"([" .. front_vowel .. "])", "s"}, {"ŋ([" .. back_vowel .. "])", "ɴ%1"},
{"([" .. front_vowel .. "])", "s%1"},
{"k([" .. front_vowel .. "])", "kx%1"}, {"k([" .. back_vowel .. "])", "q%1"},
{"k([" .. front_vowel .. "])", "kx%1"}, {"k([" .. back_vowel .. "])", "q%1"},
{"([ḛḭṵaɔ]" .. TILDEBELOW .. "?)", {["ḛ"] = "è", ["ḭ"] = "ì", ["ṵ"] = "ù", ["a" .. TILDEBELOW] = "à", ["ɔ" .. TILDEBELOW] = "ò"}},
{"([ḛḭṵaɔ]" .. TILDEBELOW .. "?)", {["ḛ"] = "è", ["ḭ"] = "ì", ["ṵ"] = "ù", ["a" .. TILDEBELOW] = "à", ["ɔ" .. TILDEBELOW] = "ò"}},
{"m(" .. oral .. ")", "mᵇ%1"}, {"ŋ(" .. oral .. ")", "ŋᶢ%1"}, {"ɳ(" .. oral .. ")", "ᶯɖ%1"},
{"([uùm]ʼ?)m", "%1ᴍ"}, {"m(ʼᴍ)", "%1"}, -- tell apart between regular and syllabic <m>
{"([" .. click .. "])(" .. glottalic .. ")", "%1ˀ%2"}, -- ꞰV̰ = ꞰˀV̰
-- tell apart between regular and syllabic <m>
{"(" .. oral .. ")m(" .. vowel .. ")", "%1ᴟ%2"}, {"([uùm]ʼ?)m", "%1ᴍ"}, {"m(ʼᴍ)", "%1"}, {"(" .. oral .. ")m", "%1ᴍ"},
{"(" .. sonorant .. ")(" .. glottalic .. ")", "%1" .. CREAKY .. "%2"}, -- MV̰ > M̰V̰
{"[mᴟ](" .. vowel .. ")", "ᴟᵇ%1"},  {"ŋ(" .. vowel .. ")", "ŋᶢ%1"}, {"ɳ(" .. vowel .. ")", "ᶯɖ%1"},
{"(" .. vowel .. ")(".. vowel .. ")", function(s1, s2) return same(s1, s2) and s1 .. "ː˧" or s1 .. s2 .. "˧" end},
{"(" .. vowel .. ")(".. vowel .. ")", function(s1, s2) return same(s1, s2) and s1 .. "ː˧" or s1 .. s2 .. "˧" end},
{"(" .. vowel .. ")(" .. nasalized .. ")",
{"(" .. vowel .. ")(" .. nasalized .. ")",
Line 58: Line 63:
{"(" .. glottalic .. ")([" .. front_vowel .. "])",
{"(" .. glottalic .. ")([" .. front_vowel .. "])",
function(s1, s2)
function(s1, s2)
return same(s1, s2) and s1 .. "ː˦" or modal_to_oral[s1] .. modal_to_oral[s2] .. "˦"
return same(s1, s2) and s1 .. "ː˦" or s1 .. modal_to_glottal[s2] .. "˦"
end
end
},
},
{"(" .. glottalic .. ")([" .. back_vowel .. "])",
{"(" .. glottalic .. ")([" .. back_vowel .. "])",
function(s1, s2)
function(s1, s2)
return same(s1, s2) and s1 .. "ː˨" or modal_to_oral[s1] .. modal_to_oral[s2] .. "˨"
return same(s1, s2) and s1 .. "ː˨" or s1 .. modal_to_glottal[s2] .. "˨"
end
end
},
},
Line 74: Line 79:
{"(" .. glottalic .. ")ʼ(" .. nasalized .. ")", function(s1, s2) return glottal_to_modal[s1] .. NASAL .. "ʔ" .. s2 .. HIGHFALL end},
{"(" .. glottalic .. ")ʼ(" .. nasalized .. ")", function(s1, s2) return glottal_to_modal[s1] .. NASAL .. "ʔ" .. s2 .. HIGHFALL end},
{"u" .. CREAKY .. NASAL, "ᴍ" .. CREAKY},
{"([^uɯɔɑieaʼ])m([^uɯɔɑieaʼ])", "%1ᴍ%2"}, {"u" .. CREAKY .. NASAL, "ᴍ" .. CREAKY},
{"ᴍᴍ", "m" .. SYLLABIC .. "ː"}, {"ùᴍ", "m" .. CREAKY .. SYLLABICA .. "ː˧"},
{"ᴍᴍ", "m" .. SYLLABIC .. "ː"}, {"ùᴍ", "m" .. CREAKY .. SYLLABICA .. "ː˧"},
{"ᴍʼᴍ", "m" .. SYLLABICA .. CREAKY .. "ʔm" .. SYLLABIC .. "˧"},  {"ᴍ" .. CREAKY .. "ᴍ", "m" .. CREAKY .. SYLLABICA .. "ː"},
{"ᴍʼᴍ", "m" .. SYLLABICA .. CREAKY .. "ʔm" .. SYLLABIC .. "˧"},  {"ᴍ" .. CREAKY .. "ᴍ", "m" .. CREAKY .. SYLLABICA .. "ː"},
{"ᴍ" .. CREAKY, "m" .. CREAKY .. SYLLABICA}, {"ṍ", "ɔ" .. NASAL}, {"(" .. glottalic .. ")", function(s1) return glottal_to_modal[s1] end},
{"ᴍ" .. CREAKY, "m" .. CREAKY .. SYLLABICA}, {"ṍṍ", "ṍː"}, {"ṍ", "ɔ" .. NASAL}, {"(" .. glottalic .. ")", function(s1) return glottal_to_modal[s1] end},
{"ᴍ", "m" .. SYLLABIC},
{"ᴍ", "m" .. SYLLABIC},
{"mᵇm", "mm"},  {"ŋᶢm", "ŋm"},  {"ᶯɖm", "ɳm"},
{"mᵇm", "mm"},  {"ŋᶢm", "ŋm"},  {"ᶯɖm", "ɳm"},
{"ɴ", "ᵑ"}, {"(" .. click .. ")ʼ", "%1ˀ"}, {"(ᵑ" .. click .. ")x", "%1ʁ"}, {"(" .. click .. ")x", "%1χ"}, {"([^ʈɬcq])ʼ", "%1ʔ"},
{"ɴ", "ᵑ"}, {"([" .. click .. "])ʼ", "%1ˀ"}, {"(ᵑ[" .. click .. "])x", "%1ʁ"}, {"([" .. click .. "])x", "%1χ"}, {"([^ʈɬcq])ʼ", "%1ʔ"},
{"^ʼ", "ʔ"}, {"ŋ([" .. back_vowel .. "])", "ɴ%1"}, {"(" .. vowel .. ")ᵑ", "%1" .. NASAL .. "ᵑ"},
{"([" .. click .. "][qʛχʁ]?ʼ?)a", "%1ɑ"}, {"([" .. click .. "][qʛχʁ]?ʼ?)ã", "%1ɑ" .. NASAL}, {"ɑ" .. SPH, "ɑ" .. CREAKY}, -- A-backening
{"([ʈʂɳɖ])u", "%1ɯ"}, {"([ʘǃǁ][qχʁʛ]?ʼ?)u", "%1ɯ"}, -- U-unrounding
{"([ʈtk])([ʂʃɬxs])", "%1" .. AFFR .. "%2"}, {"ᴟ", "m"},
{"s", "s" .. DENTAL}, {"ṯ", "t" .. INTERDENTAL .. AFFR .. "s" .. DENTAL}, {"ṉ", "n" .. INTERDENTAL .. VOICELESS},
{"([" .. click .. "])([qχʁʛ])", "%1" .. AFFR .. "%2"}, {"u" .. NASAL, "m" .. SYLLABIC}, {"ɔ" .. CREAKY .. "ɔ" .. CREAKY, "ɔ" .. CREAKY .. "ː"},
 
{"ṯ", "t" .. INTERDENTAL .. AFFR .. "s" .. DENTAL}, {"ṉ", "n" .. INTERDENTAL .. VOICELESS},  {"s", "s" .. DENTAL},
{"(" .. click .. ")([qχʁʛ])", "%1" .. AFFR .. "%2"},
}
}


function export.crux(term)
function export.crux(term)
term=mw.ustring.lower(term)
term = term:gsub("N", "ɴ"); term = term:gsub("Ɠ", "ʛ")
term = mw.ustring.lower(term)
for _, rule in ipairs(rules) do
for _, rule in ipairs(rules) do
Line 106: Line 114:
local bits = {}
local bits = {}
for _, item in ipairs(items) do
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>"
local bit = "<span style=\"font-size:110%;font-family:'Gentium','DejaVu Sans','Segoe UI',sans-serif>" .. item.pron .. "</span>"
table.insert(bits, bit)
table.insert(bits, bit)
end
end
Line 113: Line 121:


function format_IPA(items)
function format_IPA(items)
return "[[w:IPA chart|IPA]]<sup>([[IPA for e|key]])</sup>:&#32;" .. IPA_span(items)
return "[[w:IPA chart|IPA]]<sup>([[IPA for ǂA Ṇṵĩ|key]])</sup>:&#32;" .. IPA_span(items)
end
end


Line 135: Line 143:
function export.show(frame)
function export.show(frame)
local params = {
local params = {
[1] = { default = mw.title.getCurrentTitle().nsText == 'Template' and "ǂA Ṇṵĩ" or mw.title.getCurrentTitle().text },
[1] = { default = mw.title.getCurrentTitle().nsText == 'Template' and "ǂAː Ṇṵĩ" or mw.title.getCurrentTitle().text },
}
}
local args = require("Module:parameters").process(frame:getParent().args, params)
local args = require("Module:parameters").process(frame:getParent().args, params)