Wikipedia

Module:Sports rbr table

Moduledocumentatie​[bekijk] [bewerk] [ververs] [geschiedenis]

Gebruik bewerken

Positie tabel 

{{#invoke:Sports rbr table|table
| sortable = <!-- y of n of weglaten -->
| team1 = 
| pos1  = <!-- 1 / 2 / 3 / 4 / ... -->
| team2 = 
| pos2  = <!-- 1 / 2 / 3 / 4 / ... -->
<!-- ... -->
| kleur_1 = 1e
| text_1  = Eerste plaats
| bron = 
}}

WDL tabel 

{{#invoke:Sports rbr table|table
| sortable = <!-- y of n of weglaten -->
| team1 = 
| res1  = <!-- W / G / V ... -->
| team2 = 
| res2  = <!-- W / G / V ... -->
<!-- ... -->
| kleur_W = groen2
| kleur_G = geel2
| kleur_V = rood2
| bron = 
}}

Stijl bewerken

De XXX in style=XXX wordt vervangen door een van de volgende beschikbare stijlen:

  • matchup – voor tabellen met matchups en onderlinge resultaten

Parameters bewerken

Algemene parameters
Parameter Beschrijving
title Een bovenste bijschrift voor de tabel, laat weg zonder titel.
sortable Is de tabel sorteerbaar? Stel in op y voor een sorteerbare tabel en laat weg voor niet-sorteerbaar.
kleur_X De achtergrondkleur voor positie X. Hier kan X een enkel nummer zijn (bijv. 1 voor positie 1) of een niet-numerieke waarde die overeenkomt met een positie in de tabel (bijv. D voor gedegradeerd of W voor ingetrokken ...) Zie de sectie kleur hieronder voor meer informatie over kleursyntax.
kleur_-3 De achtergrondkleur voor positie 1, 2 en 3. Zie het gedeelte kleur hieronder voor meer informatie over de kleursyntax.
kleur_15- De achtergrondkleur voor positie 15, 16, enz. Zie het gedeelte kleur hieronder voor meer informatie over de kleursyntax.
text_Y Legendatekst voor kleur_Y. Als u een legendatekst toevoegt, wordt er een legenda onder aan de tabel toegevoegd.
bron Bron voor de informatie in de tabel.
notes Eventuele aanvullende opmerkingen toevoegen aan de onderkant van de tabel.
update
start_date		 Datum van de laatst gespeelde wedstrijd van de speelronde in de tabel. Als de tabel compleet is, gebruik dan |update=complete. Als de wedstrijden op een toekomstige datum plaatsvinden, gebruik dan |update=future en |start_date= voor de datum van de eerste speelronde.
legendpos Positie voor de legenda. Ondersteunde waarden zijn tr (rechtsboven), br (rechtsonder), tl (linksboven), bl (linksonder), t (boven) en b (onder).
legendorder De volgorde van de vermeldingen in de legenda (bijv., |legendorder=W/G/V).
toptext Tekst die bovenaan de tabel moet worden opgenomen. Dit is handig wanneer |legendpos=tr en u de legenda naast tekst bovenaan wilt laten zweven.
header Tekst voor de teamkolomkop. De standaard is Team ╲ Speelronde.
labelalign Uitlijning voor de kolomlabels. De standaard is left.
firstround Het nummer van de eerste ronde. De standaard is 1.
rnd1 Te gebruiken tekst voor het label voor ronde 1. De standaard is 1.
splitN Een sectie tussen de sectie van de tabel kan worden toegevoegd (indien gewenst) door |splitN=yes toe te voegen met N de positie waaronder de balk moet worden weergegeven.
Compact syntax
Parameter Beschrijving
team1 De gelinkte naam van het eerste team. Gebruik voor extra teams team2, team3, ... Voor een tijdelijke plaatsing gebruik |team1=- of |team1=&nbsp; of |team1=&ensp; or |team1=NNB.
pos1 De voorwaartse schuine streep (/) begrensde de lijst met ronde-voor-ronde posities voor het eerste team. Bijvoorbeeld |pos1=1/2/3/8/3/2/1 gedurende zeven ronden waarbij de positie verandert van 1 naar 2 in 3 naar 8 in 3 naar 2 naar 1.
pos1_rnd3_note Een voetnoot om de 3e positie toe te voegen in de pos1 posities.
res1 De voorwaartse schuine streep (/) heeft een lijst met wedstrijdresultaten voor het eerste team gescheiden. Bijvoorbeeld |res1=W/G/G/W/V gedurende vijf ronden met de ronde-voor-ronde resultaten van winnen, gelijkspel, gelijkspel, winnen, verlies. Let op, deze parameter kan niet worden gebruikt als |pos1= wordt gebruikt.
res1_rnd3_note Een voetnoot om het derde resultaat toe te voegen aan de res1 wedstrijdresultaten.
Sports table syntax
Parameter Beschrijving
team1 Dit kan een afkorting zijn voor het eerste team. In de rest van de documentatie in deze sectie wordt ervan uitgegaan dat de afkorting ABC is. Gebruik voor extra teams team2, team3, ...
name_ABC De gelinkte naam van het team ABC.
pos_ABC De voorwaartse schuine streep (/) begrensde lijst met ronde-voor-ronde posities voor team ABC. Bijvoorbeeld |pos_ABC=1/2/3/8/3/2/1 gedurende zeven ronden waarbij de positie verandert van 1 naar 2 naar 3 naar 8 naar 3 naar 2 naar 1.
res_ABC De voorwaartse schuine streep (/) heeft een lijst met wedstrijdresultaten voor team ABC gescheiden. Bijvoorbeeld |res_ABC=W/G/G/W/V gedurende vijf ronden met de ronde-voor-ronde resultaten van winnen, gelijkspel, gelijkspel, winnen, verlies. Let op, deze parameter kan niet worden gebruikt als |pos_ABC= wordt gebruikt.

