Модуль:ChemCard: различия между версиями

Материал из Space Stories Wiki
Нет описания правки
Нет описания правки
 
(не показано 39 промежуточных версий этого же участника)
Строка 4: Строка 4:


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


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


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


local function parseRecipeString(recipeStr)
local function parseRecipeString(recipeStr)
  if not recipeStr or recipeStr == "" then return {inputs = {}, outputs = {}, action=""} end
    if not recipeStr or recipeStr == "" then return {inputs={}, outputs={}, action=""} end
  local lines = splitLines(recipeStr)
    local lines = splitLines(recipeStr)
  local splitIdx, action
    local splitIdx, action
  for i,line in ipairs(lines) do
    for i,line in ipairs(lines) do
    if mw.ustring.lower(line):find("смеш") then
        if mw.ustring.lower(line):find("смеш") then
      splitIdx = i
            splitIdx = i
      action = line
            action = line
      break
            break
        end
     end
     end
  end
    local inputs, outputs = {}, {}
  local inputs = {}
    if splitIdx then
  local outputs = {}
        for i=1,splitIdx-1 do table.insert(inputs, parseLineToItem(lines[i])) end
  if splitIdx then
        for i=splitIdx+1,#lines do table.insert(outputs, parseLineToItem(lines[i])) end
    for i=1,splitIdx-1 do table.insert(inputs, parseLineToItem(lines[i])) end
    else
    for i=splitIdx+1,#lines do table.insert(outputs, parseLineToItem(lines[i])) end
        for i=1,#lines do table.insert(inputs, parseLineToItem(lines[i])) end
  else
    for i=1,#lines do table.insert(inputs, parseLineToItem(lines[i])) end
  end
  return {inputs = inputs, outputs = outputs, action=action}
end
 
local function parseRecipeN(args)
  local inputs, outputs, action = {}, {}, ""
  for i = 1, 24 do
    local name = args["recipe"..i] or args["r"..i]
    local q = args["recipe"..i.."_q"] or args["r"..i.."_q"] or args["q"..i]
    local part = args["recipe"..i.."_part"] or args["r"..i.."_part"]
    if name and name ~= "" then
      local qty = q and q ~= "" and tostring(q) or "1"
      local item = {name = name, qty = qty}
      if part and (part == "out" or part == "output" or part == "result") then
        table.insert(outputs, item)
      else
        table.insert(inputs, item)
      end
     end
     end
     local act = args["recipe_action"]
     return {inputs=inputs, outputs=outputs, action=action}
    if act and act ~= "" then action = act end
  end
  return {inputs=inputs, outputs=outputs, action=action}
end
 
local function mergeRecipes(r1, r2)
  local inputs, outputs, action = {}, {}, r1.action or r2.action
  for _,v in ipairs(r1.inputs or {}) do table.insert(inputs, v) end
  for _,v in ipairs(r2.inputs or {}) do table.insert(inputs, v) end
  for _,v in ipairs(r1.outputs or {}) do table.insert(outputs, v) end
  for _,v in ipairs(r2.outputs or {}) do table.insert(outputs, v) end
  return {inputs=inputs, outputs=outputs, action=action}
end
end


local function buildRecipeHtml(rec)
local function buildRecipeHtml(rec)
  if not rec then return nil end
    local container = html.create("div"):addClass("chem-recipe-block")
  local container = html.create("div")
    local heading = html.create("div"):addClass("chem-heading"):attr("data-kind","recipe")
  container:addClass("chem-recipe")
    heading:tag("span"):wikitext("Рецепт")
    container:node(heading)
   
    local collapsible = html.create("div"):addClass("collapsible collapsed"):attr("data-kind","recipe")
    local inner = html.create("div"):addClass("chem-recipe")


  local inputsDiv = html.create("div"):addClass("recipe-inputs")
    local inputsDiv = html.create("div"):addClass("recipe-inputs")
  for _,it in ipairs(rec.inputs) do inputsDiv:tag("div"):addClass("recipe-item"):wikitext(it.name.." ["..it.qty.."]") end
    for _,it in ipairs(rec.inputs) do
  container:node(inputsDiv)
        inputsDiv:tag("div"):addClass("recipe-item"):wikitext(it.name.." ["..it.qty.."]")
    end
    inner:node(inputsDiv)


  if rec.action and #rec.inputs>0 and #rec.outputs>0 then
    if rec.action and #rec.inputs>0 and #rec.outputs>0 then
    container:tag("div"):addClass("recipe-action"):wikitext(rec.action)
        local actionDiv = html.create("div"):addClass("recipe-action")
  end
        actionDiv:wikitext(rec.action)
        inner:node(actionDiv)
    end


  local outputsDiv = html.create("div"):addClass("recipe-outputs")
    local outputsDiv = html.create("div"):addClass("recipe-outputs")
  for _,it in ipairs(rec.outputs) do outputsDiv:tag("div"):addClass("recipe-item"):wikitext(it.name.." ["..it.qty.."]") end
    for _,it in ipairs(rec.outputs) do
  container:node(outputsDiv)
        outputsDiv:tag("div"):addClass("recipe-item"):wikitext(it.name.." ["..it.qty.."]")
    end
    inner:node(outputsDiv)


  return tostring(container)
    collapsible:node(inner)
    container:node(collapsible)
    return container
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")
    heading:tag("span"):wikitext("Эффекты")
    container:node(heading)
   
    local collapsible = html.create("div"):addClass("collapsible collapsed"):attr("data-kind","effects")
    local inner = html.create("div"):addClass("chem-effects")
    local ul = html.create("ul")
   
    local seenEffects = {}
    for effect in mw.text.gsplit(effects, "[;\n]") do
        effect = mw.text.trim(effect)
        if effect~="" and not seenEffects[effect] then
            seenEffects[effect] = true
            ul:tag("li"):wikitext(effect)
        end
    end
    inner:node(ul)
    collapsible:node(inner)
    container:node(collapsible)
    return container
