Voir la source de Module:Apprentissage

local p = {}
local ressources = {
	["donneesCapacite"] = require("Module:Ressources/donneesCapacite")
}
local generation_actuelle = 9
local generation_to_jeux = {
	{"RB", "J"}, -- gen 1
	{"OA", "C"}, -- gen 2
	{"RS", "E", "RFVF"}, -- gen 3
	{"DP", "Pt", "HGSS"}, -- gen 4
	{"NB", "N2B2"}, -- gen 5
	{"XY", "ROSA"}, -- gen 6
	{"SL", "USUL", "LGPE"}, -- gen 7
	{{"EB", "DEPS"}, "LPA"}, -- gen 8, EB et DEPS sont mis dans la même colonne
	{"EV"} -- gen 9
}

local function non_vide( valeur )
	if valeur ~= nil and mw.text.trim( valeur ) ~= "" and mw.text.trim(valeur ) ~= "-" and mw.text.trim( valeur ) ~= "—" then return true
	else return false
	end
end

function p.niveau( frame )
	local infos = frame.args[1]
	if infos == nil then return "Aucune information donnée" else infos = mw.text.trim( infos ) end
	infos = mw.text.split(infos, "\n")
	local generation = frame.args['génération']
	if generation == nil then generation = generation_actuelle else generation = tonumber( generation ) end
	local poke_type = frame.args['type']
	if poke_type == nil then poke_type = "inconnu" else poke_type = mw.text.trim( string.lower( string.gsub( poke_type, "É", "é" ) ) ) end
	
	local generation_to_colspans = {
		{6, 2}, -- gen 1
		{6, 2}, -- gen 2
		{9, 3}, -- gen 3
		{8, 3}, -- gen 4
		{6, 2}, -- gen 5
		{9, 2}, -- gen 6
		{6, 3}, -- gen 7
		{6, 2}, -- gen 8
		{6, 1}  -- gen 9
	}
	local colspans = { generation_to_colspans[generation][1], generation_to_colspans[generation][2] }
	
	-- Détection automatique des colonnes pour lesquelles aucune donnée n'est renseignée. Ces colonnes n'apparaîtront pas.
	local presence = {}
	for j = 1, colspans[2] do
		presence[j] = false
	end
	local i = 1
	local infos_capacite = {}
	while infos[i] do
		infos_capacite = mw.text.split(infos[i], "/")
		for j = 1, colspans[2] do
			if non_vide( infos_capacite[j+1] ) then presence[j] = true end
		end
		i = i + 1
	end
	for j = 1, generation_to_colspans[generation][2] do
		if presence[j] == false then colspans[2] = colspans[2] - 1 end
	end
	colspans[3] = colspans[1] + colspans[2]
	
	local jeux = {}
	for j = 1, generation_to_colspans[generation][2] do
		if presence[j] then table.insert(jeux, generation_to_jeux[generation][j]) end
	end
	
	local resultat = {}
	table.insert(resultat, '<div class="center"><table class="tableaustandard ' .. poke_type .. ' sortable centre tableau-overflow"><thead><tr><th class="cellule-entête"" colspan="' .. colspans[1] .. '">[[Capacité]]</th>')
	if colspans[2] > 0 then table.insert(resultat, '<th class="cellule-entête" colspan="' .. colspans[2] .. '">[[Niveau]]</th>') end
	table.insert(resultat, '</tr><tr><th class="colonne-1">[[Capacité|Nom]]</th><th class="colonne-2">[[Type]]</th><th class="colonne-3">[[Catégorie de capacité|Catégorie]]</th><th class="colonne-4">[[Puissance (statistique)|Puissance]]</th><th class="colonne-5">[[Précision]]</th><th class="colonne-6">[[PP]]</th>')
	if generation == 3 or generation == 4 or generation == 6 then
		table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th>')
		if generation == 3 or generation == 6 then table.insert(resultat, '<th class="colonne-8">[[Blocage (concours)|Blocage]]</th>') end
	end
	for _, jeux_colonne in ipairs(jeux) do
		if type(jeux_colonne) == "string" then table.insert(resultat, '<th class="colonne-niveau">' .. frame:expandTemplate{title="Abréviation", args={jeux_colonne, ""}} .. '</th>')
		else
			local abreviations = {}
			for _, jeu_colonne in ipairs(jeux_colonne) do table.insert(abreviations, frame:expandTemplate{title="Abréviation", args={jeu_colonne, ""}}) end
			table.insert(resultat, '<th class="colonne-niveau">' .. table.concat(abreviations, ", ") .. '</th>')
		end
	end
	table.insert(resultat, '</tr>')

    if #infos == 1 and infos[1] == "Aucune" then
    	table.insert(resultat, '</thead><tbody><tr><td class="colonne-toutes" colspan="' .. colspans[3] .. '">Ce Pokémon n\'apprend aucune capacité par montée en niveau lors de cette génération.</td></tr>')
    else
		local bouton
		if frame.args['masquer'] == "oui" or frame.args['masquer'] == "1" then bouton = {"afficher", "[-] Masquer", "[+] Afficher"}
		else bouton = {"masquer", "[+] Afficher", "[-] Masquer"}
		end
    	table.insert(resultat, '<tr><td class="colonne-toutes" colspan="' .. colspans[3] .. '"><button type="button" name="ListeCapacites' .. generation .. '" value="' .. bouton[1] .. '" style="font-size:80%" title="' .. bouton[2] .. '">' .. bouton[3] .. '</button></td></tr></thead><tbody class="ListeCapacites' .. generation .. '">')
    	
		local i = 1
		local infos_capacite = {}
		local donnees = {}
		while infos[i] do
			infos_capacite = mw.text.split(infos[i], "/")
			if infos_capacite[1] ~= nil and infos_capacite[1] ~= "" then 
				local jeux_capacite = {}
				for j = 1, generation_to_colspans[generation][2] do
					if non_vide( infos_capacite[j+1] ) then table.insert(jeux_capacite, generation_to_jeux[generation][j]) end
				end
				
				donnees = ressources.donneesCapacite( generation, mw.text.trim( infos_capacite[1] ), jeux_capacite )
				for j = 1, colspans[1] do
					table.insert(resultat, '<td class="colonne-' .. j .. '">' .. donnees[j] .. '</td>')
				end

				for j = 2, generation_to_colspans[generation][2] + 1 do
					if presence[j-1] then
						if infos_capacite[j] ~= nil then
							infos_capacite[j] = mw.text.trim( infos_capacite[j] )
							infos_capacite_split = mw.text.split(infos_capacite[j], ", ")
							local k = 1
							local infos_capacite_tmp_string = ""
							local valeur = nil
							while infos_capacite_split[k] do
								local maitrise = false
								if mw.ustring.find(infos_capacite_split[k], "M") == 1
								then maitrise = true
									infos_capacite_split[k] = mw.ustring.sub(infos_capacite_split[k], 2)
								end
								if infos_capacite_split[k] == "—" or infos_capacite_split[k] == "-" or infos_capacite_split[k] == ""
								then infos_capacite_split[k] = "—"
									if valeur == nil then valeur = 101 end
								elseif string.find( infos_capacite_split[k], "Départ" ) then if valeur == nil then valeur = 0 end
								elseif tonumber(infos_capacite_split[k]) ~= nil then
									if valeur == nil then valeur = infos_capacite_split[k] end
									infos_capacite_split[k] = "N." .. infos_capacite_split[k]
								else if valeur == nil then valeur = 0 end
								end
								if k ~= 1 then infos_capacite_tmp_string = infos_capacite_tmp_string .. "<br/>" end
								if maitrise then infos_capacite_tmp_string = infos_capacite_tmp_string .. "[[Fichier:Icône Maîtrise LPA.png|x20px|Maîtrise|link=Maîtrise]]" end
								infos_capacite_tmp_string = infos_capacite_tmp_string .. infos_capacite_split[k]
								k = k + 1
							end
							table.insert(resultat, '<td class="colonne-niveau" style="white-space:nowrap" data-sort-value="' .. valeur .. '">' .. infos_capacite_tmp_string)
						else table.insert(resultat, '<td class="colonne-niveau" style="white-space:nowrap" data-sort-value="101">—')
						end 
						table.insert(resultat, '</td>')
					end
				end
				
				table.insert(resultat, '</tr>')
			end
			i = i + 1
		end
	end

	table.insert(resultat, '</tbody></table></div>')
	return table.concat(resultat, "")
