Space Station 14 Вики

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

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


-----------------------------------------------------------
local BASE_USER = "IanComradeBot/"
-- Загрузка данных
-----------------------------------------------------------
local latheData      = mw.loadData("Модуль:IanComradeBot/prototypes/lathe.json/data")
local recipeData    = mw.loadData("Модуль:IanComradeBot/prototypes/lathe/recipes.json/data")
local recipePackData = mw.loadData("Модуль:IanComradeBot/prototypes/lathe/recipe pack.json/data")
local researchData  = mw.loadData("Модуль:IanComradeBot/prototypes/research.json/data")
local materialData  = mw.loadData("Модуль:IanComradeBot/prototypes/materials.json/data")
local chemData      = mw.loadData("Модуль:IanComradeBot/chem prototypes.json/data")


-----------------------------------------------------------
local function get_module_name(pagePath)
-- Вспомогательные функции
     return "Module:" .. BASE_USER .. pagePath .. "/data"
-----------------------------------------------------------
end
local function sortRecipesByPriority(recipes)
 
     table.sort(recipes, function(a, b)
local function load_cached_data(moduleName)
        local priority = { Static = 1, EMAG = 3 }
    local ok, loaded = pcall(mw.loadData, moduleName)
        local aPriority = priority[a.discipline] or 2
    if not ok or not loaded then
         local bPriority = priority[b.discipline] or 2
         return nil
    end
    return loaded
end


         if a.isEmag ~= b.isEmag then
local function parse_indexed_part(part)
             return not a.isEmag
    local key, idx = string.match(part, "^(.-)%[(%d+)%]$")
    if key then
        return key, tonumber(idx)
    end
    local num = tonumber(part)
    if num then
         return nil, num
    end
    return part, nil
end
 
local function get_by_path(tbl, path)
    if not tbl or path == "" then return nil end
    local cur = tbl
    for part in string.gmatch(path, "([^%.]+)") do
        local key, idx = parse_indexed_part(part)
        if key and key ~= "" then
            if type(cur) ~= "table" then return nil end
            local nextCur = cur[key]
            if nextCur == nil then
                nextCur = cur["!type:" .. key]
            end
            cur = nextCur
        end
        if idx then
             if type(cur) ~= "table" then return nil end
            cur = cur[idx]
         end
         end
        if cur == nil then return nil end
    end
    return cur
end


         if aPriority == bPriority then
local function format_value(v)
            if a.tier == b.tier then
    local okJson, json = pcall(mw.text.jsonEncode, v)
                return a.discipline < b.discipline
    if okJson and json == "null" then
            end
         return "null"
             return a.tier < b.tier
    end
 
    if v == nil then return "" end
 
    local t = type(v)
    if t == "string" or t == "number" or t == "boolean" then
        return tostring(v)
    elseif t == "table" then
        local ok, json2 = pcall(mw.text.jsonEncode, v)
        if ok and json2 then
             return json2
         end
         end
        return ""
    else
        return tostring(v)
    end
end
local function to_nowiki(v)
    return "<nowiki>" .. v .. "</nowiki>"
end


         return aPriority < bPriority
local function is_array(tbl)
     end)
    local max = 0
    local count = 0
    for k in pairs(tbl) do
         if type(k) ~= "number" then
            return false
        end
        if k > max then max = k end
        count = count + 1
     end
    return count > 0 and max == count
end
end


local function getRecipeDetails(recipeId)
local function deep_copy(src)
     for _, recipe in ipairs(recipeData) do
    local dst = {}
         if recipe.id == recipeId then
     for k, v in pairs(src) do
             return recipe
         if type(v) == "table" then
             dst[k] = deep_copy(v)
        else
            dst[k] = v
        end
    end
    return dst
end
 
local function deep_merge(dst, src)
    for k, v in pairs(src) do
        if type(v) == "table" and type(dst[k]) == "table" then
            deep_merge(dst[k], v)
        elseif type(v) == "table" then
            dst[k] = deep_copy(v)
        else
            dst[k] = v
         end
         end
     end
     end
    return nil
