モジュール:cu-pronunciation

このモジュールは古代教会スラヴ語をIPAに自動的に変換します。このモジュールを使用したことがない場合は「<jь>の転写方法」を読んでください。

使い方[編集]

このモジュールはそのままでは使えません。代わりに {{cu-IPA}} を使ってください。このテンプレートは自動で語彙を読み取り、転写します。ただし、その語彙が略語であったり、不規則な綴りが含まれていたり、音素 <jь> を含んでいる場合は、引数 |1= に正確なものを入力する必要があります。<jь> に関しては次のセクションを読んでください。

<jь>の転写方法[編集]

残念ながら、この音素は文章では <і> と <ji> が区別されないため、テンプレートも区別することができません。そのため、引数 |1= に手動で、語彙中の <jь> を「й」に直した上で入力する必要があります。

local export = {}

local rsubn = mw.ustring.gsub
local U = mw.ustring.char

local TIE = U(0x361)
local BREVE = U(0x306)
local DENTAL = U(0x32A)
local SYLLABIC = U(0x329)
local FRONTED = U(0x31F)
local RETRACTED = U(0x320)
local NASAL= U(0x303)
local vowels = "aæɛiɪɔuʊɯɔ̃ɛ̃"
local vowels_c = "[" .. vowels .. "]"
local cons = "bvɡdʒzjkɫʎmnɲpɾrstfxʃɕʑ"  .. TIE .. BREVE .. DENTAL
local diacritics = TIE .. BREVE .. DENTAL .. SYLLABIC .. FRONTED  .. RETRACTED .. NASAL

-- characters that map to IPA sounds
local phonetic_chars_map = {
	["а"] = "ɑ",
	["б"] = "b",
	["в"] = "v",
	["г"] = "ɡ",
	["д"] = "d" .. DENTAL,
	["е"] = "ɛ" .. RETRACTED,
	["є"] = "ɛ" .. RETRACTED,
	["ж"] = "ʒ",
	["ѕ"] = "d" .. DENTAL .. TIE .. "z" .. DENTAL,
	["ꙃ"] = "d" .. TIE .. "z",
	["ꙁ"] = "z" .. DENTAL,
	["з"] = "z" .. DENTAL,
	["и"] = "i",
	["й"] = "jь",
	["і"] = "i",
	["ї"] = "i",
	["к"] = "k",
	["л"] = "ɫ" .. DENTAL,
	["м"] = "m",
	["н"] = "n" .. DENTAL,
	["о"] = "ɔ" .. FRONTED,
	["п"] = "p",
	["р"] = "ɾ" .. DENTAL,
	["с"] = "s" .. DENTAL,
	["т"] = "t" .. DENTAL,
	["ꙋ"] = "u",
	["ф"] = "f",
	["х"] = "x",
	["ѿ"] = "ɔt" .. DENTAL .. "ʊ" .. BREVE,
	["ц"] = "t" .. DENTAL .. TIE .. "s" .. DENTAL,
	["ч"] = "t" .. TIE .. "ʃ",
	["ш"] = "ʃ",
	["щ"] = "ʃt",
	["ꙑ"] = "ɯ",
	["ы"] = "ɯ",
	["ѣ"] = "æ",
	["ѫ"] = "ɔ" .. NASAL,
	["ѧ"] = "ɛ" .. NASAL,
	["я"] = "ɛ" .. NASAL,
	["ю"] = "ju",
	["ꙗ"] = "jɑ",
	["ѥ"] = "jɛ",
	["ꙓ"] = "jæ",
	["ꙙ"] = "jɛ" .. NASAL,
	["ѩ"] = "jɛ" .. NASAL,
	["ѭ"] = "jɔ" .. NASAL,
	["ѳ"] = "t" .. DENTAL,
	["ѯ"] = "kʊ" .. BREVE .. "s" .. DENTAL,
	["ѱ"] = "pʊ" .. BREVE .. "s" .. DENTAL,
	["ѡ"] = "ɔ",
	["ꙉ"] = "ʒd",
	["ѻ"] = "ɔ",
	["ꙍ"] = "ɔ",
	["ѽ"] = "ɔ",
	["у"] = "y",
	["ѵ"] = "y",
	["҇"] = "ʲ",
	["҄"] = "ʲ"
}

-- version of rsubn() that discards all but the first return value
local function rsub(term, foo, bar)
	local retval = rsubn(term, foo, bar)
	return retval
end
 
