Модуль:Prototypes/Хранилище/Предмет

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

local p = {}

-- Функция для загрузки данных из страницы
local function loadData(filePath)
    local page = mw.title.new(filePath)
    local content = page:getContent()
    return content and mw.text.jsonDecode(content) or nil
end

-- Поиск данных по ID
local function findDataById(data, id)
    if not data then return nil end
    for _, item in ipairs(data) do
        if item.id == id then
            return item
        end
    end
    return nil
end

-- Форматирование одного содержимого
local function formatContent(content)
    local name = string.format('{{#invoke:Entity Lookup|getname|%s}}', content.id)
    local image = string.format('%s.png', content.id)
    local amount = content.amount and string.format(" [%d]", content.amount) or ""
    local prob = ""

    if content.prob then
        local percentage = content.prob * 100
        local precision = percentage >= 1 and 1 or (percentage >= 0.1 and 2 or (percentage >= 0.01 and 3 or 4))
        prob = string.format(" <div>%." .. precision .. "f%%</div>", percentage)
    end

    return string.format('{{LinkСard|SideStyle=1|background-color=#d7d7ff0b|image=%s|name=%s%s%s }}', image, name, amount, prob)
end

-- Получение содержимого
local function getContentsOutput(contents)
    local result = ''
    for _, content in ipairs(contents) do
        result = result .. formatContent(content)
    end
    return result
end

-- Обработка таблиц
local function getTableOutput(tableId)
    local allSelectors = loadData('User:IanComradeBot/prototypes/AllSelector.json')
    local tableData = findDataById(allSelectors, tableId)
    local children = tableData and tableData['!type:AllSelector'] and tableData['!type:AllSelector'].children

    if not children then return 'Таблица не содержит элементов.' end

    local result = ''
    for _, child in ipairs(children) do
        result = result .. formatContent(child)
    end
    return result
end

-- Формирование списка содержащихся предметов или таблиц
local function getContainedOutput(data, id, wrapped)
    local item = findDataById(data, id)
    if not item then return '' end

    local result = wrapped and '<div class="2">' or ''

    if item.StorageFill and item.StorageFill.contents then
        result = result .. getContentsOutput(item.StorageFill.contents)
    elseif item.EntityTableContainerFill and item.EntityTableContainerFill.containers then
        local tableId = item.EntityTableContainerFill.containers.storagebase and item.EntityTableContainerFill.containers.storagebase.tableId
        if tableId then
            result = result .. getTableOutput(tableId)
        else
            result = result .. 'Таблица не найдена.'
        end
    end

    if wrapped then
        result = result .. '</div>'
    end

    return mw.getCurrentFrame():preprocess(result)
end

-- Формирование списка химии
local function getChemOutput(data, id)
    local item = findDataById(data, id)
    if not item then return '' end

    local solutions = item.SolutionContainerManager and item.SolutionContainerManager.solutions
    if not solutions then return '' end

    local result = '<ul class="1">'
    for _, solution in pairs(solutions) do
        for _, reagent in ipairs(solution.reagents) do
            result = result .. string.format('<li>[[Химия#chem_%s|%s]] (%d ед.)</li>', reagent.ReagentId, reagent.ReagentId, reagent.Quantity)
        end
    end
    result = result .. '</ul>'
    return mw.getCurrentFrame():preprocess(result)
end

-- Основная функция модуля
function p.main(frame)
    local mode = frame.args[1]
    local id = frame.args[2]

    if not id then return 'Не указан ID.' end

    local data = loadData('User:IanComradeBot/prototypes/fills/Item.json')
    if not data then return 'Не удалось загрузить данные.' end

    if mode == 'chem' then
        return getChemOutput(data, id)
    elseif mode == 'contained' then
        return getContainedOutput(data, id, false)
    elseif mode == 'framing' then
        return getContainedOutput(data, id, true)
    else
        return 'Неизвестный режим: ' .. mode
    end
end

return p