Space Station 14 Вики

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

Интерактивная навигация по истории
← Предыдущая правка
мНет описания правки
мНет описания правки
 
(не показано 155 промежуточных версий этого же участника)
Строка 1: Строка 1:
local findDataById, formatContent, getContentsOutput, processNestedSelectors, getTableOutput, getContainedOutput, getChemOutput, handleGroupSelector, handleAllSelector, handleNestedSelector, processRolls, getStackCount
local p = {}
 
-- Загрузка данных
local chemData = mw.loadData("Модуль:IanComradeBot/chem prototypes.json/data")
local seedsData = mw.loadData("Модуль:IanComradeBot/prototypes/seeds.json/data")


---------------------------------------------------------------------
local function kelvinToCelsius(k)
-- Функция поиска данных по ID
     return k - 273.15
findDataById = function(itemDataIndex, id)
     if not itemDataIndex then return nil end
for _, item in ipairs(itemDataIndex) do
if item.id == id then
return item
end
end
end
end


---------------------------------------------------------------------
local function findSeedById(id, data)
-- Форматирование содержимого
     for _, seed in ipairs(data) do
formatContent = function(content)
         if seed.id == id then
     if type(content) == "table" and not content.id then
             return seed
         return "Ошибка: отсутствует id у элемента."
    end
 
    local id = content.id or content
   
    local amountNumber = 1
    if content.amount then
        if type(content.amount) == "table" then
             amountNumber = content.amount.value or 1
        else
            amountNumber = content.amount
         end
         end
     end
     end
     local amount = (amountNumber and amountNumber ~= 1) and string.format(" [%d]", amountNumber) or ""
     return nil
   
end
    local prob = ""
    local probValue = nil
    if content.weight then
        probValue = content.weight / 100
    end
 
    if probValue then
        prob = string.format(" <div>%s%%</div>", probValue * 100 >= 1 and math.floor(probValue * 100) or probValue * 100)
    end


     return string.format(
local function formatCharacteristics(seed)
         '{{#invoke:Prototypes/Предмет/Содержание|main|%s|%s%s}}',
     local parts = {
         id, amount, prob
        ("[[Гидропоника#Потенция|Потенция]]: %s"):format(seed.potency or 1),
     )
        ("[[Гидропоника#Урожайность|Урожайность]]: %s"):format(seed.yield),
         ("[[Гидропоника#Срок жизни|Срок жизни]]: %s"):format(seed.lifespan),
        ("[[Гидропоника#Созревание|Созревание]]: %s"):format(seed.maturation),
        ("[[Гидропоника#Производство|Производство]]: %s"):format(seed.production),
         ("[[Гидропоника#Стадии роста|Стадии роста]]: %s"):format(seed.growthStages or 6),
     }
    return table.concat(parts, '<br>')
end
end


---------------------------------------------------------------------
local function formatConditions(seed)
-- Получение содержимого через таблицу
     local parts = {
getContentsOutput = function(contents)
        ("[[Гидропоника#Потребление воды|Вода]]: %s"):format(seed.waterConsumption or 0.5),
     local result = ""
         ("[[Гидропоника#Потребление нутриентов|Удобрение]]: %s"):format(seed.nutrientConsumption or 0.75),
    if type(contents) == "table" then
         ("[[Гидропоника#Оптимальная температура|Темп.]]: %.2f°C"):format(kelvinToCelsius(seed.idealHeat or 293)),
         if #contents > 0 then
     }
            for _, content in ipairs(contents) do
     return table.concat(parts, '<br>')
                result = result .. formatContent(content)
            end
         else
            for _, content in pairs(contents) do
                result = result .. formatContent(content)
            end
        end
     end
     return result
end
end


---------------------------------------------------------------------
local function formatHarvestType(seed)
-- Обработка вложенных таблиц
     return seed.harvestRepeat and "[[Гидропоника#Тип урожая|" .. tostring(seed.harvestRepeat) .. "]]" or "-"
