Module:zm-pron: Difference between revisions

Module:zm-pron (view source)

Revision as of 20:37, 2 May 2022

717 bytes removed , 2 May 2022

no edit summary

Sware

Bureaucrats, Administrators

45,333

edits

@@ Line 22: / Line 22: @@
 local palatal = "[ʨjʎʃʒʥʤʧʦʣ]"
 local sonorant = "[rl]"
-local plosives = "[ptkbdg]"
+local plosives = "[ptkbdɡ]"
 local velar = "[ɡkx]"
 local consonants = "[mnptkbdɡfvszxrljɲŋʋʎʨjʎʃʒʥʤʧʤʣʦ]"
@@ Line 35: / Line 35: @@
 	{"(" .. vowels .. ")[lv]$", "%1ʋ"}, {"(" .. acuted .. ")[lv]$", "%1ʋ"},
-	{"(" .. plosives .. ")[ptkbdg]$", "[ptkbdg]"},
+	{plosives .. "(" .. plosives .. ")$", "%1"},
-	{"pt" , "t"}, {"pk" , "k"}, {"tp" , "p"}, {"tk" , "k"}, {"kp" , "p"}, {"kt" , "t"},
+	{"[ptk]([ptk])", "%1"},	{"[bdɡ]([bdɡ])", "%1"},
-	{"bd" , "d"}, {"bg" , "g"}, {"db" , "b"}, {"dg" , "g"}, {"gb" , "b"}, {"gd" , "d"},
 	{"(" .. consonants ..")([rŕ])(" .. consonants ..")", "%1(ə)%2" .. SYLL .. "%3"}, {"(" .. consonants ..")r$", "%1ər"},
 	{"n(" .. velar .. ")", "ŋ%1"},
-	{"p(" .. vowels .. ")", "pʰ%1"}, {"t(" .. vowels .. ")", "tʰ%1"}, {"k(" .. vowels .. ")", "kʰ%1"},
+	{"([ptk])(" .. vowels .. ")", "%1ʰ%2"}, {"([ptk])(" .. acuted .. ")", "%1ʰ%2"},
-	{"p(" .. acuted .. ")", "pʰ%1"}, {"t(" .. acuted .. ")", "tʰ%1"}, {"k(" .. acuted .. ")", "kʰ%1"},
 	{"(" .. palatal .. ")e", "%1ɛ"}, {"(" .. palatal .. ")é", "%1É"},
@@ Line 49: / Line 47: @@
 	{"É", "ɛ" .. ACUTE}, {"Ó", "ɔ" .. ACUTE}, {"ý", "ɪ" .. ACUTE},
+}
+local c_rules = {
+	{"ʨ", "ʧ"}, {"ʥ", "ʤ"},
+	{"[ae]j", "ɛː"}, {"a", "ɐ"}, {"[ei]", "ɪ"}, {"o", "ɔ"}, {"u", "ʊ"}
+}
+local s_rules = {
+	{"ʨ", "ʦ"}, {"ʥ", "ʣ"},
+	{"[ae]j", "ɛː"}, {"a", "ɐ"}, {"e", "ɛ"}, {"i", "e"}, {"o", "ɔ"}, {"u", "o"}, {"ɪ", "i"},
+}
+local n_rules = {
+	{"[ae]", "ə"}, {"ɪ", "ɨ"}, {"y", "ɪ"}, {"i", "y"}, {"o", "ɔ"}, {"u", "ʊ"},
 }
@@ Line 54: / Line 66: @@
 	{"ʥ", "d͡ʑ"}, {"ʤ", "d͡ʒ"}, {"ʦ", "t͡s"}, {"ʨ", "t͡ɕ"}, {"ʧ", "t͡ʃ"}, {"ʣ", "d͡z"},
 }
 function export.crux(term, d)
 	term = mw.ustring.lower(term)
+	-- General
 	for _, rule in ipairs(rules) do
 		term = gsub(term, rule[1], rule[2])
 	end
-	if d == "c" then term = gsub(term, "ʨ", "ʧ"); term = gsub(term, "ʥ", "ʤ") end
+	-- Dialects
-	if d == "s" then term = gsub(term, "ʨ", "ʦ"); term = gsub(term, "ʥ", "ʣ") end
+	for _, dia_rule in ipairs(d == "c" and c_rules or d == "n" and n_rules or d == "s" and s_rules) do
-	if d == "s" then term = gsub(term, "aj", "ɛː"); term =gsub(term, "ej", "ɛː") end
+		term = gsub(term, dia_rule[1], dia_rule[2])
-	if d == "c" then term = gsub(term, "aj", "ɛː"); term =gsub(term, "ej", "ɛː") end
+	end
-	if d == "c" then term = gsub(term, "a", "ɐ"); term = gsub(term, "e", "ɪ"); term = gsub(term, "i", "ɪ"); term = gsub(term, "o", "ɔ"); term = gsub(term, "u", "ʊ")  end
-	if d == "s" then term = gsub(term, "a", "ɐ"); term = gsub(term, "e", "ɛ"); term = gsub(term, "i", "e"); term = gsub(term, "o", "ɔ"); term = gsub(term, "u", "o"); term = gsub(term, "ɪ", "i"); term = gsub(term, "ɪ́", "í"); term = gsub(term, "ų", "u")  end
-	if d == "n" then term = gsub(term, "a", "ə"); term = gsub(term, "e", "ə"); term = gsub(term, "i", "y"); term = gsub(term, "o", "ɔ"); term = gsub(term, "u", "ʊ"); term = gsub(term, "ɪ", "ɨ"); term = gsub(term, "ɪ́", "ɨ́"); term = gsub(term, "y", "ɪ")  end
+	-- Affricates
 	for _, aff in ipairs(affricates) do
 		term = gsub(term, aff[1], aff[2])
@@ Line 119: / Line 130: @@
 	ipa = ipa .. line_format(separate_word(term), {'Standard'})
-	if export.crux(term, "c") ~= export.crux(term) then
+	if export.crux(term, "n") ~= export.crux(term) then
 		ipa = ipa .. "\n* "
 		ipa = ipa .. line_format(separate_word(term, "n"), {'Northern'})
 	end
-	if export.crux(term, "s") ~= export.crux(term) then
+	if export.crux(term, "c") ~= export.crux(term) then
 		ipa = ipa .. "\n* "
 		ipa = ipa .. line_format(separate_word(term, "c"), {'Central'})
 	end
-	if export.crux(term, "n") ~= export.crux(term) then
+	if export.crux(term, "s") ~= export.crux(term) then
 		ipa = ipa .. "\n* "
 		ipa = ipa .. line_format(separate_word(term, "s"), {'Southern'})