Módulo:Teste

A documentação para este módulo pode ser criada em Módulo:Teste/doc

local p = {}
local itemData = require("Módulo:ItemData")

-- Formata número com separador de milhar
local function formatNumber(n)
    local s = tostring(n)
    local result = s:reverse():gsub("(%d%d%d)", "%1,"):reverse()
    return result:gsub("^,", "")
end

-- Converte string "item.png:10, outro.gif:20" em {["item.png"]=10, ...}
local function parseItens(raw)
    local resultado = {}
    for item in mw.text.gsplit(raw or "", ",", true) do
        local nome, qtd = item:match("^%s*(.-)%s*:%s*(%d+)%s*$")
        if nome and qtd then
            nome = mw.text.trim(nome)
            if not nome:match("%.png$") and not nome:match("%.gif$") and not nome:match("%.jpg$") and not nome:match("%.webp$") then
                nome = nome .. ".png"
            end
            qtd = tonumber(qtd) or 0
            resultado[nome] = (resultado[nome] or 0) + qtd
        end
    end
    return resultado
end

-- Junta todas as tabelas de recompensa
local function mergeRecompensas(lista)
    local total = {}
    for _, raw in ipairs(lista) do
        local dados = parseItens(raw)
        for nome, qtd in pairs(dados) do
            total[nome] = (total[nome] or 0) + qtd
        end
    end
    return total
end

-- Função pública
function p.total(frame)
    local args = frame:getParent().args or {}
    local bonus = args.bonus or ""

    -- Conteúdo da página atual
    local content = mw.title.getCurrentTitle():getContent()
    local rewardCalls = {}

    -- Coleta os valores dos Reward
    for bloco in content:gmatch("{{%s*[Rr]eward.-}}") do
        local itens = bloco:match("itens%s*=%s*([^|}]+)")
        if itens then
            table.insert(rewardCalls, itens)
        end
    end

    -- Adiciona recompensa manual, se houver
    if bonus and bonus ~= "" then
        table.insert(rewardCalls, bonus)
    end

    local total = mergeRecompensas(rewardCalls)

    -- Monta HTML com classes isoladas
    local html = mw.html.create("div")
    html:addClass("introquest-items")

    for nome, qtd in pairs(total) do
        local data = itemData[nome] or {}
        local nomeCompleto = data.nome or nome
        local desc = data.desc
        local tooltip = nomeCompleto
        if desc and desc ~= "" then
            tooltip = tooltip .. "\n—\n" .. desc
        end

        local wrapper = html:tag("span"):addClass("introquest-item")
        wrapper:attr("data-tooltip", tooltip)

        wrapper:tag("span")
            :wikitext(string.format("[[Arquivo:%s|link=]]", nome))

        wrapper:tag("span")
            :addClass("introquest-count")
            :wikitext((nome:lower():match("^berries") and "" or "x") .. formatNumber(qtd))
    end

    return tostring(html)
end

return p