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

мНет описания правки
мНет описания правки
Строка 1: Строка 1:
-- Загрузка данных
-- Вспомогательная функция для итерации по «массивоподобным» таблицам
local itemData          = mw.loadData("Модуль:IanComradeBot/prototypes/fills/Item.json/data")
local function iterateArray(t)
local itemSlotsData     = mw.loadData("Модуль:IanComradeBot/prototypes/ItemSlots.json/data")
     if type(t) ~= "table" then
local itemStackData    = mw.loadData("Модуль:IanComradeBot/prototypes/fills/stack.json/data")
        return function() return nil end
local chemData          = mw.loadData("Модуль:IanComradeBot/prototypes/fills/chem.json/data")
    end
local chemTranslateData = mw.loadData("Модуль:IanComradeBot/chem prototypes.json/data")
    local isArray = false
 
     local count = 0
local p = {}
     for k, _ in pairs(t) do
 
         if type(k) == "number" then
-- Функция для загрузки данных
             count = count + 1
local loadData = function(filePath)
    local page = mw.title.new(filePath)
    local content = page:getContent()
    return content and mw.text.jsonDecode(content) or nil
end
 
-- Функция processRolls для преобразования диапазона
local processRolls = function(rolls)
     local result = ""
     if rolls and rolls.range then
        -- Если указан range
        local min, max = rolls.range:match("(%d+),%s*(%d+)")
         min, max = tonumber(min), tonumber(max)
        if min and max then
             result = result .. string.format('[%d-%d]', min + 1, max + 1)
        else
            result = result .. 'Некорректный формат для range.'
         end
         end
    elseif rolls and rolls.value then
        -- Если указано value
        result = result .. string.format('[%d]', rolls.value)
    else
        result = result .. 'Не указан параметр rolls.'
     end
     end
    return result
     if count > 0 then
end
         isArray = true
 
-- Функция для поиска первого startingItem в slots
local function getFirstStartingItem(data)
     if not data or not data.ItemSlots or not data.ItemSlots.slots then  
         return nil
     end
     end
      
     if isArray then
    for _, slot in pairs(data.ItemSlots.slots) do
        local keys = {}
        if slot.startingItem and slot.startingItem ~= "" then
        for k, _ in pairs(t) do
             return slot.startingItem
            if type(k) == "number" then
                table.insert(keys, k)
            end
        end
        table.sort(keys)
        local i = 0
        return function()
            i = i + 1
             local key = keys[i]
            if key then
                return key, t[key]
            end
         end
         end
    else
        return pairs(t)
     end
     end
   
    return nil
end
end


-- Загрузка данных через mw.loadData
local itemData          = mw.loadData("Модуль:IanComradeBot/prototypes/fills/Item.json/data")
local itemSlotsData    = mw.loadData("Модуль:IanComradeBot/prototypes/ItemSlots.json/data")
local itemStackData    = mw.loadData("Модуль:IanComradeBot/prototypes/fills/stack.json/data")
local chemData          = mw.loadData("Модуль:IanComradeBot/prototypes/fills/chem.json/data")
local chemTranslateData = mw.loadData("Модуль:IanComradeBot/chem prototypes.json/data")


-- Локальные функции
local p = {}
local findDataById, formatContent, getContentsOutput, processNestedSelectors, getTableOutput, getContainedOutput, getChemOutput, handleGroupSelector, handleAllSelector, handleNestedSelector


-- Поиск данных по ID через индекс
---------------------------------------------------------------------
-- Функция для поиска данных по ID (поддерживает оба формата таблиц)
local findDataById
findDataById = function(data, id)
findDataById = function(data, id)
     if not data then  
     if not data then  
Строка 61: Строка 52:
     end
     end


     if #data > 0 then
     -- Если данные индексированы по ID, сразу возвращаем нужный элемент
        for _, item in ipairs(data) do
     if data[id] then
            if item and item.id == id then
        return data[id]
                return item
    end
            end
 
        end
    -- Перебираем таблицу с использованием iterateArray (обеспечивает порядок для массива)
     else
    for _, item in iterateArray(data) do
        if data[id] then
        if type(item) == "table" and item.id == id then
            return data[id]
            return item
        end
        for key, item in pairs(data) do
            if type(item) == "table" and item.id == id then
                return item
            end
         end
         end
     end
     end
     return nil
     return nil
