Module:Campeao

Documentation for this module may be created at Module:Campeao/doc

-- Renderizador das fichas de Campeao do Champion's Path.
--
-- A pagina de cada Campeao deve conter uma linha e nada mais:
--     {{Campeao|Tyranitar}}
--
-- Todo o layout vive aqui. Se for preciso duplicar marcacao entre dois
-- Campeoes, o erro esta neste modulo, nao na pagina.

local p = {}
local dados = mw.loadData('Module:Campeao/dados')

local PLACEHOLDER = 'ArquivoExemplo.png'

-- Formata 1000000 como "1.000.000"
local function numero(n)
	local s = tostring(n)
	local r = s:reverse():gsub('(%d%d%d)', '%1.'):reverse()
	return (r:gsub('^%.', ''))
end

-- Chip de item: icone, contador e tooltip. Enquanto nao houver sprite, cai
-- no placeholder, entao a ficha ja fica montada e so troca a imagem depois.
local function chip(nomeItem, qtd)
	local arquivo = 'Item ' .. nomeItem:gsub('[%(%):]', ''):gsub('%s+', ' ') .. '.png'
	local existe = mw.title.new('File:' .. arquivo)
	local usar = (existe and existe.fileExists) and arquivo or PLACEHOLDER

	local w = mw.html.create('span'):addClass('cp-item')
	w:tag('span'):addClass('cp-item-icon')
		:wikitext('[[File:' .. usar .. '|40px|link=|alt=' .. nomeItem .. ']]')
	if qtd and qtd ~= '' then
		w:tag('span'):addClass('cp-item-qty'):wikitext(qtd)
	end
	local tip = w:tag('span'):addClass('cp-tip')
	tip:tag('span'):addClass('cp-tip-name'):wikitext(nomeItem)
	if qtd and qtd ~= '' then
		tip:tag('span'):addClass('cp-tip-qty'):wikitext('Quantidade: ' .. qtd)
	end
	return w
end

local function stat(rotulo, valor)
	local d = mw.html.create('div'):addClass('cp-stat')
	d:tag('span'):addClass('cp-stat-label'):wikitext(rotulo)
	d:tag('span'):addClass('cp-stat-value'):wikitext(valor)
	return d
end

local function painel(titulo, modificador)
	local s = mw.html.create('section'):addClass('cp-panel')
	if modificador then s:addClass('cp-panel--' .. modificador) end
	s:tag('h3'):addClass('cp-panel-title'):wikitext(titulo)
	return s
end

-- Recompensas de uma dificuldade: EXP em destaque e os itens como chips.
local function recompensas(c, dif)
	local box = mw.html.create('div'):addClass('cp-rewards'):attr('data-dif', dif:lower())
	local exp = (dif == 'Hard') and c.expHard or c.expNormal

	if exp then
		box:tag('div'):addClass('cp-rewards-label'):wikitext('Experiência')
		local linha = box:tag('div'):addClass('cp-rewards-row')
		linha:tag('span'):addClass('cp-exp'):wikitext(numero(exp) .. ' EXP')
	end

	box:tag('div'):addClass('cp-rewards-label'):wikitext('Itens possíveis')
	local linha = box:tag('div'):addClass('cp-rewards-row')
	for _, r in ipairs(dados.loot[dif] or {}) do
		linha:node(chip(r.item, r.qtd))
	end
	if c.megaStone and c.megaStone ~= '' then
		linha:node(chip(c.megaStone, '1'))
	end

	box:tag('div'):addClass('cp-rewards-hint')
		:wikitext('Passe o mouse sobre um item para ver o nome.')
	return box
end

local function requisitos(c, dif)
	local box = mw.html.create('div'):addClass('cp-req'):attr('data-dif', dif:lower())
	local ul = box:tag('ul')
	ul:tag('li'):wikitext("Nível '''" .. ((dif == 'Hard') and '425' or '350') .. "''' ou superior.")
	ul:tag('li'):wikitext("Equipe de '''exatamente 3 jogadores'''.")
	ul:tag('li'):wikitext("'''1 Pokémon''' por jogador, sem troca durante a batalha.")
	ul:tag('li'):wikitext("'''1 Champion's Ticket''' para entrar.")
	ul:tag('li'):wikitext('Acesso liberado com o ' .. (c.aceTrainer or '') .. '.')
	if dif == 'Hard' then
		ul:tag('li'):wikitext("O Campeão enfrentado é a versão '''Shiny'''.")
	end
	return box
end

