Module:Sports table/Chess: Difference between revisions

Revision as of 22:22, 10 April 2020

Latest revision as of 18:42, 2 July 2022

(36 intermediate revisions by 3 users not shown)

Line 2:

local pp = {}

function pp.headerpreprocess(t,Args,p_sub,pos_label,group_col,VTE_textN_teams,full_tableprefix,results_header_txtdrawfractions)

-- Load relevant modules

local yesno = require('Module:Yesno')

-- Create table header

-- Pre stuff

local player_width = Args['playerwidth'] or '190'

local sort_text = ''

local sort_table_val = Args['sortable_table'] or 'no'

if yesno(sort_table_val) then sort_text = 'sortable' end

table.insert(t,'{|class="wikitable '..sort_text..'" style="text-align:center;"\n') -- Open table

-- Preprocess match data

local top_pos = tonumber(Args['highest_pos']) or 1

local N_teams = top_pos - 1 -- Default to 0 at start, but higher number needed to skip certain entries

local legs = 1

while Args['team'..N_teams+1] ~= nil do N_teams = N_teams+1 end

for ii=1,N_teams do

local ti = Args['team' .. ii]

Args[prefix..'win_'..ti] = 0

Args[prefix..'draw_'..ti] = 0

Args[prefix..'loss_'..ti] = 0

local matchrow_str = Args[prefix..'matchrow_' .. ti] or ''

for jj=1,N_teams do

local tj = Args['team' .. jj]

if ii ~= jj then

if matchrow_str ~= '' then

local match_str = Args['match_' .. ti .. '_' .. tj] or ''

Args[prefix..'match_' .. ti .. '_' .. tj] = mw.ustring.match(matchrow_str, '^([^,]*),?')

end

local match_str = Args[prefix..'match_' .. ti .. '_' .. tj] or ''

local game_count = 1

while match_str ~= '' do

local gii = mw.ustring.match(match_str, '^%s*([^%+%s]*)%s*%+?')

gii = mw.ustring.gsub(gii or '','^%s*','') -- Trim starting whitespace

gii = mw.ustring.gsub(gii or '','%s*$','') -- Trim ending whitespace

if gii == '1' then

Args[prefix..'win_'..ti] = Args[prefix..'win_'..ti] + 1

elseif gii == '½' then

Args[prefix..'draw_'..ti] = Args[prefix..'draw_'..ti] + 1

if yesno(Args['disp_fractions'] or 'yes')drawfractions then

gii = mw.getCurrentFrame():extensionTag{

gii = '<span class="visualhide">&nbsp;</span>¹&frasl;₂'

name = 'templatestyles', args = { src = 'Screen reader-only/styles.css' }

} .. '<span class="sr-only">&nbsp;</span>¹&frasl;₂'

end

elseif gii == '0' then

Args[prefix..'loss_'..ti] = Args[prefix..'loss_'..ti] + 1

end

Args[prefix..'match' .. game_count .. '_' .. ti .. '_' .. tj] = gii

match_str = mw.ustring.gsub(match_str, '^%s*([^%+%s]*)%s*', '') or '' -- Remove gii from the match_str

if match_str ~= '' then -- If there is still a plus sign

game_count = game_count + 1 -- Then there is another game in the match

match_str = mw.ustring.gsub(match_str, '^%+?', '') or '' -- So remove the plus sign

end -- And continue

end

if game_count > legs then -- If there are more games than expected

legs = game_count -- Change the number of games

end

end

matchrow_str = mw.ustring.gsub(matchrow_str, '^([^,]*),?', '') or ''

end

end

Args[prefix..'legs'] = legs -- And finally change the Arg at the end

end

function pp.header(t,Args,p_sub,pos_label,group_col,VTE_text,full_table,results_header_txt)

-- Load relevant modules

local yesno = require('Module:Yesno')

-- Create table header

-- Pre stuff

local player_width = Args['playerwidth'] or '190'

local sort_text = ''

local sort_table_val = Args['sortable_table'] or 'no'

if yesno(sort_table_val) then sort_text = ' sortable' end

-- Open table

table.insert(t,'{|class="wikitable'..sort_text..'" style="text-align:center;"\n')

-- Table title

if Args['title'] or Args['table_header'] then

table.insert(t,'|+ ' .. (Args['title'] or Args['table_header']) .. '\n')

end

-- Preprocess match data

local top_pos = tonumber(Args['highest_pos']) or 1

local N_teams = top_pos - 1 -- Default to 0 at start, but higher number needed to skip certain entries

