Modul:Wp/tisućljeća

Izvor: Wikipedija


local p = {}

function p.main(frame)
	local args = mw.getCurrentFrame():getParent().args
	local naslovStranice = mw.title.getCurrentTitle()
	local listaWp = ""
	
	local wpTisucljecePrKr = require('Module:WpNaKalendarskiČlanak').provjeriPostojanjeTisucljecaPrKr
	local wpTisucljece = require('Module:WpNaKalendarskiČlanak').provjeriPostojanjeTisucljeca
	local wpStoljece = require('Module:WpNaKalendarskiČlanak').provjeriPostojanjeStoljeca
	
	tisucljece = mw.getCurrentFrame():getParent().args[1]

	if tisucljece == nil or tisucljece == "" then
		return "<span class=\"error\">Greška, nije pronađeno stoljeće!</span>[[Kategorija:Pogreške u modulu Wp/tisucljeća]]"
	else
		tisucljece = tisucljece + 0 -- wpStoljece je string, a nakon ovoga se automatski cast-a u integer
			
		-- Tisućljeća
		
		if tisucljece < 3 then
			listaWp = listaWp .. wpTisucljecePrKr(frame, -1 * tisucljece + 3, '◄')
		else
			listaWp = listaWp .. wpTisucljece(frame, tisucljece - 2, '◄')
		end
		
		listaWp = listaWp .. "&nbsp;| "
		
		if tisucljece == 1 then
			listaWp = listaWp .. wpTisucljecePrKr(frame, 1, '')
		else
			listaWp = listaWp .. wpTisucljece(frame, tisucljece - 1, '')
		end
		
		listaWp = listaWp .. "&nbsp;| '''"
		listaWp = listaWp .. wpTisucljece(frame, tisucljece, '')
		listaWp = listaWp .. "'''&nbsp;| "
		
		listaWp = listaWp .. wpTisucljece(frame, tisucljece + 1, '')
		
		listaWp = listaWp .. "&nbsp;| "
			
		listaWp = listaWp .. wpTisucljece(frame, tisucljece + 2, '►')
		
		listaWp = listaWp .."<br>"
		
		-- Stoljeća
		
		prvoStoljece = (tisucljece - 1) * 10 + 1
		
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+1, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+2, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+3, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+4, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+5, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+6, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+7, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+8, '')
		listaWp = listaWp .. "&nbsp;| "
		listaWp = listaWp .. wpStoljece(frame, prvoStoljece+9, '')
	end
	return listaWp
end
return p