Space Station 14 Вики

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

Интерактивная навигация по истории
← Предыдущая правка
мНет описания правки
мНет описания правки
 
(не показана 141 промежуточная версия этого же участника)
Строка 1: Строка 1:
local p = {}
local p = {}


---------------------------------------------------------------------
-- Загрузка данных
-- Загрузка данных  
local chemData = mw.loadData("Модуль:IanComradeBot/chem prototypes.json/data")
---------------------------------------------------------------------
local seedsData = mw.loadData("Модуль:IanComradeBot/prototypes/seeds.json/data")
local itemData          = mw.loadData("Модуль:IanComradeBot/prototypes/fills/Item.json/data")
local tableData          = mw.loadData("Модуль:IanComradeBot/prototypes/table.json/data")
local gearData          = mw.loadData("Модуль:IanComradeBot/startingGear.json/data")
local jobData            = mw.loadData("Модуль:IanComradeBot/job.json/data")
local gearRoleLoadout    = mw.loadData("Модуль:IanComradeBot/roleLoadout.json/data")
local loadoutData        = mw.loadData("Модуль:IanComradeBot/loadout.json/data")
local loadoutGroupData  = mw.loadData("Модуль:IanComradeBot/loadoutGroup.json/data")
local cargoData          = mw.loadData("Модуль:IanComradeBot/prototypes/сargo.json/base")
local latheData          = mw.loadData("Модуль:IanComradeBot/prototypes/lathe.json/data")
local recipeData        = mw.loadData("Модуль:IanComradeBot/prototypes/lathe/recipes.json/data")
local researchData      = mw.loadData("Модуль:IanComradeBot/prototypes/research.json/data")
local materialData      = mw.loadData("Модуль:IanComradeBot/prototypes/materials.json/data")
local chemDataLathe      = mw.loadData("Модуль:IanComradeBot/chem prototypes.json/data")
local vendingMachinesData = mw.loadData("Модуль:IanComradeBot/prototypes/vending machines.json/data")
local inventoriesData    = mw.loadData("Модуль:IanComradeBot/prototypes/vending machines/inventories.json/data")


---------------------------------------------------------------------
local function kelvinToCelsius(k)
-- Функции для обратного поиска
    return k - 273.15
---------------------------------------------------------------------
end


local function searchItemInStructure(struct, targetId)
local function findSeedById(id, data)
    if type(struct) ~= "table" then
     for _, seed in ipairs(data) do
        return false
         if seed.id == id then
    end
             return seed
    if struct.id and struct.id == targetId then
        return true
    end
     for _, v in pairs(struct) do
         if type(v) == "table" then
             if searchItemInStructure(v, targetId) then
                return true
            end
         end
         end
     end
     end
     return false
     return nil
end
end


---------------------------------------------------------------------
local function formatCharacteristics(seed)
 
     local parts = {
---------------------------------------------------------------------
        ("[[Гидропоника#Потенция|Потенция]]: %s"):format(seed.potency or 1),
local function findRelatedTables(initialList)
         ("[[Гидропоника#Урожайность|Урожайность]]: %s"):format(seed.yield),
     local results = {}
         ("[[Гидропоника#Срок жизни|Срок жизни]]: %s"):format(seed.lifespan),
    local function recursiveSearch(tblId)
        ("[[Гидропоника#Созревание|Созревание]]: %s"):format(seed.maturation),
         if results[tblId] then
        ("[[Гидропоника#Производство|Производство]]: %s"):format(seed.production),
            return
         ("[[Гидропоника#Стадии роста|Стадии роста]]: %s"):format(seed.growthStages or 6),
         end
     }
        results[tblId] = true
     return table.concat(parts, '<br>')
        for id, entry in pairs(tableData) do
            if type(entry) == "table" then
                for _, value in pairs(entry) do
                    if type(value) == "table" and value.tableId and value.tableId == tblId then
                        recursiveSearch(id)
                    end
                end
            end
         end
    end
    for _, tblId in ipairs(initialList) do
        recursiveSearch(tblId)
     end
    local res = {}
     for id in pairs(results) do
        table.insert(res, id)
    end
    return res
end
end