end
end


---------------------------------------------------------------------
-- Форматирование содержимого
-- Форматирование содержимого
formatContent = function(content)
local function formatContent(content)
     if type(content) == "table" and not content.id then
     if type(content) == "table" and not content.id then
         return "Ошибка: отсутствует id у элемента."
         return "Ошибка: отсутствует id у элемента."
Строка 115: Строка 101:
end
end


---------------------------------------------------------------------
-- Получение содержимого через таблицу
-- Получение содержимого через таблицу
getContentsOutput = function(contents)
local function getContentsOutput(contents)
     local result = ""
     local result = ""
     for _, content in ipairs(contents) do
     for _, content in iterateArray(contents) do
         result = result .. formatContent(content)
         result = result .. formatContent(content)
     end
     end
Строка 124: Строка 111:
end
end


---------------------------------------------------------------------
-- Обработка вложенных таблиц
-- Обработка вложенных таблиц
processNestedSelectors = function(children, visited)
local function processNestedSelectors(children, visited)
visited = visited or {}
visited = visited or {}
     if not children or #children == 0 then return "" end
     if not children then return "" end


     local result = ""
     local result = ""
 
     for _, child in iterateArray(children) do
     for _, child in ipairs(children) do
         if child.id then
         if child.id then
if not visited[child.id] then
if not visited[child.id] then
Строка 146: Строка 133:
end
end


-- Обработка таблиц
---------------------------------------------------------------------
getTableOutput = function(tableId, visited)
-- Обработка таблиц (для table.json)
local function getTableOutput(tableId, visited)
     visited = visited or {}
     visited = visited or {}


Строка 159: Строка 147:
     local tableDataIndex = findDataById(tableData, tableId)
     local tableDataIndex = findDataById(tableData, tableId)


     if not tableDataIndex then return 'Таблица не найдена.' end
     if not tableDataIndex then  
        return 'Таблица не найдена.'  
    end


     if tableDataIndex['!type:GroupSelector'] then
     if tableDataIndex['!type:GroupSelector'] then
Строка 170: Строка 160:
end
end


---------------------------------------------------------------------
-- Формирование списка содержащихся предметов или таблиц
-- Формирование списка содержащихся предметов или таблиц
getContainedOutput = function(itemData, id, visited)
local function getContainedOutput(itemData, id, visited)
     visited = visited or {}  
     visited = visited or {}  


Строка 181: Строка 172:


     local item = findDataById(itemData, id)
     local item = findDataById(itemData, id)
     if not item then return '' end
     if not item then  
        return ''  
    end


     local result = {}
     local result = {}