end

local function capsuleEtDisque( disque, frame )
	local infos = frame.args[1]
	if infos == nil then return "Aucune information donnée" else infos = mw.text.trim( infos ) end
	local generation = frame.args['génération']
	if generation == nil then generation = generation_actuelle else generation = tonumber( generation ) end
	local type = frame.args['type']
	if type == nil then type = "inconnu" else type = mw.text.trim( string.lower( string.gsub( type, "É", "é" ) ) ) end
	local jeux = frame.args['jeux']
	if jeux == nil then
		jeux = generation_to_jeux[generation]
		if generation == 8 then jeux[2] = nil end -- Pas de capsule dans LPA
	else
		jeux = mw.text.split(jeux, "/")
		for i,jeu in ipairs(jeux) do
			jeux[i] = mw.text.trim( jeu )
		end
	end
	local colspan = 7
	if generation == 3 or generation == 6 then colspan = 10
	elseif generation == 4 then colspan = 9
	end
	
	local resultat = {}
	table.insert(resultat, '<div class="center"><table class="tableaustandard ' .. type .. ' centre sortable tableau-overflow"><thead><tr><th class="colonne-1">Numéro</th><th class="apprentissage apprentissage-capsule apprentissage-capsule-génération' .. generation ..' colonne-2">Capacité</th><th class="colonne-3">Type</th><th class="colonne-4">Catégorie</th><th class="colonne-5">Puissance</th><th class="colonne-6">Précision</th><th class="colonne-7">PP</th>')
	if generation == 3 or generation == 6 then table.insert(resultat, '<th class="colonne-8">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th><th class="colonne-10">[[Blocage (concours)|Blocage]]</th>')
	elseif generation == 4 then table.insert(resultat, '<th class="colonne-8">[[Concours Pokémon|Type Concours]]</th><th class="colonne-9">[[Charme (concours)|Charme]]</th>')
	end
	table.insert(resultat, '</tr>')

    if infos == "Aucune" then
    	table.insert(resultat, '</thead><tbody><tr><td class="colonne-toutes" colspan="' .. colspan .. '">Ce Pokémon n\'apprend aucune capacité par ')
    	if disque then table.insert(resultat, 'disque') else table.insert(resultat, 'capsule') end
    	table.insert(resultat, ' lors de cette génération.</td></tr>')
    else
		local bouton
		if frame.args['masquer'] == "oui" or frame.args['masquer'] == "1" then bouton = {"afficher", "[-] Masquer", "[+] Afficher"}
		else bouton = {"masquer", "[+] Afficher", "[-] Masquer"}
		end
    	table.insert(resultat, '<tr><td class="colonne-toutes" colspan="' .. colspan .. '"><button type="button" name="Liste')
    	if disque then table.insert(resultat, 'Disque') else table.insert(resultat, 'Capsule') end
    	table.insert(resultat, 's' .. generation .. '" value="' .. bouton[1] .. '" style="font-size:80%" title="' .. bouton[2] .. '">' .. bouton[3] .. '</button></td></tr></thead><tbody class="Liste')
    	if disque then table.insert(resultat, 'Disque') else table.insert(resultat, 'Capsule') end
    	table.insert(resultat, 's' .. generation .. '">')
    	
		infos = mw.text.split(infos, "\n")
		local i = 1
		local infos_capacite = {}
		local donnees = {}
		local capsule
		local cs = {
			["Coupe"] = {true, true, true, true, true, true},
			["Vol"] = {true, true, true, true, true, true},
			["Surf"] = {true, true, true, true, true, true},
			["Force"] = {true, true, true, true, true, true},
			["Flash"] = {true, true, true, false, false, false},
			["Siphon"] = {false, true, false, "depend", false, false},
			["Cascade"] = {false, true, true, true, true, true},
			["Éclate-Roc"] = {false, false, true, true, false, "depend"},
			["Plongée"] = {false, false, "depend", false, true, "depend"},
			["Anti-Brume"] = {false, false, false, "depend", false, false},
			["Escalade"] = {false, false, false, true, false, false}
		}
		cs["Plongée"]["rse"] = true
		cs["Plongée"]["rfvf"] = false
		cs["Siphon"]["dpp"] = false
		cs["Siphon"]["hgss"] = true
		cs["Anti-Brume"]["dpp"] = true
		cs["Anti-Brume"]["hgss"] = false
		cs["Éclate-Roc"]["xy"] = false
		cs["Éclate-Roc"]["rosa"] = true
		cs["Plongée"]["xy"] = false
		cs["Plongée"]["rosa"] = true
		while infos[i] do
			infos_capacite = mw.text.split(infos[i], "/")
			if infos_capacite[1] ~= nil and infos_capacite[1] ~= "" and infos_capacite[2] ~= nil and infos_capacite[2] ~= "" then 
				if disque then capsule = 'DT'
				else
					capsule = 'CT'
					if cs[mw.text.trim( infos_capacite[2] )] then
						if cs[mw.text.trim( infos_capacite[2] )][generation] == true then
							capsule = 'CS'
						elseif cs[mw.text.trim( infos_capacite[2] )][generation] == "depend" then
							if infos_capacite[3] then
								if cs[mw.text.trim( infos_capacite[2] )][mw.text.trim( string.lower( infos_capacite[3] ) )] == true then
									capsule = 'CS'
								end
							end
						end
					end
				end
				donnees = ressources.donneesCapacite( generation, mw.text.trim( infos_capacite[2] ), jeux )
				
				table.insert(resultat, '<tr><td class="colonne-1">[[' .. capsule .. mw.text.trim( infos_capacite[1] ) .. ']]</td><td class="colonne-2">' .. donnees[1])
				if infos_capacite[3] then table.insert(resultat, '<sup>' .. frame:expandTemplate{ title = 'Abréviation', args = { infos_capacite[3] } } .. '</sup>' ) end
				table.insert(resultat, '</td>')
				for j = 2, colspan - 1 do table.insert(resultat, '<td class="colonne-' .. j+1 .. '">' .. donnees[j] .. '</td>') end
				table.insert(resultat, '</tr>')
			end
			i = i + 1
		end
	end
	
	table.insert(resultat, '</tbody></table></div>')
	return table.concat(resultat, "")
