Sware: 1 revision imported

2026-04-21T12:46:00Z

1 revision imported

← Older revision	Revision as of 12:46, 21 April 2026
(No difference)

wikt>Ow! That Hurts!: minor change

2025-12-13T04:29:49Z

minor change

New page

local export = {}

local PAGENAME = mw.loadData("Module:headword/data").pagename

function export.convert2(frame)
-- get arguments
local args = frame:getParent().args
local lang = frame.args[1] or error("Language code has not been specified.")
local font = frame.args[2] or 'annatar'
local text = frame.args[3] or PAGENAME
return export.convert(lang, font, text)
end

function export.convert(lang, font, text)
text = mw.ustring.gsub(text, '^wh', 'hw') -- Replaces word-initial "wh" with "hw" for rendering
text = mw.ustring.lower(text)
text = mw.ustring.gsub(text, 'appendix:[^/]+/', '') -- remove Appendix:<Language>/
text = '␂' .. text .. '␃' -- mark start and end of text
text = mw.ustring.gsub(text, '[\.]', '‡') -- unused character for syllable separator

if lang == 'qya' then -- Quenya
text = export.conv_qya(font, text)
elseif lang == 'sjn' then -- Sindarin, Tehtar mode
text = export.conv_sjn(font, text)
elseif lang == 'sjn2' then -- Sindarin, mode of Beleriand
text = export.conv_sjn2(font, text)
else
error("Language code is not supported.")
end
text = mw.ustring.gsub(text, '[‡␂␃]', '') -- remove syllable separator and start/end marks
return text
end

function export.tel2ana(text)
local repltel = {'', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '-', ',', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ''}
local replana = {'1Í', '1[', '1\'', 'q[', 'q\'', 'a[', 'a\'', 'z[', '2Ì', '2{', 'w{', 's{', 'x{', 'xè', '3[', 'c[', 'cé', '4Ì', '5Ì', '5{', '5"', 't{', 't"', 'hÍ', '7Í', '7\'', 'j´', 'j¸', '9Ï', '\\', '¹', '1', 'q', 'a', 'z', '2', 'w', 's', 'x', '3', 'e', 'd', 'c', '4', 'r', 'f', 'v', '5', 't', 'g', 'b', '6', 'y', 'h', 'n', '7', 'u', 'j', 'm', '8', 'i', 'k', ',', '9', 'o', 'l', 'l', '.', '~', '½', '`', ']', 'E', 'Õ', 'T', 'R', 'Y', 'å', 'U', '\+', 'â', 'ë'}

for i=1, #repltel do
text = mw.ustring.gsub(text, repltel[i], replana[i])
end

-- adjust diacritics to the letter width in Annatar
local vowdef = {'E', 'R', 'T', 'Y', 'U', 'Õ'}
local vowwide = {'#' ,'\$', '%', '\^', '&', 'Ô', ''}
local vowround = {'D' ,'F', 'G', 'H', 'J', 'Ö'}
local vownarr = {'C' ,'V', 'B', 'N', 'M', '×'}

for i=1, #vowdef do
text = mw.ustring.gsub(text, '([245rwtfsgvxbj][\'"´ÍÌÏ{[]?)'..vowdef[i], '%1'..vowwide[i])
text = mw.ustring.gsub(text, '([9~`][\'"´ÍÌÏ{[]?)'..vowdef[i], '%1'..vownarr[i])
text = mw.ustring.gsub(text, '([3ei,.][\'"´ÍÌÏ{[]?)'..vowdef[i], '%1'..vowround[i])
end
return text
end

function export.conv_qya(font, text)
-- merge duplicate transcriptions (replaced by the easier processable one)
local dublfind = {'x', 'z', 'qu', 'mb', 'nd', 'ng', 'nw', 'th', 'j', 'k', 'â', 'ê', 'î', 'ô', 'û'}
local duplrepl = {'cs', 'ss', 'cw', 'b', 'd', 'g', 'ñw', 'þ', 'y', 'c', 'á', 'é', 'í', 'ó', 'ú'}