local function conquistas(dif)
	local box = mw.html.create('div'):addClass('cp-ach'):attr('data-dif', dif:lower())
	local ul = box:tag('ul'):addClass('cp-ach-list')
	local chave = (dif == 'Hard') and 'hard' or 'normal'
	for _, a in ipairs(dados.conquistas or {}) do
		if a[chave] then ul:tag('li'):wikitext(a.desc) end
	end
	return box
end

function p.ficha(frame)
	local chave = frame.args[1] or frame.args.campeao or ''
	chave = mw.text.trim(chave)
	local c = dados.campeoes[chave]
	if not c then
		return '<span class="error">Campeão desconhecido: ' .. mw.text.nowiki(chave)
			.. '. Cadastre-o em [[Module:Campeao/dados]].</span>'
	end

	local difs = { 'Normal' }
	if c.hard then table.insert(difs, 'Hard') end

	local raiz = mw.html.create('div'):addClass('cp-boss'):attr('data-tema', 'claro')

	-- Alternador de tema. O JS em MediaWiki:Common.js troca data-tema e guarda
	-- a preferencia; sem JS o botao some e a ficha fica no tema claro.
	raiz:tag('button'):addClass('cp-tema'):attr('type', 'button')
		:attr('data-cp-tema', '1'):css('display', 'none'):wikitext('Modo escuro')

	-- Cabecalho
	local head = raiz:tag('div'):addClass('cp-head')
	local arte = (c.arte and c.arte ~= '') and c.arte or PLACEHOLDER
	head:tag('div'):addClass('cp-art')
		:wikitext('[[File:' .. arte .. '|200px|link=|alt=' .. c.nome .. ']]')
	local info = head:tag('div'):addClass('cp-head-info')
	info:tag('div'):addClass('cp-title'):wikitext(c.nome)
	info:tag('span'):addClass('cp-badge'):wikitext("Campeão das Expedições")
	info:tag('p'):addClass('cp-desc'):wikitext(
		'Campeão da Expedition do ' .. c.expedition ..
		', enfrentado no [[Champion\'s Path]] em uma arena que representa o seu habitat natural.')
	local stats = info:tag('div'):addClass('cp-stats')
	stats:node(stat('Expedition', c.expedition))
	stats:node(stat('Ace Trainer', c.aceTrainer))
	stats:node(stat('Jogadores', '3'))
	stats:node(stat('Tempo alvo', c.tempoAlvo .. ' min'))

	-- Abas de dificuldade
	local abas = raiz:tag('div'):addClass('cp-tabs')
	for i, dif in ipairs(difs) do
		local b = abas:tag('button'):addClass('cp-tab'):attr('data-dif', dif:lower())
			:attr('type', 'button'):wikitext(dif)
		if i == 1 then b:addClass('is-active') end
	end

	-- Paineis lado a lado
	local split = raiz:tag('div'):addClass('cp-split')
	local pReq = painel('Requisitos')
	local pRec = painel('Recompensas', 'rewards')
	for i, dif in ipairs(difs) do
		local r1, r2 = requisitos(c, dif), recompensas(c, dif)
		if i > 1 then r1:addClass('is-hidden'); r2:addClass('is-hidden') end
		pReq:node(r1)
		pRec:node(r2)
	end
	split:node(pReq)
	split:node(pRec)

	-- Mecanicas
	local pMec = painel('Mecânicas de Vida', 'skills')
	if c.habilidades and #c.habilidades > 0 then
		for _, h in ipairs(c.habilidades) do
			local it = pMec:tag('div'):addClass('cp-skill')
			it:tag('div'):addClass('cp-skill-name'):wikitext(h.nome)
			if h.hp then it:tag('span'):addClass('cp-skill-hp'):wikitext('HP ' .. h.hp) end
			it:tag('div'):addClass('cp-skill-desc'):wikitext(h.desc or '')
		end
	else
		pMec:tag('div'):addClass('cp-empty'):wikitext(
			'As mecânicas deste Campeão ainda não foram documentadas. ' ..
			'Ao atingir marcas específicas de HP ele se posiciona na arena e inicia uma mecânica.')
	end
	raiz:node(pMec)

	-- Conquistas
	local pCon = painel('Conquistas', 'ach')
	for i, dif in ipairs(difs) do
		local bloco = conquistas(dif)
		if i > 1 then bloco:addClass('is-hidden') end
		pCon:node(bloco)
	end
	raiz:node(pCon)

	local tip = raiz:tag('div'):addClass('cp-tip-bar')
	tip:tag('span'):addClass('cp-tip-tag'):wikitext('Dica')
	tip:tag('span'):wikitext('Não há Potions nem Revives nesta sala: sobreviver às mecânicas vale mais do que causar dano.')

	return frame:extensionTag{ name = 'templatestyles', args = { src = 'Campeao/styles.css' } }
		.. tostring(raiz)
end

return p