processNestedSelectors = function(children, visited)
     visited = visited or {}
    if not children then return "" end
 
    local result = ""
    if type(children) == "table" then
        if #children > 0 then
            for _, child in ipairs(children) do
                if child.id then
                    if not visited[child.id] then
                        result = result .. formatContent(child)
                    end
                elseif child["!type"] == "NestedSelector" then
                    result = result .. handleNestedSelector(child, true, visited)
                elseif child["!type"] == "GroupSelector" then
                    result = result .. handleGroupSelector(child, visited)
                end
            end
        else
            for _, child in pairs(children) do
                if child.id then
                    if not visited[child.id] then
                        result = result .. formatContent(child)
                    end
                elseif child["!type"] == "NestedSelector" then
                    result = result .. handleNestedSelector(child, true, visited)
                elseif child["!type"] == "GroupSelector" then
                    result = result .. handleGroupSelector(child, visited)
                end
            end
        end
    end
    return result
end
end
 
local function formatHarvestType(seed)
---------------------------------------------------------------------
     local harvestRepeat = seed.harvestRepeat
-- Обработка таблиц (для table.json)
     if harvestRepeat == "Repeat" then
getTableOutput = function(tableId, visited)
         return "[[Гидропоника#Тип урожая|Многолетнее]]"
     visited = visited or {}
     elseif harvestRepeat == "SelfHarvest" then
 
         return "[[Гидропоника#Тип урожая|Самосбор]]"
     if visited[tableId] then
     else
         return ''
         return "[[Гидропоника#Тип урожая|Однолетнее]]"
    end
 
    visited[tableId] = true
 
     local tableData = mw.loadData("Модуль:IanComradeBot/prototypes/table.json/data")
    local tableDataIndex = findDataById(tableData, tableId)
 
    if not tableDataIndex then  
         return 'Таблица не найдена.'
    end
 
    if tableDataIndex['!type:GroupSelector'] then
        return handleGroupSelector(tableDataIndex['!type:GroupSelector'], visited)
     elseif tableDataIndex['!type:AllSelector'] then
         return processNestedSelectors(tableDataIndex['!type:AllSelector'].children, visited)
     end
     end
    return 'Таблица не содержит элементов.'
end
end


---------------------------------------------------------------------
local function formatChemicals(seed)
-- Формирование списка содержащихся предметов или таблиц
    if not seed.chemicals then return "-" end