end

function p.capsule( frame )
	return capsuleEtDisque( false, frame )
end

function p.disque( frame )
	return capsuleEtDisque( true, frame )
end

function p.reproduction( frame )
	ressources["infosPokemon"] = require("Module:Ressources/infosPokemon")
	
	local infos = frame.args[1]
	if infos == nil then return "Aucune information donnée" else infos = mw.text.trim( infos ) end
	local generation = frame.args['génération']
	if generation == nil then generation = generation_actuelle else generation = tonumber( generation ) end
	local type = frame.args['type']
	if type == nil then type = "inconnu" else type = mw.text.trim( string.lower( string.gsub( type, "É", "é" ) ) ) end
	local jeux = frame.args['jeux']
	if jeux == nil then 
		jeux = generation_to_jeux[generation]
		if generation == 8 then jeux[2] = nil end -- Pas de reproduction dans LPA
	else
		jeux = mw.text.split(jeux, "/")
		for i,jeu in ipairs(jeux) do
			jeux[i] = mw.text.trim( jeu )
		end
	end
	
	local methodes = frame.args['méthodes']
	if methodes == nil then methodes = {"[[niveau]]", "[[reproduction]]"}
	else methodes = mw.text.split(methodes, "/")
	end
	
	local colspan = 6 + #methodes
	if generation == 3 or generation == 6 then colspan = 9 + #methodes
	elseif generation == 4 then colspan = 8 + #methodes
	end
	
	local resultat = {}
	table.insert(resultat, '<div class="center"><table class="tableaustandard centre ' .. type .. ' sortable tableau-overflow" style="max-width: 100%;"><thead><tr><th class="colonne-1">[[Capacité]]</th><th class="colonne-2">[[Type]]</th><th class="colonne-3">[[Catégorie de capacité|Cat.]]</th><th class="colonne-4">[[Puissance (statistique)|Puis.]]</th><th class="colonne-5">[[Précision|Préc.]]</th><th class="colonne-6">[[PP]]</th>')
	if generation == 3 or generation == 6 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th><th class="colonne-9">[[Blocage (concours)|Blocage]]</th>')
	elseif generation == 4 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th>')
	end
	
	local z = 1
	while methodes[z] do
		table.insert(resultat, '<th class="colonne-toutes">Parents l\'apprenant par ' .. methodes[z] .. '</th>')
		z = z + 1
	end
	table.insert(resultat, '</tr>')
	
    if infos == "Aucune" then
    	table.insert(resultat, '</thead><tbody><tr><td class="colonne-toutes" colspan="' .. colspan .. '">Ce Pokémon n\'apprend aucune capacité par reproduction lors de cette génération.</td></tr>')
    else
		local bouton
		if frame.args['masquer'] == "oui" or frame.args['masquer'] == "1" then bouton = {"afficher", "[-] Masquer", "[+] Afficher"}
		else bouton = {"masquer", "[+] Afficher", "[-] Masquer"}
		end
    	table.insert(resultat, '<tr><td class="colonne-toutes" colspan="' .. colspan .. '"><button type="button" name="ListeReproduction' .. generation .. '" value="' .. bouton[1] .. '" style="font-size:80%" title="' .. bouton[2] .. '">' .. bouton[3] .. '</button></td></tr></thead><tbody class="ListeReproduction' .. generation .. '">')
    	
		infos = mw.text.split(infos, "\n")
		local i = 1
		local j = 1
		local y = {}
		local infos_capacite = {}
		local poke_niveau = {}
		local poke_repro = {}
		local donnees = {}
		while infos[i] do
			infos_capacite = mw.text.split(infos[i], "/")
			if mw.text.trim( infos_capacite[1] ) ~= "" then
				if ( string.match(infos_capacite[1], "jeu%([^)]*%)") ) then
					jeu = mw.getCurrentFrame():expandTemplate{ title = 'Sup', args = { string.sub(string.match(infos_capacite[1], "jeu%([^)]*%)"), 5, -2) } }
					infos_capacite[1] = string.gsub( infos_capacite[1], "jeu%([^)]*%)", "" )
				else jeu = "" end
				if ( string.match(infos_capacite[1], "sup%([^)]*%)") ) then
					jeu = mw.getCurrentFrame():expandTemplate{ title = 'Sup', args = { string.sub(string.match(infos_capacite[1], "sup%([^)]*%)"), 5, -2) } }
					infos_capacite[1] = string.gsub( infos_capacite[1], "sup%([^)]*%)", "" )
				end
				infos_capacite[1] = mw.text.trim( infos_capacite[1] )
				
				donnees = ressources.donneesCapacite( generation, mw.text.trim( infos_capacite[1] ), jeux )
			
				table.insert(resultat, '<tr><td class="colonne-1">' .. donnees[1] .. jeu .. '</td>')
				for j = 2, colspan - #methodes do table.insert(resultat, '<td class="colonne-' .. j .. '">' .. donnees[j] .. '</td>') end
				table.insert(resultat, '<td class="colonne-toutes">')
			
				while methodes[j] do
					y[j] = 1
					if infos_capacite[j + 1] ~= nil and mw.text.trim( infos_capacite[j + 1] ) ~= "" then
						poke_niveau = mw.text.split(infos_capacite[j + 1], ",")
						while poke_niveau[y[j]] do
							table.insert(resultat, ressources.infosPokemon( poke_niveau[y[j]], "miniature" ) )
							y[j] = y[j] + 1
						end
					else table.insert(resultat, "—")
					end
					if j == #methodes then table.insert(resultat, '</td></tr>')
					else table.insert(resultat, '</td><td class="colonne-toutes">')
					end
					j = j + 1
				end
			end
			i = i + 1
			j = 1
			y = {}
		end
	end

	if frame.args['queulorior'] == "oui" then
		table.insert(resultat, '<tr><td class="colonne-toutes" colspan="' .. colspan .. '>Grâce à sa capacité [[Gribouille]], [[Queulorior]] est capable d\'apprendre toutes ces capacités, qu\'il peut également transmettre par reproduction.</td></tr>')
	end
	
	table.insert(resultat, '</tbody></table></div>')
	return table.concat(resultat, "")
