अनुखंड:Roman
"इस मॉड्यूल हेतु प्रलेख अनुखंड:Roman/doc पर बनाया जा सकता है"
-- This module implements {{Roman}}.local p = {}-- This function implements the {{overline}} template.local function overline(s) return mw.ustring.format( '<span style="text-decoration:overline;">%s</span>', s )end-- Gets the Roman numerals for a given numeral table. Returns both the string of-- numerals and the value of the number after it is finished being processed.local function getLetters(num, t) local ret = {} for _, v in ipairs(t) do local val, letter = unpack(v) while num >= val do num = num - val table.insert(ret, letter) end end return table.concat(ret), numend-- The main control flow of the module.local function _main(args) -- Get input and exit displaying nothing if the input is empty. if args[1] == nil then return end local num = tonumber(args[1]) if not num or num < 0 or num == math.huge then error('Invalid number ' .. args[1], 2) elseif num == 0 then return 'N' end -- Return a message for numbers too big to be expressed in Roman numerals. if num >= 5000000 then return args[2] or 'N/A' end local ret = '' -- Find the Roman numerals for the large part of numbers. -- 23 April 2016 - tweaked to >= 4000 to accept big Roman 'IV' -- The if statement is not strictly necessary, but makes the algorithm -- more efficient for smaller numbers. if num >= 4000 then local bigRomans = { { 1000000, 'M' }, { 900000, 'CM' }, { 500000, 'D' }, { 400000, 'CD' }, { 100000, 'C' }, { 90000, 'XC' }, { 50000, 'L' }, { 40000, 'XL' }, { 10000, 'X' }, { 9000, 'IX' }, { 5000, 'V' }, { 4000, 'IV' }, } local bigLetters bigLetters, num = getLetters(num, bigRomans) ret = overline(bigLetters) end -- Find the Roman numerals for numbers less than the big Roman threshold. local smallRomans = { { 1000, 'M' }, { 900, 'CM' }, { 500, 'D' }, { 400, 'CD' }, { 100, 'C' }, { 90, 'XC' }, { 50, 'L' }, { 40, 'XL' }, { 10, 'X' }, { 9, 'IX' }, { 5, 'V' }, { 4, 'IV' }, { 1, 'I' } } local smallLetters = getLetters( num, smallRomans ) ret = ret .. smallLetters if args.fraction == 'yes' then -- Find the Roman numerals for the fractional parts of numbers. -- If num is not a whole number, add half of 1/1728 (the smallest unit) to equate to rounding. -- Ensure we're not less than the smallest unit or larger than 1 - smallest unit -- to avoid getting two "half" symbols or no symbols at all num = num - math.floor(num) if num ~= 0 then num = math.max(1.1/1728, math.min(1727.1/1728, num + 1/3456)) end local fractionalRomans = { { 1/2, 'S' }, { 5/12, "''':'''•''':'''" }, { 1/3, "'''::'''" }, { 1/4, "''':'''•" }, { 1/6, "''':'''" }, { 1/12, '•' }, { 1/24, 'Є' }, { 1/36, 'ƧƧ' }, { 1/48, 'Ɔ' }, { 1/72, 'Ƨ' }, { 1/144, 'ƻ' }, { 1/288, '℈' }, { 1/1728, '»' }, } local fractionalLetters = getLetters(num, fractionalRomans) ret = ret .. fractionalLetters end return retendfunction p.main(frame) -- If called via #invoke, use the args passed into the invoking -- template, or the args passed to #invoke if any exist. Otherwise -- assume args are being passed directly in from the debug console -- or from another Lua module. local origArgs if frame == mw.getCurrentFrame() then origArgs = frame:getParent().args for k, v in pairs(frame.args) do origArgs = frame.args break end else origArgs = frame end -- Trim whitespace and remove blank arguments. local args = {} for k, v in pairs(origArgs) do if type( v ) == 'string' then v = mw.text.trim(v) end if v ~= '' then args[k] = v end end -- exit if not given anything if args == nil or args == {} then return end -- Given mathematical expression, simplify to a number if type(args[1]) == 'string' then args[1] = mw.ext.ParserFunctions.expr(args[1]) end return _main(args)endreturn p
🔥 Top keywords: सट्टासुनील छेत्रीक्लियोपाट्रा ७मुखपृष्ठविशेष:खोजभारत के राज्य तथा केन्द्र-शासित प्रदेशपृथ्वीराज चौहानभारत के प्रधान मंत्रियों की सूचीस्वाति मालीवालभारतीय आम चुनाव, 2019ब्लू (2009 फ़िल्म)भारतीय आम चुनाव, 2024नरेन्द्र मोदीभारत का संविधानलोक सभारासायनिक तत्वों की सूचीहिन्दी की गिनतीलोकसभा सीटों के आधार पर भारत के राज्यों और संघ क्षेत्रों की सूचीकबीरभीमराव आम्बेडकरहिन्दीभारतीय राष्ट्रीय कांग्रेसभारतमिस्रमहात्मा गांधीबिहार के लोकसभा निर्वाचन क्षेत्रखाटूश्यामजीमिया खलीफ़ाभारत का प्रधानमन्त्रीमाधवराव सिंधियासंज्ञा और उसके भेदराहुल गांधीप्रेमचंदभारत के राजनीतिक दलों की सूचीभारतीय राज्यों के वर्तमान मुख्यमंत्रियों की सूचीतुलसीदासश्रीमद्भगवद्गीताभारतीय जनता पार्टीबिहार के जिले