Modulo:Iletra ti bilang
Dokumentasion ti modulo
Daytoy a modulo ket mangala iti bilang ken mangisubli iti kapada iti balikas nga Ilokano. Kas pagarigan, ti "2" ket agbalin a "dua" ken ti "79" ket agbalin a "pitopulo ket siam". Dagiti bilang ket nasken a sibubukel a bilang a nagbaetan ti 0 ken 100.
Pagabusar
urnosen{{#invoke:Iletra ti bilang|main|bilang}}
Dagiti pagarigan
urnosen{{#invoke:Iletra ti bilang|main|8}}
→ walo{{#invoke:Iletra ti bilang|main|56}}
→ limapulo ket innem{{#invoke:Iletra ti bilang|main|101}}
→ Biddut: ti maikabil ket nasken a maysa a sibubukel a bilang a nagbaetan ti 0 ken 100
-- This module converts a number into its written Ilokano form.
-- For example, "2" becomes "dua", and "79" becomes "pitopulo ket siam".
local getArgs = require('Modulo:Dagiti argumento').getArgs
local p = {}
local max = 100 -- The maximum number that can be parsed.
local ones = {
[0] = 'sero',
[1] = 'maysa',
[2] = 'dua',
[3] = 'tallo',
[4] = 'uppat',
[5] = 'lima',
[6] = 'innem',
[7] = 'pito',
[8] = 'walo',
[9] = 'siam'
}
local specials = {
[10] = 'sangapulo',
[20] = 'duapulo',
[30] = 'tallopulo',
[40] = 'uppat a pulo',
[50] = 'limapulo',
[60] = 'innem a pulo',
[70] = 'pitopulo',
[80] = 'walopulo',
[90] = 'siam a pulo',
[100] = 'sangagasut'
}
local formatRules = {
{num = 90, rule = 'siam a pulo ket %s'},
{num = 80, rule = 'walopulo ket %s'},
{num = 70, rule = 'pitopulo ket %s'},
{num = 60, rule = 'innem a pulo ket %s'},
{num = 50, rule = 'limapulo ket %s'},
{num = 40, rule = 'uppat a pulo ket %s'},
{num = 30, rule = 'tallopulo ket %s'},
{num = 20, rule = 'duapulo ket %s'},
{num = 10, rule = 'sangapulo ket %s'}
}
function p.main(frame)
local args = getArgs(frame)
local num = tonumber(args[1])
local success, result = pcall(p._main, num)
if success then
return result
else
return string.format('<strong class="error">Biddut: %s</strong>', result) -- "result" is the error message.
end
return p._main(num)
end
function p._main(num)
if type(num) ~= 'number' or math.floor(num) ~= num or num < 0 or num > max then
error('ti maikabil ket nasken a maysa a sibubukel a bilang a nagbaetan ti 0 ken ' .. tostring(max), 2)
end
-- Check for numbers from 0 to 9.
local onesVal = ones[num]
if onesVal then
return onesVal
end
-- Check for special numbers.
local specialVal = specials[num]
if specialVal then
return specialVal
end
-- Construct the number from its format rule.
onesVal = ones[num % 10]
if not onesVal then
error('Adda di nanamnama a biddut iti panagwaswas ti naikabil ' .. tostring(num))
end
for i, t in ipairs(formatRules) do
if num >= t.num then
return string.format(t.rule, onesVal)
end
end
error('Awan ti alagaden a pormat para iti naikabil ' .. tostring(num))
end
return p