Mudanças entre as edições de "Módulo:Gb"

De Wiki Gla
Ir para navegação Ir para pesquisar
Linha 1: Linha 1:
-- Módulo:Gb
-- Módulo:Gb
-- Calculadora de custos para evolução de tiers/estrelas
-- Calculadora de custos para evolução de tiers/estrelas
-- Compatível com MediaWiki + Scribunto
-- Compatível com MediaWiki + Scribunto


local p = {}
local p = {}


-- \u26a0\ufe0f EDITÁVEL: Tabela de custos padrão
 
-- Defina aqui os custos para cada estrela alcançada (1..5) em cada tier,
-- Custos baseados na tabela enviada
-- e o custo para subir de um tier para o próximo.
local COSTS = {
local COSTS = {
  tiers = {"bronze", "prata", "ouro", "diamante"},
tiers = {"bronze", "prata", "ouro", "diamante"},


  -- Custo para alcançar CADA estrela (ex.: STAR[1] = custo para ir de 0 -> 1 estrela)
  star = {
    bronze = {
      [1] = { berry = 0, frag = 100 },
      [2] = { berry = 270, frag = 40 },
      [3] = { berry = 1.800, frag = 80 },
      [4] = { berry = 13.500, frag = 180 },
      [5] = { berry = 75.000, frag = 540 },
    },
    prata = {
      [1] = { berry = 0, frag = 100 },
      [2] = { berry = 540, frag = 40 },
      [3] = { berry = 3.600, frag = 80 },
      [4] = { berry = 27.000, frag = 180 },
      [5] = { berry = 180.000, frag = 540 },
    },
    ouro = {
      [1] = { berry = 0, frag = 100 },
      [2] = { berry = 1.800, frag = 40 },
      [3] = { berry = 18.000, frag = 80 },
      [4] = { berry = 180.000, frag = 180 },
      [5] = { berry = 1.800000, frag = 540 },
    },
    diamante = {
      [1] = { berry = 0, frag = 100 },
      [2] = { berry = 18.000, frag = 40 },
      [3] = { berry = 180.000, frag = 80 },
      [4] = { berry = 1.800000, frag = 180 },
      [5] = { berry = 5.000000, frag = 100 },
    },
  },


  -- Custo de mudar de tier (ex.: BRONZE -> PRATA). Não altera estrelas (reinicia para 0).
star = {
  tierUp = {
bronze = {
    bronze  = { berry = 180.000, frag = 540 }, -- custo para BRONZE -> PRATA
[2] = { berry = 270, frag = 40 },
    prata   = { berry = 1.800000, frag = 540 }, -- custo para PRATA -> OURO
[3] = { berry = 1800, frag = 80 },
    ouro     = { berry = 0, frag = 500 },-- custo para OURO -> DIAMANTE
[4] = { berry = 13500, frag = 180 },
    diamante = nil,                         -- não há próximo tier
[5] = { berry = 75000, frag = 540 },
  },
},
}
prata = {
[2] = { berry = 540, frag = 40 },
[3] = { berry = 3600, frag = 80 },
[4] = { berry = 27000, frag = 180 },
[5] = { berry = 180000, frag = 540 },
},
ouro = {
[2] = { berry = 1800, frag = 40 },
[3] = { berry = 18000, frag = 80 },
[4] = { berry = 180000, frag = 180 },
[5] = { berry = 1800000, frag = 540 },
},
diamante = {
[2] = { berry = 18000, frag = 40 },
[3] = { berry = 180000, frag = 80 },
[4] = { berry = 1800000, frag = 180 },
[5] = { berry = 5000000, frag = 0, despertar = 100 },
},
},


-- Normaliza texto (case-insensitive, acentos ignorados simples)
local function norm(s)
  if type(s) ~= 'string' then return nil end
  s = mw.ustring.lower(s)
  s = s:gsub("á", "a"):gsub("â", "a"):gsub("ã", "a")
      :gsub("é", "e"):gsub("ê", "e")
      :gsub("í", "i")
      :gsub("ó", "o"):gsub("ô", "o")
      :gsub("ú", "u")
  return s
end


local function tierIndex(name)
tierUp = {
  local n = norm(name)
bronze = { berry = 0, frag = 0 },
  for i, t in ipairs(COSTS.tiers) do
prata = { berry = 0, frag = 0 },
    if n == t then return i end
ouro = { berry = 0, frag = 0 },
  end
diamante = nil,
  return nil
},
end
}


