48,357
edits
Module:qlu-pron: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
| Line 183: | Line 183: | ||
for cluster, _ in pairs(clusters) do | for cluster, _ in pairs(clusters) do | ||
word = gsub(word, "(" .. cluster .. vowels .. "+" .. consonants .. "?)", "·%1·") | word = gsub(word, "(" .. cluster .. vowels .. "+" .. consonants .. "?)", "·%1·") | ||
word = gsub(word, "(" .. consonants .. "+)·(" .. consonants .. "+)", function(c1,c2) return match(c1 .. c2, cluster) and "·" .. c1 .. c2 or c1 .. "·" .. c2 end) | |||
end | end | ||
word = gsub(word, "(" .. consonants | --word = gsub(word, "(" .. consonants .. vowels .. "+" .. consonants .. "?)", "·%1·") | ||
word = gsub(word, "··", "·"); word = gsub(word, "·$", ""); word = gsub(word, "^·", "") | --word = gsub(word, "··", "·"); word = gsub(word, "·$", ""); word = gsub(word, "^·", "") | ||
word = gsub(word, "(" .. consonants .. ")·(" .. vowels .. ")", "·%1%2") | --word = gsub(word, "(" .. consonants .. ")·(" .. vowels .. ")", "·%1%2") | ||
word = gsub(word, "·?(" .. consonants .. ")%1(" .. vowels .. "*)", "%1·%1%2") | --word = gsub(word, "·?(" .. consonants .. ")%1(" .. vowels .. "*)", "%1·%1%2") | ||
word = gsub(word, "·(" .. consonants .. ")$", "%1"); word = gsub(word, "^(" .. consonants .. ")·", "%1") | --word = gsub(word, "·(" .. consonants .. ")$", "%1"); word = gsub(word, "^(" .. consonants .. ")·", "%1") | ||
word = gsub(word, "·(.)·", "%1·") | --word = gsub(word, "·(.)·", "%1·") | ||
--word = gsub(word, "·s(" .. voiceless .. ")", "s·%1") | --word = gsub(word, "·s(" .. voiceless .. ")", "s·%1") | ||
--word = gsub(word, "(" .. consonants .. ")s·(" .. voiceless .. ")", "%1·s%2") | --word = gsub(word, "(" .. consonants .. ")s·(" .. voiceless .. ")", "%1·s%2") | ||
word = gsub(word, "ï(" .. vowels .. ")", "i·%1") | --word = gsub(word, "ï(" .. vowels .. ")", "i·%1") | ||
word = gsub(word, "·?d([ʤʣ])", "d·%1"); word = gsub(word, "·tʦ", "t·ʦ") | --word = gsub(word, "·?d([ʤʣ])", "d·%1"); word = gsub(word, "·tʦ", "t·ʦ") | ||
word = gsub(word, "·?ŋg", "ŋ·g"); word = gsub(word, "··", "·") | --word = gsub(word, "·?ŋg", "ŋ·g"); word = gsub(word, "··", "·") | ||
end | end | ||