Модуль:Песочница/Pok

Для документации этого модуля может быть создана страница Модуль:Песочница/Pok/doc

local p = {}

local eventData = mw.loadData("Модуль:IanComradeBot/prototypes/StationEvent.json/data")
local cargoData = mw.loadData("Модуль:IanComradeBot/prototypes/cargo.json/data")

function p.eventStation(frame)
    local args = frame.args
    local idsStr = args.id or ""
    local name = args.name or ""
    local image = args.image or "test.png"
    local description = args.description or "Нет описания"
    local out = ""
    local ids = {}
    for id in string.gmatch(idsStr, '([^,]+)') do
        table.insert(ids, mw.text.trim(id))
    end

    for _, searchId in ipairs(ids) do
        for _, event in ipairs(eventData) do
            if event.id == searchId then
                local cellEvent = '<div style="text-align:center;">'
                cellEvent = cellEvent .. "'''" .. name .. "'''<br>"
                cellEvent = cellEvent .. "<span style='color:#adadad'>'''" .. event.id .. "'''</span><br>"
                cellEvent = cellEvent .. '[[File:' .. image .. '|64px]]'
                cellEvent = cellEvent .. '</div>'
                local advert = (event.StationEvent and event.StationEvent.startAnnouncement) or "Нет оповещения"
                local characteristicsList = ""
                local stationEvent = event.StationEvent or {}
                local characteristics = {
                    {"Вес", "Вес события в системе случайных событий (чем выше, тем чаще случается)", stationEvent.weight},
                    {"Мин. игроков", "Минимальное количество игроков для начала события", stationEvent.minimumPlayers},
                    {"Время старта", "Время с которого событие может начаться", (stationEvent.earliestStart and stationEvent.earliestStart .. " сек.")},
                    {"Длительность", "Длительность события в секундах", (stationEvent.duration and stationEvent.duration .. " сек.")}
                }
                for _, char in ipairs(characteristics) do
                    local charValue = char[3] or "Нет"
                    characteristicsList = characteristicsList .. "- " .. frame:expandTemplate{
                        title = "AltTooltip",
                        args = { char[1], char[2] }
                    } .. ": " .. charValue .. "<br>"
                end
                out = out .. "|-\n"
                out = out .. "| " .. cellEvent .. "\n"
                out = out .. "| {{#invoke:Ftl|main|translation|" .. advert .. "}}\n"
                out = out .. "| " .. description .. "\n"
                out = out .. "| " .. characteristicsList .. "\n"
                break
            end
        end
    end

    return frame:preprocess(out)
end

function p.eventCargo(frame)
    local args = frame.args
    local idsStr = args.id or ""
    local name = args.name or ""
    local image = args.image or "test.png"
    local description = args.description or "Нет описания"
    local out = ""
    local ids = {}

    for id in string.gmatch(idsStr, '([^,]+)') do
        table.insert(ids, mw.text.trim(id))
    end

    for _, searchId in ipairs(ids) do
        for _, event in ipairs(eventData) do
            if event.id == searchId then
                local cellEvent = '<div style="text-align:center;">'
                cellEvent = cellEvent .. "'''" .. name .. "'''<br>"
                cellEvent = cellEvent .. "<span style='color:#adadad'>'''" .. event.id .. "'''</span><br>"
                cellEvent = cellEvent .. '[[File:' .. image .. '|64px]]'
                cellEvent = cellEvent .. '</div>'

                local cargo = event.CargoGiftsRule or {}
                local sender = cargo.sender or "Нет отправителя"
                local cargoDescription = cargo.description or "Нет описания"
                local dest = cargo.dest or "Нет получателя"

                local advert = "Поздравляем! {{#invoke:Ftl|main|translation|" .. sender .. "}} решили отправить {{#invoke:Ftl|main|translation|" .. cargoDescription .. "}} {{#invoke:Ftl|main|translation|" .. dest .. "}} станции. Всё прибудет со следующей партией груза."

                local giftsCell = ""
                if cargo.gifts then
                    for giftId, giftValue in pairs(cargo.gifts) do
                        local productFound = nil
                        for _, cargoItem in ipairs(cargoData) do
                            if cargoItem.id == giftId then
                                productFound = cargoItem.product
                                break
                            end
                        end
                        if productFound then
                            giftsCell = giftsCell .. "- {{#invoke:Entity Lookup|getname|" .. productFound .. "}}: x" .. giftValue .. "<br>"
                        else
                            giftsCell = giftsCell .. "Ошибка: id продукта не найден."
                        end
                    end
                else
                    giftsCell = "Нет подарков"
                end

                local characteristicsList = ""
                local stationEvent = event.StationEvent or {}
                local characteristics = {
                    {"Вес", "Вес события в системе случайных событий (чем выше, тем чаще случается)", stationEvent.weight},
                    {"Мин. игроков", "Минимальное количество игроков для начала события", stationEvent.minimumPlayers},
                    {"Время старта", "Время с которого событие может начаться", (stationEvent.earliestStart and stationEvent.earliestStart .. " сек.")},
                    {"Длительность", "Длительность события в секундах", (stationEvent.duration and stationEvent.duration .. " сек.")}
                }
                for _, char in ipairs(characteristics) do
                    local charValue = char[3] or "Нет"
                    characteristicsList = characteristicsList .. "- " .. frame:expandTemplate{
                        title = "AltTooltip",
                        args = { char[1], char[2] }
                    } .. ": " .. charValue .. "<br>"
                end

                out = out .. "|-\n"
                out = out .. "| " .. cellEvent .. "\n"
                out = out .. "| " .. advert .. "\n"
                out = out .. "| " .. description .. "\n"
                out = out .. "| " .. characteristicsList .. "\n"
                out = out .. "| " .. giftsCell .. "\n"
                break
            end
        end
    end

    return frame:preprocess(out)
end

return p