Kleur bewerken

De module heeft verschillende vooraf ingestelde achtergrondkleuren die een acceptabel contrast hebben met zwarte voorgrondtekst. Het wordt aanbevolen om een van deze kleuren te gebruiken, die passen bij de kleuren die worden gebruikt door Module:Sports table.

Naam Hex waarde
groen1 BBF3BB
groen2 CCF9CC
groen3 DDFCDD
groen4 EEFFEE
blauw1 BBF3FF
blauw2 CCF9FF
blauw3 DDFCFF
blauw4 EEFFFF
Naam Hex waarde
geel1 FFFFBB
geel2 FFFFCC
geel3 FFFFDD
geel4 FFFFEE
rood1 FFBBBB
rood2 FFCCCC
rood3 FFDDDD
rood4 FFEEEE
Naam Hex waarde
zwart1 BBBBBB
zwart2 CCCCCC
zwart3 DDDDDD
zwart4 EEEEEE
1e FFD700
2e C0C0C0
3e CC9966

In sommige zeldzame gevallen kan het nodig zijn om de achtergrondkleur voor een bepaalde cel te overschrijven. Dit kan worden bereikt met |posX_rndY_kleur= of |resX_rndY_kleur= waarbij X het rijnummer is en Y het ronde nummer.

Voorbeelden bewerken

Voorbeeld 1: Tabel positieverloop per team compact bewerken

Eerste plaats
Gepromoveerd
Champions League
Gedegradeerd
Voorbeeld 1
Team ╲ Speelronde12345
A Team12222
B Team21444
C Team34161
D Team43613
E Team56387
F Team65835
G Team78558
H Team87776
Bron: Wat bronnen 
{{#invoke:Sports rbr table|table
| title = Voorbeeld 1
| sortable = y
| team1 = A Team
| pos1  = 1/2/2/2/2
| team2 = B Team
| pos2  = 2/1/4/4/4
| team3 = C Team
| pos3  = 3/4/1/6/1
| team4 = D Team
| pos4  = 4/3/6/1/3
| team5 = E Team
| pos5  = 5/6/3/8/7
| team6 = F Team
| pos6  = 6/5/8/3/5
| team7 = G Team
| pos7  = 7/8/5/5/8
| team8 = H Team
| pos8  = 8/7/7/7/6
| kleur_1 = 1e
| text_1 = Eerste plaats
| kleur_2 = groen1
| text_2 = Gepromoveerd
| kleur_3-4 = blauw2
| text_3-4 = Champions League
| kleur_7- = rood1
| text_7- = Gedegradeerd
| bron = Wat bronnen
}}

Voorbeeld 2: Tabel positieverloop per team afhankelijk van volgorde bewerken

Eerste plaats
Gepromoveerd
Champions League
Gedegradeerd
Voorbeeld 2
Team ╲ Speelronde12345
A Team12222
B Team21444
C Team34161
D Team43613
E Team56387
F Team65835
G Team78558
H Team87776
Bron: Wat bronnen 
{{#invoke:Sports rbr table|table
| title = Voorbeeld 2
| sortable = y
| team1 = AAA | team2 = BBB | team3 = CCC | team4 = DDD
| team5 = EEE | team6 = FFF | team7 = GGG | team8 = HHH
| name_AAA = A Team
| pos_AAA  = 1/2/2/2/2
| name_BBB = B Team
| pos_BBB  = 2/1/4/4/4
| name_CCC = C Team
| pos_CCC  = 3/4/1/6/1
| name_DDD = D Team
| pos_DDD  = 4/3/6/1/3
| name_EEE = E Team
| pos_EEE  = 5/6/3/8/7
| name_FFF = F Team
| pos_FFF  = 6/5/8/3/5
| name_GGG = G Team
| pos_GGG  = 7/8/5/5/8
| name_HHH = H Team
| pos_HHH  = 8/7/7/7/6
| kleur_1 = 1e
| text_1 = Eerste plaats
| kleur_2 = groen1
| text_2 = Gepromoveerd
| kleur_3-4 = blauw2
| text_3-4 = Champions League
| kleur_7- = rood1
| text_7- = Gedegradeerd
| bron = Wat bronnen
}}

Voorbeeld 3: Tabel resultaten-/positieverloop van een team bewerken