function export.toIPA(term)
	term = mw.ustring.toNFC(mw.ustring.lower(term))

	-- Change Cyrillic glyphs to IPA symbols
	term = rsub(term, ".", phonetic_chars_map)
	-- Change y into its actual sound value
	term = rsub(term, "ɔ" .. FRONTED .. "y", "u")
	term = rsub(term, "([" .. vowels .. "][" .. diacritics .. "])y", "%1v")
	term = rsub(term, "([" .. vowels .. "])y", "%1v")
	term = rsub(term, "([" .. cons .. "#])y", "%1i")
	-- Change j to ʲ after consonants
	term = rsub(term, "([" .. cons .. "#])j", "%1ʲ")
	-- Palatalize dental consonants
	term = rsub(term, "ɫ" .. DENTAL .. "ʲ", "ʎ")
	term = rsub(term, "ɾ" .. DENTAL .. "ʲ", "ɾʲ")
	term = rsub(term, "n" .. DENTAL .. "ʲ", "ɲ")
	term = rsub(term, "ʒd" .. DENTAL, "ʒd")
	term = rsub(term, "ʃt" .. DENTAL, "ʃt")
	-- Handle nasal gamma in Greek loanwords
	term = rsub(term, "[nɡ]" .. DENTAL .. "?([ɡk])", "n" .. DENTAL .. "ъ%1")
	-- Remove yers succeeding a syllabic liquid
	term = rsub(term, "([" .. cons .."])ɾ" .. DENTAL .. "ъ([" .. cons .."])", "%1r" .. SYLLABIC .. "%2")
	term = rsub(term, "([" .. cons .."])ɫ" .. DENTAL .. "ъ([" .. cons .."])", "%1ɫ" .. SYLLABIC .. "%2")
	term = rsub(term, "([" .. cons .."])ɾ" .. DENTAL .. "ь([" .. cons .."])", "%1r" .. SYLLABIC .. "%2")
	term = rsub(term, "([" .. cons .."])ɫ" .. DENTAL .. "ь([" .. cons .."])", "%1ɫ" .. SYLLABIC .. "%2")
	-- Raise tense yers
	term = rsub(term, "ъj", "ɯj")
	term = rsub(term, "ьj", "ij")
	-- Then change strong yers into IPA
	term = rsub(term, "ь([zs][" .. diacritics .. "][tdn][" .. diacritics .. "][ɫɾ][" .. diacritics .. "])([ъьʊɪ])", "ɪ%1%2")
	term = rsub(term, "ь([zs][" .. diacritics .. "][tdn][" .. diacritics .. "])([ъьʊɪ])", "ɪ%1%2")
	term = rsub(term, "ь([zs][" .. diacritics .. "][mkg])([ъьʊɪ])", "ɪ%1%2")
	term = rsub(term, "ь([gv][tdnɾɫsz][" .. diacritics .. "])([ъьʊɪ])", "ɪ%1%2")
	term = rsub(term, "ь([gv][ɲ])([ъьʊɪ])", "ɪ%1%2")
	term = rsub(term, "ь([" .. cons .."][" .. diacritics .. "])([ъьʊɪ])", "ɪ%1%2")
	term = rsub(term, "ь([" .. cons .."])([ъьʊɪ])", "ɪ%1%2")
	term = rsub(term, "ъ([zs][" .. diacritics .. "][tdn][" .. diacritics .. "][ɫɾ][" .. diacritics .. "])([ъьʊɪ])", "ʊ%1%2")
	term = rsub(term, "ъ([zs][" .. diacritics .. "][tdn][" .. diacritics .. "])([ъьʊɪ])", "ʊ%1%2")
	term = rsub(term, "ъ([zs][" .. diacritics .. "][mkg])([ъьʊɪ])", "ʊ%1%2")
	term = rsub(term, "ъ([gv][tdnɾɫsz][" .. diacritics .. "])([ъьʊɪ])", "ʊ%1%2")
	term = rsub(term, "ъ([gv][ɲ])([ъьʊɪ])", "ʊ%1%2")
	term = rsub(term, "ъ([" .. cons .."][" .. diacritics .. "])([ъьʊɪ])", "ʊ%1%2")
	term = rsub(term, "ъ([" .. cons .."])([ъьʊɪ])", "ʊ%1%2")
	-- Finally do the same for weak yers
	term = rsub(term, "ь", "ɪ" .. BREVE)
	term = rsub(term, "ъ", "ʊ" .. BREVE)
    -- Iotate i, ɛ, ɛ̃, æ, and optionally a at the start of a word and after a vowel
	term = rsub(term, "%f[%a%-" .. DENTAL .. FRONTED .. "]([iɛæ])", "j%1")
	term = rsub(term, "([" .. vowels .. "])([iɛæ])", "j%1")
	term = rsub(term, "%f[%a%-" .. DENTAL .. FRONTED .. "]ɑ", "(j)ɑ")
	return term
end

function export.show(frame)
	local params = {
		[1] = {}
	}

	local title = mw.title.getCurrentTitle()
	
	local args = require("モジュール:parameters").process(frame:getParent().args, params)
	local term = args[1] or title.nsText == "テンプレート" and "примѣръ" or title.text
	
	local ipa = export.toIPA(term)

	ipa = "[" .. ipa .. "]"
	ipa = require("モジュール:IPA").format_IPA_full(require("モジュール:languages").getByCode("cu"), { { pron = ipa } } )

	return ipa
end

return export

モジュール:cu-pronunciation

使い方[編集]

<jь>の転写方法[編集]

案内メニュー

検索