function p.reverseContained(frame)
local function formatConditions(seed)
     local targetId = frame.args[2]
     local parts = {
    if not targetId or targetId == "" then
         ("[[Гидропоника#Потребление воды|Вода]]: %s"):format(seed.waterConsumption or 0.5),
         return "Ошибка: не указан id предмета для обратного поиска."
         ("[[Гидропоника#Потребление нутриентов|Удобрение]]: %s"):format(seed.nutrientConsumption or 0.75),
    end
         ("[[Гидропоника#Оптимальная температура|Темп.]]: %.2f°C"):format(kelvinToCelsius(seed.idealHeat or 293)),
 
     }
    local initialTables = {}
     return table.concat(parts, '<br>')
    for tableId, tblEntry in pairs(tableData) do
         if type(tblEntry) == "table" then
            if searchItemInStructure(tblEntry, targetId) then
                table.insert(initialTables, tableId)
            end
        end
    end
 
    if #initialTables == 0 then
        return "Таблица, содержащая предмет с id " .. targetId .. ", не найдена."
    end
 
    local allRelatedTables = findRelatedTables(initialTables)
 
    local matchingStorages = {}
    for storageId, storage in pairs(itemData) do
         if type(storage) == "table" and storage.EntityTableContainerFill and storage.EntityTableContainerFill.containers then
            local containers = storage.EntityTableContainerFill.containers
            if containers.entity_storage and containers.entity_storage.tableId then
                for _, tblId in ipairs(allRelatedTables) do
                    if containers.entity_storage.tableId == tblId then
                        table.insert(matchingStorages, storageId)
                    end
                end
            end
            if containers.storagebase and containers.storagebase.tableId then
                for _, tblId in ipairs(allRelatedTables) do
                    if containers.storagebase.tableId == tblId then
                        table.insert(matchingStorages, storageId)
                    end
                end
            end
        end
        if storage.id and storage.id == targetId then
            table.insert(matchingStorages, storageId)
        end
    end
 
    if #matchingStorages == 0 then
        return "Хранилище, вызывающее найденные таблицы, не найдено."
     end
 
     return "Найденные хранилища: " .. table.concat(matchingStorages, ", ")
end
end


---------------------------------------------------------------------
local function formatHarvestType(seed)
 
     return seed.harvestRepeat and "[[Гидропоника#Тип урожая|" .. tostring(seed.harvestRepeat) .. "]]" or "-"
---------------------------------------------------------------------
function p.reverseEquipment(frame)
     local targetId = frame.args[2]
    local slotFilter = frame.args[3]
    if not targetId or targetId == "" then
        return "Ошибка: не указан id оборудования для обратного поиска."
    end
 
    local results = {}
 
    -- Обработка startingGear (gearData)
    for _, gear in pairs(gearData) do
        local currentGearId = gear.id or "Unknown"
        if gear.equipment then
            for slot, equipId in pairs(gear.equipment) do
                if equipId == targetId and (not slotFilter or slot == slotFilter) then
                    local foundJob = nil
                    for jobId, job in pairs(jobData) do
                        if job.startingGear == currentGearId then
                            foundJob = jobId
                            break
                        end
                    end
                    if foundJob then
                        table.insert(results, "Job: " .. foundJob .. " (слот: " .. slot .. ")")
                    end
                end
            end
        end
    end
 
    -- Обработка loadout (loadoutData)
    for _, loadout in pairs(loadoutData) do
        if loadout.equipment then
            for slot, equipId in pairs(loadout.equipment) do
                if equipId == targetId and (not slotFilter or slot == slotFilter) then
                    local foundGroupId = nil
                    -- Поиск группы в loadoutGroupData, в которой присутствует loadout.id
                    for _, group in pairs(loadoutGroupData) do
                        if group.loadouts and type(group.loadouts) == "table" then
                            for _, lId in ipairs(group.loadouts) do
                                if lId == loadout.id then
                                    foundGroupId = group.id
                                    break
                                end
                            end
                        end
                        if foundGroupId then break end
                    end
                    local foundJob = nil
                    -- Поиск роли в gearRoleLoadout, где группы содержат найденный id группы
                    if foundGroupId then
                        for _, role in pairs(gearRoleLoadout) do
                            if role.groups then
                                for _, g in ipairs(role.groups) do
                                    if g == foundGroupId then
                                        foundJob = role.id  -- предполагается, что поле id присутствует
                                        break
                                    end
                                end
                            end
                            if foundJob then break end
                        end
                    end
                    if foundJob then
                        table.insert(results, "Job: " .. foundJob .. " (слот: " .. slot .. ")")
                    end
                end
            end
        end
    end
 
    if #results == 0 then
        return "Оборудование с id " .. targetId .. " не найдено в наборах экипировки."
    end
 
    return "Найдено использование оборудования: " .. table.concat(results, "; ")
end
end
 
local function formatHarvestType(seed)
---------------------------------------------------------------------
     local harvestRepeat = seed.harvestRepeat
 
     if harvestRepeat == "Repeat" then
---------------------------------------------------------------------
         return "[[Гидропоника#Тип урожая|Многолетнее]]"