Voorbeeld 3
Speelronde123456789101112131415161718192021
LocatieTUTUTUTTTUTUTUTUTUTUU
ResultaatWVVWWGWVVVVWWWWVGVVGV
Positie41014867789101111876667999
Bron: Wat bronnen 
{{#invoke:sports rbr table|table
| title = Voorbeeld 3
| header = Speelronde
| label1 = Locatie
| res1 = T/ U/ T/ U/ T/ U/ T/ T/ T/ U/ T/ U/ T/ U/ T/ U/ T/ U/ T/ U/ U
| label2 = Resultaat
| res2= W/ V/ V/ W/ W/ G/ W/ V/ V/ V/ V/ W/ W/ W/ W/ V/ G/ V/ V/ G/ V
| label3 = Positie
| pos3 = 4/10/14/ 8/ 6/ 7/ 7/ 8/ 9/10/11/11/ 8/ 7/ 6/ 6/ 6/ 7/ 9/ 9/ 9
| kleur_W = groen2
| kleur_G = geel2 
| kleur_V = rood2
| kleur_1 = groen1
| kleur_2 = groen2
| kleur_3-4 = groen3
| kleur_5-7 = blauw1
| kleur_18- = rood1
| bron = Wat bronnen
}}

Voorbeeld 4: Tabel resultaten-/positieverloop van een team met legenda bewerken

Voorbeeld 4
Speelronde123456789101112131415161718192021
LocatieTUTUTUTTTUTUTUTUTUTUU
ResultaatWVVWWGWVVVVWWWWVGVVGV
Positie41014867789101111876667999
Bron: Wat bronnen
U = Uit; T = Thuis; W = Winst; G = Gelijk; V = Verlies 
{{#invoke:sports rbr table|table|legendpos=b
| title = Voorbeeld 4
| header = Speelronde
| label1 = Locatie
| res1 = T/ U/ T/ U/ T/ U/ T/ T/ T/ U/ T/ U/ T/ U/ T/ U/ T/ U/ T/ U/ U
| label2 = Resultaat
| res2 = W/ V/ V/ W/ W/ G/ W/ V/ V/ V/ V/ W/ W/ W/ W/ V/ G/ V/ V/ G/ V
| label3 = Positie
| pos3 = 4/10/14/ 8/ 6/ 7/ 7/ 8/ 9/10/11/11/ 8/ 7/ 6/ 6/ 6/ 7/ 9/ 9/ 9
<!-- -->
| kleur_W = groen2 | text_W = Winst
| kleur_G = geel2 | text_G = Gelijk
| kleur_V = rood2 | text_V = Verlies
| text_T = Thuis 
| text_U = Uit
| kleur_1 = groen1
| kleur_2 = groen2
| kleur_3-4 = groen3
| kleur_5-7 = blauw1
| kleur_18- = rood1
| bron = Wat bronnen
}}

Voorbeeld 5: Tabel resultaten-/positie-/puntenverloop van een team met legenda bewerken

Voorbeeld 5
Speelronde123456789101112131415161718192021
ResultaatWVVWWGWVVVVWWWWVGVVGV
Punten3336910131313131316192225252626262727
Positie41014867789101111876667999
Bron: Wat bronnen
U = Uit; T = Thuis; W = Winst; G = Gelijk; V = Verlies 
{{#invoke:sports rbr table|table|legendpos=b
| title = Voorbeeld 4
| header = Speelronde
| label1 = Resultaat
| res1 = W/ V/ V/ W/ W/ G/ W/ V/ V/ V/ V/ W/ W/ W/ W/ V/ G/ V/ V/ G/ V
| label2 = Punten
| pos2 = 3/ 3/ 3/ 6/ 9/10/13/13/13/13/13/16/19/22/25/25/26/26/26/27/27
| label3 = Positie
| pos3 = 4/10/14/ 8/ 6/ 7/ 7/ 8/ 9/10/11/11/ 8/ 7/ 6/ 6/ 6/ 7/ 9/ 9/ 9
<!-- -->
| kleur_W = groen2 | text_W = Winst
| kleur_G = geel2 | text_G = Gelijk
| kleur_V = rood2 | text_V = Verlies
| text_T = Thuis 
| text_U = Uit
| kleur_1 = groen1
| kleur_2 = groen2
| kleur_3-4 = groen3
| kleur_5-7 = blauw1
| kleur_18- = rood1
| bron = Wat bronnen
}}

Zie ook bewerken 

-- This module implements {{Sports rbr table}}
local p = {}

-- Internationalisation
local labels = {
	teamround = 'Team ╲ Speelronde',
	source = 'Bron:',
	notes = 'Opmerking(en):',
	matches = 'wedstrijd(en)',
	updatedto = 'Bijgewerkt tot en met <matches> gespeeld op <date>.',
	firstplayed = 'De eerste <matches> word(t/en) gespeeld op <date>.',
	futuredate = '?',
	complete = 'complete',
	future = 'future'
}

local modname = 'Module:Sports rbr table'
local templatestyles = 'Module:Sports rbr table/styles.css'

local args = nil

local preview, tracking = '', ''
local hasnotes = false

local colorlist = {}
local textlist = {}

