น เป นมอด ลท ถ กป องก นถาวรเน องจากม ความเส ยงส ง กร ณาอภ ปรายการเปล ยนแปลงใด ๆ ทางหน าค ย ค ณอาจส งคำขอแก ไข ไปย งผ ด แ

niepnmxdulthithukpxngknthawrenuxngcakmikhwamesiyngsung krunaxphipraykarepliynaeplngid thanghnakhuy khunxacsngkhakhxaekikh ipyngphuduaelrabbephuxihaekikhidhakepnkaraekikhthiimmikarkhdkhanhruxmikhwamehnphxngsnbsnun khunyngsamarthkhxihelikpxngknhnaidkhumuxkarichnganmxdul du aek prawti langaekhch karichngan swnnirxephimetimkhxmul khunsamarthchwyephimkhxmulswnniidpharamietxr name epnchuxkhxngtarang thaimrabucaimaesdngphl xacrabuepn MediaWiki Toc kid short hakrabu cathaih name xyubrrthdediywkbkhxmul aetthaimrabucathaih name xyubnsud aelalxyxyutrngklang delim iwichepntwaebngsahrbpharamietxr include exclude pre post khamatrthankhux sep iwichepntwaebngewlaaesdngphl TOC khamatrthankhux chxngwang samarthkahndepnxyangxun echn id pre epnraykarxairkidthitxngkarihaesdngphlkxnlingkthisrangkhunodyxtonmti echn top bnsud post epnraykarxairkidthitxngkarihaesdngphlhlnglingkthisrangkhunodyxtonmti echn xangxing xangxing prebreak epntwkhnrahwang pre kbchudkhxmul odypkticamikhaepn sep xacrabuepn lt br gt haktxngkarih pre kbchudkhxmulxyukhnlabrrthdkn postbreak epntwkhnrahwang post kbchudkhxmul odypkticamikhaepn sep xacrabuepn lt br gt haktxngkarih post kbchudkhxmulxyukhnlabrrthdkn include epnraykarhweruxngthitxngkarihrwmepnkrniphiess echn 0 9 exclude epnraykarhweruxngthitxngkarihnaxxkepnkrniphiess top hakkahnd camilingkoyngipyngbnsudkhxnghna odymichuxaesdngphllingktamthikahndiw khamatrthankhuxkhawang nnkhuximaesdngphl anchor cbkb anchor thisrangphanaemaebb anchor dwy title hakkahndcadungkhxmulcakhnann khamatrthankhuxhnapccubnthikalngepidxyu prefix hakkahnd caiskhxkhwamaesdngphllingkcamikhxkhwamnietimekhaipkhanghna suffix hakkahnd caiskhxkhwamaesdngphllingkcamikhxkhwamnietimekhaipdanhlng level rwbrwmlingkthimikhwamyawnxykwahruxethakb level masrangtarang khamatrthankhux 1khxcakd emuxmikarepliynaeplnghwkhxyxy xaccatxngthakarlangaekhchesirfewxresiykxn cungcaaesdngphlthuktxngduephim drrchnixtonmti khumuxkarichnganthipraktdanbnnidungmacak mxdul AutomaticTOC doc aek prawti phuekhiynsamarththakarthdlxngidthikrabathray aek dukhwamaetktang aelachudthdsxb srang khxngmxdulni hnayxykhxngmxdulni z main function function z main frame local args frame args local title handle param args title nil title title and mw title new args title or mw title getCurrentTitle local delim handle param args delim local sep handle param args sep local short handle param args short nil local name handle param args name name name and or name name short and name or lt center gt name lt center gt n n local include args include and Set Split args include delim or local exclude args exclude and Set Split args exclude delim or local pre args pre and Split args pre delim or local prebreak handle param args prebreak sep local post args post and Split args post delim or local postbreak handle param args postbreak sep local prefix handle param args prefix local suffix handle param args suffix local anchor handle param args anchor nil local wiki text title getContent local all local level handle param tonumber args level 1 eval function v v v match s s if v then if mw ustring len v lt level or include v then table insert all v end end end for line in wiki text gmatch n do eval string gsub line match s s s or b if anchor then for v in pairs Split line match Aa nchor or do eval v end end end table sort all function a b return mw ustring codepoint a lt mw ustring codepoint b end complete list for k v in pairs all do if not exclude v and k 0 or k gt 0 and all k 1 v then table insert complete list table concat v prefix v suffix end end local cat error Category hnathiaemaebbdrrchnixtonmtithanganphidphlad if complete list 0 then return errorPrinter no section link found cat error end if pre 0 then prebreak end if post 0 then postbreak end out class toccolours style margin 0px auto n name table concat pre sep prebreak table concat complete list sep postbreak table concat post sep NOTOC n if args db then out lt pre gt out lt pre gt end return frame preprocess out end handle parameter function handle param value default if value nil or value then return default else return value end end from Module Coordinates function errorPrinter errors local result for i v in ipairs errors do local errorHTML lt strong class error gt AutomaticTOC v 2 lt strong gt result result errorHTML lt br gt end return result end http stackoverflow com questions 656199 search for an item in a lua list function Set list local set for l in pairs list do set l true end return set end http lua users org wiki SplitJoin function Split str delim maxNb Eliminate bad cases if string find str delim nil then if str then return else return str end end if maxNb nil or maxNb lt 1 then maxNb 0 No limit end local result local pat delim local nb 0 local lastPos for part pos in string gfind str pat do nb nb 1 result nb part lastPos pos if nb maxNb then break end end Handle the last field if nb maxNb then nb nb 1 result nb string sub str lastPos end if result nb then table remove result nb end return result end return z 2 May 2013 Thanks to en User Darklama for helping improving the code