while Args['team'..N_teams+1] ~= nil do N_teams = N_teams+1 end

pp.preprocess(Args,N_teams,'',yesno(Args['crosstable_fractions'] or 'no'))

local tb_numplayers = tonumber(Args['tb_numplayers']) or 0

if tb_numplayers > N_teams then

tb_numplayers = N_teams

Args['tb_numplayers'] = N_teams

end

if tb_numplayers >= 2 then

pp.preprocess(Args,tb_numplayers,'tb',yesno(Args['crosstable_fractions'] or 'no'))

end

-- Which columns to show

local show_rating = yesno(Args['show_rating'] or 'no')

Line 62 ⟶ 88:

local show_draw = yesno(Args['show_draw'] or 'no')

local show_loss = yesno(Args['show_loss'] or 'no')

local sb_first = yesno(Args['sb_before_w'] or 'no')

local show_sb = yesno(Args['show_sb'] or 'no')

local show_tprextra_cols = yesnotonumber(Args['show_tprextra_cols']) or 'no')0

local extra_col = yesno(Args['extra_col'] or 'no')

-- Custom header options

local group_head_text = Args['group_header'] or '<abbr title="Group">Grp</abbr>'

local player_head_text = Args['player_header'] or 'Player'

local extra_head_text = Args['extra_header'] or 'Extra'

-- Initialize

Line 75 ⟶ 100:

tt.tab_text = t -- Actual text

-- Actual headers

if pos_label ~= nil then
tt = p_sub.colhead(tt,28,pos_label) -- Position col

end

-- Add group header

if full_table and group_col then

Line 81 ⟶ 108:

end

tt = p_sub.colhead(tt,player_width,player_head_text..VTE_text) -- Player col

if full_table and show_rating then

local rate_date = Args['rate_date'] or ''

tt = p_sub.colhead(tt,28, '[[FIDE world rankings|Rating]]<br/><small><span style="white-space:nowrap">'..rate_date..'</span></small>')

end

if show_played then

tt = p_sub.colhead(tt,28, '<abbr title="Games Played">Pld</abbr>') -- MatchesGames played col

end

tt = p_sub.colhead(tt,28, '<abbr title="Points">Pts</abbr>Score') -- PointsScore col

if full_table then

if show_hth and hth_first then

tt = p_sub.colhead(tt,28, '<abbr title="Head-to-head">H2H</abbr>') -- Head-to-head col

end

if show_sb and sb_first then

tt = p_sub.colhead(tt,28, '<abbr title="Sonneborn–Berger score">[[Sonneborn–Berger score|SB]]</abbr>')

end

if show_win then

Line 105 ⟶ 135:

tt = p_sub.colhead(tt,28, '<abbr title="Head-to-head">H2H</abbr>') -- Head-to-head col if not first tiebreak

end

if show_sb and not sb_first then

tt = p_sub.colhead(tt,28, '<abbr title="Sonneborn–Berger score">[[Sonneborn-BergerSonneborn–Berger score|SB]]</abbr>')

end

for ecol=1,extra_cols do

if extra_col then

local extra_head_text = Args['extra_header'..ecol] or ('Extra' .. ecol)

tt = p_sub.colhead(tt,28,extra_head_text)

end

if show_tpr then

tt = p_sub.colhead(tt,28, '<abbr title="Tournament performance rating">[[Glossary of chess#performance rating|TPR]]</abbr>')

end

tt.count = tt.count+1

Line 140 ⟶ 168:

local show_rating = yesno(Args['show_rating'] or 'no')

local show_played = not yesno(Args['hide_played'] or 'no')

local score_over_played = yesno(Args['score_over_played'] or 'no')

local hth_first = yesno(Args['hth_before_w'] or 'yes')

local show_hth = yesno(Args['show_hth'] or 'yes')

Line 145 ⟶ 174:

local show_draw = yesno(Args['show_draw'] or 'no')

local show_loss = yesno(Args['show_loss'] or 'no')

local wdl_iff_hth = yesno(Args['wdl_iff_hth'] or 'no')

local sb_first = yesno(Args['sb_before_w'] or 'no')

local show_sb = yesno(Args['show_sb'] or 'no')

local show_tprnosb = yesno(Args['show_tprnosb_'..team_code_ii] or 'no')

local extra_colsb_iff_hth = yesno(Args['extra_colsb_iff_hth'] or 'no')

local extra_cols = tonumber(Args['extra_cols']) or 0

local disp_fractions = yesno(Args['disp_fractions'] or 'yes')