getContainedOutput = function(itemData, id, visited)
    local list = {}
    visited = visited or {}
    for chemId, vals in pairs(seed.chemicals) do
 
        local entry = chemData[chemId]
    if visited[id] then
        local chemName = entry and entry.name or chemId
         return ''
        table.insert(list, string.format(
            "<li>[[Химия#chem_%s|%s]] (мин: %s, макс: %s, дел: %s)</li>",
            chemId, chemName, vals.Min or 0, vals.Max or 0, vals.PotencyDivisor or 1
         ))
     end
     end
 
     return "<ul>" .. table.concat(list) .. "</ul>"
     visited[id] = true
 
    local item = findDataById(itemData, id)
    if not item then
        return ''
    end
 
    local result = {}
 
    -- Обработка StorageFill
    if item.StorageFill and item.StorageFill.contents then
        result[#result + 1] = getContentsOutput(item.StorageFill.contents)
 
    -- Обработка EntityTableContainerFill
    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 and type(containers.entity_storage.children) == "table" then
                if #containers.entity_storage.children > 0 then
                    for _, child in ipairs(containers.entity_storage.children) do
                        if child.id then
                            result[#result + 1] = formatContent(child)
                        elseif child["!type"] == "GroupSelector" then
                            result[#result + 1] = handleGroupSelector(child, visited)
                        elseif child["!type"] == "AllSelector" then
                            result[#result + 1] = processNestedSelectors(child.children, visited)
                        end
                    end
                else
                    for _, child in pairs(containers.entity_storage.children) do
                        if child.id then
                            result[#result + 1] = formatContent(child)
                        elseif child["!type"] == "GroupSelector" then
                            result[#result + 1] = handleGroupSelector(child, visited)
                        elseif child["!type"] == "AllSelector" then
                            result[#result + 1] = processNestedSelectors(child.children, visited)
                        end
                    end
                end
            end
 
            if containers.entity_storage.tableId then
                result[#result + 1] = getTableOutput(containers.entity_storage.tableId, visited)
            end
        end
 
        -- Обработка storagebase (аналогично entity_storage)
        if containers.storagebase then
            if containers.storagebase.children and type(containers.storagebase.children) == "table" then
                if #containers.storagebase.children > 0 then
                    for _, child in ipairs(containers.storagebase.children) do
                        if child.id then
                            result[#result + 1] = formatContent(child)
                        elseif child["!type"] == "GroupSelector" then
                            result[#result + 1] = handleGroupSelector(child, visited)
                        elseif child["!type"] == "AllSelector" then
                            result[#result + 1] = processNestedSelectors(child.children, visited)
                        end
                    end
                else
                    for _, child in pairs(containers.storagebase.children) do
                        if child.id then
                            result[#result + 1] = formatContent(child)
                        elseif child["!type"] == "GroupSelector" then
                            result[#result + 1] = handleGroupSelector(child, visited)
                        elseif child["!type"] == "AllSelector" then
                            result[#result + 1] = processNestedSelectors(child.children, visited)
                        end
                    end
                end
            end
 
            if containers.storagebase.tableId then
                result[#result + 1] = getTableOutput(containers.storagebase.tableId, visited)
            end
        end
    end
 
    return table.concat(result)
end
end


---------------------------------------------------------------------
local function formatMutations(seed, data)
-- Обработка AllSelector
     if not seed.mutationPrototypes then return "-" end
handleAllSelector = function(allSelector)
     local list = {}
     if not allSelector.children then return '' end
     for _, mu in ipairs(seed.mutationPrototypes) do
    return processNestedSelectors(allSelector.children)
         local target = findSeedById(mu, data)
end
         if target and target.productPrototypes then
 
             for _, prod in ipairs(target.productPrototypes) do
---------------------------------------------------------------------
                 table.insert(list, ("<li>{{Предмет|%s|link=Гидропоника#{{#invoke:Entity Lookup|getname|%s}}}}</li>"):format(prod, prod))
-- Обработка GroupSelector
handleGroupSelector = function(groupSelector, visited)
    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
 
    if type(groupSelector.children) == "table" then
         if #groupSelector.children > 0 then
             for _, child in ipairs(groupSelector.children) do
                 if child["!type"] == "GroupSelector" then
                    result = result .. handleGroupSelector(child, visited)
                elseif child["!type"] == "AllSelector" then
                    result = result .. string.format('{{LinkСard/Сollapsible|name=Выпадают только вместе:|content=%s}}', handleAllSelector(child))
                elseif child.id then
                    result = result .. formatContent(child)
                else
                    result = result .. "<div>Ошибка: отсутствует id у элемента.</div>"
                end
            end
        else
            for _, child in pairs(groupSelector.children) do
                if child["!type"] == "GroupSelector" then
                    result = result .. handleGroupSelector(child, visited)
                elseif child["!type"] == "AllSelector" then
                    result = result .. string.format('{{LinkСard/Сollapsible|name=Выпадают только вместе:|content=%s}}', handleAllSelector(child))
                elseif child.id then
                    result = result .. formatContent(child)
                else
                    result = result .. "<div>Ошибка: отсутствует id у элемента.</div>"
                end
             end
             end
         end
         end
     end
     end
 
     return "<ul>" .. table.concat(list) .. "</ul>"
     return wrapperStart .. result .. wrapperEnd
end
end


---------------------------------------------------------------------
local function generateHeader()
-- Обработка NestedSelector
     return [[
handleNestedSelector = function(nestedSelector, wrapped, visited)
{| id="BOTANY" class="wikitable sortable mw-collapsible" style="width:100%;"
     visited = visited or {}
! rowspan="2" style="width:10%;" | Плод
    if not nestedSelector.tableId then return '' end
! rowspan="2" class="unsortable" style="width:5%;" | Семена
 
! rowspan="2" class="unsortable" style="width:5%;" | Растение
    local result = ""
! colspan="3" class="unsortable" style="width:30%;" id="no-highlight" | Характеристики
    local classesRolls, classesProb
! rowspan="2" class="unsortable" style="width:30%;" | Содержит вещества
 
! rowspan="2" style="width:20%;" | Мутации
    if wrapped then
|-
        if nestedSelector.rolls and nestedSelector.rolls.range then
! style="width:10%;" class="unsortable" | Рост
            local rollsResult = processRolls(nestedSelector.rolls)
! style="width:10%;" class="unsortable" | Условия
            if rollsResult and #rollsResult > 0 then
! style="width:5%;" class="unsortable" | Тип сбора
                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
 
    if wrapped and (classesRolls or classesProb) then
        result = result .. string.format('{{LinkСard/Сollapsible|name=Группа предметов%s%s|content=', classesRolls or "", classesProb or "")
    end
 
    result = result .. getTableOutput(nestedSelector.tableId, visited)
 
    if wrapped and (classesRolls or classesProb) then
        result = result .. "}}"
    end
 
    return result
end
end


---------------------------------------------------------------------
local function generateFooter()
-- Функция для преобразования диапазона (rolls)
     return "|}"
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 .. 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
end


---------------------------------------------------------------------
function p.table(frame)
-- Формирование списка химии
     local data = mw.loadData("Модуль:IanComradeBot/prototypes/seeds.json/data")
getChemOutput = function(itemData, id)
     local rows = {}
     local item = findDataById(itemData, id)
     if not item
      or not item.SolutionContainerManager
      or not item.SolutionContainerManager.solutions then
        return ''
    end


    local allReagents = {}
     for _, seed in ipairs(data) do
     for _, solution in pairs(item.SolutionContainerManager.solutions) do
         local prodId = seed.productPrototypes[1]
         if solution and solution.reagents and type(solution.reagents) == "table" then
        local seedId = seed.packetPrototype
            if #solution.reagents > 0 then
        local seedName = string.format('{{#invoke:Entity Lookup|getname|%s}}', seedId)
                for _, reagent in ipairs(solution.reagents) do
                    table.insert(allReagents, reagent)
                end
            else
                for _, reagent in pairs(solution.reagents) do
                    table.insert(allReagents, reagent)
                end
            end
        end
    end


    local hasNonFiber = false
        local anchor  = string.format('{{anchor|%s}}', seedName)
    if type(allReagents) == "table" then
        local fruitImg = string.format(
        if #allReagents > 0 then
            '{{Предмет|%s|size=64px|vertical=1|imageTooltip=1|link=%s}}',
             for _, reagent in ipairs(allReagents) do
             prodId, seedName
                if reagent.ReagentId ~= "Fiber" then
        )
                    hasNonFiber = true
        local seedImg  = string.format(
                    break
            '{{Предмет|%s|size=64px|vertical=1|imageTooltip=1|l=|link=%s}}',
                end
             seedId, seedName
             end
         )
         else
        local plantImg = string.format(
            for _, reagent in pairs(allReagents) do
            '{{Предмет|%s-harvest|size=64px|l=|link=%s}}',
                if reagent.ReagentId ~= "Fiber" then
             seedId, seedName
                    hasNonFiber = true
         )
                    break
                end
             end
         end
    end


     if not hasNonFiber then
        local colGrowth     = formatCharacteristics(seed)
         return ''
        local colConditions = formatConditions(seed)
    end
         local colHarvest    = formatHarvestType(seed)
        local colChemicals  = formatChemicals(seed)
        local colMutations  = formatMutations(seed, data)


    local function processSolution(solution)
         local row = frame:preprocess(string.format(
         local output = ""
            [[|-
        if solution and solution.reagents and type(solution.reagents) == "table" then
            ! %s  
            if #solution.reagents > 0 then
            ! %s  
                for _, reagent in ipairs(solution.reagents) do
            ! %s
                    local chemInfo = chemTranslateData[reagent.ReagentId]
            | %s
                    local displayName = chemInfo and chemInfo.name or reagent.ReagentId
            | %s
                    output = output .. string.format(
            | %s
                        '<li>[[Химия#chem_%s|%s]] (%d ед.)</li>',
             | %s  
                        reagent.ReagentId, displayName, reagent.Quantity
            | %s ]],
                    )
            fruitImg, seedImg, plantImg,
                end
            colGrowth, colConditions, colHarvest,
             else
             colChemicals, colMutations
                for _, reagent in pairs(solution.reagents) do
         ))
                    local chemInfo = chemTranslateData[reagent.ReagentId]
         table.insert(rows, row)
                    local displayName = chemInfo and chemInfo.name or reagent.ReagentId
                    output = output .. string.format(
                        '<li>[[Химия#chem_%s|%s]] (%d ед.)</li>',
                        reagent.ReagentId, displayName, reagent.Quantity
                    )
                end
             end
         end
         return output
     end
     end


     local result = ""
     return generateHeader() .. table.concat(rows, '\n') .. '\n' .. generateFooter()
    result = result .. processSolution(item.SolutionContainerManager.solutions["drink"])
    result = result .. processSolution(item.SolutionContainerManager.solutions["food"])
    result = result .. processSolution(item.SolutionContainerManager.solutions["beaker"])
    result = result .. processSolution(item.SolutionContainerManager.solutions["injector"])
    result = result .. processSolution(item.SolutionContainerManager.solutions["pen"])
   
    return result ~= "" and string.format('<ul class="1">%s</ul>', result) or ''
end
 
---------------------------------------------------------------------
-- Функция поиска count в itemStackData
getStackCount = function(id)
    local item = findDataById(itemStackData, id)
    if item and item.Stack and item.Stack.count then
        return item.Stack.count
    end
    return nil
end
end


---------------------------------------------------------------------
-- Загрузка данных
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 = {}
---------------------------------------------------------------------
-- Основная функция модуля
function p.main(frame)
function p.main(frame)
     local mode = frame.args[1]
     local args = frame.args
     local id = frame.args[2]
     local id = args[1]
 
     local mode  = mw.text.trim(args[2] or ""):lower()
    if not id then return 'Не указан ID.' end
    local seed = findSeedById(id, seedsData)
   
    if not seed then return "" end
     local itemDataIndex = 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
    if mode  == "growth" then
            return frame:preprocess('{{СollapsibleMenu|color=#3e7c82|' .. getChemOutput(chemData, id) .. '}}')
         return formatCharacteristics(seed)
        elseif subMode == 'contained' then
     elseif mode == "conditions" then
            return frame:preprocess('{{СollapsibleMenu|' .. getContainedOutput(itemDataIndex, id) .. '}}')
         return formatConditions(seed)
        elseif subMode == "slot" then
     elseif mode == "harvest" then
            local itemDataEntry = findDataById(itemSlotsData, id)
         return formatHarvestType(seed)
            if not itemDataEntry then return "" end
     elseif mode == "chemicals" then
            local startingItem = nil
         return formatChemicals(seed)
            if itemDataEntry.ItemSlots and itemDataEntry.ItemSlots.slots and type(itemDataEntry.ItemSlots.slots) == "table" then
    elseif mode  == "mutations" then
                if #itemDataEntry.ItemSlots.slots > 0 then
         return formatMutations(seed, seedsData)
                    for _, slot in ipairs(itemDataEntry.ItemSlots.slots) do
                        if slot.startingItem and slot.startingItem ~= "" then
                            startingItem = slot.startingItem
                            break
                        end
                    end
                else
                    for _, slot in pairs(itemDataEntry.ItemSlots.slots) do
                        if slot.startingItem and slot.startingItem ~= "" then
                            startingItem = slot.startingItem
                            break
                        end
                    end
                end
            end
            if not startingItem then return "" end
            return frame:preprocess('{{СollapsibleMenu|color=#71702a|' .. formatContent(startingItem) .. '}}')
         elseif subMode == "stack" then
            local count = getStackCount(id)
            return count and '(' .. count .. ')' or ""
        else
            return 'Неизвестный подрежим для framing: ' .. subMode
        end
     elseif mode == 'stack' then
        local count = getStackCount(id)
        return count or ""
    elseif mode == 'chem' then
         return getChemOutput(chemData, id)
     elseif mode == 'contained' then
         return frame:preprocess(getContainedOutput(itemDataIndex, id))
     elseif mode == "slot" then
         local itemDataEntry = findDataById(itemSlotsData, id)
        if not itemDataEntry then return "" end
        local startingItem = nil
        if itemDataEntry.ItemSlots and itemDataEntry.ItemSlots.slots and type(itemDataEntry.ItemSlots.slots) == "table" then
            if #itemDataEntry.ItemSlots.slots > 0 then
                for _, slot in ipairs(itemDataEntry.ItemSlots.slots) do
                    if slot.startingItem and slot.startingItem ~= "" then
                        startingItem = slot.startingItem
                        break
                    end
                end
            else
                for _, slot in pairs(itemDataEntry.ItemSlots.slots) do
                    if slot.startingItem and slot.startingItem ~= "" then
                        startingItem = slot.startingItem
                        break
                    end
                end
            end
        end
        if not startingItem then return "" end
         return frame:preprocess(formatContent(startingItem))
    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 ''
     else
     else
         return 'Неизвестный режим: ' .. mode
         return ""
     end
     end
end
end


return p
return p
Источник — https://station14.ru/wiki/Модуль:Песочница/Pok