求闻百科
搜索
切换搜索
切换菜单
切换个人菜单
查看“Module:NumberSpell/sandbox”的源代码
求闻百科,共笔求闻
模块
讨论
更多操作
←
Module:NumberSpell/sandbox
因为下列原因,您没有权限编辑本页。请逐条确认下列问题是否解决后再试。
您所请求的操作,仅限具有
注册用户
权限的
用户
执行。
若您尚未登录求闻百科账号,请您
登录
求闻百科账号后操作。
您尚未完成实名制验证,因此操作受限。请尽快
完成实名制验证
,或联系
裁决委员会
以
获取操作权限
。
注:若您是非中国大陆用户,您应当联络电子邮件staff
qiuwen.org以获得帮助。
您尚未完成
电子邮件确认
,因此操作受限,请尽快
完成电子邮件确认
。
若您无法完成前述手续,请参考
帮助文档
,或通过适当渠道请求管理员或裁决委员协助。
根据《中华人民共和国网络安全法》规定,您必须
登录您的账号
才能编辑求闻百科页面。
若您无法完成前述手续,请通过适当渠道请求管理员或裁决委员协助。
您可以查看和复制此页面的源代码。
若您无权编辑本页面,您可以
提出编辑请求
,提请有权限者代为编辑。
-- This module converts a number into its written English form. -- For example, "2" becomes "two", and "79" becomes "seventy-nine". local getArgs = require('Module:Arguments').getArgs local p = {} local max = 100 -- The maximum number that can be parsed. local ones = { [0] = 'zero', [1] = 'one', [2] = 'two', [3] = 'three', [4] = 'four', [5] = 'five', [6] = 'six', [7] = 'seven', [8] = 'eight', [9] = 'nine' } local specials = { [10] = 'ten', [11] = 'eleven', [12] = 'twelve', [13] = 'thirteen', [15] = 'fifteen', [18] = 'eighteen', [20] = 'twenty', [30] = 'thirty', [40] = 'forty', [50] = 'fifty', [60] = 'sixty', [70] = 'seventy', [80] = 'eighty', [90] = 'ninety', [100] = 'one hundred' } local formatRules = { {num = 90, rule = 'ninety-%s'}, {num = 80, rule = 'eighty-%s'}, {num = 70, rule = 'seventy-%s'}, {num = 60, rule = 'sixty-%s'}, {num = 50, rule = 'fifty-%s'}, {num = 40, rule = 'forty-%s'}, {num = 30, rule = 'thirty-%s'}, {num = 20, rule = 'twenty-%s'}, {num = 10, rule = '%steen'} } 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">Error: %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('input must be an integer between 0 and ' .. 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('Unexpected error parsing input ' .. tostring(num)) end for i, t in ipairs(formatRules) do if num >= t.num then return string.format(t.rule, onesVal) end end error('No format rule found for input ' .. tostring(num)) end return p