end
end


function p.card(frame)
function p.card(frame)
  local args = getArgs(frame)
    local args = getArgs(frame)
  local name = args.name or args.title or "—"
    local name = args.name or "—"
  local color = args.color or args.colour or ""
    local color = args.color or "#8cf"
  local border = args.border or args.bordercolor or ""
    local border = args.border or "#444"
  local bg = args.bg or args.bgcolor or ""
    local recipeStr = args.recipe or ""
  local recipeStr = args.recipe or args.rezept or ""
    local effects = args.effects or ""
  local parsedStr = parseRecipeString(recipeStr)
    local desc = args.desc or ""
  local parsedN = parseRecipeN(args)
  local recipeMerged = mergeRecipes(parsedStr, parsedN)
  local desc = args.description or args.desc or ""


  local container = html.create("div")
    local parsed = parseRecipeString(recipeStr)
  container:addClass("chem-card")
  local styleParts = {}
  if color and color ~= "" then table.insert(styleParts, "--card-accent:"..color) end
  if border and border ~= "" then table.insert(styleParts, "--card-border:"..border) end
  if bg and bg ~= "" then table.insert(styleParts, "--card-bg:"..bg) end
  if #styleParts > 0 then container:attr("style", table.concat(styleParts, ";")) end


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


  if desc and desc ~= "" then container:tag("div"):addClass("chem-desc"):wikitext(desc) end
    container:tag("h3"):wikitext(name)
 
    if #parsed.inputs > 0 or #parsed.outputs > 0 or (parsed.action and parsed.action~="") then
        container:node(buildRecipeHtml(parsed))
    end
 
    local effectsBlock = buildEffectsHtml(effects)
    if effectsBlock then
        container:node(effectsBlock)
    end
 
    if desc and desc~="" then
        container:tag("div"):addClass("chem-desc"):wikitext(desc)
    end


  return tostring(container)
    return tostring(container)
end
end


return p
return p

Текущая версия от 16:56, 11 ноября 2025

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

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

local function getArgs(frame)
    local args = {}
    if type(frame) == "table" and frame.args then
        args = frame.args
    else
        args = mw.getCurrentFrame():getParent().args or {}
    end
    return args
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
    name = mw.text.trim(name)
    return {name = name, qty = qty or "1"}
end

local function parseRecipeString(recipeStr)
    if not recipeStr or recipeStr == "" then return {inputs={}, outputs={}, action=""} end
    local lines = splitLines(recipeStr)
    local splitIdx, action
    for i,line in ipairs(lines) do
        if mw.ustring.lower(line):find("смеш") then
            splitIdx = i
            action = line
            break
        end
    end
    local inputs, outputs = {}, {}
    if splitIdx then
        for i=1,splitIdx-1 do table.insert(inputs, parseLineToItem(lines[i])) end
        for i=splitIdx+1,#lines do table.insert(outputs, parseLineToItem(lines[i])) end
    else
        for i=1,#lines do table.insert(inputs, parseLineToItem(lines[i])) end
    end
    return {inputs=inputs, outputs=outputs, action=action}
end

local function buildRecipeHtml(rec)
    local container = html.create("div"):addClass("chem-recipe-block")
    local heading = html.create("div"):addClass("chem-heading"):attr("data-kind","recipe")
    heading:tag("span"):wikitext("Рецепт")
    container:node(heading)
    
    local collapsible = html.create("div"):addClass("collapsible collapsed"):attr("data-kind","recipe")
    local inner = html.create("div"):addClass("chem-recipe")

    local inputsDiv = html.create("div"):addClass("recipe-inputs")
    for _,it in ipairs(rec.inputs) do
        inputsDiv:tag("div"):addClass("recipe-item"):wikitext(it.name.." ["..it.qty.."]")
    end
    inner:node(inputsDiv)

    if rec.action and #rec.inputs>0 and #rec.outputs>0 then
        local actionDiv = html.create("div"):addClass("recipe-action")
        actionDiv:wikitext(rec.action)
        inner:node(actionDiv)
    end

    local outputsDiv = html.create("div"):addClass("recipe-outputs")
    for _,it in ipairs(rec.outputs) do
        outputsDiv:tag("div"):addClass("recipe-item"):wikitext(it.name.." ["..it.qty.."]")
    end
    inner:node(outputsDiv)

    collapsible:node(inner)
    container:node(collapsible)
    return container
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")
    heading:tag("span"):wikitext("Эффекты")
    container:node(heading)
    
    local collapsible = html.create("div"):addClass("collapsible collapsed"):attr("data-kind","effects")
    local inner = html.create("div"):addClass("chem-effects")
    local ul = html.create("ul")
    
    local seenEffects = {}
    for effect in mw.text.gsplit(effects, "[;\n]") do
        effect = mw.text.trim(effect)
        if effect~="" and not seenEffects[effect] then
            seenEffects[effect] = true
            ul:tag("li"):wikitext(effect)
        end
    end
    inner:node(ul)
    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 recipeStr = args.recipe or ""
    local effects = args.effects or ""
    local desc = args.desc or ""

    local parsed = parseRecipeString(recipeStr)

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

    container:tag("h3"):wikitext(name)

    if #parsed.inputs > 0 or #parsed.outputs > 0 or (parsed.action and parsed.action~="") then
        container:node(buildRecipeHtml(parsed))
    end

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

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

    return tostring(container)
end

return p