Модуль:Песочница/Pok: различия между версиями

Материал из Space Station 14 Вики
мНет описания правки
Нет описания правки
 
(не показано 300 промежуточных версий этого же участника)
Строка 1: Строка 1:
-- Загрузка данных
local itemData = mw.loadData("Модуль:IanComradeBot/prototypes/fills/Item.json/data")
local p = {}
local p = {}
local getArgs = require('Module:Arguments').getArgs


-- Функция для загрузки данных
function p.main(frame)
local loadData = function(filePath)
     local args = getArgs(frame, { removeBlanks = false })
    local page = mw.title.new(filePath)
     local name = args[1] or ""
    local content = page:getContent()
     local attributes = args[2] or ""
    return content and mw.text.jsonDecode(content) or nil
     if name == "" then
end
         return "<span class=\"error\">Ошибка: не указано имя файла.</span>"
 
-- Функция processRolls для преобразования диапазона
local processRolls = function(rolls)
     local result = {}
    if rolls and rolls.range then
        local min, max = rolls.range:match("(%d+),%s*(%d+)")
        min, max = tonumber(min), tonumber(max)
        if min and max then
            result[#result + 1] = string.format('[%d-%d]', min + 1, max + 1)
        else
            result[#result + 1] = 'Некорректный формат для range.'
        end
    elseif rolls and rolls.value then
        result[#result + 1] = string.format('[%d]', rolls.value)
    else
        result[#result + 1] = 'Не указан параметр rolls.'
    end
    return table.concat(result)
end
 
-- Локальные функции
local findDataById, formatContent, getContentsOutput, processNestedSelectors, getTableOutput, getContainedOutput, getChemOutput, handleGroupSelector, handleAllSelector, handleNestedSelector
 
-- Функция создания хэш-таблицы для быстрого поиска по ID (рекурсивно)
local function buildIndex(itemData)
    local index = {}
    local function recursiveIndex(tbl)
        if type(tbl) ~= "table" then return end
        if tbl.id then
            index[tbl.id] = tbl
        end
        for k, v in pairs(tbl) do
            if type(v) == "table" then
                recursiveIndex(v)
            end
        end
    end
    recursiveIndex(itemData)
    return index
end
 
-- Поиск данных по ID через индекс
findDataById = function(itemDataIndex, id)
    return itemDataIndex and itemDataIndex[id] or nil
end
 
-- Форматирование содержимого предмета.
-- Если у элемента есть вложенные контейнеры, добавляется вызов рекурсивного инвока;
-- для простых элементов – выводится только информация по предмету.
formatContent = function(content)
    if not content.id then
        return "Ошибка: отсутствует id у элемента."
    end
 
    local name = string.format('{{#invoke:Entity Lookup|getname|%s}}', content.id)
    local image = string.format('%s.png', content.id)
    local amount = (content.amount and content.amount ~= 1) and string.format(" [%d]", content.amount) or ""
    local prob = ""
   
    if content.weight then
        content.prob = content.weight / 100
    end
    if content.prob then
        prob = string.format(" <div>%s%%</div>", content.prob * 100 >= 1 and math.floor(content.prob * 100) or content.prob * 100)
    end
 
     local containedPart = ""
    -- Добавляем вложенный вызов только если у элемента действительно есть вложенные данные
    if content.StorageFill or (content.EntityTableContainerFill and content.EntityTableContainerFill.containers) then
        containedPart = string.format(" {{#invoke:Prototypes/Хранилище/Предмет|main|framing|contained|%s}}", content.id)
    end
 
    return string.format(
        '{{LinkСard|SideStyle=1|background-color=#cbcbff0a|image=%s|name=%s%s%s%s}}',
        image, name, amount, prob, containedPart
    )
end
 
-- Получение содержимого через таблицу
getContentsOutput = function(contents)
    local result = {}
    for _, content in ipairs(contents) do
        result[#result + 1] = formatContent(content)
    end
    return table.concat(result)
end
 
-- Обработка вложенных таблиц
processNestedSelectors = function(children)
    if not children or #children == 0 then return "" end
 
     local results = {}
    for _, child in ipairs(children) do
        if child.id then
            results[#results + 1] = formatContent(child)
        elseif child["!type"] == "NestedSelector" then
            results[#results + 1] = handleNestedSelector(child, true)
        elseif child["!type"] == "GroupSelector" then
            results[#results + 1] = handleGroupSelector(child)
        end
    end
    return table.concat(results)
end
 
-- Обработка таблиц
getTableOutput = function(tableId)
    local tableData = loadData('User:IanComradeBot/prototypes/table.json')
    local tableDataIndex = findDataById(tableData, tableId)
 
    if not tableDataIndex then return 'Таблица не найдена.' end
 
    if tableDataIndex['!type:GroupSelector'] then
        return handleGroupSelector(tableDataIndex['!type:GroupSelector'])
    elseif tableDataIndex['!type:AllSelector'] then
        return processNestedSelectors(tableDataIndex['!type:AllSelector'].children)
    end
 
    return 'Таблица не содержит элементов.'
end
 
-- Формирование списка содержащихся предметов или таблиц.
-- Если у найденного элемента нет ни StorageFill, ни EntityTableContainerFill, он обрабатывается как простой элемент.
getContainedOutput = function(itemData, id)
    local item = findDataById(itemData, id)
    if not item then return '' end
 
    if not (item.StorageFill or (item.EntityTableContainerFill and item.EntityTableContainerFill.containers)) then
        return formatContent(item)
    end
 
    local result = {}
    if item.StorageFill and item.StorageFill.contents then
        result[#result + 1] = getContentsOutput(item.StorageFill.contents)
    elseif item.EntityTableContainerFill and item.EntityTableContainerFill.containers then
        local containers = item.EntityTableContainerFill.containers
 
        -- Обработка entity_storage
        if containers.entity_storage then
            if containers.entity_storage.children then
                result[#result + 1] = processNestedSelectors(containers.entity_storage.children)
            end
            if containers.entity_storage.tableId then
                result[#result + 1] = getTableOutput(containers.entity_storage.tableId)
            end
        end
 
        -- Обработка storagebase
        if containers.storagebase and containers.storagebase.tableId then
            result[#result + 1] = getTableOutput(containers.storagebase.tableId)
        end
    end
    return table.concat(result)
end
 
-- Обработка AllSelector
handleAllSelector = function(allSelector)
    if not allSelector.children then return '' end
    return processNestedSelectors(allSelector.children)
end
 
-- Обработка GroupSelector
handleGroupSelector = function(groupSelector)
    if not groupSelector.children then return '' end
    local result = {}
    local wrapperStart, wrapperEnd = "", ""
 
     if groupSelector.weight and groupSelector.weight ~= "default" then
        wrapperStart = string.format('{{LinkСard/Сollapsible|name=Группа предметов %s%%|content=', groupSelector.weight)
        wrapperEnd = "}}"
    elseif groupSelector["!type"] == "GroupSelector" and not groupSelector.weight then
         wrapperStart = '{{LinkСard/Сollapsible|name=Может выпасть лишь один из:|content='
        wrapperEnd = "}}"
    end
 
    for _, child in ipairs(groupSelector.children) do
        if child["!type"] == "GroupSelector" then
            result[#result + 1] = handleGroupSelector(child)
        elseif child["!type"] == "AllSelector" then
            result[#result + 1] = string.format('{{LinkСard/Сollapsible|name=Выпадают только вместе:|content=%s}}', handleAllSelector(child))
        elseif child.id then
            result[#result + 1] = formatContent(child)
        else
            result[#result + 1] = "<div>Ошибка: отсутствует id у элемента.</div>"
        end
     end
     end
    local ext = (args["ext"] or "png"):gsub("^%.", "")
    local namespace = args["namespace"] or "Файл"
    local max = tonumber(args["max"]) or 50
    local include_base = (args["base"] ~= "no")


    return wrapperStart .. table.concat(result) .. wrapperEnd
     local found = {}
end
 
-- Обработка NestedSelector
handleNestedSelector = function(nestedSelector, wrapped)
    if not nestedSelector.tableId then return '' end
 
     local result = {}
    local classesRolls, classesProb


     if wrapped then
     if include_base then
         if nestedSelector.rolls and nestedSelector.rolls.range then
         local t = mw.title.new("Файл:" .. name .. "." .. ext)
            local rollsResult = processRolls(nestedSelector.rolls)
         if t and t.exists then
            if rollsResult and #rollsResult > 0 then
             table.insert(found, "")
                classesRolls = ', максимум может выпасть: ' .. rollsResult
            end
        end
         if nestedSelector.prob then
             classesProb = string.format(" <div>%s%%</div>", nestedSelector.prob * 100 >= 1 and math.floor(nestedSelector.prob * 100) or nestedSelector.prob * 100)
         end
         end
     end
     end


     if wrapped and (classesRolls or classesProb) then
     for i = 1, max do
         if (classesRolls and #classesRolls > 0) or (classesProb and #classesProb > 0) then
        local t = mw.title.new("Файл:" .. name .. "-" .. i .. "." .. ext)
             result[#result + 1] = string.format('{{LinkСard/Сollapsible|name=Группа предметов%s%s|content=', classesRolls or "", classesProb or "")
         if t and t.exists then
             table.insert(found, "-" .. i)
         end
         end
     end
     end


     result[#result + 1] = getTableOutput(nestedSelector.tableId)
     if #found == 0 then
 
         return ""
    if wrapped and (classesRolls or classesProb) then
         if (classesRolls and #classesRolls > 0) or (classesProb and #classesProb > 0) then
            result[#result + 1] = "}}"
        end
     end
     end


     return table.concat(result)
     local before = "[[" .. namespace .. ":" .. name
end
     local after = "." .. ext .. "|" .. attributes .. "]]"
 
-- Формирование списка химии
getChemOutput = function(itemData, id)
     local item = findDataById(itemData, id)
    if not item or not item.SolutionContainerManager or not item.SolutionContainerManager.solutions then return '' end


     local result = {}
     local parts = {}
     for _, solution in pairs(item.SolutionContainerManager.solutions) do
     table.insert(parts, "<choose before=\"" .. before .. "\" after=\"" .. after .. "\">")
        for _, reagent in ipairs(solution.reagents) do
    for _, suf in ipairs(found) do
            result[#result + 1] = string.format('<li>[[Химия#chem_%s|%s]] (%d ед.)</li>', reagent.ReagentId, reagent.ReagentId, reagent.Quantity)
        table.insert(parts, "<option>" .. suf .. "</option>")
        end
     end
     end
     return string.format('<ul class="1">%s</ul>', table.concat(result))
     table.insert(parts, "</choose>")
end
 
-- Основная функция модуля
function p.main(frame)
    local mode = frame.args[1]
    local id = frame.args[2]
 
    if not id then return 'Не указан ID.' end
 
    local itemDataIndex = buildIndex(itemData)
   
    if not itemData then return 'Не удалось загрузить данные.' end
 
    if mode == 'framing' then
        local subMode = frame.args[2]
        local id = frame.args[3]
 
        if not id then
            return 'Не указан ID для режима framing.'
        end
 
        if subMode == 'chem' then
            return frame:preprocess('{{СollapsibleMenu|' .. getChemOutput(itemDataIndex, id) .. '}}')
        elseif subMode == 'contained' then
            return frame:preprocess('{{СollapsibleMenu|' .. getContainedOutput(itemDataIndex, id) .. '}}')
        else
            return 'Неизвестный подрежим для framing: ' .. subMode
        end
    elseif mode == 'chem' then
        return frame:preprocess(getChemOutput(itemDataIndex, id))
    elseif mode == 'contained' then
        return frame:preprocess(getContainedOutput(itemDataIndex, id))
    elseif mode == 'rolls' then
        local entity = findDataById(itemDataIndex, id)
        if not entity then return 'ID не найден в данных.' end
 
        if entity.EntityTableContainerFill then
            local containers = entity.EntityTableContainerFill.containers
            if containers.entity_storage and containers.entity_storage.rolls then
                return processRolls(containers.entity_storage.rolls)
            end
        end


        return ''
     return frame:preprocess(table.concat(parts, "\n"))
     else
        return 'Неизвестный режим: ' .. mode
    end
end
end


return p
return p

Текущая версия от 02:52, 17 марта 2026

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

local p = {}
local getArgs = require('Module:Arguments').getArgs

function p.main(frame)
    local args = getArgs(frame, { removeBlanks = false })
    local name = args[1] or ""
    local attributes = args[2] or ""
    if name == "" then
        return "<span class=\"error\">Ошибка: не указано имя файла.</span>"
    end
    local ext = (args["ext"] or "png"):gsub("^%.", "") 
    local namespace = args["namespace"] or "Файл"
    local max = tonumber(args["max"]) or 50
    local include_base = (args["base"] ~= "no")

    local found = {}

    if include_base then
        local t = mw.title.new("Файл:" .. name .. "." .. ext)
        if t and t.exists then
            table.insert(found, "")
        end
    end

    for i = 1, max do
        local t = mw.title.new("Файл:" .. name .. "-" .. i .. "." .. ext)
        if t and t.exists then
            table.insert(found, "-" .. i)
        end
    end

    if #found == 0 then
        return ""
    end

    local before = "[[" .. namespace .. ":" .. name
    local after = "." .. ext .. "|" .. attributes .. "]]"

    local parts = {}
    table.insert(parts, "<choose before=\"" .. before .. "\" after=\"" .. after .. "\">")
    for _, suf in ipairs(found) do
        table.insert(parts, "<option>" .. suf .. "</option>")
    end
    table.insert(parts, "</choose>")

    return frame:preprocess(table.concat(parts, "\n"))
end

return p