Строка 195: Строка 188:
         -- Обработка entity_storage
         -- Обработка entity_storage
         if containers.entity_storage then
         if containers.entity_storage then
            -- Если есть просто элементы с id, то форматируем их как обычные предметы
             if containers.entity_storage.children then
             if containers.entity_storage.children then
                 for _, child in ipairs(containers.entity_storage.children) do
                 for _, child in iterateArray(containers.entity_storage.children) do
                     if child.id then
                     if child.id then
                         result[#result + 1] = formatContent(child) -- Теперь одиночные id не игнорируются
                         result[#result + 1] = formatContent(child)
                     elseif child["!type"] == "GroupSelector" then
                     elseif child["!type"] == "GroupSelector" then
                         result[#result + 1] = handleGroupSelector(child, visited)
                         result[#result + 1] = handleGroupSelector(child, visited)
Строка 208: Строка 200:
             end
             end


            -- Если есть таблица, то загружаем её
             if containers.entity_storage.tableId then
             if containers.entity_storage.tableId then
                 result[#result + 1] = getTableOutput(containers.entity_storage.tableId, visited)
                 result[#result + 1] = getTableOutput(containers.entity_storage.tableId, visited)
Строка 217: Строка 208:
         if containers.storagebase then
         if containers.storagebase then
             if containers.storagebase.children then
             if containers.storagebase.children then
                 for _, child in ipairs(containers.storagebase.children) do
                 for _, child in iterateArray(containers.storagebase.children) do
                     if child.id then
                     if child.id then
                         result[#result + 1] = formatContent(child)
                         result[#result + 1] = formatContent(child)
Строка 237: Строка 228:
end
end


---------------------------------------------------------------------
-- Обработка AllSelector
-- Обработка AllSelector
handleAllSelector = function(allSelector)
local function handleAllSelector(allSelector)
     if not allSelector.children then return '' end
     if not allSelector.children then return '' end
     return processNestedSelectors(allSelector.children)
     return processNestedSelectors(allSelector.children)
end
end


---------------------------------------------------------------------
-- Обработка GroupSelector
-- Обработка GroupSelector
handleGroupSelector = function(groupSelector)
handleGroupSelector = function(groupSelector, visited)
     if not groupSelector.children then return '' end
     if not groupSelector.children then return '' end
     local result = ""
     local result = ""
     local wrapperStart, wrapperEnd = "", ""
     local wrapperStart, wrapperEnd = "", ""


    -- Проверка для контейнера EntityTableContainerFill
     if groupSelector.weight and groupSelector.weight ~= "default" then
     if groupSelector.weight and groupSelector.weight ~= "default" then
         wrapperStart = string.format('{{LinkСard/Сollapsible|name=Группа предметов %s%%|content=', groupSelector.weight)
         wrapperStart = string.format('{{LinkСard/Сollapsible|name=Группа предметов %s%%|content=', groupSelector.weight)
Строка 258: Строка 250:
     end
     end


     for _, child in ipairs(groupSelector.children) do
     for _, child in iterateArray(groupSelector.children) do
         if child["!type"] == "GroupSelector" then
         if child["!type"] == "GroupSelector" then
             result = result .. handleGroupSelector(child)
             result = result .. handleGroupSelector(child, visited)
         elseif child["!type"] == "AllSelector" then
         elseif child["!type"] == "AllSelector" then
             result = result .. string.format('{{LinkСard/Сollapsible|name=Выпадают только вместе:|content=%s}}', handleAllSelector(child))
             result = result .. string.format('{{LinkСard/Сollapsible|name=Выпадают только вместе:|content=%s}}', handleAllSelector(child))
Строка 273: Строка 265:
end
end


---------------------------------------------------------------------
-- Обработка NestedSelector
-- Обработка NestedSelector
handleNestedSelector = function(nestedSelector, wrapped, visited)
handleNestedSelector = function(nestedSelector, wrapped, visited)
Строка 306: Строка 299:
end
end


---------------------------------------------------------------------
-- Функция для преобразования диапазона (rolls)
local function processRolls(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 .. string.format('[%d-%d]', min + 1, max + 1)
        else
            result = result .. 'Некорректный формат для range.'
        end
    elseif rolls and rolls.value then
        result = result .. string.format('[%d]', rolls.value)
    else
        result = result .. 'Не указан параметр rolls.'
    end
    return result
end
---------------------------------------------------------------------
-- Формирование списка химии
-- Формирование списка химии
getChemOutput = function(itemData, id)
local function getChemOutput(itemData, id)
     local item = findDataById(itemData, id)
     local item = findDataById(itemData, id)
     if not item  
     if not item  
Строка 315: Строка 329:
     end
     end


    -- Сбор всех реагентов
     local allReagents = {}
     local allReagents = {}
     for _, solution in pairs(item.SolutionContainerManager.solutions) do
     for _, solution in pairs(item.SolutionContainerManager.solutions) do
         if solution and solution.reagents then
         if solution and solution.reagents then
             for _, reagent in ipairs(solution.reagents) do
             for _, reagent in iterateArray(solution.reagents) do
                 table.insert(allReagents, reagent)
                 table.insert(allReagents, reagent)
             end
             end
Строка 325: Строка 338:
     end
     end


    -- Если все реагенты — это только Fiber, то не выводим ничего
     local hasNonFiber = false
     local hasNonFiber = false
     for _, reagent in ipairs(allReagents) do
     for _, reagent in iterateArray(allReagents) do
         if reagent.ReagentId ~= "Fiber" then
         if reagent.ReagentId ~= "Fiber" then
             hasNonFiber = true
             hasNonFiber = true
Строка 341: Строка 353:
         local output = ""
         local output = ""
         if solution and solution.reagents then
         if solution and solution.reagents then
             for _, reagent in ipairs(solution.reagents) do
             for _, reagent in iterateArray(solution.reagents) do
                 local chemInfo = chemTranslateData[reagent.ReagentId]
                 local chemInfo = chemTranslateData[reagent.ReagentId]
                 local displayName = chemInfo and chemInfo.name or reagent.ReagentId
                 local displayName = chemInfo and chemInfo.name or reagent.ReagentId
Строка 356: Строка 368:
     result = result .. processSolution(item.SolutionContainerManager.solutions["drink"])
     result = result .. processSolution(item.SolutionContainerManager.solutions["drink"])
     result = result .. processSolution(item.SolutionContainerManager.solutions["food"])
     result = result .. processSolution(item.SolutionContainerManager.solutions["food"])
   
     result = result .. processSolution(item.SolutionContainerManager.solutions["beaker"])
     result = result .. processSolution(item.SolutionContainerManager.solutions["beaker"])
     result = result .. processSolution(item.SolutionContainerManager.solutions["injector"])
     result = result .. processSolution(item.SolutionContainerManager.solutions["injector"])
   
     result = result .. processSolution(item.SolutionContainerManager.solutions["pen"])
     result = result .. processSolution(item.SolutionContainerManager.solutions["pen"])


Строка 365: Строка 375:
end
end


---------------------------------------------------------------------
-- Функция поиска count в itemStackData
-- Функция поиска count в itemStackData
local function getStackCount(id)
local function getStackCount(id)
Строка 374: Строка 385:
end
end


---------------------------------------------------------------------
-- Основная функция модуля
-- Основная функция модуля
function p.main(frame)
function p.main(frame)
Строка 400: Строка 412:
             local itemDataEntry = findDataById(itemSlotsData, id)
             local itemDataEntry = findDataById(itemSlotsData, id)
             if not itemDataEntry then return "" end
             if not itemDataEntry then return "" end
             local startingItem = getFirstStartingItem(itemDataEntry)
             local startingItem = nil
            if itemDataEntry.ItemSlots and itemDataEntry.ItemSlots.slots then
                for _, slot in iterateArray(itemDataEntry.ItemSlots.slots) do
                    if slot.startingItem and slot.startingItem ~= "" then
                        startingItem = slot.startingItem
                        break
                    end
                end
            end
             if not startingItem then return "" end
             if not startingItem then return "" end
             return frame:preprocess('{{СollapsibleMenu|color=#71702a|' .. formatContent(startingItem) .. '}}')
             return frame:preprocess('{{СollapsibleMenu|color=#71702a|' .. formatContent(startingItem) .. '}}')
Строка 419: Строка 439:
         local itemDataEntry = findDataById(itemSlotsData, id)
         local itemDataEntry = findDataById(itemSlotsData, id)
         if not itemDataEntry then return "" end
         if not itemDataEntry then return "" end
         local startingItem = getFirstStartingItem(itemDataEntry)
         local startingItem = nil
        if itemDataEntry.ItemSlots and itemDataEntry.ItemSlots.slots then
            for _, slot in iterateArray(itemDataEntry.ItemSlots.slots) do
                if slot.startingItem and slot.startingItem ~= "" then
                    startingItem = slot.startingItem
                    break
                end
            end
        end
         if not startingItem then return "" end
         if not startingItem then return "" end
         return frame:preprocess(formatContent(startingItem))
         return frame:preprocess(formatContent(startingItem))