Модуль:ChemCard

Для документации этого модуля может быть создана страница Модуль: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 = {}} end
  local lines = splitLines(recipeStr)
  local splitIdx
  for i,line in ipairs(lines) do
    if mw.ustring.lower(line):find("смеш") then
      splitIdx = i
      break
    end
  end
  local inputs = {}
  local 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}
end

local function parseRecipeN(args)
  local inputs = {}
  local outputs = {}
  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
  return {inputs = inputs, outputs = outputs}
end

local function mergeRecipes(recipeTable1, recipeTable2)
  local inputs = {}
  for _,v in ipairs(recipeTable1.inputs or {}) do table.insert(inputs, v) end
  for _,v in ipairs(recipeTable2.inputs or {}) do table.insert(inputs, v) end
  local outputs = {}
  for _,v in ipairs(recipeTable1.outputs or {}) do table.insert(outputs, v) end
  for _,v in ipairs(recipeTable2.outputs or {}) do table.insert(outputs, v) end
  return {inputs = inputs, outputs = outputs}
end

local function buildRecipeHtml(rec)
  if not rec then return nil end
  local items = {}
  for _,v in ipairs(rec.inputs or {}) do table.insert(items, v) end
  for _,v in ipairs(rec.outputs or {}) do table.insert(items, v) end
  if #items == 0 then return nil end
  local container = html.create("div")
  container:addClass("chem-recipe")
  for _,it in ipairs(items) do
    local row = container:tag("div")
    row:addClass("recipe-item")
    row:wikitext(it.name.." ["..it.qty.."]")
  end
  return tostring(container)
end

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

  local container = html.create("div")
  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 recipeHtml = buildRecipeHtml(recipeMerged)
  if recipeHtml then container:wikitext(recipeHtml) end

  if effects and effects ~= "" then
    local effHtml = html.create("div")
    effHtml:addClass("chem-section")
    local ul = html.create("ul")
    ul:addClass("chem-effects")
    for effect in mw.text.gsplit(effects, "[;\n]") do
      effect = mw.text.trim(effect)
      if effect ~= "" then ul:tag("li"):wikitext(effect) end
    end
    effHtml:node(ul)
    container:node(effHtml)
  end

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

  return tostring(container)
end

return p