Modul:Direktwahl

aus Wikipedia, der freien Enzyklopädie
Zur Navigation springen Zur Suche springen

Die Dokumentation für dieses Modul kann unter Modul:Direktwahl/Doku erstellt werden

local p = {}
local farbe = require('Module:Partei').farbe
local alt = require('Module:Partei').alt
local getArgs = require('Module:Arguments').getArgs

function p.bar(frame)
	local args = getArgs(frame)
	local index, data = {}, {}
	local num = 1
	local gesamt = 0
	local i = 0
	for a = 1, 30 do i = i + 1
		if args['%'..i] or args['%z' .. i] or args['m' .. i] then table.insert(index, i) end
	end
	
	local root = mw.html.create('table'):css('border', '0.1px solid #E0E0E0'):css('width', '100%')

	if args['m1'] then
		while (args['m'..num]) do
			data[num] = {
				s = tonumber(args['m'..num]),
			}				
			gesamt = gesamt + data[num].s
			num = num+1
		end
		for i, v in ipairs(index) do root:tag('tr')
			row = root:tag('tr')
			if args['l' .. v] then
				row:tag('td')
					:wikitext(args['l' .. v])
					:css('text-align', 'left')
					:css('font-size', '96%')
					:css('width', '45%')
				row:tag('td')
					:wikitext('<div style="width:100px;border:0.1px solid #AAA;background-color:#FFF;height:1.0em;position:relative;"><div style="background-color:#' ..farbe({(args['l' .. v])})..';width:'.. args['m'..v]*100/gesamt ..'px;height:1.0em;"></div></div>')
				row:tag('td')
					:wikitext(args['m' .. v]..' / '..gesamt)
			end
		end
	end

	if args['sep'] then sep = '<br />' else sep = '&#32;' end
	if args['stimmen3'] then maxbreite = '266px' else maxbreite = '222px' end

	if args['%z1'] then
		root:tag('th')
			:wikitext('1. Wahlgang')
			:attr('colspan', '3')
			:css('background', '#F2F2F4')
			:css('height', '2em')
			:css('font-weight', 'bold')
	end

	if args['k1'] then
		for i, v in ipairs(index) do
			row = root:tag('tr')
			if args['k' .. v] then
				row:tag('td')
					:wikitext(args['k' .. v], sep..'('..args['p' .. v]..')')
					:css('text-align', 'left')
					:css('font-size', '96%')
					:css('max-width', maxbreite)
					:css('min-width', '160px')
				row:tag('td')
					:wikitext('<div style="width:100px;border:0.1px solid #F2F2F2;background-color:#FFF;height:1.2em;position:relative;"><div style="background-color:#' .. (args['f' .. v] or farbe({(args['p' .. v])}))..';width:'.. (string.gsub(args['%'..v], "%,", "%."))*100/(string.gsub(args['%1'], "%,", "%.")) ..'px;height:1.2em;"></div></div>')
				row:tag('td')
					:wikitext(args['%' .. v]..' %')
					:css('width', '60px')
			end
		end
		if args['%sonstige'] then
			row = root:tag('tr')
			row:tag('td')
				:wikitext('Sonstige < '.. (args['ak'] or '3') ..' %')
				:css('text-align', 'left')
				:css('font-size', '96%')
			row:tag('td')
				:wikitext('<div style="width:100px;border:0.1px solid #F2F2F2;background-color:#FFF;height:1.2em;position:relative;"><div style="background-color:#DABAD0;width:'.. (string.gsub(args['%sonstige'], "%,", "%."))*100/(string.gsub(args['%1'], "%,", "%.")) ..'px;height:1.2em;"></div></div>')
			row:tag('td')
				:wikitext(args['%sonstige']..' %')
				:css('width', '60px')
		end
	end

	if args['k1'] then
		if args['invz'] then
			kand1 = args['k2']
			kand2 = args['k1']
			gruppe1 = args['p2']
			gruppe2 = args['p1']
			color1 = args['f2'] or farbe({args['p2']})
			color2 = args['f1'] or farbe({args['p1']})
		else
			if args['%z3'] then
				kand1 = args['kz1']
				kand2 = args['kz2']
				gruppe1 = args['pz1']
				gruppe2 = args['pz2']
				color1 = args['fz1'] or farbe({args['pz1']})
				color2 = args['fz2'] or farbe({args['pz2']})
			else
				kand1 = args['k1']
				kand2 = args['k2']
				gruppe1 = args['p1']
				gruppe2 = args['p2']
				color1 = args['f1'] or farbe({args['p1']})
				color2 = args['f2'] or farbe({args['p2']})
			end
		end
	end

	if args['%z1'] then
		root:tag('th')
			:wikitext('2. Wahlgang')
			:attr('colspan', '3')
			:css('background', '#F2F2F4')
			:css('height', '2em')
			:css('font-weight', 'bold')
		row = root:tag('tr')
		row:tag('td')
			:wikitext(kand1, sep..'('.. gruppe1..')')
			:css('text-align', 'left')
			:css('font-size', '96%')
			:css('max-width', maxbreite)
		row:tag('td')
			:wikitext('<div style="width:100px;border:0.1px solid #F2F2F2;background-color:#FFF;height:1.2em;position:relative;"><div style="background-color:#' ..color1..';width:100px;height:1.2em;"></div></div>')
		row:tag('td')
			:wikitext(args['%z1']..' %')
			:css('width', '60px')
		if args['%z2'] then
			row = root:tag('tr')
			row:tag('td')
				:wikitext(kand2, sep..'('.. gruppe2..')')
				:css('text-align', 'left')
				:css('font-size', '96%')
			row:tag('td')
				:wikitext('<div style="width:100px;border:0.1px solid #F2F2F2;background-color:#FFF;height:1.2em;position:relative;"><div style="background-color:#' ..color2..';width:'.. (string.gsub(args['%z2'], "%,", "%."))*100/(string.gsub(args['%z1'], "%,", "%.")) ..'px;height:1.2em;"></div></div>')
			row:tag('td')
				:wikitext(args['%z2']..' %')
				:css('width', '60px')
			if args['%z3'] then
				row = root:tag('tr')
				row:tag('td')
					:wikitext(args['kz3'], sep..'('.. args['pz3']..')')
					:css('text-align', 'left')
					:css('font-size', '96%')
				row:tag('td')
					:wikitext('<div style="width:100px;border:0.1px solid #F2F2F2;background-color:#FFF;height:1.2em;position:relative;"><div style="background-color:#' ..(args['fz3'] or farbe({args['pz3']}))..';width:'.. (string.gsub(args['%z3'], "%,", "%."))*100/(string.gsub(args['%z1'], "%,", "%.")) ..'px;height:1.2em;"></div></div>')
				row:tag('td')
					:wikitext(args['%z3']..' %')
					:css('width', '60px')
				if args['%z4'] then
					row = root:tag('tr')
					row:tag('td')
						:wikitext(args['kz4'], sep..'(' .. args['pz4']..')')
						:css('text-align', 'left')
						:css('font-size', '96%')
					row:tag('td')
						:wikitext('<div style="width:100px;border:0.1px solid #F2F2F2;background-color:#FFF;height:1.2em;position:relative;"><div style="background-color:#' ..(args['fz4'] or farbe({args['pz4']}))..';width:'.. (string.gsub(args['%z4'], "%,", "%."))*100/(string.gsub(args['%z1'], "%,", "%.")) ..'px;height:1.2em;"></div></div>')
					row:tag('td')
						:wikitext(args['%z4']..' %')
						:css('width', '60px')
				end
			end
		end
	end

	return root
