T:tr: различия между версиями

Материал из Энциклопедия автомобильных номеров мира
Перейти к навигации Перейти к поиску
м (Новая страница: «Test»)
imported>Admin
(Перенаправление на Шаблон:Tr)
 
(не показаны 2 промежуточные версии 2 участников)
Строка 1: Строка 1:
local p = {}
#REDIRECT [[Шаблон:tr]]
 
-- используется для того, чтобы можно было удалять элементы из таблицы
local function copy(other)
local res = {}
for k,v in pairs(other) do
res[k] = v
end
return res
end
 
-- вызов шаблона, при ошибке возвращает пустую строку
local function expand(frame, tname, targs)
local success, result = pcall(
frame.expandTemplate,
frame,
{title = tname, args = targs}
)
if success then
return result
else
return ''
end
--return frame:expandTemplate({title = tname, args = args})
end
 
function p.main(frame)
if not getArgs then
getArgs = require('Module:Arguments').getArgs
end
yesno = require('Module:Yesno')
local trim = not (yesno(frame:getParent().args.trim or frame:getParent().args._trim, false) == false) --по умолчанию true
local args = copy(getArgs(frame, {trim = trim, removeBlanks = false})) --copy(frame.args)
local tname = args.t or args._t or args.template or args._template
local opener = args.opener or args._opener or '* '
local sep = args.sep or args._sep
local style = args.style or args._style
local nobr = args.nobr or args._nobr
local nocat = args.nocat or args._nocat
local spaced = args.spaced or args._spaced
local comment_sep = args.comment_sep or args._comment_sep
local between = args.between or args._between
local inthemiddle = yesno(args.inthemiddle or args._inthemiddle, false)
local wide = yesno(args.wide or args._wide, false)
if not (args.opener or args._opener) then
if style == 'wikitable' then
opener = '|-\n| '
elseif style == 'pre' or style == '*pre' or style == 'pre↓' or style == '*pre↓' then
opener = ''
end
end
if tname == '' or tname == nil then --при опущенном первом параметре берём имя шаблона из названия страницы
tname = mw.language.new('ru'):lcfirst(mw.title.getCurrentTitle().rootText)
end
local content, are_comments, i = '', false, 0
for k, v in pairs(args) do
local pre_targs, targs = {}, {}
if type(k) == 'number' then
i = i + 1
if v ~= '' then
pre_targs = mw.text.split(v, '\\')
for k2, v2 in pairs(pre_targs) do
equals_pos = nil
if v2:sub(1, 1) == '_' and v2:find('=') then --параметры настроек шаблона "пример"
equals_pos = v2:find('=')
end
if equals_pos then
param = v2:sub(1, equals_pos-1)
value = v2:sub(equals_pos+1)
targs[param] = value
if param == '_comment' then are_comments = true end
else
if v2:sub(1, 5) == '_' then
targs[k2] = v2:gsub('_', '_')
else
targs[k2] = v2
end
end
end
end
table.insert(targs, 1, tname)
targs._sep, targs._style, targs._nobr, targs._nocat, targs._spaced, targs._comment_sep
= sep, style, nobr, nocat, spaced, comment_sep
content = content .. (i ~= 1 and between or '') .. opener .. tostring(expand(frame, 'пример', targs)) .. '\n'
end
end
if style == 'wikitable' then
local table_content = ''
if not inthemiddle then
table_content = '{| class="wikitable '
if wide then table_content = table_content .. 'wide' end
table_content = table_content .. '"\n! Код !! Результат'
if are_comments then table_content = table_content .. ' !! Комментарий' end
end
content = table_content .. '\n' .. content
if not inthemiddle then
content = content .. '|}'
else
content = content:sub(1, -2)
end
else
content = content:sub(1, -2)
end
return content
end
 
return p

Текущая версия от 15:44, 22 апреля 2019

Перенаправление на: