မော်ဂျူး:Corporate Number Inspection
ပုံပန်းသွင်ပြင်
မော်ဂျူးမှတ်တမ်းလက်စွဲ[ဖန်တီး]
သင့်အနေဖြင့် ဤ Scribunto module အတွက် အသုံးပြုလက်စွဲ စာမျက်နှာကို ဖန်တီး နိုင်ပါသည်။ တည်းဖြတ်သူများအနေဖြင့် ဤမော်ဂျူး၏ sandbox (ဖန်တီး | ပုံတူပွား) နှင့် testcases (ဖန်တီး) စာမျက်နှာများကို စမ်းသပ်နိုင်ပါသည်။ စာမျက်နှာခွဲ /doc တွင် ကဏ္ဍများထည့်သွင်းပါ။ ဤ မော်ဂျူး ၏ စာမျက်နှာခွဲများ။. |
require('strict')
local p = {}
function p.check(id)
--[[
-- Inspect the Corporate Number
-- Returns true if the string id is a valid corporate number,
-- Otherwise, return false.
]]--
id = id:match('^%s*([1-9]%d%d%d%d%d%d%d%d%d%d%d%d)%s*$')
if not id then return false end
local work = 0
for i = 1, 13 do
work = work + tonumber(id:sub(i, i)) * (2 - i % 2)
end
return work % 9 == 0
end
function p.main(frame)
return p.check(frame.args[1] or '') and '' or 'error'
end
return p