Difference between revisions 23981087 and 23981990 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['ref'] or ''
	local fotnot = args.fotnot 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
	local areakolumn = nil -- variabel för att avgöra om en kolumn för area behövs
	local fkr = nil -- variabel för att avgöra om "före Kristus" behöver markeras
	if args.fkr then
		fkr = 'fkr'
	end
	if till < fran then
		step = -1
	end
	local reffarna = ''
	local notraknare = 1
	for i = fran, till, step do
		local pu = 'inv' .. i
		if tonumber(args[pu]) then
			local pv = 'area' .. i
			if args[pv] then
				areakolumn = ''
			end
			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
			if i < 0 then
				fkr = 'fkr'
			end
			local pw = 'typ' .. i
			if args[pw] then
				reffarna = 'A'
				if args[pw] == 'småort' then
					if noter[args[pw] = 'som småort'] == nil then
						notraknare = notraknare + 1
						noter['som småort'⏎
				end
				if args[pw] == 'Not'.. tostring(notraknare)
					end
				elseif tätort' then⏎
					args[pw] == 'som tätort' then⏎
	⏎
				end⏎
				if noter['som tätort'args[pw]] == nil then
							notraknare = notraknare + 1
							noter['som tätort'args[pw]] = 'Not'..tostring(notraknare)
					end⏎
				end
			end
		end
	end
	if tonumber(args.max) then 
		max = tonumber(args.max)
	end
	text = 'Befolkningsutvecklingen i ' .. namn
(contracted; show full)				color = args[h8]
			end
			local h9 = 'typ' .. i
			local color2 = color
			local lokalnot = ''
			if args[h9] == 'småort' then
				color2 = '#d0e0f5'
			
	if fixadnot['som småort'] == nil then
					lokalnot = frame:extensionTag{ name = 'ref', args = { name = noter['som småort'], group = 'N' }, 'som småort'}
				else
					lokalnot = frame:extensionTag{ name = 'ref', args = { name = noter['som småort'], group = 'N' }}
					fixadnot['som småort'] = '1'
				end
			elseif args[h9] == 'tätort' then
				color2 = '#B0C4DE'
				lokalnot = frame:extensionTag{ name = 'ref', args = { name = 'tatort', group = 'N' } }elseif args[h9] == 'tätort' then
				color2 = '#B0C4DE'
			end
			end

			local h2 = mw.text.tag('td', {colspan="2", style="padding-right:0.4em; padding-left:0.4em"}, h7)
			local h3 = mw.text.tag('div', {style="margin-top:0; margin-bottom:0; background:"..color2.."; height:10px; width:"..h4.."px; overflow:hidden"}, '&#160; ')
			h2 = h2 .. mw.text.tag('td', {style="border-left:solid 1px silver;border-right:solid 1px silver;"}, h3)
			local content = args[pu]
			if areakolumn == nil then
				content = content + lokalnot
			end
			h2 = h2 .. mw.text.tag('td', {style="min-width:3em;padding-left:0.4em", align="right"}, content)
			if areakolumn then
				local h5 = 'area' .. i
				local h6 = args[h5] or ''
				h2 = h2 .. mw.text.tag('td', {style="min-width:3em;padding-left:0.4em", align="right"}, h6 .. lokalnot)
			end
			text = text .. mw.text.tag('tr', {}, h2)
		end
	end
	if reffarna ~= '' then
		text = text + frame:extensionTag{ name = 'references', args = { group = 'N' } }
	end

	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 
end
 
return p