Модуль:ChemCard

Для документации этого модуля может быть создана страница Модуль:ChemCard/doc

local p = {}
local mw = mw
local html = mw.html

local function getArgs(frame)
    if type(frame) == "table" and frame.args then return frame.args end
    return mw.getCurrentFrame():getParent().args or {}
end

local function splitLines(s)
    local t = {}
    if not s then return t end
    for line in mw.text.gsplit(s, "\n") do
        line = mw.text.trim(line)
        if line ~= "" then table.insert(t, line) end
    end
    return t
end

local function parseLineToItem(l)
    local name, qty = mw.ustring.match(l, "^(.*)%s*%[%s*([%d,%.]+)%s*%]%s*$")
    if not name then name = l; qty = "1" end
    return { name = mw.text.trim(name), qty = qty or "1" }
end

local function parseRecipeString(recipeStr)
    if not recipeStr or recipeStr == "" then return {} end
    local lines = splitLines(recipeStr)
    local steps = {}
    local currentInputs = {}
    local i = 1
    while i <= #lines do
        local line = lines[i]
        local lower = mw.ustring.lower(line)
        if lower:find("смеш") then
            if #currentInputs > 0 then
                local outputs = {}
                i = i + 1
                while i <= #lines do
                    local nextLine = lines[i]
                    local nextLower = mw.ustring.lower(nextLine)
                    if nextLower:find("смеш") then break end
                    table.insert(outputs, parseLineToItem(nextLine))
                    i = i + 1
                end
                table.insert(steps, {
                    inputs = currentInputs,
                    outputs = outputs,
                    action = mw.text.trim(line)
                })
                currentInputs = {}
            else
                i = i + 1
            end
        else
            table.insert(currentInputs, parseLineToItem(line))
            i = i + 1
        end
    end
    if #currentInputs > 0 then
        table.insert(steps, { inputs = currentInputs, outputs = {}, action = "" })
    end
    return steps
end

local FILE_PATTERN = "(%[%[File:[^]]+%]%])"

local function buildRecipeStepHtml(rec)
    if not rec or (#rec.inputs == 0 and #rec.outputs == 0) then return nil end

    local inner = html.create("div"):addClass("chem-recipe")

    local inputsDiv = html.create("div"):addClass("recipe-inputs")
    for _, it in ipairs(rec.inputs) do
        local item = inputsDiv:tag("div"):addClass("recipe-item")
        item:wikitext('[[File:Beaker.png|36px|class=chem-reagent-icon]] ' .. it.name .. ' [' .. it.qty .. ']')
    end
    inner:node(inputsDiv)

    if rec.action and rec.action ~= "" then
        local actionDiv = inner:tag("div"):addClass("recipe-action")
        local content = actionDiv:tag("div"):addClass("recipe-action-content")

        local sprite = '[[File:Beaker.png|36px|class=chem-reagent-icon]]'
        local actionText = rec.action

        local customSprite = mw.ustring.match(actionText, FILE_PATTERN)
        if customSprite then
            sprite = customSprite
            actionText = mw.text.trim(mw.ustring.gsub(actionText, FILE_PATTERN, ""))
        end

        content:tag("div"):addClass("action-sprite"):wikitext(sprite)
        content:tag("div"):addClass("action-text"):wikitext(actionText)
    end

    local outputsDiv = html.create("div"):addClass("recipe-outputs")
    for _, it in ipairs(rec.outputs) do
        local item = outputsDiv:tag("div"):addClass("recipe-item")
        item:wikitext('[[File:Beaker.png|36px|class=chem-reagent-icon]] ' .. it.name .. ' [' .. it.qty .. ']')
    end
    inner:node(outputsDiv)

    return inner
end

local function buildEffectsHtml(effects)
    if not effects or effects == "" or effects == "Нет" then return nil end
    local container = html.create("div"):addClass("chem-effects-block")
    local heading = html.create("div"):addClass("chem-heading"):attr("data-kind", "effects")
    local hcontent = heading:tag("div"):addClass("chem-heading-content")
    hcontent:tag("span"):addClass("heading-text"):wikitext("Эффекты")
    hcontent:tag("span"):addClass("collapse-btn"):wikitext("развернуть")
    container:node(heading)

    local collapsible = html.create("div"):addClass("collapsible collapsed"):attr("data-kind", "effects")
    local inner = html.create("div"):addClass("chem-effects")
    for effect in mw.text.gsplit(effects, "[;\n]") do
        effect = mw.text.trim(effect)
        if effect ~= "" then
            inner:tag("div"):addClass("chem-effect-line"):wikitext(effect)
        end
    end
    collapsible:node(inner)
    container:node(collapsible)
    return container
end

function p.card(frame)
    local args = getArgs(frame)
    local name = args.name or "—"
    local color = args.color or "#8cf"
    local border = args.border or "#444"
    local desc = args.desc or ""

    local variants = {}
    local i = 1
    while true do
        local key = i == 1 and "recipe" or ("recipe" .. i)
        local recipeStr = args[key]
        if not recipeStr then break end
        local steps = parseRecipeString(recipeStr)
        if #steps > 0 then
            table.insert(variants, {id = i, steps = steps})
        end
        i = i + 1
    end

    local container = html.create("div"):addClass("chem-card")
    container:attr("style", "border-color:" .. border .. "; --card-accent:" .. color)
    container:tag("div"):addClass("chem-name-header"):wikitext(name)

    if #variants > 0 then
        local recipeBlock = html.create("div"):addClass("chem-recipe-block")
        local heading = html.create("div"):addClass("chem-heading"):attr("data-kind", "recipe")
        local hcontent = heading:tag("div"):addClass("chem-heading-content")
        hcontent:tag("span"):addClass("heading-text"):wikitext("Рецепты")
        hcontent:tag("span"):addClass("collapse-btn"):wikitext("развернуть")
        recipeBlock:node(heading)

        local collapsible = html.create("div"):addClass("collapsible collapsed"):attr("data-kind", "recipe")
        local stepsContainer = html.create("div"):addClass("chem-recipe-steps")

        for vidx, variant in ipairs(variants) do
            if #variants > 1 then
                local varHeader = stepsContainer:tag("div"):addClass("recipe-variant-header")
                varHeader:wikitext("Вариант " .. vidx)
            end

            for _, rec in ipairs(variant.steps) do
                local step = buildRecipeStepHtml(rec)
                if step then stepsContainer:node(step) end
            end
        end

        collapsible:node(stepsContainer)
        recipeBlock:node(collapsible)
        container:node(recipeBlock)
    end

    local effectsBlock = buildEffectsHtml(args.effects)
    if effectsBlock then container:node(effectsBlock) end

    if desc ~= "" then
        container:tag("div"):addClass("chem-desc"):wikitext(desc)
    end

    return tostring(container)
end

return p