local color_map = {
		green1='#BBF3BB', green2='#CCF9CC', green3='#DDFCDD', green4='#EEFFEE',
		blue1='#BBF3FF', blue2='#CCF9FF', blue3='#DDFCFF', blue4='#EEFFFF',
		yellow1='#FFFFBB', yellow2='#FFFFCC', yellow3='#FFFFDD', yellow4='#FFFFEE',
		red1='#FFBBBB', red2='#FFCCCC', red3='#FFDDDD', red4='#FFEEEE',
		black1='#BBBBBB', black2='#CCCCCC', black3='#DDDDDD', black4='#EEEEEE',
		['1st']='#FFD700', ['2nd']='#C0C0C0', ['3rd']='#CC9966',
		groen1='#BBF3BB', groen2='#CCF9CC', groen3='#DDFCDD', groen4='#EEFFEE',
		blauw1='#BBF3FF', blauw2='#CCF9FF', blauw3='#DDFCFF', blauw4='#EEFFFF',
		geel1='#FFFFBB', geel2='#FFFFCC', geel3='#FFFFDD', geel4='#FFFFEE',
		rood1='#FFBBBB', rood2='#FFCCCC', rood3='#FFDDDD', rood4='#FFEEEE',
		zwart1='#BBBBBB', zwart2='#CCCCCC', zwart3='#DDDDDD', zwart4='#EEEEEE',
		['1e']='#FFD700', ['2de']='#C0C0C0', ['3de']='#CC9966'
	}

local legend_symbols = {O='W/O'}

local legend_order_default = {'U', 'T', 'N', 'B', 'W', 'D', 'L', 'Ab', 'P', 'O'}

local function isnotempty(s)
	return s and s:match( '^%s*(.-)%s*$' ) ~= ''
end

local function zeropad(n)
	if n>=0 and n < 10 then
		return '00' .. n
	end
	if n>=0 and n < 100 then
		return '0' .. n
	end
	return '' .. n
end

local function pad_key(k)
	-- Zero pad, fix ranges and dashes
	if k then
		k = k .. ' '
		k = mw.ustring.gsub(k, '–', '-')
		k = mw.ustring.gsub(k, '_([%d][^%d])', '_0%1')
		k = mw.ustring.gsub(k, '%-([%d][^%d])', '-0%1')
		k = mw.ustring.gsub(k, '_([%d][%d][^%d])', '_0%1')
		k = mw.ustring.gsub(k, '%-([%d][%d][^%d])', '-0%1')
		k = mw.ustring.gsub(k, '([^%d])%-([%d])', '%1000-%2')
		k = mw.ustring.gsub(k, '([%d])%-%s*$', '%1-999')
		k = mw.ustring.gsub(k, '^%s*(.-)%s*$', '%1')
	end

	return k
end

local function matches_date(text, m, d)
	return mw.ustring.gsub(mw.ustring.gsub(text .. '', '<matches>', m), '<date>', d)
end

local function escapetag(text)
	return mw.ustring.gsub(text, '</', '<FORWARDSLASH')
end

local function unescapetag(text)
	return mw.ustring.gsub(text, '<FORWARDSLASH', '</')
end

local function get_color(p)
	if p then
		p = mw.ustring.gsub(p, '</?[Aa][Bb][Bb][Rr][^<>]*>', '')
		p = mw.ustring.gsub(p, '<[Ss][Uu][Pp]>[^<>]*</[Ss][Uu][Pp]>', '')
		p = mw.ustring.gsub(p, '</?[Ss][^<>]*>', '')
		p = mw.ustring.gsub(p, '†%s*$', '')
		p = mw.ustring.gsub(p, '=%s*$', '')
		p = mw.ustring.gsub(p, '%[%[[^%[%]|]*|([^%[%]|]*)%]%]', '%1')
		if p:match('^%a%a*$') then
			if args['text_' .. p] == nil then
				tracking = tracking .. '[[Categorie:Paginas die gebruikt maken van rbr table met een onbeschreven resultaat|'
					.. p:match('^(%a).*$') .. ']]'
			end
		end
	end
	local c = colorlist[p] or colorlist[zeropad(tonumber(p) or -1)]
	if c then
		return color_map[c] or c
	end
	p = tonumber(p or '0') or 0
	if p <= 0 then
		return nil
	end
	-- ranges in order of specificity
	local offset1, offset2 = 999, 999
	for k,v in pairs( colorlist ) do
		local r1 = tostring(k):match( '^%s*([%d]+)%-[%d]+%s*$' )
		local r2 = tostring(k):match( '^%s*[%d]+%-([%d]+)%s*$' )
		if r1 and r2 then
			r1 = tonumber(r1)
			r2 = tonumber(r2)
			if (r1 <= p) and (r2 >= p) then
				if (c == nil) or ((p - r1) <= offset1 and (r2 - p) <= offset2) then
					c = color_map[v] or v
					offset1 = p - r1
					offset2 = r2 - p
				end
			end
		end
	end
	return c
end