local function getTierName(idx)
  return COSTS.tiers[idx]
end


-- Soma custos (protege nil)
-- Normaliza texto
local function addCost(a, b)
local function norm(s)
  a = a or { berry = 0, frag = 0 }
if type(s) ~= 'string' then return nil end
  b = b or { berry = 0, frag = 0 }
s = mw.ustring.lower(s)
  return { berry = (a.berry or 0) + (b.berry or 0), frag = (a.frag or 0) + (b.frag or 0) }
s = s:gsub("á", "a"):gsub("â", "a"):gsub("ã", "a")
:gsub("é", "e"):gsub("ê", "e")
:gsub("í", "i")
:gsub("ó", "o"):gsub("ô", "o")
:gsub("ú", "u")
return s
end
end


-- Obtém custo para subir 1 estrela dentro do tier
local function starCost(tierName, starTo)
  local t = COSTS.star[tierName]
  return t and t[starTo] or { berry = 0, frag = 0 }
end


-- Obtém custo para subir de tier
local function tierIndex(name)
local function tierUpCost(tierName)
local n = norm(name)
  local c = COSTS.tierUp[tierName]
for i, t in ipairs(COSTS.tiers) do
  return c or { berry = 0, frag = 0 }
if n == t then return i end
end
 
-- Caminho de evolução do estado (tierIdx, star) até (tierIdx2, star2)
local function computePath(ti, si, tf, sf)
  local steps = {}
  local total = { berry = 0, frag = 0 }
 
  local iTier, iStar = ti, si
 
  local function push(step)
    table.insert(steps, step)
    total = addCost(total, step.custo)
  end
 
  while (iTier < tf) or (iTier == tf and iStar < sf) do
    if iStar < 5 and (iTier < tf or (iTier == tf and iStar < sf)) then
      -- subir estrela dentro do tier atual
      local tierName = getTierName(iTier)
      local toStar = iStar + 1
      local c = starCost(tierName, toStar)
      push({ tipo = "estrela", tier = tierName, de = iStar, para = toStar, custo = c })
      iStar = toStar
    else
      -- já está com 5 estrelas -> tentar subir de tier
      if iTier >= #COSTS.tiers then
        -- não há próximo tier, evitar loop
        break
      end
      local fromTier = getTierName(iTier)
      local c = tierUpCost(fromTier)
      push({ tipo = "tier", de = fromTier, para = getTierName(iTier + 1), custo = c })
      iTier = iTier + 1
      iStar = 0 -- ao subir de tier, reinicia estrelas
    end
  end
 
  return steps, total
end
end
 
return nil
-- Renderização em wikitext/HTML
local function render(steps, total, opts)
  local h = mw.html.create('div'):addClass('calc-tier')
 
  if opts.titulo then
    h:tag('h3'):wikitext(opts.titulo)
  end
 
  if opts.mostrarTabela ~= false then
    local tbl = h:tag('table'):addClass('wikitable'):css('width', '100%')
    local thead = tbl:tag('tr')
    thead:tag('th'):wikitext('Passo')
    thead:tag('th'):wikitext('Ação')
    thead:tag('th'):wikitext('Custo (Berry)')
    thead:tag('th'):wikitext('Custo (Fragmentos)')
 
    for i, st in ipairs(steps) do
      local tr = tbl:tag('tr')
      tr:tag('td'):wikitext(i)
      if st.tipo == 'estrela' then
        tr:tag('td'):wikitext(string.format('Tier **%s**: %d → %d estrelas', st.tier, st.de, st.para))
      else
        tr:tag('td'):wikitext(string.format('Subir de **%s** → **%s**', st.de, st.para))
      end
      tr:tag('td'):wikitext(st.custo.berry or 0)
      tr:tag('td'):wikitext(st.custo.frag or 0)
    end
  end
 
  local box = h:tag('div'):addClass('calc-tier-total'):css('margin-top','8px')
  box:wikitext(string.format("'''Total:''' %d Berry • %d Fragmentos", total.berry or 0, total.frag or 0))
 
  return tostring(h)