function p.reverseCargo(frame)
     elseif harvestRepeat == "SelfHarvest" then
     local searchValue = frame.args[2]
         return "[[Гидропоника#Тип урожая|Самосбор]]"
     if not searchValue or searchValue == "" then
     else
         return "Ошибка: не указано значение для поиска в режиме cargo."
         return "[[Гидропоника#Тип урожая|Однолетнее]]"
     end
 
    local foundIds = {}
    for _, entry in ipairs(cargoData) do
        if entry.product == searchValue then
            table.insert(foundIds, entry.id)
         end
     end
 
    if #foundIds == 0 then
         return "Запись для product со значением '" .. searchValue .. "' не найдена."
     end
     end
    return "Найденные записи cargo: " .. table.concat(foundIds, ", ")
end
end


---------------------------------------------------------------------
local function formatChemicals(seed)
 
    if not seed.chemicals then return "-" end
---------------------------------------------------------------------
    local list = {}
local function getRecipeById(recipeId)
     for chemId, vals in pairs(seed.chemicals) do
     for _, recipe in ipairs(recipeData) do
         local entry = chemData[chemId]
         if recipe.id == recipeId then
        local chemName = entry and entry.name or chemId
             return recipe
        table.insert(list, string.format(
         end
            "<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 nil
     return "<ul>" .. table.concat(list) .. "</ul>"
end
end


function p.reverseLathe(frame)
local function formatMutations(seed, data)
    local targetResult = frame.args[2]
     if not seed.mutationPrototypes then return "-" end
     if not targetResult or targetResult == "" then
     local list = {}
        return "Ошибка: не указан результат рецепта для обратного поиска."
     for _, mu in ipairs(seed.mutationPrototypes) do
    end
        local target = findSeedById(mu, data)
 
        if target and target.productPrototypes then
     local matchingLathes = {}
            for _, prod in ipairs(target.productPrototypes) do
     local function checkRecipes(recipeIds)
                 table.insert(list, ("<li>{{Предмет|%s|link=Гидропоника#{{#invoke:Entity Lookup|getname|%s}}}}</li>"):format(prod, prod))
        for _, recipeId in ipairs(recipeIds or {}) do
            local recipe = getRecipeById(recipeId)
            if recipe and recipe.result == targetResult then
                 return true
             end
             end
         end
         end
        return false
     end
     end
    return "<ul>" .. table.concat(list) .. "</ul>"
end


    for _, lathe in ipairs(latheData) do
local function generateHeader()
        local found = false
    return [[
        if lathe.Lathe then
{| id="BOTANY" class="wikitable sortable mw-collapsible" style="width:100%;"
            if checkRecipes(lathe.Lathe.staticRecipes) or checkRecipes(lathe.Lathe.dynamicRecipes) then
! rowspan="2" style="width:10%;" | Плод
                found = true
! rowspan="2" class="unsortable" style="width:5%;" | Семена
            end
! rowspan="2" class="unsortable" style="width:5%;" | Растение
        end
! colspan="3" class="unsortable" style="width:30%;" id="no-highlight" | Характеристики
        if not found and lathe.EmagLatheRecipes then
! rowspan="2" class="unsortable" style="width:30%;" | Содержит вещества
            if checkRecipes(lathe.EmagLatheRecipes.emagStaticRecipes) or checkRecipes(lathe.EmagLatheRecipes.emagDynamicRecipes) then
! rowspan="2" style="width:20%;" | Мутации
                found = true
|-
            end
! style="width:10%;" class="unsortable" | Рост
        end
! style="width:10%;" class="unsortable" | Условия
        if found and lathe.id then
! style="width:5%;" class="unsortable" | Тип сбора
            table.insert(matchingLathes, lathe.id)
]]
        end
end
    end
 
    if #matchingLathes == 0 then
        return "Станок, производящий '" .. targetResult .. "', не найден."
    end


     return "Найденные станки: " .. table.concat(matchingLathes, ", ")
local function generateFooter()
     return "|}"
end
end


---------------------------------------------------------------------
function p.table(frame)
    local data = mw.loadData("Модуль:IanComradeBot/prototypes/seeds.json/data")
    local rows = {}


---------------------------------------------------------------------
     for _, seed in ipairs(data) do
function p.reverseVending(frame)
         local prodId = seed.productPrototypes[1]
    local invMode = frame.args[2] or ""  -- режим поиска: "inventory", "contraband", "emag" или пустая строка для всех
        local seedId = seed.packetPrototype
    local targetId = frame.args[3]
        local seedName = string.format('{{#invoke:Entity Lookup|getname|%s}}', seedId)
    if not targetId or targetId == "" then
        return "Ошибка: не указан id предмета для обратного поиска в торговых автоматах."
    end
 
    local matchingInventoryIds = {}
    -- Перебираем все инвентарные записи
     for _, inventory in pairs(inventoriesData) do
         if inventory.id then
            local found = false
            -- Если режим не указан, ищем во всех типах инвентарей
            if (invMode == "inventory" or invMode == "" or not invMode) and inventory.startingInventory and type(inventory.startingInventory) == "table" then
                if inventory.startingInventory[targetId] then
                    found = true
                end
            end
            if (invMode == "contraband" or invMode == "" or not invMode) and inventory.contrabandInventory and type(inventory.contrabandInventory) == "table" then
                if inventory.contrabandInventory[targetId] then
                    found = true
                end
            end
            if (invMode == "emag" or invMode == "" or not invMode) and inventory.emaggedInventory and type(inventory.emaggedInventory) == "table" then
                if inventory.emaggedInventory[targetId] then
                    found = true
                end
            end
            if found then
                table.insert(matchingInventoryIds, inventory.id)
            end
        end
    end


    if #matchingInventoryIds == 0 then
        local anchor  = string.format('{{anchor|%s}}', seedName)
         return "Предмет с id " .. targetId .. " не найден ни в одном инвентаре."
        local fruitImg = string.format(
    end
            '{{Предмет|%s|size=64px|vertical=1|imageTooltip=1|link=%s}}',
            prodId, seedName
         )
        local seedImg  = string.format(
            '{{Предмет|%s|size=64px|vertical=1|imageTooltip=1|l=|link=%s}}',
            seedId, seedName
        )
        local plantImg = string.format(
            '{{Предмет|%s-harvest|size=64px|l=|link=%s}}',
            seedId, seedName
        )


     local matchingVendingMachines = {}
        local colGrowth     = formatCharacteristics(seed)
    -- Поиск торговых автоматов, у которых поле VendingMachine.pack совпадает с id найденного инвентаря
        local colConditions = formatConditions(seed)
    for _, vm in pairs(vendingMachinesData) do
        local colHarvest    = formatHarvestType(seed)
         if vm.VendingMachine and vm.VendingMachine.pack then
         local colChemicals  = formatChemicals(seed)
            local packId = vm.VendingMachine.pack
        local colMutations  = formatMutations(seed, data)
            for _, invId in ipairs(matchingInventoryIds) do
                if packId == invId then
                    if vm.id then
                        table.insert(matchingVendingMachines, vm.id)
                    end
                    break
                end
            end
        end
    end


    if #matchingVendingMachines == 0 then
        local row = frame:preprocess(string.format(
         return "Не найден торговый автомат, содержащий предмет с id " .. targetId .. "."
            [[|-
            ! %s
            ! %s
            ! %s
            | %s
            | %s
            | %s
            | %s
            | %s ]],
            fruitImg, seedImg, plantImg,
            colGrowth, colConditions, colHarvest,
            colChemicals, colMutations
        ))
         table.insert(rows, row)
     end
     end


     return "Торговые автоматы, содержащие предмет " .. targetId .. ": " .. table.concat(matchingVendingMachines, ", ")
     return generateHeader() .. table.concat(rows, '\n') .. '\n' .. generateFooter()
end
end


---------------------------------------------------------------------
-- Основная функция модуля
---------------------------------------------------------------------
function p.main(frame)
function p.main(frame)
     local mode = frame.args[1]
     local args = frame.args
     if not mode or mode == "" then
    local id = args[1]
        return "Ошибка: не указан режим обратного поиска. Доступные режимы: reverseContained, reverseEquipment, reverseCargo, reverseLathe."
     local mode = mw.text.trim(args[2] or ""):lower()
    end
    local seed = findSeedById(id, seedsData)
    if not seed then return "" end


     if mode == "reverseContained" then
     if mode == "growth" then
         return p.reverseContained(frame)
         return formatCharacteristics(seed)
     elseif mode == "reverseEquipment" then
     elseif mode == "conditions" then
         return p.reverseEquipment(frame)
         return formatConditions(seed)
     elseif mode == "reverseCargo" then
     elseif mode == "harvest" then
         return p.reverseCargo(frame)
         return formatHarvestType(seed)
     elseif mode == "reverseLathe" then
     elseif mode == "chemicals" then
         return p.reverseLathe(frame)
         return formatChemicals(seed)
     elseif mode == "reverseVending" then
     elseif mode == "mutations" then
         return p.reverseVending(frame)
         return formatMutations(seed, seedsData)
     else
     else
         return "Неизвестный режим: " .. mode .. ". Доступные режимы: reverseContained, reverseEquipment, reverseCargo, reverseLathe."
         return ""
     end
     end
end
end


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