-- Then calculate some values

Line 154 ⟶ 186:

local sb_score = 0

local templatestyles = mw.getCurrentFrame():extensionTag{

name = 'templatestyles', args = { src = 'Screen reader-only/styles.css' }

}

hth_local = mw.ustring.gsub(hth_local, '%s*½', '.5')

if hth_local == '' then

Line 161 ⟶ 196:

if math.floor(hth_local) ~= hth_local then

if math.floor(hth_local) > 0 then

hth_local = math.floor(hth_local) .. templatestyles .. '<span class="visualhidesr-only">&nbsp;</span>¹&frasl;₂'

else

hth_local = templatestyles .. '<span class="visualhidesr-only">&nbsp;</span>¹&frasl;₂'

end

else

if hth_local < 0 then

hth_local = '&mdash;'

end

end

end

if disp_fractionsscore_over_played then

points = '<span style="white-space:nowrap">' .. points .. ' / ' .. matches .. '</span>'

elseif disp_fractions then

if math.floor(points) ~= points then

if math.floor(points) > 0 then

points = math.floor(points) .. templatestyles .. '<span class="visualhidesr-only">&nbsp;</span>¹&frasl;₂'

else

points = templatestyles .. '<span class="visualhidesr-only">&nbsp;</span>¹&frasl;₂'

end

end

end

-- Sonneborn-BergerSonneborn–Berger score

if show_sb then

if (sb_iff_hth and hth_local == '&mdash;') or nosb then

local legs = tonumber(Args['legs']) or 1

sb_score = '&mdash;'

for jj=1,N_teams do

end

local tj = Args['team' .. jj]

if sb_score == 0 then

local tjpoints = win_points*Args['win_'..tj] + draw_points*Args['draw_'..tj] + loss_points*Args['loss_'..tj]

local legs = tonumber(Args['legs']) or 1

if ii ~= jj then

for jj=1,N_teams do

local match_str = Args['match_' .. team_code_ii .. '_' .. tj] or ''

local tj = Args['team' .. jj]

for l=1,legs do

local tjpoints = win_points*Args['win_'..tj] + draw_points*Args['draw_'..tj] + loss_points*Args['loss_'..tj]

local gii = mw.ustring.match(match_str, '^%s*([^%+%s]*)%s*%+?')

if giiii =~= '1'jj then

local match_str = Args['match_' .. team_code_ii .. '_' .. tj] or ''

sb_score = sb_score + win_points*tjpoints

elseif giifor l== '½'1,legs thendo

local gii = mw.ustring.match(match_str, '^%s*([^%+%s]*)%s*%+?')

sb_score = sb_score + draw_points*tjpoints

elseif if gii == '01' then

sb_score = sb_score + loss_pointswin_points*tjpoints

elseif gii == '½' then

sb_score = sb_score + draw_points*tjpoints

elseif gii == '0' then

sb_score = sb_score + loss_points*tjpoints

end

match_str = mw.ustring.gsub(match_str, '^%s*([^%+%s]*)%s*%+?', '') or ''

end

match_str = mw.ustring.gsub(match_str, '^%s*([^%+%s]*)%s*%+?', '') or ''

end

end

Line 224 ⟶ 262:

if show_hth and hth_first then

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..(hth_local or '')..'\n') -- Head-to-head

end

if show_sb and sb_first then

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..sb_score..'\n') -- Sonneborn–Berger

end

if show_win then

if wdl_iff_hth and hth_local == '&mdash;' then

wins = '&mdash;'

end

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..wins..'\n') -- Won

end

if show_draw then

if wdl_iff_hth and hth_local == '&mdash;' then

draws = '&mdash;'

end

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..draws..'\n') -- Drew

end

if show_loss then

if wdl_iff_hth and hth_local == '&mdash;' then

losses = '&mdash;'

end

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..losses..'\n') -- Lost

end

Line 237 ⟶ 287:

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..(hth_local or '')..'\n') -- Head-to-head if not first tiebreak

end

if show_sb and not sb_first then

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..sb_score..'\n') -- Sonneborn-BergerSonneborn–Berger

end

for ecol=1,extra_cols do

if extra_col then

local extraii = Args['extra_extra'..ecol..'_'..team_code_ii] or ''

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..extraii..'\n') -- Extra

end

if show_tpr then

local tprii = Args['tpr_'..team_code_ii] or ''

table.insert(t,'| style="'..ii_fw..bg_col..'" |'..tprii..'\n') -- Performance rating

end

end