https://stockhub.co/index.php?action=history&feed=atom&title=Module%3APinyinModule:Pinyin - Revision history2026-05-27T10:36:42ZRevision history for this page on the wikiMediaWiki 1.43.5https://stockhub.co/index.php?title=Module:Pinyin&diff=144304&oldid=previmported>Underbar dk at 09:29, 12 March 20142014-03-12T09:29:05Z<p></p>
<p><b>New page</b></p><div>local p = {}<br />
<br />
function attachTone(a, n)<br />
n = tonumber(n)<br />
if a == "a" then<br />
if n == 1 then return "ā" end<br />
if n == 2 then return "á" end<br />
if n == 3 then return "ǎ" end<br />
if n == 4 then return "à" end<br />
return a<br />
<br />
end<br />
<br />
if a == "A" then<br />
if n == 1 then return "Ā" end<br />
if n == 2 then return "Á" end<br />
if n == 3 then return "Ǎ" end<br />
if n == 4 then return "À" end<br />
return a<br />
<br />
end<br />
<br />
if a == "e" then<br />
if n == 1 then return "ē" end<br />
if n == 2 then return "é" end<br />
if n == 3 then return "ě" end<br />
if n == 4 then return "è" end<br />
return a<br />
<br />
end<br />
<br />
if a == "E" then<br />
if n == 1 then return "Ē" end<br />
if n == 2 then return "É" end<br />
if n == 3 then return "Ě" end<br />
if n == 4 then return "È" end<br />
return a<br />
<br />
end<br />
<br />
if a == "i" then<br />
if n == 1 then return "ī" end<br />
if n == 2 then return "í" end<br />
if n == 3 then return "ǐ" end<br />
if n == 4 then return "ì" end<br />
return a<br />
<br />
end<br />
<br />
if a == "O" then<br />
if n == 1 then return "Ō" end<br />
if n == 2 then return "Ó" end<br />
if n == 3 then return "Ŏ" end<br />
if n == 4 then return "Ò" end<br />
return a<br />
<br />
end<br />
<br />
if a == "o" then<br />
if n == 1 then return "ō" end<br />
if n == 2 then return "ó" end<br />
if n == 3 then return "ǒ" end<br />
if n == 4 then return "ò" end<br />
return a<br />
<br />
end<br />
<br />
if a == "u" then<br />
if n == 1 then return "ū" end<br />
if n == 2 then return "ú" end<br />
if n == 3 then return "ǔ" end<br />
if n == 4 then return "ù" end<br />
return a<br />
<br />
end<br />
<br />
if (a == "v") or (a == "ü") then<br />
if n == 1 then return "ǖ" end<br />
if n == 2 then return "ǘ" end<br />
if n == 3 then return "ǚ" end<br />
if n == 4 then return "ǜ" end<br />
return "ü"<br />
<br />
end<br />
<br />
if a == "Ê" then<br />
if n == 1 then return "E&#770;&#772;" end<br />
if n == 2 then return "Ế" end<br />
if n == 3 then return "E&#770;&#780;" end<br />
if n == 4 then return "Ề" end<br />
return a<br />
<br />
end<br />
<br />
if a == "ê" then<br />
if n == 1 then return "e&#770;&#772;" end<br />
if n == 2 then return "ế" end<br />
if n == 3 then return "e&#770;&#780;" end<br />
if n == 4 then return "ề" end<br />
return a<br />
<br />
end<br />
<br />
if a == "N" then<br />
if n == 2 then return "Ń" end<br />
if n == 3 then return "Ň" end<br />
if n == 4 then return "Ǹ" end<br />
return a<br />
<br />
end<br />
if a == "n" then<br />
if n == 2 then return "ń" end<br />
if n == 3 then return "ň" end<br />
if n == 4 then return "ǹ" end<br />
return a<br />
end<br />
<br />
if a == "M" then<br />
if n == 2 then return "Ḿ" end<br />
if n == 4 then return "M&#x300;" end<br />
return a<br />
end<br />
if a == "m" then<br />
if n == 2 then return "ḿ" end<br />
if n == 4 then return "m&#x300;" end<br />
return a<br />
end<br />
<br />
return a<br />
<br />
end<br />
<br />
<br />
function selectVowel(chara, n)<br />
<br />
if not chara then<br />
return<br />
end<br />
<br />
if chara:find('^.*A') then<br />
return chara:gsub("A", attachTone("A", n))<br />
end<br />
if chara:find('^.*a') then<br />
return chara:gsub("a", attachTone("a", n))<br />
end<br />
<br />
if chara:find('^.*E') then<br />
return chara:gsub("E", attachTone("E", n))<br />
end<br />
if chara:find('^.*e') then<br />
return chara:gsub("e", attachTone("e", n))<br />
end<br />
<br />
if chara:find('^.*Ê') then<br />
return chara:gsub("Ê", attachTone("Ê", n))<br />
end<br />
if chara:find('^.*ê') then<br />
return chara:gsub("ê", attachTone("ê", n))<br />
end<br />
<br />
if chara:find('^.*iu') then<br />
return chara:gsub("iu", "i"..attachTone("u", n))<br />
end<br />
if chara:find('^.*i') then<br />
return chara:gsub("i", attachTone("i", n))<br />
end<br />
<br />
if chara:find('^.*O') then<br />
return chara:gsub("O", attachTone("O", n))<br />
end<br />
if chara:find('^.*o') then<br />
return chara:gsub("o", attachTone("o", n))<br />
end<br />
<br />
if chara:find('^.*u') then<br />
return chara:gsub("u", attachTone("u", n))<br />
end<br />
<br />
if chara:find('^.*v') then<br />
return chara:gsub("v", attachTone("v", n))<br />
end<br />
if chara:find('^.*ü') then<br />
return chara:gsub("ü", attachTone("ü", n))<br />
end<br />
<br />
if chara:find('^.*N') then<br />
return chara:gsub("N", attachTone("N", n))<br />
end<br />
if chara:find('^.*n') then<br />
return chara:gsub("n", attachTone("n", n))<br />
end<br />
<br />
if chara:find('^.*M') then<br />
return chara:gsub("M", attachTone("M", n))<br />
end<br />
if chara:find('^.*m') then<br />
return chara:gsub("m", attachTone("m", n))<br />
end<br />
end<br />
<br />
function p.pinyin(frame)<br />
local input = frame.args[1]<br />
if not input then<br />
return<br />
end<br />
local ve = input:gsub("nue", "nve"):gsub("lue", "lve")<br />
local out = ve:gsub("([%aüÊê]+)(%d)", selectVowel)<br />
return (out:gsub("v", "ü"))<br />
end<br />
<br />
<br />
return p</div>imported>Underbar dk