Uwaga
Serwis Wedateka jest portalem tematycznym prowadzonym przez Grupę Wedamedia. Aby zostać wedapedystą, czyli Użytkownikiem z prawem do tworzenia i edycji artykułów, wystarczy zarejestrować się na tej witrynie poprzez złożenie wniosku o utworzenie konta, co można zrobić tutaj. Liczymy na Waszą pomoc oraz wsparcie merytoryczne przy rozwoju także naszych innych serwisów tematycznych.

Moduł:Starożytnych

Z Wedateka, archiwa
Przejdź do nawigacji Przejdź do wyszukiwania

Generuje kod dla Szablonu {{Starożytnych}}.


function word(frame)
	local argsp = frame.args
	local word = argsp["hasło"]
	if word == nil or word == '' then word = frame:preprocess{ text = '{{SUBPAGENAME}}'} end
	local word_num = argsp["od"]
	local word_n_num = argsp["do"]
	local word_pr = argsp["poprzedni"]
	local word_nr = argsp["następny"]
	local ref = argsp["ref"]
	local IPage = "Zygmunt Gloger-Słownik rzeczy starożytnych.djvu"
	local Page_raw = ''
	local Pcon_raw= ''
	local error_cat = "\n[[Kategoria:Słownik rzeczy starożytnych "
	
	word = mw.ustring.gsub( word, '%-', '_')
	for  Itoc = 497, 504 do
		Page_raw = mw.title.makeTitle( 'Page', IPage .. '/' .. Itoc )
		if Page_raw.exists then
			Pcon_raw = Pcon_raw .. '\n' .. Page_raw:getContent()
		else
			return "<br />Brak strony [[Strona:" .. IPage .. "/" .. Itoc .. "]], która powinna zwierać spis treści." .. error_cat .. "(Błąd brak strony)]]"
		end
	end
	Pcon_raw = mw.ustring.gsub( Pcon_raw, '%-', '_')
	word_num = tonumber(mw.ustring.match( Pcon_raw, '%{%{Spis miodu[^%}]-%/' .. word .. '%|[^%]]-%]%]%|([%d]-)%}%}'))
	if word_num == nil or word_num == '' then
		return "<br />Nie znaleziono hasła '''''" .. word .. "''''' w spisie treści." .. error_cat .. "(Błąd brak hasła)]]"
	end
	
	local word_n = mw.ustring.match( Pcon_raw, '%{%{Spis miodu[^%}]-%/' .. word .. '%|[^%]]-%]%]%|[%d]*%}%}.-%{%{Spis miodu[^%}]-%/([^|]-)%|[^%]]-%]%]')
	if word_n == nil then
		word_n = ''
	end
	
	word_n_num = tonumber(mw.ustring.match( Pcon_raw, '%{%{Spis miodu[^%}]-%/' .. word_n .. '%|[^%]]-%]%]%|([%d]*)%}%}'))
	if word_n_num == nil or word_n_num == '' or word_n_num == 0 then
		word_n_num = word_num
	end
	
	local word_p = mw.ustring.match( mw.ustring.match( Pcon_raw, '(%{%{Spis miodu.-)%{%{Spis miodu[^%}]-%/' .. word .. '%|[^%]]-%]%]%|[%d]-%}%}') or '',
    '.*%{%{Spis miodu[^%}]-%/(.-)%|[^%]]-%]%]%|[%d]-%}%}')
	if word_p == nil then
		word_p = ''
	end

	local trans_t = '{{JustowanieStart2}}\n' ..
		'<pages index="Zygmunt Gloger-Słownik rzeczy starożytnych.djvu" from=' .. word_num + 6 .. ' to=' .. word_n_num + 6 .. ' onlysection="' .. mw.ustring.gsub( word, '%_', '-') .. '" />\n' ..
		'{{JustowanieKoniec2}}'
	
	local content_t = '{{Dane tekstu|autor=Zygmunt Gloger|tytuł=[[Słownik rzeczy starożytnych]]|wydawca=Gebethner i Wolff|druk=W. L. Anczyc i Spółka' ..
		'|rok wydania=1896|miejsce wydania=Kraków|źródło=[[commons:File:Zygmunt Gloger-Słownik rzeczy starożytnych.djvu|Skany na Commons]]' ..
		'|strona indeksu=Zygmunt Gloger-Słownik rzeczy starożytnych.djvu' ..
		'|poprzedni=' .. ((word_pr == nil) and ('Słownik rzeczy starożytnych/' .. mw.ustring.gsub( word_p, '%_', '-')) or word_pr) ..
		'|następny=' .. ((word_nr == nil) and ('Słownik rzeczy starożytnych/' .. mw.ustring.gsub( word_n, '%_', '-')) or word_nr) ..
		'|inne={{Całość|Słownik rzeczy starożytnych/całość|słownik}}}}'
		
	local content = content_t .. '\n' .. trans_t .. '\n{{clear}}' .. (ref and '\n\n{{Przypisy}}' or '') ..'\n{{MixPD|Zygmunt Gloger}}'
	return frame:preprocess{ text = content }

end

local p = {}

function p.h(frame)
	return word( frame:getParent() )
end

return p