local function check_arg(k, st)
	k = tostring(k) or ''
	if k == 'firstround' or k == 'sortable' or k == 'updated' or k == 'update'
		or k == 'source' or k =='bron' or k =='notes' or k == 'legendpos'
		or k == 'date' or k == 'header' or k == 'title' or k == 'start_date'
		or k == 'labelnowrap' or k == 'labelalign' or k == 'toptext' or st.addtl_args(k) then
	elseif k == 'legendorder' then
		tracking = tracking .. '[[Categorie:Pages using sports rbr table with legendorder]]'
	elseif tostring(k):match( '^%s*text_?(.-)%s*$' ) then
	elseif tostring(k):match( '^%s*colou?r_?(.-)%s*$' ) then
	elseif tostring(k):match( '^%s*kleur_?(.-)%s*$' ) then
	elseif tostring(k):match( '^%s*team[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*label[%d]+%s*$' ) then
		if args['header'] then
		else
			tracking = tracking .. '[[Categorie:Pages using sports rbr table with unsupported parameters|ψ]]'
		end
	elseif tostring(k):match( '^%s*opp[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*pos[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*grnd[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*res[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*posc[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*grndc[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*resc[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*split[%d]+%s*$' ) then
	elseif k == 'rnd1' then
		tracking = tracking .. '[[Categorie:Pages using sports rbr table with rnd parameters]]'
	elseif tostring(k):match( '^%s*rnd[%d]+%s*$' ) then
	elseif tostring(k):match( '^%s*opp_' ) then
	elseif tostring(k):match( '^%s*pos_' ) then
	elseif tostring(k):match( '^%s*grnd_' ) then
	elseif tostring(k):match( '^%s*res_' ) then
	elseif tostring(k):match( '^%s*posc_' ) then
	elseif tostring(k):match( '^%s*grndc_' ) then
	elseif tostring(k):match( '^%s*resc_' ) then
	elseif tostring(k):match( '^%s*name_' ) then
	elseif tostring(k):match( '^%s*note_' ) then
	elseif tostring(k):match( '^%s*pos[%d]+_rnd[%d]+_colou?r%s*$' ) then
		tracking = tracking .. '[[Categorie:Pages using sports rbr table with per team and round coloring]]'
	elseif tostring(k):match( '^%s*pos[%d]+_rnd[%d]+_kleur%s*$' ) then
		tracking = tracking .. '[[Categorie:Pages using sports rbr table with per team and round coloring]]'
	elseif tostring(k):match( '^%s*res[%d]+_rnd[%d]+_colou?r%s*$' ) then
		tracking = tracking .. '[[Categorie:Pages using sports rbr table with per team and round coloring]]'
	elseif tostring(k):match( '^%s*res[%d]+_rnd[%d]+_kleur%s*$' ) then
		tracking = tracking .. '[[Categorie:Pages using sports rbr table with per team and round coloring]]'
	elseif tostring(k):match( '^%s*pos[%d]+_rnd[%d]+_note%s*$' ) then
	elseif tostring(k):match( '^%s*res[%d]+_rnd[%d]+_note%s*$' ) then
	else
		local vlen = mw.ustring.len(k)
		k = mw.ustring.sub(k, 1, (vlen < 25) and vlen or 25)
		k = mw.ustring.gsub(k, '[^%w\-_ ]', '?')
		preview = preview .. 'Unknown: "' .. k .. '"<br>'
		tracking = tracking .. '[[Categorie:Pages using sports rbr table with unsupported parameters|' .. k .. ']]'
	end
end