end

function p.donneur( frame )
	local infos = frame.args[1]
	if infos == nil then return "Aucune information donnée" else infos = mw.text.trim( infos ) end
	local generation = frame.args['génération']
	if generation == nil then generation = generation_actuelle else generation = tonumber( generation ) end
	local type = frame.args['type']
	if type == nil then type = "inconnu" else type = mw.text.trim( string.lower( string.gsub( type, "É", "é" ) ) ) end
	local jeux = frame.args['jeux']
	if jeux == nil then jeux = generation_to_jeux[generation]
	else
		jeux = mw.text.split(jeux, "/")
		for i,jeu in ipairs(jeux) do
			jeux[i] = mw.text.trim( jeu )
		end
	end
	local colspan = 8
	if generation == 3 or generation == 6 then colspan = 11
	elseif generation == 4 then colspan = 10
	end
	local prix_unite = frame.args['prix-unité']
	if prix_unite == nil then prix_unite = "[[Point de Combat|PCo]]" end
	
	local resultat = {}
	table.insert(resultat, '<div class="center"><table class="tableaustandard centre ' .. type .. ' sortable tableau-overflow" style="max-width: 100%;"><thead><tr><th class="colonne-1">[[Capacité]]</th><th class="colonne-2">[[Type]]</th><th class="colonne-3">[[Catégorie de capacité|Catégorie]]</th><th class="colonne-4">[[Puissance (statistique)|Puissance]]</th><th class="colonne-5">[[Précision|Précision]]</th><th class="colonne-6">[[PP]]</th>')
	if generation == 3 or generation == 6 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th><th class="colonne-9">[[Blocage (concours)|Blocage]]</th>')
	elseif generation == 4 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th>')
	end
	table.insert(resultat, '<th class="colonne-lieu">Lieu</th><th class="colonne-coût">Coût</th></tr>')

    if infos == "Aucune" then
    	table.insert(resultat, '</thead><tbody><tr><td class="colonne-toutes" colspan="' .. colspan .. '">Ce Pokémon n\'apprend aucune capacité par donneur lors de cette génération.</td></tr>')
    else
		local bouton
		if frame.args['masquer'] == "oui" or frame.args['masquer'] == "1" then bouton = {"afficher", "[-] Masquer", "[+] Afficher"}
		else bouton = {"masquer", "[+] Afficher", "[-] Masquer"}
		end
    	table.insert(resultat, '<tr><td class="colonne-toutes" colspan="' .. colspan .. '"><button type="button" name="ListeDonneur' .. generation .. '" value="' .. bouton[1] .. '" style="font-size:80%" title="' .. bouton[2] .. '">' .. bouton[3] .. '</button></td></tr></thead><tbody class="ListeDonneur' .. generation .. '">')
		
		infos = mw.text.split(infos, "\n")
		i = 1
		local donnees = {}
		while infos[i] do
			infos_capacite = mw.text.split(infos[i], "/")
			if infos_capacite[1] ~= nil and infos_capacite[1] ~= "" then
				donnees = ressources.donneesCapacite( generation, mw.text.trim( infos_capacite[1] ), jeux )
				if infos_capacite[2] == nil then infos_capacite[2] = "" end
				if infos_capacite[3] == nil then
					infos_capacite[3] = "—"
					infos_capacite[4] = ""
				else
					if infos_capacite[4] == nil then infos_capacite[4] = prix_unite end
				end
				
				-- pour rajouter les éléments supplémentaires qui se seraient perdus à cause de balises
				local k = 5
				while infos_capacite[k] do
					infos_capacite[4] = infos_capacite[4] .. "/" .. infos_capacite[k]
					k = k + 1
				end
				
				table.insert(resultat, '<tr>')
				for j = 1, colspan - 2 do table.insert(resultat, '<td class="colonne-' .. j .. '">' .. donnees[j] .. '</td>') end
				table.insert(resultat, '<td class="colonne-lieu">' .. infos_capacite[2] .. '</td><td class="colonne-coût">' .. infos_capacite[3] .. " " .. infos_capacite[4] .. '</td></tr>')
			end
			i = i + 1
		end
	end
	
	table.insert(resultat, '</tbody></table></div>')
	return table.concat(resultat, "")
