Модуль:Example

[прагляд] [правіць] [гісторыя] [падстаронкі] [абнавіць]

 Дакументацыя

---

рэалізацыя шаблона {{прыклад}}, гл. яго дакументацыю.

Гл. таксама

• Модуль:ExampleList
• Модуль:Parameter names example

Каб пазбегнуць паломак старонак, дзе ўжыты гэты модуль, пажадана эксперыментаваць у пясочніцы для модуляў.

---

local p = {}

-- выклік шаблона, пры памылцы вяртае пусты радок
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

-- прыбірае з параметраў упісаныя праз HTML-сутнасці "<nowiki>" і замяняе "{{=}}" на "=" для выкліку шаблона
local function process_nowiki_equals(str)
	str = str:gsub('&lt;nowiki>', ''):gsub('&lt;/nowiki>', '')
			 :gsub('&lt;nowiki&gt;', ''):gsub('&lt;/nowiki&gt;', '')
			 :gsub('&#123;&#123;&#61;&#125;&#125;', '=')
			 :gsub('&#123;{&#61;}&#125;', '=')
			 :gsub('{&#123;&#61;&#125;}', '=')
			 :gsub('{{=}}', '=')
			 :gsub('&amp;', '&')
	return str
end

function p.main(frame)
	local getArgs = require('Module:Arguments').getArgs
	local yesno = require('Module:Yesno')
	local template_code = require('Module:Template call code')._main
	local copy = require('Module:TableTools').shallowClone
	
	local args = copy(getArgs(frame, {trim = false, removeBlanks = false}))
	local tag = args._tag
	local sep = args._sep and args._sep .. ' '
	local prefix = args._prefix or args['_pre-text'] or ''
	local postfix = args._postfix or args['_post-text'] or ''
	local nocat = yesno(args._nocat, false)
	local style = args._style
	if style == '' then
		style = nil
	end
	-- перадаецца шаблонам {{стопка прыкладаў}}, адзін раздзяляльнік на ўсе прыклады
	local comment_sep = args._comment_sep
	local comment = args._comment
	-- карысна ў шаблоне {{стопка прыкладаў}} (гэта проста тэкст у канцы)
	local after = args._after or ''
	-- карысна ў шаблоне {{стопка прыкладаў}} (гэта проста тэкст у пачатку)
	local before = args._before and args._before .. ' ' or ''
	
	if style == 'pre' or style == '*pre' or style == 'pre↓' or style == '*pre↓' then
		tag = tag or 'pre'
	end
	
	if style == 'pre' or style == '*pre' then
		sep = sep or '\n'
	elseif style == 'pre↓' or style == '*pre↓' then
		sep = sep or expand(frame, 'sp-down', {'', '-0.5em'})
	end
	
	if style == '*pre' or style == '*pre↓' then
		before = '<ul><li>' .. expand(frame, 'chrome bullet hack', {}) .. before
		after = after .. '</li></ul>'
	end
	
	if style == 'wikitable' then
		tag = tag or 'kbd'
		sep = sep or '\n| '
		comment_sep = '\n| '
	end
	
	tag = tag or 'code'
	sep = sep or '→ '
	comment_sep = comment_sep or ' &nbsp;'
	
	if comment then
		if not style then
			comment = '<small>' .. comment .. '</small>'
		end
		after = comment_sep .. comment .. after
	end
	
	local _args = copy(args)
	_args._style = args._codestyle
	_args._comment = args._codecomment
	_args._tag = tag
	_args._prefix = prefix
	_args._postfix = postfix
	_args._nowiki = true
	if args._template then
		table.insert(_args, 1, args._template)
	end
	local nwt = template_code(_args, {withoutParams = false})
	
	local tname = args._template or args[1]
	if tname == nil then  -- калі імя шаблона ўтрымлівае знак "=" (працуе, толькі калі няма ненайменных параметраў)
		local nextfunc, static, cur = pairs(args)
		local k, v = nextfunc(static, cur)
		if k ~= nil and type(k) ~= 'number' and not k:find('^_') then  -- найменныя параметры, выключаючы мадыфікатары знешняга выгляду
			tname = k .. "=" .. v
			args[k] = nil -- больш гэты параметр нам не спатрэбіцца
		end
	elseif not args._template then
		-- Імя выкліканага шаблона ў ненайменным перымм параметры (або ж узята з назвы старонкі або
		-- з найменнага параметра ў адсутнасць ненайменных — в наступным радку шкоды няма ў любым выпадку),
		-- больш яго апрацоўваць не трэба
		table.remove(args, 1)
	end
	if tname == '' or tname == nil then  -- пры апушчаным першым параметры бярэм ммя шаблона з назвы старонкі
		tname = mw.title.getCurrentTitle().rootText
	end
	
	local targs, equals_pos, param, value, left_shift = {}, 0, '', '', 0

	for k, v in pairs(args) do
		if type(k) == 'number' then  -- ненайменныя параметры
			equals_pos = v:find('=')
			if equals_pos and v:find('{{=}}') == equals_pos-2 then
				equals_pos = nil
			end
			if equals_pos then  -- калі змяшчаюць "=", ператворым у найменныя
				param = v:sub(1, equals_pos-1)
				value = v:sub(equals_pos+1)
				targs[param] = process_nowiki_equals(value)
				left_shift = left_shift + 1  -- пераменная патрэбна, каб квазінумараваныя параметры, перададзены праз "{{=}}",
				                             -- не збівалі парадак
			else  -- сапраўды ненайменныя
				targs[k - left_shift] = process_nowiki_equals(v)
			end
		elseif not k:find('^_') then  -- найменныя параметры, выключаючы мадыфікатары знешняга выгляду
			targs[k] = process_nowiki_equals(v)
		end
	end
	
	if nocat then
		targs['nocat'] = 1
	end
	
	local expand_result = tostring(expand(frame, tname, targs))
	if expand_result:sub(1, 2) == '{|' then
		sep = sep .. '\n'
	end
	
	return before .. tostring(nwt) .. ' ' .. sep .. prefix .. expand_result .. postfix .. after
end

return p