function p.table(frame)
	local getArgs = require('Module:Arguments').getArgs
	local yesno = require('Module:Yesno')
	args = getArgs(frame, {wrappers = {'Template:Sports rbr table'}})
	
	local style_def = args['style']
	local p_style = require(modname)
	if style_def ~= nil then p_style = require(modname .. '/' .. style_def) end
	
	args = p_style.defaults(args,yesno,color_map)
	
	local rounds = tonumber(args['rounds'] or '0') or 0
	local firstround = tonumber(args['firstround'] or 1) or 1
	local sortable = yesno(args['sortable'] or 'no')
	local updated = args['updated'] or args['update']
	local source = args['source'] or args['bron']
	local notes = args['notes']
	local delimiter = args['delimiter'] or '/'
	local addlegend = nil
	local legendpos = (args['legendpos'] or 'tr'):lower()
	local header, footer, prenotes = '', '', ''
	
	-- Lowercase two labels --
	labels['complete'] = string.lower(labels['complete'])
	labels['future'] = string.lower(labels['future'])

	-- Adjust rounds
	rounds = rounds - (firstround - 1)
	
	-- Tracking
	if updated and updated:match(' %d%d%d%d$') then
		local YY = mw.ustring.gsub(updated, '^.*(%d%d)$', '%1')
		local pn = frame:getParent():getTitle() or ''
		if pn:match('^User:') or pn:match('^User talk:') or pn:match('^Draft:') or pn:match('^Talk:') then
		else
			if pn:match('%d%d' .. YY) or pn:match('[–%-]' .. YY) then
			else
				tracking = tracking .. '[[Categorie:Pages using sports rbr table with dubious updated parameter]]'
			end
		end
	end
	-- Require a source
	if source == nil then
		source = frame:expandTemplate{ title = 'Bron?', args = { 'Geen source/bron parameter gedefinieerd', os.date('%Y'), os.date('%m'), os.date('%d') } }
	elseif source and source:match('[^%[]#') then
		if source:match('eason#') or source:match('%d%d#') then
			tracking = tracking .. '[[Categorie:Pages using sports rbr table with an unusual source]]'
		elseif source:match('^[Hh][Tt][Tt][Pp]') then
			tracking = tracking .. '[[Categorie:Pages using sports rbr table with an unusual source|Φ]]'
		end
	end
	
	-- Process team, pos, and color args
	local team_list = {}
	local maxrounds = 0
	local rowlength = {}
	for k, v in pairs( args ) do
		check_arg(k, p_style)
		-- Preprocess ranges
		if tostring(k):match( '^%s*text_?(.-)%s*$' ) then
			k = pad_key(k)
		end
		if tostring(k):match( '^%s*colou?r_?(.-)%s*$' ) then
			k = pad_key(k)
		end
		if tostring(k):match( '^%s*kleur_?(.-)%s*$' ) then
			k = pad_key(k)
		end

		-- Create the list of teams and count rounds
		local i = tonumber(
				tostring(k):match( '^%s*team([%d]+)%s*$' ) or
				tostring(k):match( '^%s*label([%d]+)%s*$' ) or '0'
				)
		if ( i > 0 and isnotempty(v) ) then
			table.insert(team_list, i)
			local p = p_style.get_argvalues_for_maxround(args,i)
			if args['name_' .. v] then
				local t = args['team' .. i] or args['label' .. i] or ''
				p = p_style.get_argvalues_for_maxround(args,t,'_')
			end
			local pos = mw.text.split(escapetag(p), '%s*' .. delimiter .. '%s*')
			table.insert(rowlength, #pos)
			maxrounds = (#pos > maxrounds) and #pos or maxrounds
			-- maxrounds = p_style.get_maxrounds(args,team_list,i,v,rowlength,maxrounds,delimiter)
		end
		-- Create the list of colors
		local s = tostring(k):match( '^%s*colou?r_?(.-)%s*$' ) or
			tostring(k):match( '^%s*kleur_?(.-)%s*$' )
		if ( s and isnotempty(v) ) then
			colorlist[s] = v:lower()
		end
		-- Check if we are adding a legend
		s = tostring(k):match( '^%s*text_?(.-)%s*$' )
		if ( s and isnotempty(v) ) then
			textlist[s] = v
			addlegend = 1
		end
	end
	
	maxrounds = p_style.get_rounds_or_maxrounds(rounds,maxrounds,args,team_list)
	
	table.sort(rowlength)
	for k=2,#rowlength do
		if rowlength[k] ~= rowlength[k-1] then
			tracking = tracking .. '[[Categorie:Pages using sports rbr table with unequal row lengths|k]]'
		end
	end

	-- sort the teams
	table.sort(team_list)

	local fs = 95
	if ((maxrounds - firstround) > 37 ) then
		fs = fs - 2*(maxrounds - firstround - 37)
		fs = (fs < 80) and 80 or fs
	end

	-- Build the table
	local root = mw.html.create('table')
	root:addClass('wikitable')
	root:addClass(sortable and 'sortable' or nil)
	root:addClass('sportsrbrtable')
	root:css('font-size', fs .. '%')

	if args['title'] then
		root:tag('caption'):wikitext(args['title'])
	end

	local navbar = ''
	if args['template_name'] then
		navbar = '<br />' .. frame:expandTemplate{ title = 'navbar', args = { mini=1, style='', brackets=1, args['template_name']}}
		-- remove the next part if https://en.wikipedia.org/w/index.php?oldid=832717047#Sortable_link_disables_navbar_links?
		-- is ever fixed
		if sortable then
			navbar = mw.ustring.gsub(navbar, '<%/?abbr[^<>]*>', ' ')
		end
	end
	
	-- Heading row
	local row = p_style.header(root,args,labels,maxrounds,navbar,team_list,firstround)

	-- Team positions
	local prefixes = {'pos', 'res', 'grnd'}
	for k=1,#team_list do
		local i = team_list[k]
		local t = args['team' .. i] or args['label' .. i] or ''
		local o = args['opp' .. i] or ''
		local n = args['note' .. i] or ''
		local efnname = 'note' .. i
		local suf = i
		if args['name_' .. t] then
			o = args['opp_' .. t] or ''
			n = args['note_' .. t] or ''
			efnname = 'note' .. t
			suf = '_' .. t
			t = args['name_' .. t]
		end

		if n ~= '' then
			if args['note_' .. n] then
				n = frame:expandTemplate{ title = 'efn', args = { name='note' .. n, ''} }
			else
				n = frame:expandTemplate{ title = 'efn', args = { name=efnname, n} }
			end
			hasnotes = true
		end
		
		local resfound = (args['grnd' .. i] and 1 or 0) + (args['pos' .. i] and 1 or 0) + (args['res' .. i] and 1 or 0)
		if args['name_' .. t] then
			resfound = (args['grnd_' .. t] and 1 or 0) + (args['pos_' .. t] and 1 or 0) + (args['res_' .. t] and 1 or 0)
		end
		if (resfound > 1) then
			tracking = tracking .. '[[Categorie:Pages using sports rbr table with conflicting parameters]]'
		end
		local rowsdisp = 0
		for subrow,lbl in ipairs(prefixes) do
			local p = args[lbl .. suf] or ''
			local pc = args[lbl .. 'c' .. suf] or ''
			if p ~= '' or (rowsdisp == 0 and subrow == 3) then
				rowsdisp = rowsdisp + 1
				row = root:tag('tr')
				row:tag('th')
					:addClass(args['team' .. i] and 'sportsrbrtable-team' or 'sportsrbrtable-lbl')
					:css('text-align', args['labelalign'])
					:css('white-space', args['labelnowrap'] and 'nowrap' or nil)
					:attr('scope', 'row')
					:wikitext(mw.ustring.gsub(t,'^%s*%-%s*$', '&nbsp;') .. n)
				if t:match('<%s*[Cc][Ee][Nn][Tt][Ee][Rr]%s*>') then
					tracking = tracking .. '[[Categorie:Pages using sports rbr table with unsupported parameters|χ]]'
				end
				local opp = mw.text.split(escapetag(o), '%s*' .. delimiter .. '%s*')
				local pos = mw.text.split(escapetag(p), '%s*' .. delimiter .. '%s*')
				local clr = mw.text.split(escapetag(pc), '%s*' .. delimiter .. '%s*')
				for r=1,maxrounds do
					local s = args['team' .. i .. '_rnd' .. r .. '_' .. 'color'] or
						args['team' .. i .. '_rnd' .. r .. '_' .. 'colour'] or
						args['team' .. i .. '_rnd' .. r .. '_' .. 'kleur'] or
						args[lbl .. i .. '_rnd' .. r .. '_' .. 'color'] or
						args[lbl .. i .. '_rnd' .. r .. '_' .. 'colour'] or
						args[lbl .. i .. '_rnd' .. r .. '_' .. 'kleur'] or nil
					local n = args['team' .. i .. '_rnd' .. r .. '_' .. 'note'] or
						args[lbl .. i .. '_rnd' .. r .. '_' .. 'note'] or nil
					if s then s = color_map[s] or s end
					local opprt, posrt = unescapetag(opp[r] or ''), unescapetag(pos[r] or '')
					local posrc = isnotempty(clr[r]) and clr[r] or posrt

					if posrt:match('^%s*<[Uu]>[%d–]+[A-Za-z][A-Za-z0-9]*') then
						posrc = posrc:match('^%s*<[Uu]>[%d–]+([A-Za-z][A-Za-z0-9]*)')
						posrt = mw.ustring.gsub(posrt, '^%s*(<[Uu]>[%d–]+)[A-Za-z][A-Za-z0-9]*', '%1')
					elseif posrt:match('^%s*[%d–]+[A-Za-z][A-Za-z0-9]*') then
						posrc = posrc:match('^%s*[%d–]+([A-Za-z][A-Za-z0-9]*)')
						posrt = mw.ustring.gsub(posrt, '^%s*([%d–]+)[A-Za-z][A-Za-z0-9]*', '%1')
					end
			
					local ds
					if args['sortable'] and (opprt or posrt):match('^%s*[%d]+[^%d%s]') then
						ds = mw.ustring.gsub(opprt or posrt, '^%s*([%d]+)[^%d%s].*$', '%1')
					end

					if n then
						if args['note_' .. n] then
							n = frame:expandTemplate{ title = 'efn', args = { name='note' .. n, args['note_' .. n]} }
						else
							n = frame:expandTemplate{ title = 'efn', args = { name='note' .. i .. '_rnd_' .. r, n} }
						end
						hasnotes = true
					end
		
					row:tag('td')
						:attr('data-sort-value', ds)
						:css('background-color', s or get_color(p_style.rowbg(posrc, opprt)))
						:wikitext(p_style.rowtext(frame,args,legend_symbols,posrt,opprt) .. (n or ''))
				end
				if args['split' .. i] and k ~= #team_list then
					row = root:tag('tr')
						:css('background-color', '#BBBBBB')
						:css('line-height', '3pt')
					row:tag('td')
						:attr('colspan', maxrounds + 1)
				end
			end
		end
	end

	-- build the legend
	if addlegend then
		-- Sort the keys for the legend
		local legendkeys = {}
		for k,v in pairs( textlist ) do
			table.insert(legendkeys, k)
		end
		table.sort(legendkeys)

		if args['legendorder'] then
			legendkeys = mw.text.split(args['legendorder'] .. delimiter ..
				table.concat(legend_order_default, delimiter) .. delimiter ..
				table.concat(legendkeys, delimiter), '%s*' .. delimiter .. '%s*')
		else
			legendkeys = mw.text.split(
				table.concat(legend_order_default, delimiter) .. delimiter ..
				table.concat(legendkeys, delimiter), '%s*' .. delimiter .. '%s*')
		end
		local lroot
		if (legendpos == 't' or legendpos == 'b') then
			lroot = mw.html.create('')
			local firsttag = true
			for k,v in pairs( legendkeys ) do
				if v and textlist[v] then
					if firsttag == false then lroot:wikitext('; ') end
					local c = colorlist[v] or ''
					local l = lroot:tag('span')
						:css('margin', '0')
						:css('white-space', 'nowrap')
						:tag('span')
							:addClass('legend-text')
							:css('border', 'none')
							:css('padding', '1px .3em')
							:css('background-color', color_map[c] or c)
							:css('font-size', '95%')
							:css('border', '1px solid #BBB')
							:css('line-height', '1.25')
							:css('text-align', 'center')
							:wikitext(p_style.legendtext(legend_symbols,v))
							:done()
						:wikitext(' = ' .. textlist[v])
					textlist[v] = nil
					firsttag = false
				end
			end
		else
			lroot = mw.html.create('table')
			if legendpos == 'tl' or legendpos == 'bl' then
				lroot:addClass('wikitable')
				lroot:css('font-size', '88%')
			else
				lroot:addClass('infobox')
				lroot:addClass('bordered')
				-- lroot:css('width', 'auto')
			end
			for k,v in pairs( legendkeys ) do
				if v and textlist[v] then
					local c = colorlist[v] or ''
					local row = (legendpos == 'tl' or legendpos == 'bl') and lroot or lroot:tag('tr')
					local l = row:tag('th'):css('background-color', color_map[c] or c)
					if legend_symbols[v] then
						l:css('font-weight', 'normal')
							:css('padding', '1px 3px')
							:wikitext(legend_symbols[v])
					else
						l:css('width', '10px')
					end
					row:tag('td')
						:css('padding', '1px 3px')
						:wikitext(textlist[v])
					textlist[v] = nil
				end
			end
		end
		if (legendpos == 'bl' or legendpos == 'br') then
			footer = footer .. tostring(lroot)
		elseif (legendpos == 'b') then
			prenotes = prenotes .. tostring(lroot)
		elseif (legendpos == 't') then
			args['toptext'] = (args['toptext'] or '')
				.. frame:expandTemplate{ title = 'Leeg sjabloon' }
				.. tostring(lroot)
				.. frame:expandTemplate{ title = 'Leeg sjabloon' }

		else
			header = header .. tostring(lroot)
		end
	end

	-- simplify updated == complete case
	local lupdated = updated and string.lower(updated) or ''
	if lupdated == labels['complete'] or lupdated == 'complete' or lupdated == 'voltooid' then
		lupdated = ''
	end

	-- add note list
	if hasnotes then
		footer = footer .. frame:expandTemplate{ title = 'notelist' }
	end
	
	-- build the footer	
	if prenotes ~= '' or notes or source or lupdated ~= '' then
		footer = footer .. frame:expandTemplate{ title = 'Leeg sjabloon' }
		if lupdated ~= '' then
			local mtext = args['matches_text'] or labels['matches']
			if lupdated == labels['future'] or lupdated == 'future' then
				footer = footer .. matches_date(labels['firstplayed'] .. ' ',
					mtext, args['start_date'] or labels['futuredate'])
			else
				footer = footer .. matches_date(labels['updatedto'] .. ' ',
					mtext, updated)
			end
		end
		if source then
			footer = footer .. labels['source'] .. ' ' .. source
		end
		if prenotes ~= '' then
			if lupdated ~= '' or source then
				footer = footer .. '<br>'
			end
			footer = footer .. prenotes
		end
		if notes then
			if prenotes ~= '' or lupdated ~= '' or source then
				footer = footer .. '<br>'
			end
			footer = footer .. labels['notes'] .. ' ' .. notes
		end
		footer = footer .. frame:expandTemplate{ title = 'Leeg sjabloon' }
	end
	-- add clear right for the legend if necessary
	footer = footer .. ((addlegend and (legendpos == 'bl' or legendpos == 'br'))
		and '<div style="clear:right"></div>' or '')
	if tracking ~= '' then
		if frame:preprocess( "{{REVISIONID}}" ) == "" then
			tracking = preview
		end
	end
	return frame:extensionTag{ name = 'templatestyles', args = { src = templatestyles} }
		.. header .. (args['toptext'] or '') .. '<div style="overflow:hidden">'
		.. '<div class="noresize overflowbugx" style="overflow:auto">'
		.. tostring(root) .. '</div></div>' .. footer-- .. tracking
end

function p.get_argvalues_for_maxround(args, x, del)
	del = del or ''
	return args['pos' .. del .. x] or args['res' .. del .. x] or ''
end

function p.get_rounds_or_maxrounds(rounds, maxrounds)
	return (rounds > maxrounds) and rounds or maxrounds
end

function p.addtl_args(k)
	-- just return 'true', no additional args
	return true
end

function p.defaults(args)
	-- set nothing
	return args
end

function p.header(root,args,labels,maxrounds,navbar,team_list,firstround)
	local row = root:tag('tr')
	row:tag('th')
		:attr('rowspan', args['sortable'] and 2 or nil)
		:wikitext((args['header'] or labels['teamround']) .. navbar)
	for r=1,maxrounds do
		row:tag('th')
			:addClass(args['sortable'] and 'sportsrbrtable-rnd-sort' or 'sportsrbrtable-rnd')
			:attr('scope', 'col')
			:wikitext(args['rnd' .. (r + (firstround - 1))]
				or (r + (firstround - 1)))
	end
	if args['sortable'] then
		row = root:tag('tr')
		for r=1,maxrounds do
			row:tag('th')
				:addClass('sportsrbrtable-rnd-toggle')
		end
	end
	return row
end

function p.rowtext(frame,args,legend_symbols,posrt,postrc,opprt,opprc)
	return legend_symbols[posrt] or posrt
end

function p.rowbg(posrc)
	return posrc
end

function p.legendtext(legend_symbols,v)
	return legend_symbols[v] or (v:match('^[^%d][^%d]?$') and v) or '&nbsp;'
end

return p
Overgenomen van "https://nl.wikipedia.org/w/index.php?title=Module:Sports_rbr_table&oldid=62638179"