end

function p.preevolution( frame )
	ressources["infosPokemon"] = require("Module:Ressources/infosPokemon")
	
	local infos = frame.args[1]
	if infos == nil then return "Aucune information donnée" else infos = mw.text.trim( infos ) end
	local generation = frame.args['génération']
	if generation == nil then generation = generation_actuelle else generation = tonumber( generation ) end
	local type = frame.args['type']
	if type == nil then type = "inconnu" else type = mw.text.trim( string.lower( string.gsub( type, "É", "é" ) ) ) end
	local jeux = frame.args['jeux']
	if jeux == nil then jeux = generation_to_jeux[generation]
	else
		jeux = mw.text.split(jeux, "/")
		for i,jeu in ipairs(jeux) do
			jeux[i] = mw.text.trim( jeu )
		end
	end
	local colspan = 7
	if generation == 3 or generation == 6 then colspan = 10
	elseif generation == 4 then colspan = 9
	end	

	local resultat = {}
	table.insert(resultat, '<div class="center"><table class="tableaustandard centre ' .. type .. ' sortable tableau-overflow" style="max-width: 100%;"><thead><tr><th class="colonne-1">[[Capacité]]</th><th class="colonne-2">[[Type]]</th><th class="colonne-3">[[Catégorie de capacité|Catégorie]]</th><th class="colonne-4">[[Puissance (statistique)|Puissance]]</th><th class="colonne-5">[[Précision|Précision]]</th><th class="colonne-6">[[PP]]</th>')
	if generation == 3 or generation == 6 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th><th class="colonne-9">[[Blocage (concours)|Blocage]]</th>')
	elseif generation == 4 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th>')
	end
	table.insert(resultat, '<th class="colonne-toutes">Pré-évolution</th></tr>')

    if infos == "Aucune" then
    	table.insert(resultat, '</thead><tbody><tr><td class="colonne-toutes" colspan="' .. colspan .. '">Ce Pokémon n\'apprend aucune capacité par pré-évolution lors de cette génération.</td></tr>')
    else
		local bouton
		if frame.args['masquer'] == "oui" or frame.args['masquer'] == "1" then bouton = {"afficher", "[-] Masquer", "[+] Afficher"}
		else bouton = {"masquer", "[+] Afficher", "[-] Masquer"}
		end
    	table.insert(resultat, '<tr><td class="colonne-toutes" colspan="' .. colspan .. '"><button type="button" name="ListePreevolution' .. generation .. '" value="' .. bouton[1] .. '" style="font-size:80%" title="' .. bouton[2] .. '">' .. bouton[3] .. '</button></td></tr></thead><tbody class="ListePreevolution' .. generation .. '">')
		
		infos = mw.text.split(infos, "\n")
		i = 1
		local donnees = {}
		while infos[i] do
			infos_capacite = mw.text.split(infos[i], "/")
			if infos_capacite[1] ~= nil and infos_capacite[1] ~= "" then
				donnees = ressources.donneesCapacite( generation, mw.text.trim( infos_capacite[1] ), jeux )
				if infos_capacite[2] == nil then infos_capacite[2] = "Inconnue" end
			
				table.insert(resultat, '<tr>')
				for j = 1, colspan - 1 do table.insert(resultat, '<td class="colonne-' .. j .. '">' .. donnees[j] .. '</td>') end
				table.insert(resultat, '<td class="colonne-toutes" style="text-align:left">' .. ressources.infosPokemon( infos_capacite[2] ) .. '</td></tr>')
			end
			i = i + 1
		end
	end
	
	table.insert(resultat, '</tbody></table></div>')
	return table.concat(resultat, "")