end
end


local function parseInt(v, default)
  local n = tonumber(v)
  if not n then return default end
  n = math.floor(n)
  return n
end


-- Entrada pública via #invoke
local function getTierName(idx)
function p.calcular(frame)
return p
  local args = frame:getParent() and frame:getParent().args or frame.args
 
  local inicioTier = args.inicio_tier or args.de_tier or args.tier_inicial
  local fimTier    = args.fim_tier    or args.ate_tier or args.tier_final
  local inicioEst  = parseInt(args.inicio_estrela or args.de_estrela or args.estrelas_iniciais or 0, 0)
  local fimEst    = parseInt(args.fim_estrela    or args.ate_estrela  or args.estrelas_finais  or 0, 0)
 
  -- Opções
  local titulo = args.titulo
  local mostrarTabela = (tostring(args.mostrar_tabela or 'sim') ~= 'nao')
 
  if not inicioTier or not fimTier then
    return "Erro: defina 'inicio_tier' e 'fim_tier'."
  end
 
  local ti = tierIndex(inicioTier)
  local tf = tierIndex(fimTier)
  if not ti or not tf then
    return "Erro: tier inválido. Use: bronze, prata, ouro, diamante."
  end
 
  -- Sanitiza limites de estrela (0..5)
  if inicioEst < 0 then inicioEst = 0 end
  if inicioEst > 5 then inicioEst = 5 end
  if fimEst < 0 then fimEst = 0 end
  if fimEst > 5 then fimEst = 5 end
 
  -- Se o tier inicial já é maior que o final, invertido
  if (ti > tf) or (ti == tf and inicioEst > fimEst) then
    return "Erro: o alvo precisa ser maior que o estado inicial."
  end
 
  local steps, total = computePath(ti, inicioEst, tf, fimEst)
  return render(steps, total, { titulo = titulo, mostrarTabela = mostrarTabela })
end
end
return p

Edição das 20h37min de 26 de setembro de 2025

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

-- Módulo:Gb
-- Calculadora de custos para evolução de tiers/estrelas
-- Compatível com MediaWiki + Scribunto


local p = {}


-- Custos baseados na tabela enviada
local COSTS = {
tiers = {"bronze", "prata", "ouro", "diamante"},


star = {
bronze = {
[2] = { berry = 270, frag = 40 },
[3] = { berry = 1800, frag = 80 },
[4] = { berry = 13500, frag = 180 },
[5] = { berry = 75000, frag = 540 },
},
prata = {
[2] = { berry = 540, frag = 40 },
[3] = { berry = 3600, frag = 80 },
[4] = { berry = 27000, frag = 180 },
[5] = { berry = 180000, frag = 540 },
},
ouro = {
[2] = { berry = 1800, frag = 40 },
[3] = { berry = 18000, frag = 80 },
[4] = { berry = 180000, frag = 180 },
[5] = { berry = 1800000, frag = 540 },
},
diamante = {
[2] = { berry = 18000, frag = 40 },
[3] = { berry = 180000, frag = 80 },
[4] = { berry = 1800000, frag = 180 },
[5] = { berry = 5000000, frag = 0, despertar = 100 },
},
},


tierUp = {
bronze = { berry = 0, frag = 0 },
prata = { berry = 0, frag = 0 },
ouro = { berry = 0, frag = 0 },
diamante = nil,
},
}


-- Normaliza texto
local function norm(s)
if type(s) ~= 'string' then return nil end
s = mw.ustring.lower(s)
s = s:gsub("á", "a"):gsub("â", "a"):gsub("ã", "a")
:gsub("é", "e"):gsub("ê", "e")
:gsub("í", "i")
:gsub("ó", "o"):gsub("ô", "o")
:gsub("ú", "u")
return s
end


local function tierIndex(name)
local n = norm(name)
for i, t in ipairs(COSTS.tiers) do
if n == t then return i end
end
return nil
end


local function getTierName(idx)
return p
end
Disponível em “https://wiki.gla.com.br/index.php?title=Módulo:Gb&oldid=39610”