https://stockhub.co/index.php?action=history&feed=atom&title=Module%3ASandbox%2FErutuon%2Fscripts 2026-05-25T20:21:57Z Revision history for this page on the wiki MediaWiki 1.43.5 https://stockhub.co/index.php?title=Module:Sandbox/Erutuon/scripts&diff=145401&oldid=prev 2018-04-12T19:34:59Z

<p>fixed</p> <p><b>New page</b></p><div>local p = {}<br /> <br /> local cp_to_sc = require &#039;Module:Language/scripts&#039;.codepointToScript<br /> <br /> local function in_array(arr, val)<br /> for i, v in ipairs(arr) do<br /> if v == val then<br /> return true<br /> end<br /> end<br /> return false<br /> end<br /> <br /> local function mapIter(func, iter, iterable, initVal)<br /> local array = {}<br /> local i = 0<br /> for x, y in iter, iterable, initVal do<br /> i = i + 1<br /> array[i] = func(y, x, iterable)<br /> end<br /> return array<br /> end<br /> <br /> function p.list_chars_in_script(str)<br /> local scripts = {}<br /> for codepoint in mw.ustring.gcodepoint(str) do<br /> local script = cp_to_sc(codepoint)<br /> scripts[script] = scripts[script] or {}<br /> local char = mw.ustring.char(codepoint)<br /> if not in_array(scripts[script], char) then<br /> table.insert(scripts[script], char)<br /> end<br /> end<br /> <br /> for script, characters in pairs(scripts) do<br /> table.sort(characters)<br /> end<br /> <br /> return table.concat(<br /> mapIter(<br /> function (codepoints, script)<br /> return (&#039;\n* %s: %s&#039;)<br /> :format(script, table.concat(codepoints))<br /> end,<br /> pairs(scripts)))<br /> end<br /> <br /> function p.main(frame)<br /> return p.list_chars_in_script(frame.args[1])<br /> end<br /> <br /> return p</div>

imported>Erutuon