end

function p.evenement( frame )
	local infos = frame.args[1]
	if infos == nil then return "Aucune information donnée" else infos = mw.text.trim( infos ) end
	local generation = frame.args['génération']
	if generation == nil then generation = generation_actuelle else generation = tonumber( generation ) end
	local type = frame.args['type']
	if type == nil then type = "inconnu" else type = mw.text.trim( string.lower( string.gsub( type, "É", "é" ) ) ) end
	local jeux = frame.args['jeux']
	if jeux == nil then jeux = generation_to_jeux[generation]
	else
		jeux = mw.text.split(jeux, "/")
		for i,jeu in ipairs(jeux) do
			jeux[i] = mw.text.trim( jeu )
		end
	end
	local colspan = 7
	if generation == 3 or generation == 6 then colspan = 10
	elseif generation == 4 then colspan = 9
	end
	
	local resultat = {}
	table.insert(resultat, '<div class="center"><table class="tableaustandard centre ' .. type .. ' sortable tableau-overflow" style="max-width: 100%;"><thead><tr><th class="colonne-1">[[Capacité]]</th><th class="colonne-2">[[Type]]</th><th class="colonne-3">[[Catégorie de capacité|Catégorie]]</th><th class="colonne-4">[[Puissance (statistique)|Puissance]]</th><th class="colonne-5">[[Précision|Précision]]</th><th class="colonne-6">[[PP]]</th>')
	if generation == 3 or generation == 6 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th><th class="colonne-9">[[Blocage (concours)|Blocage]]</th>')
	elseif generation == 4 then table.insert(resultat, '<th class="colonne-7">[[Concours Pokémon|Type Concours]]</th><th class="colonne-8">[[Charme (concours)|Charme]]</th>')
	end
	table.insert(resultat, '<th class="colonne-toutes">Événement</th></tr>')

    if infos == "Aucune" then
    	table.insert(resultat, '</thead><tbody><tr><td class="colonne-toutes" colspan="' .. colspan .. '">Ce Pokémon n\'apprend aucune capacité par événement lors de cette génération.</td></tr>')
    else
		local bouton
		if frame.args['masquer'] == "oui" or frame.args['masquer'] == "1" then bouton = {"afficher", "[-] Masquer", "[+] Afficher"}
		else bouton = {"masquer", "[+] Afficher", "[-] Masquer"}
		end
    	table.insert(resultat, '<tr><td class="colonne-toutes" colspan="' .. colspan .. '"><button type="button" name="ListeEvenement' .. generation .. '" value="' .. bouton[1] .. '" style="font-size:80%" title="' .. bouton[2] .. '">' .. bouton[3] .. '</button></td></tr></thead><tbody class="ListeEvenement' .. generation .. '">')
		
		infos = mw.text.split(infos, "\n")
		i = 1
		local donnees = {}
		while infos[i] do
			infos_capacite = mw.text.split(infos[i], "/")
			if infos_capacite[1] ~= nil and infos_capacite[1] ~= "" then
				donnees = ressources.donneesCapacite( generation, mw.text.trim( infos_capacite[1] ), jeux )
				if infos_capacite[2] == nil then infos_capacite[2] = "Inconnu" end
			
				table.insert(resultat, '<tr>')
				for j = 1, colspan - 1 do table.insert(resultat, '<td class="colonne-' .. j .. '">' .. donnees[j] .. '</td>') end
				table.insert(resultat, '<td class="colonne-toutes">' .. infos_capacite[2] .. '</td></tr>')
			end
			i = i + 1
		end
	end
	
	table.insert(resultat, '</tbody></table></div>')
	return table.concat(resultat, "")
end

return p