Модуль:Sports table/WDLHA
Перейти к навигации
Перейти к поиску
-- Стили для турнирной таблицы с системой выигрыш — ничья — проигрыш с разделением на домашние и выездные матчи (WDLHA)
local pp = {}
function pp.header(t, Args, p_sub, pos_label, group_col, VTE_text, full_table, results_header_txt)
-- Load relevant modules
local yesno = require('Модуль:Yesno')
-- Создаём заголовок таблицы
-- Pre stuff
local team_width = Args['teamwidth'] or '12em'
local sort_text = yesno(Args['sortable_table'] or 'no') and ' sortable' or ''
local show_played = not yesno(Args['hide_played'] or 'no')
local rounds_won = yesno(Args['show_rw'] or Args['rounds_won'] or 'no')
table.insert(t, '{| class="wikitable' .. sort_text .. '" style="text-align:center;"\n') -- Open table
--Заголовок таблицы
if Args['title'] or Args['table_header'] then
table.insert(t, '|+ ' .. (Args['title'] or Args['table_header']) .. '\n')
end
-- Пользовательские параметры заголовка
local played_head_text = Args['pld_header'] or '<abbr title="Игры">И</abbr>'
local group_head_text = Args['group_header'] or '<abbr title="Группа">Гр.</abbr>'
local team_head_text = Args['team_header'] or 'Команда'
local bonus_head_text = Args['bonus_header'] or '<abbr title="Бонусные очки">БО</abbr>'
local loss_first = Args['loss_before_draw'] or Args['loss_before_tie'] or false
-- Определяем критерий ранжирования команд
local ranking_style = Args['ranking_style'] or 'pts'
local show_points, show_perc = false
ranking_style = string.lower(ranking_style)
if ranking_style == 'w' or ranking_style == 'win' or ranking_style == 'wins' then
-- В зависимости от количества побед
elseif ranking_style == 'perc' or ranking_style == 'percentage' or ranking_style == '%' then
-- В зависимости от процентного соотношения
show_perc = true
elseif ranking_style == 'percpts' or ranking_style == '%pts' then
-- В зависимости от процентного соотношения и количества очков
show_perc = true
show_points = true
else
-- В зависимости от количества очков
show_points = true
end
local show_bonus_points = yesno(Args['show_bonus_points'] or 'no')
local show_draw = yesno(Args['show_draw'] or 'yes')
-- Использовать количество очков вместо разницы мячей
local for_against_style = Args['for_against_style'] or 'goals'
local fa_letter, fa_word_sing, fa_word_plur
local hide_for_against = false
-- Сначала преобразуем в нижний регистр если это строка
for_against_style = string.lower(for_against_style)
if for_against_style == 'g' or for_against_style == 'goal' or for_against_style == 'goals' then
fa_letter = 'М'
fa_word_sing = 'Мяч'
fa_word_plur = 'Мячей'
elseif for_against_style == 'p' or for_against_style == 'point' or for_against_style == 'points' then
fa_letter = 'О'
fa_word_sing = 'Очко'
fa_word_plur = 'Очков'
elseif for_against_style == 'r' or for_against_style == 'run' or for_against_style == 'runs' then
fa_letter = 'Р'
fa_word_sing = 'Ран'
fa_word_plur = 'Ранов'
elseif for_against_style == 'none' then
hide_for_against = true
else
fa_letter = 'М'
fa_word_sing = 'Мяч'
fa_word_plur = 'Мячей'
end
-- Следует ли использовать соотношение забитых и пропущенных мячей
local do_ratio = yesno(Args['use_goal_ratio'] or 'no')
local do_average = yesno(Args['use_goal_average'] or 'no')
-- Следует ли использовать процентное соотношение
local do_percentage = yesno(Args['use_goal_percentage'] or Args['use_point_percentage'] or 'no')
-- Следует ли вместо этого использовать число забитых мячей
local do_scored = yesno(Args['use_goals_scored'] or 'no')
-- Следует ли вместо этого использовать разницу забитых и пропущенных мячей (только в рувики)
local do_difference = yesno(Args['use_goal_diff'] or 'yes')
-- Показывать ли общие показатели вместо разделения на домашние и выездные
local only_totals = yesno(Args['only_totals'] or 'no')
local ha_side = yesno(Args['ha_side'] or 'no')
if ha_side then
only_totals = true
end
-- Показывать ли общее число забитых и пропущенных мячей вместо разделения на домашние и выездные
local only_fa_totals = yesno(Args['only_fa_totals'] or 'no')
-- Use games behind header
local show_GB = yesno(Args['show_GB'] or 'no')
-- Spacer style
local sps = only_totals and '' or ' style="border-width:1px 1px 1px 3px;"'
-- Initialize
local tt = {}
tt.count = 0 -- Up by one after every call
tt.tab_text = t -- Actual text
-- Actual headers
if pos_label ~= nil then
tt = p_sub.colhead(tt, '2.5em', pos_label) -- Position col
end
-- Add group header
if full_table and group_col then
tt = p_sub.colhead(tt, '2.5em', group_head_text) -- Group col
end
tt = p_sub.colhead(tt, team_width, team_head_text .. VTE_text) -- Team col
if show_played then
tt = p_sub.colhead(tt, '2.5em', played_head_text) -- Matches played col
end
if full_table then
local lbls = only_totals and {{'', 'Итого '}} or {{'', ''}, {'', ''}}
for k, v in ipairs(lbls) do
local apre, tpre = v[1], v[2]
local draw_head_text = yesno(Args['use_tie'] or 'no') and '<abbr title="' .. tpre .. 'Ничьи">' .. apre .. 'Н</abbr>' or '<abbr title="' .. tpre .. 'Ничьи">' .. apre .. 'Н</abbr>'
tt = p_sub.colhead(tt, '2.5em;' .. sps, '<abbr title="' .. tpre .. 'Выигранные матчи">' .. apre .. 'В</abbr>') -- Win col
if loss_first then
tt = p_sub.colhead(tt, '2.5em', '<abbr title="' .. tpre .. 'Поражения">' .. apre .. 'П</abbr>') -- Loss col
if show_draw then
tt = p_sub.colhead(tt, '2.5em', draw_head_text) -- Draw col
end
else
if show_draw then
tt = p_sub.colhead(tt, '2.5em', draw_head_text) -- Draw col
end
tt = p_sub.colhead(tt, '2.5em', '<abbr title="' .. tpre .. 'Поражения">' .. apre .. 'П</abbr>') -- Loss col
end
if rounds_won then
tt = p_sub.colhead(tt, '2.5em', '<abbr title="' .. tpre .. 'Раундов выиграно">' .. apre .. 'РВ</abbr>') -- Rounds won
end
if not hide_for_against and not only_fa_totals then
tt = p_sub.colhead(tt, '2.5em', '<abbr title="' .. tpre .. fa_word_plur .. ' забито">' .. apre .. fa_letter .. 'З</abbr>') -- For col
tt = p_sub.colhead(tt, '2.5em', '<abbr title="' .. tpre .. fa_word_plur .. ' пропущено">' .. apre .. fa_letter .. 'П</abbr>') -- Against col
end
end
if not hide_for_against then
local lsps = sps
if only_fa_totals then
tt = p_sub.colhead(tt, '2.5em;' .. sps, '<abbr title="' .. fa_word_plur .. ' забито">' .. fa_letter .. 'З</abbr>') -- For col
tt = p_sub.colhead(tt, '2.5em', '<abbr title="' .. fa_word_plur .. ' пропущено">' .. fa_letter .. 'П</abbr>') -- Against col
lsps = ''
end
if do_ratio or do_average then
local ratio_word = do_ratio and 'Соотношение ' or 'Соотношение '
local ratio_letter = do_ratio and 'С' or 'С'
tt = p_sub.colhead(tt, '2.5em;' .. lsps, '<abbr title="Соотношение ' .. mw.ustring.lower(fa_word_plur) .. '">С' .. fa_letter .. '</abbr>') -- Ratio col
elseif do_percentage then
tt = p_sub.colhead(tt, '2.5em;' .. lsps, '<abbr title="' .. fa_word_sing .. ' Процент">%</abbr>') -- Percentage col
elseif do_scored then
tt = p_sub.colhead(tt, '2.5em;' .. lsps, '<abbr title="' .. fa_word_plur .. ' забито">' .. fa_letter .. 'З</abbr>') -- Scored col
end
if do_difference then
tt = p_sub.colhead(tt, '2.5em;' .. lsps, '<abbr title="Разница ' .. mw.ustring.lower(fa_word_plur) .. '">Р' .. fa_letter .. '</abbr>') -- Difference col
end
end
end
if show_GB then -- Games behind header
tt = p_sub.colhead(tt, '2.5em', '<abbr title="Игр сыграно">ИС</abbr>')
end
if show_perc then
tt = p_sub.colhead(tt, '3.5em', '<abbr title="Процент побед">% побед</abbr>') -- Win percentage col
end
if show_bonus_points then
tt = p_sub.colhead(tt, '2.5em', bonus_head_text) -- Bonus points col
end
if show_points then
tt = p_sub.colhead(tt, '2.5em', '<abbr title="Очки">О</abbr>') -- Points col
end
if ha_side then
tt = p_sub.colhead(tt, '3.5em', '<abbr title="Домашний рекорд">Дома</abbr>') -- Home record
tt = p_sub.colhead(tt, '3.5em', '<abbr title="Выездной рекорд">Выезд</abbr>') -- Away record
end
if full_table then
tt.count = tt.count + 1
table.insert(tt.tab_text, results_header_txt)
end
return tt
end
function pp.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)
-- Build the inner parts of individual rows
-- Подключаем модули
local mm = require('Модуль:Math')
local yesno = require('Модуль:Yesno')
-- Get custom/default options for in table
local hwin_points = tonumber(Args['hwinpoints']) or tonumber(Args['winpoints']) or 3
local awin_points = tonumber(Args['awinpoints']) or tonumber(Args['winpoints']) or 3
local draw_points = tonumber(Args['drawpoints']) or 1
local loss_points = tonumber(Args['losspoints']) or 0
local rw_points = tonumber(Args['rwpoints']) or 1
--Порядок ничьих и проигрышей --
local loss_first = Args['loss_before_draw'] or Args['loss_before_tie'] or false
-- Optional rounds won
local rounds_won = yesno(Args['show_rw'] or Args['rounds_won'] or 'no')
-- Get some input
local hwins = tonumber(Args['hwin_' .. team_code_ii]) or 0
local awins = tonumber(Args['awin_' .. team_code_ii]) or 0
local wins = hwins + awins
local hdraws = tonumber(Args['hdraw_' .. team_code_ii]) or 0
local adraws = tonumber(Args['adraw_' .. team_code_ii]) or 0
local draws = hdraws + adraws
local hlosses = tonumber(Args['hloss_' .. team_code_ii]) or 0
local alosses = tonumber(Args['aloss_' .. team_code_ii]) or 0
local losses = hlosses + alosses
local hrw = tonumber(Args['hrw_' .. team_code_ii]) or 0
local arw = tonumber(Args['arw_' .. team_code_ii]) or 0
local rw = hrw + arw
local hgfor = tonumber(Args['hgf_' .. team_code_ii] or Args['hpf_' .. team_code_ii] or '0') or '?'
local agfor = tonumber(Args['agf_' .. team_code_ii] or Args['apf_' .. team_code_ii] or '0') or '?'
local gfor = hgfor ~= '?' and agfor ~= '?' and (hgfor + agfor) or '?'
local hgaig = tonumber(Args['hga_' .. team_code_ii] or Args['hpa_' .. team_code_ii] or '0') or '?'
local agaig = tonumber(Args['aga_' .. team_code_ii] or Args['apa_' .. team_code_ii] or '0') or '?'
local gaig = hgaig ~= '?' and agaig ~= '?' and (hgaig + agaig) or '?'
-- Показывать ли общее число забитых и пропущенных мячей вместо разделения на домашние и выездные
local only_fa_totals = yesno(Args['only_fa_totals'] or 'no')
if only_fa_totals then
gfor = gfor + tonumber(Args['gf_' .. team_code_ii] or Args['pf_' .. team_code_ii] or '0')
gaig = gaig + tonumber(Args['ga_' .. team_code_ii] or Args['pa_' .. team_code_ii] or '0')
end
local s_pts = tonumber(Args['adjust_points_' .. team_code_ii]) or tonumber(Args['startpoints_' .. team_code_ii]) or 0
local hth_local = Args['hth_' .. team_code_ii] or nil
-- Вычисляем некоторые значения
local matches = wins + draws + losses
local points = hwin_points * hwins + awin_points * awins + draw_points * draws + loss_points * losses + rw_points * rw + s_pts
if Args['goalpoints'] and tonumber(gfor) then
points = points + (tonumber(Args['goalpoints']) or 1) * tonumber(gfor)
end
local show_draw = yesno(Args['show_draw'] or 'yes')
if tonumber(Args['hwin_' .. team_code_ii]) == nil or (show_draw and tonumber(Args['hdraw_' .. team_code_ii]) == nil)
or tonumber(Args['hloss_' .. team_code_ii]) == nil
or tonumber(Args['awin_' .. team_code_ii]) == nil or (show_draw and tonumber(Args['adraw_' .. team_code_ii]) == nil)
or tonumber(Args['aloss_' .. team_code_ii]) == nil then
matches = tonumber(Args['matches_' .. team_code_ii]) or 0
end
local win_perc = ''
if tonumber(matches) == nil or matches == 0 then
-- Выход если матчей 0
win_perc = '—'
else
--Some sports use draw as well
win_perc = mm._precision_format((2 * wins + draws) / (2 * matches), 3)
if losses > 0 then
-- Удаляем начальный ноль из строки
win_perc = string.sub(win_perc, 2, string.len(win_perc))
end
end
-- Показать забито / пропущено
local for_against_style = Args['for_against_style'] or 'goals'
local hide_for_against = false
for_against_style = string.lower(for_against_style)
if for_against_style == 'none' then
hide_for_against = true
end
-- Сравнение забитых и пропущенных голов
local gcomp
-- Следует ли вместо этого использовать среднее значение или процент забитых мячей
local skip_sign
if yesno(Args['use_goal_ratio'] or 'no') or yesno(Args['use_goal_average'] or 'no') then
-- Now it is the goal ratio/goal average
if (gfor == '?') or (gaig == '?') or (gaig == 0) then
gcomp = '—'
else
gcomp = mm._precision_format(gfor / gaig, 3)
end
elseif yesno(Args['use_goal_percentage'] or 'no') then
-- Now it is the percentage
if (gfor == '?') or (gaig == '?') or (gaig == 0) then
gcomp = '—'
else
gcomp = mm._precision_format(100 * gfor / gaig, 1)
end
elseif yesno(Args['use_point_percentage'] or 'no') then
-- Now it is the point percentage
if (gfor == '?') or (gaig == '?') or ((gfor + gaig) <= 0) then
gcomp = '—'
else
gcomp = mm._precision_format(100 * gfor / (gfor + gaig), 2)
end
elseif yesno(Args['use_goals_scored'] or 'no') then
-- Now it is the goals scored
if gfor == '?' then
gcomp = '—'
else
gcomp = gfor
end
end
-- Разница отдельно (только в рувики)
local gcomp_diff
if yesno(Args['use_goal_diff'] or 'yes') then
-- It's goal difference
if (gfor == '?') or (gaig == '?') then
gcomp_diff = '—'
else
gcomp_diff = gfor - gaig
-- Formatting with signs
if gcomp_diff > 0 then
gcomp_diff = '+' .. gcomp_diff
elseif gcomp_diff < 0 then
gcomp_diff = '−' .. - gcomp_diff
end
end
end
-- Show games behind
local show_GB = yesno(Args['show_GB'] or 'no')
local GB_text = '—'
if show_GB then
local GB_team_no = tonumber(Args['GB_team']) or 1
if ii == GB_team_no then
-- Do nothing, it's vs this team
else
local wins_GB = (tonumber(Args['hwin_' .. team_list[GB_team_no]]) or 0) + (tonumber(Args['awin_' .. team_list[GB_team_no]]) or 0)
local losses_GB = (tonumber(Args['hloss_' .. team_list[GB_team_no]]) or 0) + (tonumber(Args['aloss_' .. team_list[GB_team_no]]) or 0)
local draws_GB = (tonumber(Args['hdraw_' .. team_list[GB_team_no]]) or 0) + (tonumber(Args['adraw_' .. team_list[GB_team_no]]) or 0)
local GB_num = (wins_GB - wins + losses - losses_GB) / 2 + (draws_GB - draws)
-- Display options
if GB_num > 0 then
-- Indicates trailing GB_team
GB_text = GB_num
elseif GB_num == 0 then
-- Equal, do nothing to get dash
else
-- Ahead of GB team, should be noted by plus (instead of minus that comes from formula)
GB_text = '+' .. - GB_num
end
end
end
-- Some local vars
local hth_string
local tt_return = p_sub.hth(frame, Args, full_table, hth_id_list, hth_local, notes_exist, team_list, team_code_ii, ii_start, ii_end, rand_val)
hth_string = tt_return.str
hth_id_list = tt_return.list
notes_exist = tt_return.notes_exist
-- По какому критерию ранжировать команды
local ranking_style = Args['ranking_style'] or 'pts'
local rank_points, rank_perc = false
local win_fw, win_string
ranking_style = string.lower(ranking_style)
if ranking_style == 'w' or ranking_style == 'win' or ranking_style == 'wins' then
-- В зависимости от количества побед
win_fw = 'font-weight:bold;'
win_string = hth_string
elseif ranking_style == 'perc' or ranking_style == 'percentage' or ranking_style == '%' then
-- В зависимости от процентного соотношения
rank_perc = true
win_fw = ii_fw
win_string = ''
elseif ranking_style == 'percpts' or ranking_style == '%pts' then
-- В зависимости от процентного соотношения и количества очков
rank_perc = true
rank_points = true
win_fw = ii_fw
win_string = ''
else
-- В зависимости от количества очков
rank_points = true
win_fw = ii_fw
win_string = ''
end
local show_played = not yesno(Args['hide_played'] or 'no')
local show_bonus_points = yesno(Args['show_bonus_points'] or 'no')
-- Whether to show totals instead of home and away
local only_totals = yesno(Args['only_totals'] or 'no')
local ha_side = yesno(Args['ha_side'] or 'no')
if ha_side then
only_totals = 'no'
end
-- Spacer style
local sps = only_totals and '' or 'border-width:1px 1px 1px 3px;'
-- Row building
if show_played then
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. matches .. '\n') -- Played
end
if full_table then
-- Use actual values if wins, draws, and losses are not numeric
if (hwins == 0 and awins == 0 and hdraws == 0 and adraws == 0 and hlosses == 0 and alosses == 0) then
local function numorval(s)
return s and ((s == '' and 0) or tonumber(s) or s) or 0
end
hwins = numorval(Args['hwin_' .. team_code_ii])
awins = numorval(Args['awin_' .. team_code_ii])
hdraws = numorval(Args['hdraw_' .. team_code_ii])
adraws = numorval(Args['adraw_' .. team_code_ii])
hlosses = numorval(Args['hloss_' .. team_code_ii])
alosses = numorval(Args['aloss_' .. team_code_ii])
end
local stats = only_totals and
{{wins, draws, losses, rw, gfor, gaig}} or
{{hwins, hdraws, hlosses, hrw, hgfor, hgaig}, {awins, adraws, alosses, arw, agfor, agaig}}
for k, v in ipairs(stats) do
table.insert(t, '| style="' .. sps .. win_fw .. bg_col .. '" |' .. (v[1]) .. win_string .. '\n') -- Won
if loss_first then
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. (v[3]) .. '\n') -- Lost
if show_draw then
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. (v[2]) .. '\n') -- Drawn
end
else
if show_draw then
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. (v[2]) .. '\n') -- Drawn
end
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. (v[3]) .. '\n') -- Lost
end
if rounds_won then
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. (v[4]) .. '\n') -- Rounds won
end
if not hide_for_against and not only_fa_totals then
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. (v[5]) .. '\n') -- GF
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. (v[6]) .. '\n') -- GA
end
end
if not hide_for_against then
local lsps = sps
if only_fa_totals then
table.insert(t, '| style="' .. sps .. ii_fw .. bg_col .. '" |' .. gfor .. '\n') -- GF
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. gaig .. '\n') -- GA
lsps = ''
end
if gcomp then
table.insert(t, '| style="' .. lsps .. ii_fw .. bg_col .. '" |' .. gcomp .. '\n') -- Goal comparison
lsps = ''
end
if gcomp_diff then
table.insert(t, '| style="' .. lsps .. ii_fw .. bg_col .. '" |' .. gcomp_diff .. '\n') -- Goal comparison — отдельно разница
end
end
end
if show_GB then
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. GB_text .. '\n') -- GB
end
if rank_perc then
table.insert(t, '| style="font-weight: bold;' .. bg_col .. '" | ' .. win_perc .. hth_string .. '\n')
end
if show_bonus_points then
if s_pts < 0 then
table.insert(t, '| style="' .. bg_col .. '" | −' .. - s_pts .. '\n')
else
table.insert(t, '| style="' .. bg_col .. '" | ' .. s_pts .. '\n')
end
end
if rank_points then
-- Add − for negative point totals
if points < 0 then
table.insert(t, '| style="font-weight: bold;' .. bg_col .. '" | −' .. - points .. hth_string .. '\n')
else
table.insert(t, '| style="font-weight: bold;' .. bg_col .. '" | ' .. points .. hth_string .. '\n')
end
end
if ha_side then
local hrec = hwins .. '–' .. (show_draw and (loss_first and hlosses .. '–' .. hdraws or hdraws .. '–' .. hlosses) or hlosses)
local arec = awins .. '–' .. (show_draw and (loss_first and alosses .. '–' .. adraws or adraws .. '–' .. alosses) or alosses)
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. hrec .. '\n')
table.insert(t, '| style="' .. ii_fw .. bg_col .. '" |' .. arec .. '\n')
end
return {t = t, notes_exist = notes_exist, hth_id_list = hth_id_list
}
end
function pp.status(Args)
-- Обозначения статуса
-- ПРИМЕЧАНИЕ: Если Вы добавляете status_code, также добавьте status_called и status_letters!!! Или функциональность будет нарушена.
local status_code, status_called = {}, {}
status_code = {
A = 'Команда вышла в следующий раунд',
C = 'Чемпион',
D = 'Команда дисквалифицирована',
E = 'Команда выбыла',
G = 'Гости',
H = 'Хозяева',
O = 'Победитель плей-офф',
P = 'Команда вышла в дивизион уровнем выше',
Q = 'Команда квалифицировалась в указанную стадию',
R = 'Выбывшая команда',
T = 'Команда квалифицировалась в турнир, но его конкретная стадия пока неизвестна'}
local status_letters = (Args['status_order'] or '') .. 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
-- Status position (before or after read and default)
local stat_pos_val = string.lower(Args['status_pos'] or '')
local status_position = 'after' -- Default location
if stat_pos_val == 'before' then
status_position = 'before'
elseif stat_pos_val == 'after' then
status_position = 'after'
end
-- Read in custom status options
for l in mw.text.gsplit(status_letters, '') do
status_called[l] = false
status_code[l] = status_code[l] or '?'
status_letters = mw.ustring.gsub(status_letters, '(' .. l .. '.-)' .. l, '%1')
if Args['status_text_' .. l] then
status_code[l] = Args['status_text_' .. l]
end
end
return {code = status_code, called = status_called, letters = status_letters, position = status_position
}
end
return pp