Módulo:Football table
Este módulo basado en Lua tiene la intención de construir tablas de grupos y ligas para deportes. Tenga en cuenta que este módulo se utiliza ampliamente, así que pruebe rigurosamente los cambios potenciales en la zona de pruebas y asegúrese de que existe un consenso antes de implementar cambios importantes. El resto de esta documentación explica cómo se configura el módulo. Consulte las páginas de estilo individuales para la instrucción del uso detallado.
Uso
El comando básico es{{#invoke:Football table|main|estilo=XXX}} donde XXX hace referencia al estilo particular elegido. Consulte estas páginas de estilos específicos para más información sobre cómo utilizar este módulo. Los estilos disponibles son:
- WDL (Para tablas con un sistema de victoria-empate-derrota)
- WL (Para tablas con un sistema de victoria-derrota)
- WL OT (Para tablas con un sistema de victoria-derrota que da diferente valor a los triunfos en tiempo suplementario)
- WL OTL tiebreak (Para tablas con un sistema de victoria-derrota-derrota en TS y una columna de desempate separada)
¿Más estilos?
El módulo utiliza Lua para crear las tablas. La mayor parte de la funcionalidad se obtiene a partir del módulo principal, pero el formato específico de columnas proviene de los sub-módulos de estilo. Los estilos existentes pueden manejar una gran cantidad de opciones diferentes. En caso de necesitar opciones adicionales que podría ser útil para crear un nuevo estilo. Tenga en cuenta que algunos ajustes de un estilo existente podría darle la funcionalidad que necesita, en lugar de crear un estilo completamente nuevo. En caso de crear un nuevo estilo, es posible que desee consultar el manual de referencia de Lua.
-- Módulo para crear tablas de posiciones en Deportes
-- Ver documentación para mas detalles
require('strict')
local p = {}
-- Helper functions
local function isnotblank(s)
return s and s:match( '^%s*(.-)%s*$' ) ~= ''
end
local function firstnonblank(s1,s2)
if ( s1 and s1:match( '^%s*(.-)%s*$' ) ~= '' ) then
return s1
elseif ( s2 and s2:match( '^%s*(.-)%s*$' ) ~= '' ) then
return s2
end
return nil
end
-- Main function
function p.main(frame)
-- Declare locals
local Args = frame.args
local Pargs = frame:getParent().args
local ii_start, ii_end, N_rows_res = 0
local text_field_result
local notes_exist = false
local t = {}
local t_footer = {}
local t_return = {}
local team_list = {}
local jj, jjj
-- Exit early if we are using section transclusion for a different section
if( isnotblank(Pargs['transcludesection']) and isnotblank(Args['seccion']) ) then
if( Pargs['transcludesection'] ~= Args['seccion'] ) then
return ''
end
end
-- Get the custom start point for the table (most will start by default at 1
local top_pos = tonumber(Args['pos_top']) or 1
local N_teams = top_pos - 1 -- Default to 0 at start, but higher number needed to skip certain entries
-- Load modules
local yesno = require('Module:Yesno')
-- Load style and (sub) modules
local style_def = Args['estilo'] or 'WDL'
-- Historically 'football' exists as style, this is now forwarded to WDL
if style_def == 'football' then style_def = 'WDL' end
local p_style = require('Módulo:Football table/'..style_def)
local p_sub = require('Módulo:Football table/sub')
-- Random value used for uniqueness
math.randomseed( os.clock() * 10^8 )
local rand_val = math.random()
-- Declare colour scheme
local result_col = {}
result_col = {verde1='#88DE88', verde2='#9DEF9D', verde3='#BCF9BC', verde4='#D0FFD0', verde5='#77CC77',
azul1='#C1DCF1', azul2='#CCE6FF', azul3='#D7F0FF', azul4='#D8FEFF', azul5='#B8D2E6', azul6='#B0C4DE',
amarillo1='#FCEB80', amarillo2='#FFF892', amarillo3='#FFFFC0', amarillo4='#FFFFD4', amarillo5='#FAD660', amarillo6='#FBE070',
rojo1='#FFB0B0', rojo2='#FFC0C0', rojo3='#FFD0D0', rojo4='#FFE0E0',
negro1='#BBBBBB', negro2='#CCCCCC', negro3='#DDDDDD', negro4='#EEEEEE',
oro='#FFD700'}
-- Declare results column header
local results_header = {}
results_header = {Clasificacion='Clasificación', Clasificacion_descenso='Clasificación o descenso',
Ascenso='Ascenso', Ascenso_clasificacion_descenso='Ascenso, clasificación o descenso',
Ascenso_descenso='Ascenso o descenso', Ascenso_clasificacion='Ascenso o clasificación',
Descenso='Descenso', Notas='Notas'}
local results_defined = false -- Check whether this would be needed
-- Now define line for column header (either option or custom)
local local_res_header = results_header[Args['encabezado_notas']] or Args['encabezado_notas'] or ''
-- Check whether it includes a note
local res_head_note = Args['encabezado_notas_res']
local res_head_note_text = ''
if res_head_note then
notes_exist = true
res_head_note_text = frame:expandTemplate{ title = 'NPE', args = { group='lower-alpha', res_head_note} }
end
local results_header_txt = '! scope="col" |'..local_res_header..res_head_note_text..'\n'
-- Get status option
local t_status = p_style.status(Args)
-- Alternative syntax for team list
if Args['orden_equipo'] and Args['orden_equipo'] ~= '' then
local tlist = mw.text.split(Args['orden_equipo'], '%s*[;,]%s*')
for k, tname in ipairs(tlist) do
if tname ~= '' then
Args['equipo' .. k] = tname
end
end
end
-- Read in number of consecutive teams (ignore entries after skipping a spot)
while Args['equipo'..N_teams+1] ~= nil do
N_teams = N_teams+1
-- Sneakily add it twice to the team_list parameter, once for the actual
-- ranking, the second for position lookup in sub-tables
-- This is possible because Lua allows both numbers and strings as indices.
team_list[N_teams] = Args['equipo'..N_teams] -- i^th entry is team X
team_list[Args['equipo'..N_teams]] = N_teams -- team X entry is position i
end
-- Show all stats in table or just matches played and points
local pld_pts_val = firstnonblank(Pargs['solo_pj_pts'], Args['solo_pj_pts']) or 'no'
local full_table
local hide_class_rules = false
-- True if par doesn't exist, false otherwise
-- First convert to lower case if it is a string
pld_pts_val = string.lower(pld_pts_val)
if yesno(pld_pts_val) then
full_table = false
elseif pld_pts_val=='no_ocultar_reglas_clasificacion' then
full_table = true
hide_class_rules = true
else
full_table = true
end
-- Show groups or note
local show_groups_val = firstnonblank(Pargs['mostrar_grupos'], Args['mostrar_grupos']) or 'no'
local group_col = false
if yesno(show_groups_val) then group_col = true end
-- Show match_table or not
local show_matches_val = firstnonblank(Pargs['mostrar_partidos'], Args['mostrar_partidos']) or 'no'
local match_table = false
if yesno(show_matches_val) then match_table = true end
local p_matches = match_table and require('Módulo:Football results')
-- Custom position column label or note
local pos_label = Args['titulo_pos'] or ''
if pos_label == '' then
-- If empty (or undeclared) then default
pos_label = '<abbr title="Posición">Pos.</abbr>'
end
-- Get VTE button text (but only for non-empty text)
local template_name = Args['nombre_plantilla'] or ''
local VTE_text = ''
if template_name~='' then
VTE_text = frame:expandTemplate{ title = 'navbar', args = { mini=1, style='float:right', template_name} }
end
-- Write column headers
t_return = p_style.header(t,Args,p_sub,pos_label,group_col,VTE_text,full_table,results_header_txt)
if match_table then
-- Add empty column header
t_return.count = t_return.count+1
table.insert(t_return.tab_text,'! scope="row" class="unsortable" style="background-color:#cbd0d8;border-top:white;border-bottom:white;line-width:3pt;"| \n')
-- Add rest of header
t_return = p_matches.header(t_return,Args,p_sub,N_teams,team_list)
end
t = t_return.tab_text
local N_cols = t_return.count
-- Determine what entries go into table
-- Find out which team to show (if any)
local ii_show = team_list[firstnonblank(Pargs['mostrar_equipo'], Args['mostrar_equipo'])] -- nil if non-existant
-- Start and end positions to show
local n_to_show = tonumber(Args['mostrar_limite']) or N_teams
-- Check for "legal value", if not legal (or non declared), then show all
local check_n = ((n_to_show>=(N_teams-top_pos+1)) or (n_to_show<=1) or (n_to_show~=math.floor(n_to_show)))
-- Also check whether there is a valid ii_show
if check_n or (not ii_show) then
ii_start = top_pos
ii_end = N_teams
else
-- It's a proper integer between top_pos+1 and N_teams-1
-- If it is in the middle show the same number above and below
-- If it is in the top or bottom, show the exact number
-- How many to show on the side
local n_show_side = math.floor(n_to_show/2)
if (ii_show-top_pos+1)<=n_show_side then
-- Top team
ii_start = top_pos
ii_end = top_pos+n_to_show-1
elseif ii_show>=(N_teams+1-n_show_side) then
-- Bottom team
ii_start = N_teams+1-n_to_show
ii_end = N_teams
else
-- Normal case
ii_start = ii_show-n_show_side
ii_end = ii_show+n_show_side
end
end
-- For results column
local new_res_ii = ii_start
-- Pre-check for existence of column
for ii = ii_start, ii_end do
if Args['resultado'..ii] then results_defined = true end
end
-- Remove results header if it is unused
if full_table and not results_defined then
-- First get it as one string, then use string replace to replace that header by empty string
local t_str = tostring(table.concat(t))
t_str = mw.ustring.gsub( t_str, results_header_txt, '' )
N_cols = N_cols-1 -- There is actually one column less
t = {}
table.insert(t, t_str)
end
-- Write rows
local team_name, team_code_ii, team_code_jj, pos_num, group_txt, note_local
local note_string, note_local, note_local_num, note_id
local note_id_list = {}
local hth_id_list = {}
for ii = ii_start, ii_end do
-- First get code
team_code_ii = team_list[ii]
-- Now read values
pos_num = Args['pos_'..team_code_ii] or ii
group_txt = Args['grupo_'..team_code_ii] or ' '
team_name = Args['nombre_'..team_code_ii] or team_code_ii
note_local = Args['nota_'..team_code_ii] or nil
-- Does it need a promotion/qualification/relegation tag
local result_local = Args['resultado'..ii] or nil
local bg_col = nil
-- Get local background colour
if result_local then
bg_col = result_col[Args['color_'..result_local]] or Args['color_'..result_local] or 'white'
bg_col = 'background-color:'..bg_col..';' -- Full style tag
end
if not bg_col then bg_col = 'background-color:transparent;' end -- Becomes default if undefined
-- Bold this line or not
local ii_fw = ii == ii_show and 'font-weight: bold;' or 'font-weight: normal;'
-- Check whether there is a note or not, if so get text ready for it
if note_local and full_table then
-- Set global check for notes to true
notes_exist = true
-- There are now 3 options for notes
-- 1) It is a full note
-- 2) It is a referal to another note (i.e. it's just a team code; e.g. nota_AAA=Text, nota_BBB=AAA) in which the note for BBB should link to the same footnote as AAA, with
-- 2a) The other linked note exist in the part of the table shown
-- 2b) The part of the note does not exist in the part of the table shown
if not Args['nota_'..note_local] then
-- Option 1
-- Now define the identifier for this
note_id = '"nota_tabla_'..team_code_ii..rand_val..'"' -- Add random end for unique ID if more tables are present on article (which might otherwise share an ID)
note_id_list[team_code_ii] = note_id
-- Call refn template
note_string = frame:expandTemplate{ title = 'NPE', args = { group='lower-alpha', name=note_id, note_local} }
else
-- Option 2
-- It is option 2a in either one if either the main note is inside the sub-table
-- or another ref to that note is inside the sub-table
-- Basically when it either has been defined, or the main link will be in the table
note_local_num = team_list[note_local]
if note_id_list[note_local] or ((note_local_num >= ii_start) and (note_local_num <= ii_end)) then
-- Option 2a
note_id = '"nota_tabla_'..note_local..rand_val..'"'
note_string = frame:extensionTag{ name = 'ref', args = { group = 'lower-alpha', name = note_id} }
else
-- Option 2b
-- Now define the identifier for this
note_id = '"nota_tabla_'..note_local..rand_val..'"' -- Add random end for unique ID
note_id_list[note_local] = note_id
-- Call refn template
note_string = frame:expandTemplate{ title = 'NPE', args = { group='lower-alpha', name=note_id, Args['note_'..note_local]} }
end
end
else
note_string = '';
end
-- Insert status when needed
local status_string = ''
local status_local = Args['estado_'..team_code_ii]
local status_let_first = true
local curr_letter
-- Only if it is defined
if status_local then
-- Take it letter by letter
for jjj = 1,mw.ustring.len(status_local) do
curr_letter = mw.ustring.upper(mw.ustring.sub(status_local,jjj,jjj))
-- See whether it exist
if t_status.code[curr_letter] then
-- Depending on whether it is the first letter of not
if status_let_first then
status_string = curr_letter
t_status.called[curr_letter] = true
status_let_first = false
else
status_string = status_string..', '..curr_letter
t_status.called[curr_letter] = true
end
end
end
-- Only add brackets/dash and bolding if it exist
if not status_let_first then
if t_status.position == 'antes' then
status_string = '<span style="font-weight:bold">'..string.lower(status_string)..' –</span> '
else
status_string = ' <span style="font-weight:bold">('..status_string..')</span>'
end
end
end
-- Now build the rows
table.insert(t,'|- \n') -- New row
table.insert(t,'! scope="row" style="text-align: center;'..ii_fw..bg_col..'"| '..pos_num..'\n') -- Position number
if full_table and group_col then
table.insert(t,'| style="'..ii_fw..bg_col..'" |'..group_txt..'\n') -- Group number/name
end
-- Build the team string order based on status position
local team_string
if t_status.position == 'antes' then
team_string = status_string..team_name..note_string
else
team_string = team_name..note_string..status_string
end
table.insert(t,'| style="text-align: left; white-space:nowrap;'..ii_fw..bg_col..'"| '..team_string..'\n')-- Team (with possible note)
-- Call to subfunction
t_return = p_style.row(frame,t,Args,p_sub,notes_exist,hth_id_list,full_table,rand_val,team_list,team_code_ii,ii_start,ii_end,ii_fw,bg_col,N_teams,ii,ii_show)
t = t_return.t
notes_exist = t_return.notes_exist
hth_id_list = t_return.hth_id_list
-- Now check what needs to be added inside the results column
if full_table then
local res_jjj
if ii == new_res_ii then
-- First check how many rows you need for this
N_rows_res = 1
jjj = ii+1
result_local = Args['resultado'..ii] or ''
local cont_loop = true
while (jjj<=ii_end) and cont_loop do
if Args['division'..tostring(jjj-1)] then
cont_loop = false
new_res_ii = jjj
else
res_jjj = Args['resultado'..jjj] or ''
if result_local == res_jjj then
N_rows_res = N_rows_res+1
else
cont_loop = false
new_res_ii = jjj
end
end
jjj = jjj+1
end
-- Now create this field (reuse ii_fw and bg_col)
-- Bold (if in range) or not
if ii_show and (ii_show>=ii) and (ii_show<=(ii+N_rows_res-1)) then
ii_fw = 'font-weight: bold;'
else
ii_fw = 'font-weight: normal;'
end
-- Get background colour
bg_col = nil
if Args['resultado'..ii] then
bg_col = result_col[Args['color_'..result_local]] or Args['color_'..result_local] or 'white'
bg_col = 'background-color:'..bg_col..';' -- Full style tag
end
if not bg_col then bg_col = 'background-color:transparent;' end -- Becomes default if undefined
-- Check for notes
local note_res_string, note_ref, note_text
if Args['nota_resultado_'..result_local] then
notes_exist = true
local note_res_local = Args['nota_resultado_'..result_local]
if not Args['nota_resultado_'..note_res_local] then
-- It does not point to another result note
note_ref = 'resultado_'..result_local
note_id = '"nota_tabla_resultado_'..result_local..rand_val..'"' -- Identifier
note_text = note_res_local
else
-- It does point to another result note
note_ref = 'resultado_'..note_res_local
note_id = '"nota_tabla_resultado_'..note_res_local..rand_val..'"' -- Identifier
note_text = Args['nota_resultado_'..note_res_local]
end
-- Check whether it is already printed
if not note_id_list[note_ref] then
-- Print it
note_id_list[note_ref] = note_id
note_res_string = frame:expandTemplate{ title = 'NPE', args = { group='Notas_tabla', name=note_id, note_text} }
else
-- Refer to it
note_res_string = frame:extensionTag{ name = 'ref', args = { group = 'lower-alpha', name = note_id} }
end
else
note_res_string = ''
end
-- Get text
local text_result = Args['texto_'..result_local] or ''
text_field_result = '| style="'..ii_fw..bg_col..'" rowspan="'..tostring(N_rows_res)..'" |'..text_result..note_res_string..'\n'
-- See whether it is needed (only when blank for all entries)
if results_defined then table.insert(t,text_field_result) end
end
end
-- Insert match row if needed
if match_table then
-- Add empty cell
table.insert(t,'| style="background-color:white;border-top:white;border-bottom:white;"| \n')
-- Now include note to match results if needed
for jj=top_pos,N_teams do
team_code_jj = team_list[jj]
if ii == jj then
-- Nothing
else
local match_note = Args['partido_'..team_code_ii..'_'..team_code_jj..'_nota']
if match_note then
notes_exist = true
-- Only when it exist
-- First check for existence of reference for note
if not (Args['nota_'..match_note] or Args['partido_'..match_note..'_nota']) then
-- It's the entry
note_id = '"nota_tabla_'..team_code_ii..'_'..team_code_jj..rand_val..'"' -- Add random end for unique ID if more tables are present on article (which might otherwise share an ID)
note_id_list[team_code_ii..'_'..team_code_jj] = note_id
note_string = frame:expandTemplate{ title = 'NPE', args = { group='Notas_tabla', name=note_id, match_note} }
else
-- Check for existence elsewhere
note_local_num = team_list[match_note] or ii_end + 1
if note_id_list[match_note] or ((note_local_num >= ii_start) and (note_local_num <= ii_end)) then
-- It exists
note_id = '"nota_tabla'..match_note..rand_val..'"' -- Identifier
note_string = frame:extensionTag{ name = 'ref', args = { group = 'lower-alpha', name = note_id} }
else
-- Now define the identifier for this
note_id = '"nota_tabla'..match_note..rand_val..'"' -- Add random end for unique ID
note_id_list[match_note] = note_id
-- Call refn template
note_string = frame:expandTemplate{ title = 'NPE', args = { group='Notas-tabla', name=note_id, Args['nota_'..match_note]} }
end
end
-- Now append this to the match result string
Args['partido_'..team_code_ii..'_'..team_code_jj] = Args['partido_'..team_code_ii..'_'..team_code_jj]..note_string
end
end
end
-- Add rest of match row
t = p_matches.row(t,Args,N_teams,team_list,ii,ii_show)
end
-- Now, if needed, insert a split (solid line to indicate split in standings, but only when it is not at the last shown position)
if Args['division'..ii] and (ii<ii_end) then
-- Base size on N_cols (it needs 2*N_cols |)
table.insert(t,'|- style="background-color:'..result_col['negro1']..'; line-height:3pt;"\n')
table.insert(t,string.rep('|',2*N_cols)..'\n')
end
end
-- Close table
table.insert(t, '|}\n')
-- Get info for footer
local update = Args['actualizado'] or 'fecha desconocida'
local start_date = Args['fecha_inicio'] or 'fecha desconocida'
local source = Args['fuente'] or frame:expandTemplate{ title = 'cita requerida', args = { reason='No source parameter defined', date=os.date('%B %Y') } }
local class_rules = Args['reglas_clasificacion'] or nil
-- Create footer text
-- Date updating
local matches_text = Args['texto_partidos'] or 'partidos'
if string.lower(update)=='completo' then
-- Do nothing
elseif update=='' then
-- Empty parameter
table.insert(t_footer,'<p style="text-align:center;font-size:90%;">Actualizado a los '..matches_text..' jugados a fecha desconocida.</p> ')
elseif string.lower(update)=='futuro' then
-- Future start date
table.insert(t_footer, '<p style="text-align:center; font-size:90%;">Los primeros '..matches_text..' se disputarán el <span style="font-weight:bold">'..start_date..'.</span></p>')
else
table.insert(t_footer,'<p style="text-align:center;font-size:90%;">Actualizado a los '..matches_text..' jugados el <span style="font-weight:bold">'..update..'.</span></p>')
end
-- Stack footer or not
local stack_footer_val = firstnonblank(Pargs['pie_pagina'], Args['pie_pagina']) or 'no'
local footer_break = false
if yesno(stack_footer_val) then footer_break = true end
-- Variable for linebreak
local stack_string = '<br>'
if footer_break and (not (string.lower(update)=='completo')) then table.insert(t_footer,stack_string) end
table.insert(t_footer,'<p style="text-align:center;font-size:90%;"> Fuente: '..source..'</p> ')
if class_rules and full_table and (not hide_class_rules) then
table.insert(t_footer,'<p style="text-align:center"><small>Criterios de clasificación: '..class_rules..'</small></p> ')
end
-- Now for the named status
local status_exist = false
local status_string = ''
local curr_letter
for jjj = 1,mw.ustring.len(t_status.letters) do
curr_letter = mw.ustring.upper(mw.ustring.sub(t_status.letters,jjj,jjj))
if t_status.called[curr_letter] then
if (footer_break and status_exist) then
status_string = status_string..stack_string
end
if t_status.position == 'antes' then
status_string = status_string..'<span style="font-weight:bold">'..string.lower(curr_letter)..' –</span> '..t_status.code[curr_letter]..'; '
else
status_string = status_string..'<span style="font-weight:bold">('..curr_letter..')</span> '..t_status.code[curr_letter]..'; '
end
status_exist = true
end
end
-- Now end it with a point instead (if it contains entries the '; ' needs to be removed)
if status_exist then
status_string = '<br>'..mw.ustring.sub(status_string,1,mw.ustring.len(status_string)-2)..'.'
table.insert(t_footer,status_string)
end
-- Add notes (if applicable)
if notes_exist then
table.insert(t_footer,'<p style="text-align:center"><small>Notas:</small></p>')
-- As reflist size text
t_footer = '<div class="reflist">'..table.concat(t_footer)..'</div>'
t_footer = t_footer..frame:expandTemplate{ title = 'Listaref', args = { group='lower-alpha'} }
else
-- As reflist size text
t_footer = '<div class="reflist">'..table.concat(t_footer)..'</div>'
end
-- Add footer to main text table
table.insert(t,t_footer)
return table.concat(t)
end
return p