Revision 23960717 of "Modul:Testmodul/Lavallen/start" on svwiki

p = {}
 
function p.diagram(frame)
	local pFrame = frame:getParent()
	local args = pFrame.args
	local text = ''
	local namn = args.namn or frame.args.namn
	local max = -math.huge
	local note = args.note or ''
	if namn == nil or namn == ''then
		return 'Inget namn är angivet'
	end
	local fran = tonumber(args.fran) or 1800
	local fran2 = math.huge
	local till2 = -math.huge
	local till = tonumber(args.till) or tonumber(os.date("%Y"))
	local step = 1
	if till < fran then
		step = -1
	end
	for i = fran, till, step do
		local pu = 'inv' .. i
		if tonumber(args[pu]) then
			if tonumber(args[pu]) > max then
				max = tonumber(args[pu])
			end
			if i > till2 then
				till2 = i
			end
			if i < fran2 then
				fran2 = i
			end
		end
	end
	text = 'Befolkningsutvecklingen i ' .. namn
	if fran2 == till2 then
		text = text .. ' ' .. fran2 .. note
	else
		text = text .. ' ' .. fran2 .. ' – ' .. till2 .. note
	end
	text = mw.text.tag('big', {}, text)
	text = mw.text.tag('th', {colspan="5"}, text)
	text = mw.text.tag('tr', {style="background:#DDD;"}, text)
	text = text .. mw.text.tag('tr', {}, mw.text.tag('td', {colspan="5", style="padding:4px"}, ''))
	local h1 = mw.text.tag('td', {style="padding:0 4px", valign="top"}, 'År')
	h1 = h1 .. mw.text.tag('td', {style="width:525px"}, '')
	h1 = h1 .. mw.text.tag('td', {style="padding:0 4px;width:5em", align="right", valign="top"}, 'Folkmängd')
	areaenhet = args.areaenhet or '[[hektar|ha]]'
	h1 = h1 .. mw.text.tag('td', {style="padding:0 4px;", align="right", valign="top"}, 'Areal '.. areaenhet)
	text = text .. mw.text.tag('tr', {style="font-size:88%;"}, h1)

	text = mw.text.tag('table', {cellspacing="0", cellpadding="0", style="clear:none;float:none;border:silver solid 1px; font-size:90%; padding:0.4em;margin:0.4em;width:650px"}, text)
	
	return text --.. '; ' .. fran2 .. '-' .. till2
end
 
return p