Модуль:Roman - История изменений

Andras в 09:54, 9 июня 2024

2024-06-09T09:54:00Z

← Предыдущая версия		Версия от 12:54, 9 июня 2024
Строка 93:		Строка 93:
	end		end

	~~-- return p~~

	~~-- local m = {}~~

	~~-- Таблица тысяч, сотен, десятков и единиц~~
	~~local digit_1000 = {[0] = "", [1] = "M", [2] = "MM", [3] = "MMM"}~~
	~~local digit_100 = {[0] = "", [1] = "C", [2] = "CC", [3] = "CCC", [4] = "CD", [5] = "D", [6] = "DC", [7] = "DCC", [8] = "DCCC", [9] = "CM"}~~
	~~local digit_10 = {[0] = "", [1] = "X", [2] = "XX", [3] = "XXX", [4] = "XL", [5] = "L", [6] = "LX", [7] = "LXX", [8] = "LXXC", [9] = "XC"}~~
	~~local digit_1 = {[0] = "", [1] = "I", [2] = "II", [3] = "III", [4] = "IV", [5] = "V", [6] = "VI", [7] = "VII", [8] = "VIII", [9] = "IX"}~~

	~~function p.toRoman(n_number)~~
	~~assert((n_number >= 1) and (n_number <= 3999))~~
	~~local n_1000, n_100, n_10, n_1~~
	~~n_1000 = math.floor(n_number/1000)~~
	~~n_number = n_number - 1000*n_1000~~
	~~n_100 = math.floor(n_number/100)~~
	~~n_number = n_number - 100*n_100~~
	~~n_10 = math.floor(n_number/10)~~
	~~n_1 = n_number - 10*n_10~~
	~~return digit_1000[n_1000]..digit_100[n_100]..digit_10[n_10]..digit_1[n_1]~~
	~~end;~~

	~~-- Функция для шаблона Roman~~
	~~-- Вызывать так: {{#invoke:Roman\|roman\|200}}~~
	~~function p.roman(frame)~~
	~~return p.toRoman(tonumber(frame.args[1]))~~
	~~end~~

	return p		return p

Andras в 09:41, 9 июня 2024

2024-06-09T09:41:08Z

← Предыдущая версия		Версия от 12:41, 9 июня 2024
Строка 93:		Строка 93:
	end		end

			-- return p

			-- local m = {}

			-- Таблица тысяч, сотен, десятков и единиц
			local digit_1000 = {[0] = "", [1] = "M", [2] = "MM", [3] = "MMM"}
			local digit_100 = {[0] = "", [1] = "C", [2] = "CC", [3] = "CCC", [4] = "CD", [5] = "D", [6] = "DC", [7] = "DCC", [8] = "DCCC", [9] = "CM"}
			local digit_10 = {[0] = "", [1] = "X", [2] = "XX", [3] = "XXX", [4] = "XL", [5] = "L", [6] = "LX", [7] = "LXX", [8] = "LXXC", [9] = "XC"}
			local digit_1 = {[0] = "", [1] = "I", [2] = "II", [3] = "III", [4] = "IV", [5] = "V", [6] = "VI", [7] = "VII", [8] = "VIII", [9] = "IX"}

			function p.toRoman(n_number)
			assert((n_number >= 1) and (n_number <= 3999))
			local n_1000, n_100, n_10, n_1
			n_1000 = math.floor(n_number/1000)
			n_number = n_number - 1000*n_1000
			n_100 = math.floor(n_number/100)
			n_number = n_number - 100*n_100
			n_10 = math.floor(n_number/10)
			n_1 = n_number - 10*n_10
			return digit_1000[n_1000]..digit_100[n_100]..digit_10[n_10]..digit_1[n_1]
			end;

			-- Функция для шаблона Roman
			-- Вызывать так: {{#invoke:Roman\|roman\|200}}
			function p.roman(frame)
			return p.toRoman(tonumber(frame.args[1]))
			end

	return p		return p

Импортёр: 1 версия импортирована

2024-05-01T10:07:09Z

1 версия импортирована

← Предыдущая версия	Версия от 13:07, 1 мая 2024
(нет различий)

ru>Andras: Новая страница: «-- This module implements {{Roman}}. local p = {} -- This function implements the {{overline}} template. local function overline( s ) return mw.ustring.format( '%s', 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 ipai...»

2024-02-24T14:07:53Z

Новая страница: «-- 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 ipai...»

Новая страница

-- 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 ), num
end

-- The main control flow of the module.
function p.convert( arg1, arg2 )
-- Get input and exit displaying nothing if the input is bad.
local num = tonumber( arg1 )
if not num or num < 1 or num == math.huge then
return
end
num = math.floor( num )

-- Return a message for numbers too big to be expressed in Roman numerals.
if num >= 5000000 then
return arg2 or 'N/A'
end

local ret = ''
-- Find the Roman numerals for the large part of numbers 5000 and bigger.
-- The if statement is not strictly necessary, but makes the algorithm
-- more efficient for smaller numbers.
if num >= 5000 then
local bigRomans = {
{ 1000000, 'M' },
{ 900000, 'CM' }, { 500000, 'D' }, { 400000, 'CD' }, { 100000, 'C' },
{ 90000, 'XC' }, { 50000, 'L' }, { 40000, 'XL' }, { 10000, 'X' },
{ 5000, 'V' }
}
local bigLetters
bigLetters, num = getLetters( num, bigRomans )
ret = overline( bigLetters )
end

-- Find the Roman numerals for numbers 4999 or less.
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

return ret
end

function 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
return p.convert( args[ 1 ] , args[ 2 ] )
end

return p