end
end


local function findInResearch(recipeId)
local function resolve_entry(data, id)
     for _, research in ipairs(researchData) do
     if type(data) ~= "table" then
         if research and research.recipeUnlocks then
         return nil
             for _, unlock in ipairs(research.recipeUnlocks) do
    end
                 if unlock == recipeId then
 
                     return {
    if id and id ~= "" then
                        name = research.name,
        local direct = data[id]
                        tier = research.tier,
        if direct ~= nil then
                        discipline = research.discipline
            return direct
                     }
        end
 
        local idsTable = data.id
        if type(idsTable) == "table" then
             local specific = idsTable[id]
            if type(specific) == "table" then
                local base = data["default"]
                 if type(base) == "table" then
                     local merged = deep_copy(base)
                    deep_merge(merged, specific)
                     return merged
                 end
                 end
                return deep_copy(specific)
             end
             end
         end
         end
    end
    local base = data["default"]
    if type(base) == "table" then
        return deep_copy(base)
     end
     end
     return nil
     return nil
end
end


local function getRecipePackDetails(packId)
local function collect_id_keys(data)
     for _, pack in ipairs(recipePackData) do
     if type(data) ~= "table" then
         if pack.id == packId then
        return {}
             return pack
    end
 
    local idsTable = data.id
    local ids = {}
 
    if type(idsTable) == "table" then
        for k in pairs(idsTable) do
            ids[#ids + 1] = k
        end
        return ids
    end
 
    for k in pairs(data) do
        if k ~= "default" and k ~= "id" then
            ids[#ids + 1] = k
        end
    end
    return ids
end
 
local function contains_target(v, target)
    if type(v) == "table" then
        if is_array(v) then
            for _, item in ipairs(v) do
                if tostring(item) == target then
                    return true
                end
            end
            return false
        end
 
         for _, item in pairs(v) do
            if tostring(item) == target then
                return true
             end
         end
         end
        return false
     end
     end
     return nil
 
     return tostring(v) == target
end
end


-----------------------------------------------------------
local function is_nonempty_value(v)
-- Функция для сбора рецептов из станка
     if v == nil then return false end
-----------------------------------------------------------
     if type(v) == "table" then
local function getLatheRecipes(lathe)
         return next(v) ~= nil
     local recipes = {}
    local chemMapping = {}
     for id, chem in pairs(chemData) do
         chemMapping[id] = chem.name
     end
     end
    return true
end


-- Вспомогательная функция для обработки одного рецепта
local function find_matching_ids(idsTable, keyPath, searchValue)
local function processRecipe(recipeId, defaultDiscipline, isEmag)
    local target = tostring(searchValue)
    local recipe = getRecipeDetails(recipeId)
    local matches = {}
    if recipe then
        if recipe.result then
            local info = {
                id = recipe.id,
                result = recipe.result,
                completetime = recipe.completetime,
                materials = recipe.materials,
                discipline = defaultDiscipline,
                tier = 0,
                isEmag = isEmag or false
            }
            if defaultDiscipline ~= "Static" then
                local researchInfo = findInResearch(recipeId)
                if researchInfo then
                    info.discipline = researchInfo.discipline
                    info.tier = researchInfo.tier
                    info.researchName = researchInfo.name
                end
            end
            table.insert(recipes, info)
        elseif recipe.resultReagents then
            for reagent, amount in pairs(recipe.resultReagents) do
                local reagentName = chemMapping[reagent] or reagent
                table.insert(recipes, {
                    id = recipe.id,
                    result = reagentName .. "|amount=" .. amount .. "ед.|mode-chem=1",
                    completetime = recipe.completetime,
                    materials = recipe.materials,
                    discipline = defaultDiscipline,
                    tier = 0,
                    isEmag = isEmag or false
                })
                break
            end
        end
    end
end


     -- Обработка рецептов для lathe.Lathe (старый и новый формат)
     for idKey, entry in pairs(idsTable) do
    if lathe.Lathe then
         if type(entry) == "table" then
         if lathe.Lathe.staticRecipes then
             local v = get_by_path(entry, keyPath)
             for _, recipeId in ipairs(lathe.Lathe.staticRecipes) do
            if v ~= nil and contains_target(v, target) then
                processRecipe(recipeId, "Static", false)
                matches[#matches + 1] = idKey
             end
             end
         end
         end
         if lathe.Lathe.dynamicRecipes then
    end
             for _, recipeId in ipairs(lathe.Lathe.dynamicRecipes) do
 
                 processRecipe(recipeId, "Dynamic", false)
    return matches
end
 
local function preprocess_or_return(frame, text)
    if type(frame.preprocess) == "function" then
        return frame:preprocess(text)
    end
    return text
end
 
local function get_field_loose(entry, fieldId)
    local value = entry[fieldId]
    if value ~= nil then return value end
    if fieldId == "" then return nil end
 
    local first = string.sub(fieldId, 1, 1)
    local tail = string.sub(fieldId, 2)
    value = entry[string.lower(first) .. tail]
    if value ~= nil then return value end
 
    return entry[string.upper(first) .. tail]
end
 
local function apply_pattern(s, pattern, repl)
    if not pattern or pattern == "" or not s then
         return s
    end
 
    local text = tostring(s)
    local replacement
    if repl and repl ~= "" then
        replacement = tostring(repl)
        replacement = replacement:gsub("\\(%d)", "%%%1")
    else
        replacement = "%1"
    end
 
    local patt = pattern
    if not patt:find("%^") and not patt:find("%$") then
        patt = "^" .. patt .. "$"
    end
 
    return (text:gsub(patt, replacement))
end
 
local function flatten_parts(entry)
    if type(entry) ~= "table" then return {} end
 
    local parts = {}
    local function append_table_json(key, value)
        local ok, json = pcall(mw.text.jsonEncode, value)
        if ok and json then
             parts[#parts + 1] = key .. "=" .. to_nowiki(json)
        end
    end
 
    local function walk(tbl, prefix)
        local keys = {}
        for k in pairs(tbl) do keys[#keys + 1] = k end
        table.sort(keys, function(a, b) return tostring(a) < tostring(b) end)
        for _, k in ipairs(keys) do
            local v = tbl[k]
            local kStr = tostring(k)
            local key = (prefix == "" and kStr or prefix .. "." .. kStr)
            if type(v) == "table" then
                if next(v) == nil then
                 else
                    append_table_json(key, v)
                    if is_array(v) then
                        local first = v[1]
                        if type(first) == "table" then
                            walk(first, key)
                        end
                    else
                        walk(v, key)
                    end
                end
            else
                parts[#parts + 1] = key .. "=" .. tostring(v)
             end
             end
         end
         end
         if lathe.Lathe.staticPacks then
    end
            for _, packId in ipairs(lathe.Lathe.staticPacks) do
 
                local pack = getRecipePackDetails(packId)
    walk(entry, "")
                if pack and pack.recipes then
 
                    local packRecipes = type(pack.recipes) ~= "table" and { pack.recipes } or pack.recipes
    return parts
                    for _, recipeId in ipairs(packRecipes) do
end
                        processRecipe(recipeId, "Static", false)
 
                     end
local function flatten_entry(entry)
    local parts = flatten_parts(entry)
    if #parts == 0 then
        return ""
    end
    return table.concat(parts, "|")
end
 
function p.findInGenerator(frame)
    local args = frame.args or {}
    local searchId = args[1] or ""
    local kind = (args[2] or ""):lower()
    local fieldId = args[3] or ""
 
    if searchId == "" or fieldId == "" then
         return ""
    end
    if kind ~= "prototype" and kind ~= "component" then
        return ""
    end
 
    local storeName = (kind == "prototype") and "prototype_store.json" or "component_store.json"
    local moduleName = get_module_name(storeName)
    local data = load_cached_data(moduleName)
    if not data then
        return ""
    end
 
    local entry = data[searchId]
    if type(entry) ~= "table" then
        return ""
    end
 
    local value = get_field_loose(entry, fieldId)
    if value == nil then
        return ""
    end
 
    local out = {}
    local t = type(value)
    if t == "table" then
        for _, v in ipairs(value) do
            out[#out + 1] = v
        end
    else
        out[1] = value
    end
 
    return mw.text.jsonEncode(out)
end
 
function p.flattenField(frame)
    local args = frame.args or {}
    local id = args[1] or ""
    local pagePath = args[2] or ""
    if id == "" or pagePath == "" then return "" end
 
    local moduleName = get_module_name(pagePath)
    local data = load_cached_data(moduleName)
    if not data then return "" end
 
    local entry = resolve_entry(data, id) or {}
    return flatten_entry(entry)
end
 
function p.get(frame)
    local args = frame.args or {}
    local id = args[1] or ""
    local pagePath = args[2] or ""
    local keyPath = args[3] or ""
 
    if pagePath == "" then return "" end
 
    local moduleName = get_module_name(pagePath)
    local data = load_cached_data(moduleName)
    if not data then return "" end
 
    local entry = resolve_entry(data, id)
    if entry == nil then return "" end
 
    if keyPath == "" then
        return format_value(entry)
    end
 
    local value = get_by_path(entry, keyPath)
    return format_value(value)
end
 
function p.getId(frame)
    local args = frame.args or {}
    local searchValue = args[1] or ""
    local pagePath = args[2] or ""
    local keyPath = args[3] or ""
    local searchType = (args.searchType or ""):lower()
 
    if searchValue == "" or pagePath == "" or keyPath == "" then
        return ""
    end
    if searchType == "" then
        searchType = "value"
    end
 
    local moduleName = get_module_name(pagePath)
    local data = load_cached_data(moduleName)
    if not data then return "[]" end
 
    local ids = collect_id_keys(data)
    if #ids == 0 then
        return ""
    end
 
    local matches
    if searchType == "key" then
        local target = tostring(searchValue)
        matches = {}
        for _, idKey in ipairs(ids) do
            local entry = resolve_entry(data, idKey)
            if type(entry) == "table" then
                local v = get_by_path(entry, keyPath)
                if type(v) == "table" and v[target] ~= nil then
                     matches[#matches + 1] = idKey
                 end
                 end
             end
             end
         end
         end
         if lathe.Lathe.dynamicPacks then
    else
            for _, packId in ipairs(lathe.Lathe.dynamicPacks) do
         local target = tostring(searchValue)
                local pack = getRecipePackDetails(packId)
        matches = {}
                if pack and pack.recipes then
        for _, idKey in ipairs(ids) do
                    local packRecipes = type(pack.recipes) ~= "table" and { pack.recipes } or pack.recipes
            local entry = resolve_entry(data, idKey)
                    for _, recipeId in ipairs(packRecipes) do
            if type(entry) == "table" then
                        processRecipe(recipeId, "Dynamic", false)
                local v = get_by_path(entry, keyPath)
                     end
                if v ~= nil and contains_target(v, target) then
                     matches[#matches + 1] = idKey
                 end
                 end
             end
             end
Строка 157: Строка 437:
     end
     end


     if lathe.EmagLatheRecipes then
     if #matches == 0 then
         if lathe.EmagLatheRecipes.emagStaticRecipes then
        return ""
            for _, recipeId in ipairs(lathe.EmagLatheRecipes.emagStaticRecipes) do
    end
                processRecipe(recipeId, "Static", true)
 
    local ok, json = pcall(mw.text.jsonEncode, matches)
    if ok and json then
         return json
    end
 
    return ""
end
 
function p.getTplId(frame)
    local args = frame.args or {}
    local searchValue = args[1] or ""
    local pagePath = args[2] or ""
    local keyPath = args[3] or ""
    local tplPath = mw.text.unstripNoWiki(args[4] or "")
    local searchType = (args.searchType or ""):lower()
 
    if searchType == "" then
        searchType = "value"
    end
    if searchType == "path" then
        searchValue = ""
        pagePath = args[1] or ""
        keyPath = args[2] or ""
        tplPath = mw.text.unstripNoWiki(args[3] or "")
    end
    if pagePath == "" or keyPath == "" or tplPath == "" then
        return ""
    end
    if searchType ~= "path" and searchValue == "" then
        return ""
    end
 
    local moduleName = get_module_name(pagePath)
    local data = load_cached_data(moduleName)
    if not data then return "" end
 
    local ids = collect_id_keys(data)
    if #ids == 0 then
        return ""
    end
 
    local matches
    if searchType == "path" then
        matches = {}
        for _, idKey in ipairs(ids) do
            local entry = resolve_entry(data, idKey)
            if type(entry) == "table" then
                local v = get_by_path(entry, keyPath)
                if is_nonempty_value(v) then
                    matches[#matches + 1] = idKey
                end
             end
             end
         end
         end
         if lathe.EmagLatheRecipes.emagDynamicRecipes then
    elseif searchType == "key" then
            for _, recipeId in ipairs(lathe.EmagLatheRecipes.emagDynamicRecipes) do
         local target = tostring(searchValue)
                processRecipe(recipeId, "Dynamic", true)
        matches = {}
        for _, idKey in ipairs(ids) do
            local entry = resolve_entry(data, idKey)
            if type(entry) == "table" then
                local v = get_by_path(entry, keyPath)
                if type(v) == "table" and v[target] ~= nil then
                    matches[#matches + 1] = idKey
                end
             end
             end
         end
         end
         if lathe.EmagLatheRecipes.emagStaticPacks then
    else
            for _, packId in ipairs(lathe.EmagLatheRecipes.emagStaticPacks) do
         local target = tostring(searchValue)
                local pack = getRecipePackDetails(packId)
        matches = {}
                if pack and pack.recipes then
        for _, idKey in ipairs(ids) do
                    local packRecipes = type(pack.recipes) ~= "table" and { pack.recipes } or pack.recipes
            local entry = resolve_entry(data, idKey)
                    for _, recipeId in ipairs(packRecipes) do
            if type(entry) == "table" then
                        processRecipe(recipeId, "Static", true)
                local v = get_by_path(entry, keyPath)
                     end
                if v ~= nil and contains_target(v, target) then
                     matches[#matches + 1] = idKey
                 end
                 end
             end
             end
         end
         end
        if lathe.EmagLatheRecipes.emagDynamicPacks then
    end
            for _, packId in ipairs(lathe.EmagLatheRecipes.emagDynamicPacks) do
 
                local pack = getRecipePackDetails(packId)
    if #matches == 0 then
                if pack and pack.recipes then
        return ""
                    local packRecipes = type(pack.recipes) ~= "table" and { pack.recipes } or pack.recipes
    end
                    for _, recipeId in ipairs(packRecipes) do
 
                        processRecipe(recipeId, "Dynamic", true)
    local out = {}
                    end
    for _, idKey in ipairs(matches) do
                end
        local tpl = p.getTpl({ args = { idKey, pagePath, tplPath }, data = data })
             end
        if tpl ~= "" then
             out[#out + 1] = tpl
         end
         end
     end
     end


     sortRecipesByPriority(recipes)
     if #out == 0 then
     return recipes
        return ""
    end
 
    local result = table.concat(out, " ")
     return preprocess_or_return(frame, result)
end
end


-----------------------------------------------------------
function p.getTpl(frame)
-- Общие таблицы для форматирования вывода
    local args = frame.args or {}
-----------------------------------------------------------
     local id = args[1] or ""
local disciplineMapping = {
     local pagePath = args[2] or ""
     Arsenal = "Арсенал",
     local tplPath = mw.text.unstripNoWiki(args[3] or "")
     Industrial = "Промышленность",
 
     Experimental = "Экспериментальное",
     if id == "" or pagePath == "" or tplPath == "" then
     CivilianServices = "Обслуживание персонала"
        return ""
}
    end
local tierColors = {
 
     [1] = "#54d554",
    local moduleName = get_module_name(pagePath)
     [2] = "#ed9000",
    local data = frame.data
     [3] = "#d72a2a"
     if not data then
}
        data = load_cached_data(moduleName)
local materialMappingGlobal = {}
    end
for _, material in ipairs(materialData) do
    if not data then
     if material.id then
        return ""
         materialMappingGlobal[material.id] = material.stackEntity or material.id or material.name
     end
 
    local entry = resolve_entry(data, id)
     local extra = flatten_entry(entry)
    local tplStr = "{{" .. tostring(tplPath) .. "|id=" .. tostring(id)
     if extra ~= "" then
         tplStr = tplStr .. "|" .. extra
     end
     end
    tplStr = tplStr .. "}}"
    return preprocess_or_return(frame, tplStr)
end
end


-----------------------------------------------------------
function p.getTplGenerator(frame)
-- Функция для формирования строки рецепта
    local args = frame.args or {}
-----------------------------------------------------------
    local searchId = args[1] or ""
local function formatRecipe(recipe, timeMultiplier, materialUseMultiplier, itemMode)
    local kind = (args[2] or ""):lower()
     local out = ""
     local generatorId = args[3] or ""
     local scaledTime = recipe.completetime * timeMultiplier
     local tplPath = mw.text.unstripNoWiki(args[4] or "")
     out = out .. '{{Шаблон:Prototypes/Машина/Станок|product=' .. recipe.result
 
     if itemMode then
    if searchId == "" or generatorId == "" or tplPath == "" then
         out = out .. '|no-product=1'
        return ""
    end
    if kind ~= "prototype" and kind ~= "component" then
        return ""
    end
 
    local dir = (kind == "prototype") and "prototype/" or "component/"
     local pagePath = dir .. generatorId .. ".json"
 
    local idsJson = p.findInGenerator({ args = { searchId, kind, generatorId } })
    local ok, ids = pcall(mw.text.jsonDecode, idsJson or "")
     if not ok or type(ids) ~= "table" or #ids == 0 then
         return ""
    end
 
    local moduleName = get_module_name(pagePath)
    local data = load_cached_data(moduleName)
    if not data then
        return ""
     end
     end
    out = out .. '|complete-time={{#invoke:Code/Формат/Время|main|seconds|' .. scaledTime .. '}}|materials='


     if recipe.materials then
     local out = {}
        local materialEntries = {}
    for _, id in ipairs(ids) do
        for material, amount in pairs(recipe.materials) do
        local tpl = p.getTpl({ args = { id, pagePath, tplPath }, data = data })
            local stackEntity = materialMappingGlobal[material] or material
        if tpl ~= "" then
            local scaledAmount = (amount * materialUseMultiplier) / 100
            out[#out + 1] = tpl
            table.insert(materialEntries, string.format('<b>[[File:%s.png|32x32px|link=]] %g {{#invoke:Entity Lookup|getname|%s}}</b>', stackEntity, scaledAmount, stackEntity))
         end
         end
        out = out .. table.concat(materialEntries)
    else
        out = out .. 'Нет данных о материалах'
     end
     end


     if recipe.discipline ~= "Static" then
     local result = table.concat(out, " ")
        local tierColor = tierColors[recipe.tier] or "#FFFFFF"
    return preprocess_or_return(frame, result)
        local disciplineName = disciplineMapping[recipe.discipline] or "Неизвестная дисциплина"
end
        out = out .. '|info=<div style="font-weight:600;"><span style="margin:8px;">[[File:' .. recipe.discipline .. '.png|16x16px|link=]]</span> [[Руководство по исследованию и разработке|' .. disciplineName
 
         out = out .. ']], уровень: <span style="color: ' .. tierColor .. '">' .. recipe.tier .. '</span> </div>'
function p.flattenParams(entry)
    return flatten_parts(entry)
end
 
function p.getGenerator(frame)
    local args = frame.args or {}
    local searchId = args[1] or ""
    local kind = (args[2] or ""):lower()
    local generatorId = args[3] or ""
 
    if searchId == "" or generatorId == "" then
        return ""
    end
    if kind ~= "prototype" and kind ~= "component" then
         return ""
     end
     end


     if recipe.isEmag then
     local idsJson = p.findInGenerator({ args = { searchId, kind, generatorId } })
        out = out .. '|mode-emag=1'
    local ok, ids = pcall(mw.text.jsonDecode, idsJson or "")
    if not ok or type(ids) ~= "table" or #ids == 0 then
        return ""
     end
     end


     if recipe.discipline ~= "Static" then
    local okOut, outJson = pcall(mw.text.jsonEncode, ids)
         out = out .. '|mode-research=1'
     if okOut and outJson then
         return outJson
     end
     end


    out = out .. '}}'
     return ""
     return out
end
end


-----------------------------------------------------------
function p.hasComp(frame)
-- Функция для поиска и вывода рецептов по ID станка
     local args = frame.args or {}
-----------------------------------------------------------
    local entityId = args[1] or ""
function p.lathe(frame)
    local compName = args[2] or ""
     local latheId = frame.args[1] or ""
 
     if latheId == "" then
     if entityId == "" or compName == "" then
         return '<div style="color:red;">Не указан ID станка.</div>'
         return "false"
    end
 
    local moduleName = get_module_name("component.json")
    local data = load_cached_data(moduleName)
    if not data then
        return "false"
     end
     end


     local lathe = nil
     if type(data) ~= "table" then
    for _, data in ipairs(latheData) do
         return "false"
        if data.id == latheId then
            lathe = data
            break
         end
     end
     end


     if not lathe then
    local entry = data[entityId]
         return '<div style="color:red;">Станок с ID "' .. latheId .. '" не найден.</div>'
     if type(entry) ~= "table" then
         return "false"
     end
     end


     local materialUseMultiplier = (lathe.Lathe and lathe.Lathe.materialUseMultiplier) or 1
     local target = tostring(compName)
    local timeMultiplier = (lathe.Lathe and lathe.Lathe.timeMultiplier) or 1
     for _, v in ipairs(entry) do
    local recipes = getLatheRecipes(lathe)
         if tostring(v) == target then
    local out = ""
            return "true"
     for _, recipe in ipairs(recipes) do
        end
         out = out .. formatRecipe(recipe, timeMultiplier, materialUseMultiplier)
     end
     end


     return mw.getCurrentFrame():preprocess(out)
     return "false"
end
end


-----------------------------------------------------------
function p.GeneratorId(frame)
-- Функция для поиска и вывода рецептов по ID предмета
     local args = frame.args or {}
-----------------------------------------------------------
    local pagePath = args[1] or ""
function p.item(frame)
    local replace = mw.text.unstripNoWiki(args.replace or "")
     local itemId = frame.args[1] or ""
    local pattern = mw.text.unstripNoWiki(args.pattern or "(.*)")
     if itemId == "" then
 
         return '<div style="color:red;">Не указан ID предмета.</div>'
     if pagePath == "" then
         return ""
    end
 
    local moduleName = get_module_name(pagePath)
    local data = load_cached_data(moduleName)
    if not data then
        return ""
    end
 
    local idsTable = data.id
    if type(idsTable) ~= "table" then
        return ""
     end
     end


     local out = '{| class="wikitable"' .. "\n! Станок\n! Рецепт\n"
     local ids = {}
     local foundAny = false
    for k in pairs(idsTable) do
        ids[#ids + 1] = k
     end


     for _, lathe in ipairs(latheData) do
     table.sort(ids)
        local recipes = getLatheRecipes(lathe)
        local materialUseMultiplier = (lathe.Lathe and lathe.Lathe.materialUseMultiplier) or 1
        local timeMultiplier = (lathe.Lathe and lathe.Lathe.timeMultiplier) or 1


         for _, recipe in ipairs(recipes) do
    if replace ~= "" then
             if recipe.id == itemId or recipe.result == itemId then
        local out = {}
                foundAny = true
         for _, id in ipairs(ids) do
                out = out .. '|-' .. "\n"
             local text = apply_pattern(id, pattern, replace)
                out = out .. '| ' .. formatRecipe(recipe, timeMultiplier, materialUseMultiplier, true) .. "\n"
            if text ~= "" then
                 out = out .. '| [[File:' .. lathe.id .. '.png|32x32px|link=]] [[{{#invoke:Entity Lookup|getname|' .. lathe.id .. '}}|{{#invoke:Entity Lookup|getname|' .. lathe.id .. '}}]]' .. "\n"
                 out[#out + 1] = text
             end
             end
         end
         end
        if #out == 0 then
            return ""
        end
        return preprocess_or_return(frame, table.concat(out, "\n"))
     end
     end


     if not foundAny then
    local ok, json = pcall(mw.text.jsonEncode, ids)
         return '<div style="color:red;">Рецепт для предмета с ID "' .. itemId .. '" не найден во всех станках.</div>'
     if ok and json then
         return json
     end
     end


    out = out .. '|}'
     return ""
     return mw.getCurrentFrame():preprocess(out)
end
end


-----------------------------------------------------------
function p.GeneratorTplId(frame)
-- Функция для поиска и вывода рецептов по ID материала
     local args = frame.args or {}
-----------------------------------------------------------
    local pagePath = args[1] or ""
function p.material(frame)
    local tplPath = args[2] or ""
     local materialId = frame.args[1] or ""
 
     if materialId == "" then
     if pagePath == "" or tplPath == "" then
         return '<div style="color:red;">Не указан ID материала.</div>'
         return ""
     end
     end


     local out = '{| class="wikitable"' .. "\n! Станок\n! Рецепт\n"
     local moduleName = get_module_name(pagePath)
     local foundAny = false
    local data = load_cached_data(moduleName)
    if not data then
        return ""
     end


     for _, lathe in ipairs(latheData) do
     local idsTable = data.id
        local recipes = getLatheRecipes(lathe)
    if type(idsTable) ~= "table" then
        local materialUseMultiplier = (lathe.Lathe and lathe.Lathe.materialUseMultiplier) or 1
         return ""
         local timeMultiplier = (lathe.Lathe and lathe.Lathe.timeMultiplier) or 1
    end
        local matchingRecipes = {}


        for _, recipe in ipairs(recipes) do
    local out = {}
            if recipe.materials then
                for matId, _ in pairs(recipe.materials) do
                    if matId == materialId then
                        table.insert(matchingRecipes, recipe)
                        break
                    end
                end
            end
        end


        if #matchingRecipes > 0 then
    for idKey in pairs(idsTable) do
            foundAny = true
        local tpl = p.getTpl({ args = { idKey, pagePath, tplPath }, data = data })
            local rowspan = #matchingRecipes
        if tpl ~= "" then
            for i, recipe in ipairs(matchingRecipes) do
            out[#out + 1] = tpl
                out = out .. '|-\n'
                out = out .. '| ' .. formatRecipe(recipe, timeMultiplier, materialUseMultiplier, false) .. "\n"
                if i == 1 then
                    out = out .. string.format('| rowspan="%d"|[[File:%s.png|32x32px|link=]] [[{{#invoke:Entity Lookup|getname|%s}}|{{#invoke:Entity Lookup|getname|%s}}]]\n', rowspan, lathe.id, lathe.id, lathe.id)
                end
            end
         end
         end
     end
     end


     if not foundAny then
     table.sort(out)
        return '<div style="color:red;">Для материала с ID "' .. materialId .. '" рецептов не найдено во всех станках.</div>'
    end


     out = out .. '|}'
     local result = table.concat(out, " ")
     return mw.getCurrentFrame():preprocess(out)
     return preprocess_or_return(frame, result)
end
end


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