Modul:Jahrestag

p.Kalender

Diese Funktion bildet einen Monatstage-Kasten ab und wird per #invoke: eingebunden. Der Monat wird dem Lemma entnommen, weshalb diese Funktion keine Attribute benötigt.

p.woche

Eine nur von p.Kalender genutzte Funktion, welche die Anzahl der Wochentage für den jeweiligen Monat berechnet.

---

local p = {}
local c = require( "Module:Common" )

function p.Kalender( frame )
	pf = frame:getParent()
	args = pf.args
	pt = mw.title.getCurrentTitle().text
	ma=split(pt, '.')
	day = rtrim(ma[0])
	month = ltrim(ma[1])
	
	months=getMonthList()
	for i, v in ipairs(months) do
		if v == month then
			month_nr = i
		end
	end
	
	t = '<table class="wikitable monatsbox">'..
		'<tr>'..
    	'<th>[['..day..'. '..months[month_nr-1]..'|◄]]</th>'..
    	'<th colspan="5">[[:Kategorie:'..month..'|'..month..']]</th>'..
    	'<th>[['..day..'. '..months[month_nr+1]..'|►]]</th>'..
		'</th>'
	
	t=t..Woche(1, month)..
		 Woche(8, month)..
		 Woche(15, month)..
		 Woche(22, month)
	
	if contains({'April', 'Juni', 'September', 'November'}, month) then
		md=30
	elseif month == 'Februar' then
		md=29
	else 
		md=31
	end
	
	t = t..'<tr>'
	for i=29, md do
    	t=t..'<td align="right">'..i..'</td>'
	end
	t = t..'</tr>'
	
	t = t..'</table>'..month..tostring(md)
	return t
end 

function Woche(d, month)
	t = '<tr>'
	for i=d, d+6 do
    	t=t..'<td align="right">[['..i..'. '..month..'</td>'
	end
	t = t..'</tr>'
	return t
end
return p