for i=1, #dublfind do
text = mw.ustring.gsub(text, dublfind[i], duplrepl[i])
end

-- define arrays for conversion
local arfind = {'gw', 'ncw', 'ndy', 'nty', 'cc', 'dy', 'hl', 'hr', 'hw', 'hy', 'ld', 'll', 'ly', 'mm', 'mp', 'nc', 'nn', 'nt', 'ñw', 'ny', 'pp', 'ps', 'cs', 'cw', 'rd', 'rr', 'ry', 'ss', 'ts', 'tt', 'ty', 'b', 'c', 'd', 'f', 'g', 'h', 'l', 'm', 'n', 'ñ', 'p', 'r', 's', 't', 'v', 'w', 'y', 'þ', 'ai', 'au', 'eu', 'iu', 'oi', 'ui', 'á', 'é', 'í', 'ó', 'ú', 'a', 'e', 'i', 'o', 'u'}
local repltel = {'', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ''}

-- detect hiatus onsets
text = mw.ustring.gsub(text, '([äöë])([aeiou])', '%1%2')
text = mw.ustring.gsub(text, '([aeiou])([äöëaeo])', '%1%2')
text = mw.ustring.gsub(text, '([ei])(i)', '%1%2')
text = mw.ustring.gsub(text, '([ou])(u)', '%1%2')
text = mw.ustring.gsub(text, 'ä', 'a')
text = mw.ustring.gsub(text, 'ë', 'e')
text = mw.ustring.gsub(text, 'ö', 'o')

-- convert to Telcontar (base font, as it uses own codepoints)
for i=1, #arfind do
text = mw.ustring.gsub(text, arfind[i], repltel[i])
end

-- detect initial vowel
text = mw.ustring.gsub(text, '([^-])([])', '%1%2')

-- switch consonants, that have another form before vowels
local cons2find = {'', '', '', ''}
local cons2repl = {'', '', '', ''}
-- before short, long vowels and diphthongs
for i=1, 2 do
text = mw.ustring.gsub(text, cons2find[i]..'([])', cons2repl[i]..'%1')
end
-- before short vowels only
for i=3, 4 do
text = mw.ustring.gsub(text, cons2find[i]..'([])', cons2repl[i]..'%1')
end

if font == 'annatar' then -- covert to Annatar
text = export.tel2ana(text)
end
return text
end

function export.conv_sjn(font, text)
text = mw.ustring.gsub(text, 'f␃', 'v␃') -- final f to v

-- merge duplicate transcriptions (replaced by the easier processable one)
local dublfind = {'dh', 'ph', 'th', 'k', 'â', 'ê', 'î', 'ô', 'û', 'ŷ', 'œ', 'ai', 'ae', 'au', 'ei', 'oe', 'ui'}
local duplrepl = {'ð', 'f', 'þ', 'c', 'á', 'é', 'í', 'ó', 'ú', 'ý', 'e', 'aÿ', 'aj', 'aw', 'eÿ', 'oj', 'uÿ'}

for i=1, #dublfind do
text = mw.ustring.gsub(text, dublfind[i], duplrepl[i])
end

-- define arrays for conversion
local arfind = {'chw', 'nch', 'nþ', 'ch', 'ð', 'gh', 'gw', 'hw', 'lh', 'll', 'mb', 'mm', 'mp', 'nc', 'nd', 'ng', 'nn', 'nt', 'rh', 'rr', 'ss', 'þ', 'b', 'c', 'd', 'f', 'g', 'h', 'j', 'l', 'm', 'n', 'ŋ', 'p', 'r', 's', 't', 'v', 'w', 'á', 'é', 'í', 'ó', 'ú', 'ý', 'ÿ', '\''}
local repltel = {'', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ''}