end

function p.gewahlt(frame)
	local args = getArgs(frame)
	return '&#32;&nbsp;&nbsp;<span style="background-color:#4BBD71;padding-left:6px;padding-right:6px;line-height:6px;border-radius:4px 4px 4px;font-size:80%;border:0.1px solid #3A9157;text-align:center;font-weight:bold;color:#FFFFFF;">'.. (args[1] or 'Gewählt')..'</span>'
end

function p.gew(frame) -- SUPPORT Vorlage:Parlamentswahl
	local args = getArgs(frame)
	local max = tonumber(args[1]) or 0 -- 0 otherwise error in artikel vorlage:achse --
	local v = tonumber(args[2]) or 0
	local d = tonumber(args[3]) or 0
	num = v+d
	z = v + 2
	if v == 0 then
		return '<div style="z-index:1; position:relative; height:'..(6*d-1)..'px; border-top:1px solid #CCC; border-bottom:1px solid #777;"><div style="position:absolute; bottom:'.. (6*d-12+1) ..'px; background-color:#FFFFFF; padding:0 2px 0 0; color:#777;">&nbsp;'..d..'</div><div style="position:absolute; bottom:-10px; background-color:#FFFFFF; padding:0 1px 0 0; color:#777;">&nbsp;0</div></div><div style="z-index:3; position:relative; height:'..(6*d-1)..'px; border-bottom:1px solid #CCC;"><div style="position:absolute; bottom:-10px; background-color:#FFFFFF; padding:0 1px 0 0; color:#777;">'..-d..'</div></div>'
	else
		if max > v then
			return '<div style="z-index:'..z..'; position:relative; height:'..(6*d-1)..'px; border-top:1px solid #CCC;"><div style="position:absolute; bottom:'.. (6*d-12+1) ..'px; background-color:#FFFFFF; padding:0 2px 0 0; color:#777;">&nbsp;'..num..'</div></div>'
		end
	end
end

function p.ver(frame)
	local args = getArgs(frame)
	local min = tonumber(args[1]) or 0
	local v = tonumber(args[2]) or 0
	local d = args[3] or 0
	num = v-d
	if min < v then
		return '<div style="z-index:3; position:relative; height:'..(6*d-1)..'px; border-bottom:1px solid #CCC;"><div style="position:absolute; bottom:-10px; background-color:#FFFFFF; padding:0 1px 0 0; color:#777;">'..num..'</div></div>'
	end
end

return p