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

мНет описания правки
Нет описания правки
Метка: ручная отмена
Строка 1: Строка 1:
-- Загрузка данных
-- Загрузка данных
-- local itemData = mw.loadData("Модуль:IanComradeBot/prototypes/fills/Item.json/data")
-- local tableData = mw.loadData("Модуль:IanComradeBot/prototypes/table.json/data")
local p = {}
local p = {}


-- Таблица для перевода названий дисциплин
-- Функция для загрузки данных
local disciplineMapping = {
local loadData = function(filePath)
     Arsenal = "Арсенал",
    local page = mw.title.new(filePath)
     Industrial = "Промышленность",
    local content = page:getContent()
     Experimental = "Экспериментальное",
    return content and mw.text.jsonDecode(content) or nil
     CivilianServices = "Обслуживание персонала"
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 + 1] = string.format('[%d-%d]', min + 1, max + 1)
        else
            result[#result + 1] = 'Некорректный формат для range.'
        end
    elseif rolls and rolls.value then
        -- Если указано value
        result[#result + 1] = string.format('[%d]', rolls.value)
     else
        result[#result + 1] = 'Не указан параметр rolls.'
    end
    return table.concat(result)
end
 
-- Локальные функции
local findDataById, formatContent, getContentsOutput, processNestedSelectors, getTableOutput, getContainedOutput, getChemOutput, handleGroupSelector, handleAllSelector, handleNestedSelector
 
-- Функция для создания хэш-таблицы для быстрого поиска по ID
local function buildIndex(itemData)
    if not itemData then return {} end
     local index = {}
    for _, item in ipairs(itemData) do
        index[item.id] = item
    end
     return index
end
 
-- Поиск данных по ID через индекс
findDataById = function(itemDataIndex, id)
    return itemDataIndex and itemDataIndex[id] or nil
end


-- Таблица для цветов по уровням
-- Форматирование содержимого
local tierColors = {
formatContent = function(content)
     [1] = "#54d554",
     if not content.id then
    [2] = "#ed9000",
        return "Ошибка: отсутствует id у элемента."
     [3] = "#d72a2a"
     end
}


function p.main(frame)
    local name = string.format('{{#invoke:Entity Lookup|getname|%s}}', content.id)
     local input = frame.args[1] or ""
     local image = string.format('%s.png', content.id)
     local manualIcon = frame.args[2] or ""
local amount = (content.amount and content.amount ~= 1) and string.format(" [%d]", content.amount) or ""
     local out = ""
     local prob = ""
      
 
     if input == "" then
    if content.weight then
         return '<div style="color:red;">Не указан идентификатор исследования или дисциплина.</div>'
        content.prob = content.weight / 100
    end
 
    if content.prob then
        prob = string.format(" <div>%s%%</div>", content.prob * 100 >= 1 and math.floor(content.prob * 100) or content.prob * 100)
    end
 
    return string.format(
        '{{LinkСard|SideStyle=1|background-color=#cbcbff0a|image=%s|name=%s%s%s {{#invoke:Prototypes/Хранилище/Предмет|main|framing|contained|%s}} }}',
        image, name, amount, prob, content.id
    )
end
 
-- Получение содержимого через таблицу
getContentsOutput = function(contents)
    local result = {}
    for _, content in ipairs(contents) do
        result[#result + 1] = formatContent(content)
    end
    return table.concat(result)
end
 
-- Обработка вложенных таблиц
processNestedSelectors = function(children, visited)
visited = visited or {}
    if not children or #children == 0 then return "" end
 
     local results = {}
 
    for _, child in ipairs(children) do
        if child.id then
if not visited[child.id] then
    results[#results + 1] = formatContent(child)
end
        elseif child["!type"] == "NestedSelector" then
            results[#results + 1] = handleNestedSelector(child, true, visited)
        elseif child["!type"] == "GroupSelector" then
            results[#results + 1] = handleGroupSelector(child, visited)
        end
     end
 
    return table.concat(results)
end
 
-- Обработка таблиц
getTableOutput = function(tableId, visited)
    visited = visited or {}
 
     if visited[tableId] then
        return ''
    end
 
    visited[tableId] = true
 
    local tableData = loadData('User:IanComradeBot/prototypes/table.json')
    local tableDataIndex = findDataById(buildIndex(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
 
    return 'Таблица не содержит элементов.'
end
 
-- Формирование списка содержащихся предметов или таблиц
getContainedOutput = function(itemData, id, visited)
    visited = visited or {}
 
    if visited[id] then
        return ''
     end
     end
   
 
     -- Получение актуальных данных
     visited[id] = true
    local researchData = mw.loadData("Модуль:IanComradeBot/prototypes/research.json/data")
 
   
     local item = findDataById(itemData, id)
    -- Если первый параметр соответствует дисциплине, работаем в режиме категории
    if not item then return '' end
     if disciplineMapping[input] then
 
        local found = false
    local result = {}
        for _, research in ipairs(researchData) do
 
            if research.technology and research.technology.discipline == input then
    -- Обработка StorageFill
                found = true
    if item.StorageFill and item.StorageFill.contents then
                local tech = research.technology
        result[#result + 1] = getContentsOutput(item.StorageFill.contents)
                local iconPath = tech.icon and tech.icon.sprite or nil
 
                local tierColor = tierColors[tech.tier] or "#FFFFFF"
    -- Обработка EntityTableContainerFill
                local disciplineName = disciplineMapping[tech.discipline] or "Неизвестная дисциплина"
    elseif item.EntityTableContainerFill and item.EntityTableContainerFill.containers then
               
        local containers = item.EntityTableContainerFill.containers
                -- Формирование строки необходимых исследований (prerequisites)
 
                local prerequisites = ""
        -- Обработка entity_storage
                if tech.technologyPrerequisites and #tech.technologyPrerequisites > 0 then
        if containers.entity_storage then
                    prerequisites = '<ul>'
            if containers.entity_storage.children then
                    for _, prerequisiteId in ipairs(tech.technologyPrerequisites) do
                result[#result + 1] = processNestedSelectors(containers.entity_storage.children, visited)
                        if prerequisiteId and prerequisiteId ~= "" then
            end
                            local prerequisiteName = ""
            if containers.entity_storage.tableId then
                            for _, r in ipairs(researchData) do
                 result[#result + 1] = getTableOutput(containers.entity_storage.tableId, visited)
                                if r.technology and r.technology.id == prerequisiteId then
                                    prerequisiteName = r.technology.name
                                    break
                                end
                            end
                            if prerequisiteName ~= "" then
                                prerequisites = prerequisites .. '<li>{{#invoke:Ftl|main|translation|' .. prerequisiteName .. '}}</li>'
                            end
                        end
                    end
                    prerequisites = prerequisites .. '</ul>'
                end
               
                -- Формирование строки открываемых исследований (unlocks)
local unlocks = ""
if type(tech.recipeUnlocks) == "table" and next(tech.recipeUnlocks) then
    unlocks = "<ul>"
    for _, recipe in ipairs(tech.recipeUnlocks) do
        if type(recipe) == "string" and recipe ~= "" then
            unlocks = unlocks .. '<li>{{#invoke:Entity Lookup|createimagetooltip|Файл:'
                .. recipe .. '.png|' .. recipe
                .. '|Мета=32x32px,link=}} {{#invoke:Entity Lookup|getname|'
                .. recipe .. '}}</li>'
        end
    end
    unlocks = unlocks .. "</ul>"
end
               
                local templateArgs = {
                    id = tech.id,
                    icon = iconPath,
                    name = tech.name,
                    discipline = tech.discipline,
                    tier = tech.tier,
                    tierColor = tierColor,
                    disciplineName = disciplineName,
                    cost = tech.cost,
                    unlocks = unlocks
                }
                if prerequisites ~= "" then
                    templateArgs.prerequisites = prerequisites
                 end
               
                out = out .. frame:expandTemplate({
                    title = 'Prototypes/Механика/Исследование',
                    args = templateArgs
                })
             end
             end
         end
         end
         if not found then
 
             out = out .. '<div style="color:red;">Не найдено исследований для дисциплины "' .. input .. '".</div>'
        -- Обработка storagebase
         if containers.storagebase and containers.storagebase.tableId then
             result[#result + 1] = getTableOutput(containers.storagebase.tableId, visited)
        end
    end
 
    return table.concat(result)
end
 
-- Обработка AllSelector
handleAllSelector = function(allSelector)
    if not allSelector.children then return '' end
    return processNestedSelectors(allSelector.children)
end
 
-- Обработка GroupSelector
handleGroupSelector = function(groupSelector)
    if not groupSelector.children then return '' end
    local result = {}
    local wrapperStart, wrapperEnd = "", ""
 
    -- Проверка для контейнера EntityTableContainerFill
    if groupSelector.weight and groupSelector.weight ~= "default" then
        wrapperStart = string.format('{{LinkСard/Сollapsible|name=Группа предметов %s%%|content=', groupSelector.weight)
        wrapperEnd = "}}"
    elseif groupSelector["!type"] == "GroupSelector" and not groupSelector.weight then
        wrapperStart = '{{LinkСard/Сollapsible|name=Может выпасть лишь один из:|content='
        wrapperEnd = "}}"
    end
 
    for _, child in ipairs(groupSelector.children) do
        if child["!type"] == "GroupSelector" then
            result[#result + 1] = handleGroupSelector(child)
        elseif child["!type"] == "AllSelector" then
            result[#result + 1] = string.format('{{LinkСard/Сollapsible|name=Выпадают только вместе:|content=%s}}', handleAllSelector(child))
        elseif child.id then
            result[#result + 1] = formatContent(child)
        else
            result[#result + 1] = "<div>Ошибка: отсутствует id у элемента.</div>"
         end
         end
        return mw.getCurrentFrame():preprocess(out)
    end
     else
 
        -- Режим поиска по ID исследования
    return wrapperStart .. table.concat(result) .. wrapperEnd
        local tech = nil
end
        for _, research in ipairs(researchData) do
 
            if research.technology and research.technology.id == input then
-- Обработка NestedSelector
                 tech = research.technology
handleNestedSelector = function(nestedSelector, wrapped, visited)
                break
visited = visited or {}
     if not nestedSelector.tableId then return '' end
 
    local result = {}
    local classesRolls, classesProb
 
    if wrapped then
        if nestedSelector.rolls and nestedSelector.rolls.range then
            local rollsResult = processRolls(nestedSelector.rolls)
            if rollsResult and #rollsResult > 0 then
                 classesRolls = ', максимум может выпасть: ' .. rollsResult
             end
             end
         end
         end
          
         if nestedSelector.prob then
         if not tech then
            classesProb = string.format(" <div>%s%%</div>", nestedSelector.prob * 100 >= 1 and math.floor(nestedSelector.prob * 100) or nestedSelector.prob * 100)
             out = out .. '<div style="color:red;">Исследование с ID "' .. input .. '" не найдено.</div>'
         end
    end
 
    if wrapped and (classesRolls or classesProb) then
        result[#result + 1] = string.format('{{LinkСard/Сollapsible|name=Группа предметов%s%s|content=', classesRolls or "", classesProb or "")
    end
 
    result[#result + 1] = getTableOutput(nestedSelector.tableId, visited)
 
    if wrapped and (classesRolls or classesProb) then
        result[#result + 1] = "}}"
    end
 
    return table.concat(result)
end
 
-- Формирование списка химии
getChemOutput = function(itemData, id)
    local item = findDataById(itemData, id)
    if not item or not item.SolutionContainerManager or not item.SolutionContainerManager.solutions then return '' end
 
    local result = {}
    for _, solution in pairs(item.SolutionContainerManager.solutions) do
        for _, reagent in ipairs(solution.reagents) do
             result[#result + 1] = string.format('<li>[[Химия#chem_%s|%s]] (%d ед.)</li>', reagent.ReagentId, reagent.ReagentId, reagent.Quantity)
        end
    end
    return string.format('<ul class="1">%s</ul>', table.concat(result))
end
 
-- Основная функция модуля
function p.main(frame)
    local mode = frame.args[1]
    local id = frame.args[2]
 
    if not id then return 'Не указан ID.' end
   
local itemData = loadData('User:IanComradeBot/prototypes/fills/Item.json')
    local itemDataIndex = buildIndex(itemData)
   
    if not itemData then return 'Не удалось загрузить данные.' end
 
    if mode == 'framing' then
        local subMode = frame.args[2]
        local id = frame.args[3]
 
        if not id then
            return 'Не указан ID для режима framing.'
        end
 
        if subMode == 'chem' then
            return frame:preprocess('{{СollapsibleMenu|' .. getChemOutput(itemDataIndex, id) .. '}}')
        elseif subMode == 'contained' then
            return frame:preprocess('{{СollapsibleMenu|' .. getContainedOutput(itemDataIndex, id) .. '}}')
         else
         else
             local tierColor = tierColors[tech.tier] or "#FFFFFF"
             return 'Неизвестный подрежим для framing: ' .. subMode
            local disciplineName = disciplineMapping[tech.discipline] or "Неизвестная дисциплина"
        end
            local iconPath = manualIcon ~= "" and manualIcon or (tech.icon and tech.icon.sprite or nil)
    elseif mode == 'chem' then
           
        return frame:preprocess(getChemOutput(itemDataIndex, id))
            local prerequisites = ""
    elseif mode == 'contained' then
            if tech.technologyPrerequisites and #tech.technologyPrerequisites > 0 then
        return frame:preprocess(getContainedOutput(itemDataIndex, id))
                prerequisites = '<ul>'
    elseif mode == 'rolls' then
                for _, prerequisiteId in ipairs(tech.technologyPrerequisites) do
        local entity = findDataById(itemDataIndex, id)
                    if prerequisiteId and prerequisiteId ~= "" then  
        if not entity then return 'ID не найден в данных.' end
                        local prerequisiteName = ""
 
                        for _, research in ipairs(researchData) do
        if entity.EntityTableContainerFill then
                            if research.technology and research.technology.id == prerequisiteId then
            local containers = entity.EntityTableContainerFill.containers
                                prerequisiteName = research.technology.name
            if containers.entity_storage and containers.entity_storage.rolls then
                                break
                 return processRolls(containers.entity_storage.rolls)
                            end
                        end
                        if prerequisiteName ~= "" then
                            prerequisites = prerequisites .. '<li>{{#invoke:Ftl|main|translation|' .. prerequisiteName .. '}}</li>'
                        end
                    end
                 end
                prerequisites = prerequisites .. '</ul>'
             end
             end
           
            local unlocks = ""
            if tech.recipeUnlocks and #tech.recipeUnlocks > 0 then
                unlocks = '<ul>'
                for _, recipe in ipairs(tech.recipeUnlocks) do
                    if recipe and recipe ~= "" then
                        unlocks = unlocks .. '<li>{{#invoke:Entity Lookup|createimagetooltip|Файл:' .. recipe .. '.png|' .. recipe .. '|Мета=32x32px,link=}} {{#invoke:Entity Lookup|getname|' .. recipe .. '}}</li>'
                    end
                end
                unlocks = unlocks .. '</ul>'
            end
           
            local templateArgs = {
                id = tech.id,
                icon = iconPath,
                name = tech.name,
                discipline = tech.discipline,
                tier = tech.tier,
                tierColor = tierColor,
                disciplineName = disciplineName,
                cost = tech.cost,
                unlocks = unlocks
            }
            if prerequisites ~= "" then
                templateArgs.prerequisites = prerequisites
            end
           
            out = out .. frame:expandTemplate({
                title = 'Prototypes/Механика/Исследование',
                args = templateArgs
            })
         end
         end
         return mw.getCurrentFrame():preprocess(out)
 
         return ''
    else
        return 'Неизвестный режим: ' .. mode
     end
     end
end
end


return p
return p