-- detect initial i glide
text = mw.ustring.gsub(text, '([^a-zÿðþ])i([aeou])', '%1j%2')
-- detect initial ng
text = mw.ustring.gsub(text, '([^a-zÿðþ])ng([aeou])', '%1ŋ%2')
-- detect hiatus onsets
text = mw.ustring.gsub(text, '([äöë][aeiouy])', '%1')
text = mw.ustring.gsub(text, '([aeiouy][äöëao])', '%1')
text = mw.ustring.gsub(text, '([iy][iuy])', '%1')
text = mw.ustring.gsub(text, '([eu]e|oi|[eou]u)', '%1')
text = mw.ustring.gsub(text, 'ä', 'a')
text = mw.ustring.gsub(text, 'ë', 'e')
text = mw.ustring.gsub(text, 'ö', 'o')
-- detect final vowel
text = mw.ustring.gsub(text, '([^])([aeiouy][^a-zÿðþ])', '%1%2')

-- convert to Telcontar (base font, as it uses own codepoints)
for i=1, #arfind do
text = mw.ustring.gsub(text, arfind[i], repltel[i])
end

local vowfind = {'a', 'e', 'i', 'o', 'u', 'y'}
local vowrepl = {'', '', '', '', '', ''}

-- move vowel marks to the next consonant
for i=1, #vowfind do
text = mw.ustring.gsub(text, '([^])'..vowfind[i]..'([-][]?)', '%1%2'..vowrepl[i])
text = mw.ustring.gsub(text, '([^])'..vowfind[i]..'([-][]?)', '%1%2'..vowrepl[i]) -- excecute twice because of overlap
text = mw.ustring.gsub(text, vowfind[i], vowrepl[i])
end

-- switch consonants, that have another form before vowels
local cons2find = {'', '', ''}
local cons2repl = {'', '', ''}
-- before short, long vowels and diphthongs
text = mw.ustring.gsub(text, cons2find[1]..'([]?[-][])', cons2repl[1]..'%1')
-- carrying vowel mark
for i=2, 3 do
text = mw.ustring.gsub(text, cons2find[i]..'([])', cons2repl[i]..'%1')
end

if font == 'annatar' then -- covert to Annatar
text = export.tel2ana(text)
end

return text
end

function export.conv_sjn2(font, text)
text = mw.ustring.gsub(text, 'f␃', 'v␃') -- final f to v

-- merge duplicate transcriptions (replaced by the easier processable one)
local dublfind = {'dh', 'ph', 'th', 'k', 'â', 'ê', 'î', 'ô', 'û', 'ŷ'}
local duplrepl = {'ð', 'f', 'þ', 'c', 'á', 'é', 'í', 'ó', 'ú', 'ý'}

for i=1, #dublfind do
text = mw.ustring.gsub(text, dublfind[i], duplrepl[i])
end

-- define arrays for conversion
local arfind = {'chw', 'nch', 'nþ', 'ch', 'ð', 'gh', 'gw', 'hw', 'lh', 'mb', 'mm', 'mp', 'nc', 'nd', 'ng', 'nn', 'nt', 'rh', 'ss', 'þ', 'b', 'c', 'd', 'f', 'g', 'h', 'j', 'l', 'm', 'n', 'ŋ', 'p', 'r', 's', 't', 'v', 'w', 'ai', 'ae', 'au', 'ei', 'oe', 'ui', 'a', 'ä', 'e', 'ë', 'i', 'o', 'ö', 'u', 'y', 'œ', 'á', 'é', 'í', 'ó', 'ú', 'ý', '\''}
local repltel = {'', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ''}

-- detect initial ng
text = mw.ustring.gsub(text, '([^a-zðþ])ng([aeou])', '%1ŋ%2')
-- detect final au
text = mw.ustring.gsub(text, 'aw([^a-zðþ])', 'au%1')

-- convert to Telcontar (base font, as it uses own codepoints)
for i=1, #arfind do
text = mw.ustring.gsub(text, arfind[i], repltel[i])
end

if font == 'annatar' then -- covert to Annatar
text = export.tel2ana(text)
end

return text
end

return export

Module:tengwar - Revision history

Sware: 1 revision imported

wikt>Ow! That Hurts!: minor change