Просмотр кода страницы Модуль:TeamMatchList

-- =================================================
-- Модуль:TeamMatchList
-- Версия 1.0
-- =================================================

local p = {}

local Config = require('Module:Config')
local Teams = require('Module:Data/Teams')

function p.getMatchList(frame)
    -- Получаем аргументы напрямую или от родительского шаблона
    local args = frame.args[1] and frame.args or frame:getParent().args
    local team_input = args[1] or ""
    
    if team_input == "" then
        return "Не указана команда."
    end

    -- Получаем короткий 3-буквенный код из словаря
    local target_code = Teams.getCode(team_input) or team_input
    
    -- Настройка колонок в стиле ЧТМ (светло-голубой цвет)
    local columns = {
        {text = "№", style = "background-color:#ebf3fe;"},
        {text = "ЧТМ", style = "background-color:#ebf3fe;"},
        {text = "Раунд", style = "background-color:#ebf3fe;"},
        {text = "Соперник", style = "background-color:#ebf3fe;"},
        {text = "Счёт", style = "background-color:#ebf3fe;"},
        {text = "Голы", style = "background-color:#ebf3fe;"},
        {text = "Игрок матча", style = "background-color:#ebf3fe;"}
    }

    -- Формируем заголовок со ссылкой на шестерёнку
    local title_html = "Полный список матчей в финальных турнирах [[Файл:Gear icon.svg|12px|link=https://thirdworldcup.ru/index.php?title=%D0%9F%D0%BE%D0%B4%D1%81%D1%82%D1%80%D0%B0%D0%BD%D0%B8%D1%86%D0%B0:%D0%A0%D0%B0%D0%B7%D0%B2%D1%91%D1%80%D1%82%D0%BA%D0%B0_%D1%88%D0%B0%D0%B1%D0%BB%D0%BE%D0%BD%D0%BE%D0%B2/%D0%A1%D0%BF%D0%B8%D1%81%D0%BE%D0%BA_%D0%BC%D0%B0%D1%82%D1%87%D0%B5%D0%B9&action=edit]]"

    -- Создаём каркас сворачиваемой таблицы из Config (скрыта по умолчанию — false)
    local html = Config.builder.start_collapsible(columns, title_html, false)

    -- Переменные для отслеживания состояния
    local match_counter = 1
    local last_seen_year = nil
    local color_idx = 1
    local bg_colors = {"PeachPuff", "Gainsboro"}

    -- Идём циклом по всем годам из конфигурации
    for _, year in ipairs(Config.years) do
        local success, year_db = pcall(require, 'Module:Data/' .. year)
        
        if success and type(year_db) == "table" then
            -- Сортируем ID матчей, чтобы выводить их строго в хронологическом порядке
            local match_ids = {}
            for mid in pairs(year_db) do table.insert(match_ids, mid) end
            table.sort(match_ids)

            for _, mid in ipairs(match_ids) do
                local match = year_db[mid]
                
                -- Если заданная команда участвовала в матче
                if match and (match.team1 == target_code or match.team2 == target_code) then
                    
                    -- Смена цвета фона при переходе на следующий турнир (пропускает незаполненные годы)
                    if year ~= last_seen_year then
                        if last_seen_year ~= nil then
                            color_idx = 3 - color_idx -- Переключатель 1 -> 2 -> 1
                        end
                        last_seen_year = year
                    end
                    
                    local row_bg = bg_colors[color_idx]
                    local target_idx = (match.team1 == target_code) and 1 or 2
                    local opp_code = (target_idx == 1) and match.team2 or match.team1

                    -- 1. Номер матча
                    local col_num = tostring(match_counter)
                    match_counter = match_counter + 1

                    -- 2. Год (сразу делаем вики-ссылкой)
                    local col_year = "[[" .. year .. "]]"

                    -- 3. Раунд и Медали
                    local raw_stage = match.stage or ""
                    local stage_str = ""
                    
                    if raw_stage == "Группа" then stage_str = "гр. " .. (match.letter or "")
                    elseif raw_stage == "Стыковой матч" then stage_str = "ст."
                    elseif raw_stage == "1/8 финала" then stage_str = "1/8"
                    elseif raw_stage == "1/4 финала" then stage_str = "1/4"
                    elseif raw_stage == "Полуфинал" then stage_str = "1/2"
                    elseif raw_stage == "За 3-е место" then stage_str = "за 3-е"
                    elseif raw_stage == "Финал" then stage_str = "финал"
                    else stage_str = raw_stage end

                    -- Жирный шрифт для плей-офф
                    local is_bold_stage = (raw_stage == "1/8 финала" or raw_stage == "1/4 финала" or raw_stage == "Полуфинал" or raw_stage == "Финал")
                    if is_bold_stage then stage_str = "'''" .. stage_str .. "'''" end

                    -- Логика подсветки медалей
                    local stage_bg = row_bg
                    local tg = (target_idx == 1) and (match.score1 or 0) or (match.score2 or 0)
                    local og = (target_idx == 1) and (match.score2 or 0) or (match.score1 or 0)
                    local won = false
                    
                    if match.shootout_score1 and match.shootout_score2 then
                        local ts = (target_idx == 1) and match.shootout_score1 or match.shootout_score2
                        local os = (target_idx == 1) and match.shootout_score2 or match.shootout_score1
                        won = (ts > os)
                    else
                        won = (tg > og)
                    end

                    if raw_stage == "Финал" then
                        stage_bg = won and "gold" or "silver"
                    elseif raw_stage == "За 3-е место" then
                        stage_bg = won and "rgb(204,153,102)" or "darkkhaki"
                    elseif year == 2006 and raw_stage == "Полуфинал" then
                        if not won then stage_bg = "rgb(204,153,102)" end -- Исключение ЧТМ-2006
                    end

                    -- 4. Соперник (берём короткое имя из базы команд)
                    local opp_name = Teams.getName(opp_code, 'short')
                    local col_opp = "[[" .. opp_name .. "]]"

                    -- 5. Счёт
                    local score_str = tg .. ":" .. og
                    if match.shootout_score1 and match.shootout_score2 then
                        local ts = (target_idx == 1) and match.shootout_score1 or match.shootout_score2
                        local os = (target_idx == 1) and match.shootout_score2 or match.shootout_score1
                        score_str = score_str .. "(пен." .. ts .. ":" .. os .. ")"
                    end
                    
                    -- Ссылка на матч, если есть
                    if match.wikilink and match.wikilink ~= "" then
                        score_str = "'''[[" .. match.wikilink .. "|" .. score_str .. "]]'''"
                    end
                    local col_score = score_str

                    -- 6. Голы
                    local match_goals = {}
                    local order = {}
                    if match.goals then
                        for _, g in ipairs(match.goals) do
                            local is_for_us = false
                            local scorer_name = nil
                            local is_pen = (g.goal_type == "пенальти" or g.goal_type2 == "пенальти")
                            local is_own = (g.own_scorer ~= nil)

                            -- Если автогол забил соперник, он засчитывается нам
                            if is_own then
                                if g.team == target_idx then
                                    is_for_us = true
                                    scorer_name = g.own_scorer
                                end
                            else
                                if g.team == target_idx then
                                    is_for_us = true
                                    scorer_name = g.scorer
                                end
                            end

                            -- Суммируем голы конкретного игрока
                            if is_for_us and scorer_name then
                                if not match_goals[scorer_name] then
                                    match_goals[scorer_name] = { total = 0, pen = 0, own = is_own }
                                    table.insert(order, scorer_name)
                                end
                                match_goals[scorer_name].total = match_goals[scorer_name].total + 1
                                if is_pen then
                                    match_goals[scorer_name].pen = match_goals[scorer_name].pen + 1
                                end
                            end
                        end
                    end

                    local goal_strs = {}
                    for _, name in ipairs(order) do
                        local stats = match_goals[name]
                        local suffix = ""
                        
                        -- Форматируем приписки по заданному формату
                        if stats.own then
                            if stats.total > 1 then
                                suffix = string.format(" (%d авт.)", stats.total)
                            else
                                suffix = " (авт.)"
                            end
                        else
                            if stats.total > 1 then
                                if stats.pen > 0 then
                                    suffix = string.format(" (%d, %d - пен.)", stats.total, stats.pen)
                                else
                                    suffix = string.format(" (%d)", stats.total)
                                end
                            else
                                if stats.pen > 0 then
                                    suffix = " (пен.)"
                                end
                            end
                        end
                        table.insert(goal_strs, name .. suffix)
                    end
                    local col_goals = #goal_strs > 0 and table.concat(goal_strs, ", ") or "—"

                    -- 7. MVP (только если из нашей команды)
                    local col_mvp = "—"
                    if match.mvp and match.mvp.player then
                        if match.mvp.team == target_idx then
                            col_mvp = "[[" .. match.mvp.player .. "]]"
                        end
                    end

                    -- Умная функция выделения жирным для финалов (чтобы не сломать вики-разметку)
                    local function make_bold(txt)
                        if not string.match(txt, "'''") then
                            return "'''" .. txt .. "'''"
                        end
                        return txt
                    end

                    if raw_stage == "Финал" then
                        col_num = make_bold(col_num)
                        col_year = make_bold(col_year)
                        col_opp = make_bold(col_opp)
                        col_score = make_bold(col_score)
                        col_goals = make_bold(col_goals)
                        col_mvp = make_bold(col_mvp)
                    end

                    -- Добавляем сформированную строку в HTML таблицу
                    local cells = {
                        {text = col_num, style = "white-space:nowrap;text-align:center;background-color:" .. row_bg .. ";"},
                        {text = col_year, style = "white-space:nowrap;text-align:center;background-color:" .. row_bg .. ";"},
                        {text = stage_str, style = "white-space:nowrap;text-align:center;background-color:" .. stage_bg .. ";"},
                        {text = col_opp, style = "white-space:nowrap;text-align:center;background-color:" .. row_bg .. ";"},
                        {text = col_score, style = "white-space:nowrap;text-align:center;background-color:" .. row_bg .. ";"},
                        {text = col_goals, style = "white-space:nowrap;text-align:center;background-color:" .. row_bg .. ";"},
                        {text = col_mvp, style = "white-space:nowrap;text-align:center;background-color:" .. row_bg .. ";"}
                    }
                    Config.builder.row(html, cells)
                end
            end
        end
    end

    -- Возвращаем готовую HTML-вёрстку таблицы, загрузив стили через preprocess
    return frame:preprocess(Config.styles.wiki_templates .. tostring(html))
end

return p