Ir para conteúdo

[Encerrado] Como colocar para um pokémon evoluir para 2? [PDA Sem Lv Slicer]


ducb

Posts Recomendados

Como colocar para um pokémon evoluir para 2?

Olá,eu estou usando atualmente o pda sem level do slicer e estou adicionando os pokémons da 3° geração.Porém vários pokémons evoluem para 2 como por exemplo: Quero colocar para o Nincada evoluir pra Ninjask e pro Shedinja,quero colocar pro kirlia evolui para o gadevoir e o gallade e assim por diante.

Ficaria muito agradecido se vocês aqui do XTibia puderem me ajudar.

 

Como fazer evolução por sexo?

Eu também queria colocar evolução por sexo no meu server,tipo: O Combee Fêmea evoluir para o Vespiquen e o Combee macho não evoluir.Se puderem me ajudar eu ficaria muito grato.

 

Como colocar Berry System?

Também queria um sistema de berry no meu server desse jeito: Você usa um item em uma determinada árvore ai vai uma determinada berry para o seu inventário que cura um determinado tipo de HP.Se puderem me ajudar ficaria muito feliz!

Link para o comentário
Compartilhar em outros sites

creio que para um pokemon evoluir para 2 vc precisa colocar nessa parte dos scripts:

configuration.lua

 

spcevo = {
["Poliwhirl"] = {[1] = {level = 1, evolution = "Poliwrath", count = 1, stoneid = 11442, stoneid2 = 11446},
   		  [2] = {level = 1, evolution = "Politoed", count = 1, stoneid = 11442, stoneid2 = 12244}},
["Gloom"] =	 {[1] = {level = 1, evolution = "Vileplume", count = 2, stoneid = 11441, stoneid2 = 0},
   		  [2] = {level = 1, evolution = "Bellossom", count = 1, stoneid = 11441, stoneid2 = 12242}},
}

 

e tb evolution.lua

 

if isInArray(specialevo, getPokemonName(item2.uid)) then
  if getPokemonName(item2.uid) == "Poliwhirl" then
  local evolution = 0
  local theevo = ""

  if item.itemid == water then
	 if getPlayerItemCount(cid, king) >= 1 then
		evolution = king
		theevo = "Politoed"
	 elseif getPlayerItemCount(cid, punch) >= 1 then
		evolution = punch
		theevo = "Poliwrath"
	 else
		doPlayerSendCancel(cid, "You need a water stone and a punch stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
		return true
	 end

	 minlevel = pokes[theevo].level

	 if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
	 end
	 if getPlayerItemCount(cid, punch) >= 1 and getPlayerItemCount(cid, king) >= 1 then
		doPlayerSendCancel(cid, "Please, use your Punch Stone to evolve this pokemon to a Poliwrath, or a King's Rock to a Politoed.")
		return true
	 end
	 doEvolvePokemon(cid, item2, theevo, evolution, water)

  elseif item.itemid == punch then
	 minlevel = pokes["Poliwrath"].level

	 if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
	 end
	 if getPlayerItemCount(cid, water) <= 0 then
		doPlayerSendCancel(cid, "You need at least one Punch Stone and one Water Stone to evolve this pokemon.")
		return true
	 end

	 local theevo = "Poliwrath"
	 doEvolvePokemon(cid, item2, theevo, water, punch)

  elseif item.itemid == king then
	 minlevel = pokes["Politoed"].level

	 if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
	 end
	 if getPlayerItemCount(cid, water) <= 0 then
		doPlayerSendCancel(cid, "You need at least one Punch Stone and one King's Rock to evolve this pokemon.")
		return true
	 end
	 local theevo = "Politoed"
	 doEvolvePokemon(cid, item2, theevo, water, king)
  end

 

ambos na pasta lib

o evolution é mais complicado, mas se vc ler um pouco ele vc consegue fazer ;p

boa sorte ae

Editado por Noninhouh
Link para o comentário
Compartilhar em outros sites

creio que para um pokemon evoluir para 2 vc precisa colocar nessa parte dos scripts:

configuration.lua

 

spcevo = {
["Poliwhirl"] = {[1] = {level = 1, evolution = "Poliwrath", count = 1, stoneid = 11442, stoneid2 = 11446},
   		  [2] = {level = 1, evolution = "Politoed", count = 1, stoneid = 11442, stoneid2 = 12244}},
["Gloom"] =	 {[1] = {level = 1, evolution = "Vileplume", count = 2, stoneid = 11441, stoneid2 = 0},
   		  [2] = {level = 1, evolution = "Bellossom", count = 1, stoneid = 11441, stoneid2 = 12242}},
}

 

e tb evolution.lua

 

if isInArray(specialevo, getPokemonName(item2.uid)) then
  if getPokemonName(item2.uid) == "Poliwhirl" then
  local evolution = 0
  local theevo = ""

  if item.itemid == water then
	 if getPlayerItemCount(cid, king) >= 1 then
		evolution = king
		theevo = "Politoed"
	 elseif getPlayerItemCount(cid, punch) >= 1 then
		evolution = punch
		theevo = "Poliwrath"
	 else
		doPlayerSendCancel(cid, "You need a water stone and a punch stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
		return true
	 end

	 minlevel = pokes[theevo].level

	 if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
	 end
	 if getPlayerItemCount(cid, punch) >= 1 and getPlayerItemCount(cid, king) >= 1 then
		doPlayerSendCancel(cid, "Please, use your Punch Stone to evolve this pokemon to a Poliwrath, or a King's Rock to a Politoed.")
		return true
	 end
	 doEvolvePokemon(cid, item2, theevo, evolution, water)

  elseif item.itemid == punch then
	 minlevel = pokes["Poliwrath"].level

	 if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
	 end
	 if getPlayerItemCount(cid, water) <= 0 then
		doPlayerSendCancel(cid, "You need at least one Punch Stone and one Water Stone to evolve this pokemon.")
		return true
	 end

	 local theevo = "Poliwrath"
	 doEvolvePokemon(cid, item2, theevo, water, punch)

  elseif item.itemid == king then
	 minlevel = pokes["Politoed"].level

	 if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
	 end
	 if getPlayerItemCount(cid, water) <= 0 then
		doPlayerSendCancel(cid, "You need at least one Punch Stone and one King's Rock to evolve this pokemon.")
		return true
	 end
	 local theevo = "Politoed"
	 doEvolvePokemon(cid, item2, theevo, water, king)
  end

 

ambos na pasta lib

o evolution é mais complicado, mas se vc ler um pouco ele vc consegue fazer ;p

boa sorte ae

Amigo eu sei disso,mas queria mesmo que você me passase a tag que tenho que colar no evolution.lua e aonde devo colocar!

Link para o comentário
Compartilhar em outros sites

nuss man, vc pode aprender e n ficar dependendo do xtibia sabe ¬¬

mas:

configuration.lua

 

["Poke"] = {[1] = {level = 1, evolution = "PokeEvo1", count = qts stone vai precisar, stoneid = id da stone, stoneid2 = id da stone 2 (se precisar, se n precisar coloque 0)},

[2] = {level = 1, evolution = "PokeEvo2", count = qts stones vai precisar, stoneid = id da stone, stoneid2 = id da stone 2 (se precisar, se n precisar coloque 0)}},

 

 

evolution.lua

 

 

if item.itemid == a stone que evolui pra os 2 pokes then

if getPlayerItemCount(cid, a stone so desse poke) >= 1 then

evolution = a stone so desse poke

theevo = "o poke"

elseif getPlayerItemCount(cid, a stone so do otro poke) >= 1 then

evolution = a stone so do otro poke

theevo = "o poke 2"

else

doPlayerSendCancel(cid, "A mensagem que sera enviada se ele não possuir as respectivas stones...")

return true

end

 

minlevel = pokes[theevo].level

 

if getPlayerLevel(cid) < minlevel then

doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

return true

end

if getPlayerItemCount(cid, a stone1 do primeiro poke) >= 1 and getPlayerItemCount(cid, a stone2 do primeiro poke) >= 1 then

doPlayerSendCancel(cid, "A mensagem que ele vai receber se ele usar uma stone que não tem nada aver com as duas do poke")

return true

end

doEvolvePokemon(cid, item2, theevo, evolution, a stone que é igual nos 2 pokes)

 

elseif item.itemid == punch then

minlevel = pokes["Poke1"].level

 

if getPlayerLevel(cid) < minlevel then

doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

return true

end

if getPlayerItemCount(cid, water) <= 0 then

doPlayerSendCancel(cid, "A mensagem que sera recebida se ele usar a stone errada")

return true

end

 

local theevo = "Poke1"

doEvolvePokemon(cid, item2, theevo, stone1, stone2)

 

elseif item.itemid == king then

minlevel = pokes["Poke"].level

 

if getPlayerLevel(cid) < minlevel then

doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

return true

end

if getPlayerItemCount(cid, stone1) <= 0 then

doPlayerSendCancel(cid, "A mensagem que sera recebida se ele tiver apenas a primeira stone dos 2 pokes")

return true

end

local theevo = "Poke2"

doEvolvePokemon(cid, item2, theevo, stone1, stone2)

end

 

O final fico mei bagaçado pq to com preça agr...

isso é so uma base (não testei, não sei se modifikei nos lugares certos, não sei se esta faltando lugar para modificar, e foi modificado no poke que precisa de 2 stone os 2)

Link para o comentário
Compartilhar em outros sites

Como colocar para um pokémon evoluir para 2?

R: Coloque o nome do pokemon na tabela "specialevo" que fica no configuration.lua e no evolution pegue a evolução um dos pokemons encontrados na tabela "Specialevo" como exemplo, faça uma copia para o novo pokemon e edite a gosto

 

Obs: a tabela "spcevo" não está sendo utilizada em nenhum script (olhei nos scripts do server do Slicer 1.9.1), ou seja, não adianta colocar nada nela porque não vai mudar nada [TALVEZ ELA SEJA UTILIZADA POR ALGO NAS SOURCES, POREM, MESMO CONFIGURANDO O POKE PARA EVOLUIR NELA, ELE NÃO IRA EVOLUIR]

 

Como fazer evolução por sexo?

R: Mesma coisa do caso acima, só colocar algo como um "if" para mudar a evolução dependendo do sexo [Caso ele evolua para as 2 evoluções usando as mesmas stones]

 

Como colocar Berry System?

R: Para colocar uma coisa você precisa ter ela não? Bem caso tenha, poste-o para que eu possa ajuda-lo (Se não tiver deveria ter colocado algo como "Pedido Berry System" e não "Como colocar Berry System?"

 

Oque o usuário Noninhouh disse está certo porém, está errado a parte do "spcevo" não é para mudar ali e sim na "specialevo"

Link para o comentário
Compartilhar em outros sites

  • 1 month later...
local special = specialevo

local types = {
[leaf] = {"Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute", "Chikorita", "Bayleef", "Hoppip", "Skiploom", "Sunkern", "Treecko", "Grovyle", "Seedot", "Nuzleaf", "Shroomish", "Lotad", "Lombre", "Budew", "Cacnea", "Roselia", "Snivy", "Servine"},
[water] = {"Squirtle", "Wartortle", "Horsea", "Goldeen", "Shellder", "Magikarp", "sell", "Psyduck", "Poliwag", "Poliwhirl", "Tentacool", "Krabby", "Staryu", "Eevee", "Shiny Tentacool", "Shiny Krabby", "Totodile", "Croconow", "Chinchou", "Marill", "Wooper", "Slowpoke", "Remoraid", "Barboach", "Oshawott", "Dewott", "Clamperl female", "Clamperl male", "Corphish", "Lotad", "Lombre", "Spheal", "Sealeo", "Wingull", "Feebas", "Wailmer", "Marshtomp", "Mudkip", "Azurill"},
[venom] = {"Zubat", "Ekans", "Nidoran male", "Nidoran female", "Nidorino", "Nidorina", "Gloom", "Venonat", "Tentacool", "Grimer", "Koffing", "Shiny Zubat", "Shiny Grimer", "Spinarak", "Golbat", "Gulpin", "Surskit", "Cascoon"},
[thunder] = {"Magnemite", "Pikachu", "Voltorb", "Eevee", "Chinchou", "Pichu", "Mareep", "Flaaffy", "Elekid", "Shiny Voltorb", "Shiny Elekid", "Electrike"},
[rock] = {"Geodude", "Graveler", "Rhyhorn", "Kabuto", "Slugma", "Pupitar", "Omanyte", "Larvitar", "Anorith", "Aron", "Lileep", "Nosepass"},
[punch] = {"Machop", "Machoke", "Mankey", "Poliwhirl", "Tyrogue", "Combusken", "Shroomish", "Kirlia male", "Meditite", "Makuhita", "Croconaw"},
[fire] = {"Charmander", "Charmeleon", "Vulpix", "Growlithe", "Ponyta", "Eevee", "Cyndaquil", "Quilava", "Slugma", "Houndour", "Magby", "Tepig", "Pignite", "Numel", "Combusken", "Torchic"},
[coccon] = {"Caterpie", "Metapod", "Weedle", "Kakuna", "Paras", "Venonat", "Scyther", "Shiny Venonat", "Shiny Paras", "Ledyba", "Spinarak", "Pineco", "Anorith", "Nincada", "Ninjask", "Silcoon", "Cascoon"},
[crystal] = {"Dratini", "Dragonair", "Magikarp", "Bagon", "Shelgon", "Seadra", "Trapinch", "Vibrava", "Swablu"},
[dark] = {"Gastly", "Haunter", "Eevee", "Houndour", "Pupitar", "Cacnea", "Corphish", "Duskull", "Dusclops", "Dusclops", "Nuzleaf", "Shuppet", "Snorunt female", "Snorunt male", "Carvanha", "Zorua"},
[earth] = {"Cubone", "Sandshrew", "Nidorino", "Shiny Cubone", "Diglett", "Onix", "Rhyhorn", "Wooper", "Swinub", "Phanpy", "Larvitar", "Barboach", "Trapinch", "Vibrava", "Numel", "Marshtomp", "Baltoy"},
[enigma] = {"Abra", "Kadabra", "Psyduck", "Slowpoke", "Drowzee", "Eevee", "Natu", "Smoochum", "Exeggcute", "Staryu", "Hoothoot", "Togepi", "Chingling", "Meditite", "Ralts female", "Ralts male", "Kirlia male", "Kirlia female", "Spoink", "Beldum", "Metang", "Baltoy", "Wynaut"},
[heart] = {"Rattata", "Pidgey", "Pidgeotto", "Spearow", "Clefairy", "Jigglypuff", "Meowth", "Doduo", "Clamperl male", "Chansey", "Sentret", "Hoothoot", "Cleffa", "Igglybuff", "Togepi", "Snubull", "Teddiursa", "Skitty", "Slakoth", "Vigoroth", "Taillow", "Whismur", "Loudred", "Zigzagoon"},
[ice] = {"Seel", "Shellder", "Smoochum", "Swinub" ,"Nidorina", "Spheal", "Sealeo", "Snorunt male", "Snorunt male"},
[king] = {"Slowpoke", "Poliwhirl", "Slowpoke", "Wailmer"},
[metalstone] = {"Magneton", "Pineco", "Aron", "Lairon", "Nosepass"},
[dragon] = {"Dragonair", "Shiny Horsea", "Shiny Dratini", "Shiny Dragonair", "Bagon", "Shelgon", "Seadra", "Swablu"},
[upgrade] = {"Porygon"},
[sun] = {"Sunkern", "Gloom"},
[metalcoat] = {"Scyther", "Onix", "Beldum", "Metang"},
[magma] = {"Magby"},
[ancientstone] = {"Omanyte", "Kabuto", "Shiny Rattata", "Shiny Zubat", "Shiny Paras", "Shiny Venonat", "Shiny Growlithe", "Shiny Tentacool", "Shiny Grimer", "Shiny Krabby", "Shiny Voltorb", "Shiny Cubone", "Shiny Horsea", "Shiny Dratini", "Shiny Dragonair", "Shiny Elekid", "Togepi", "Elekid", "Magby", "Pupitar", "Porygon", "Chansey", "Roselia", "Dusclops", "Lileep", "Magneton", "Feebas", "Zorua"},
[SootheBell] = {"Pichu", "Cleffa", "Igglybuff", "Togepi", "Smoochum", "Wynaut", "Budew", "Chingling", "Kirlia female", "Azurill"},

}

function onUse(cid, item, frompos, item2, topos)

	local pokeball = getPlayerSlotItem(cid, 8)

	if not isMonster(item2.uid) or not isSummon(item2.uid) then
	return true
	end

	if getCreatureCondition(item2.uid, CONDITION_INVISIBLE) then return true end

	local pevo = poevo[getCreatureName(item2.uid)]

	if not isInArray(specialevo, getCreatureName(item2.uid)) then

		if not pevo then
			doPlayerSendCancel(cid, "This pokemon can't evolve.")
		return true
		end

		if pevo.level ~= 1 and not allEvolutionsCanBeInduzedByStone then
			doPlayerSendCancel(cid, "This pokemon doesn't evolve using stones.")
		return true
		end

		if not isPlayer(getCreatureMaster(item2.uid)) or getCreatureMaster(item2.uid) ~= cid then
			doPlayerSendCancel(cid, "You can only use stones on pokemons you own.")
		return true
		end

		if pevo.stoneid ~= item.itemid and pevo.stoneid2 ~= item.itemid then 
			doPlayerSendCancel(cid, "This isn't the needed stone to evolve this pokemon.")
		return true
		end

	end

	local minlevel = 0


if getPokemonName(item2.uid) == "Eevee" then

		local eevee = ""

		if item.itemid == thunder then
			eevee = "Jolteon"
		elseif item.itemid == water then
			eevee = "Vaporeon"
		elseif item.itemid == fire then
			eevee = "Flareon"
		elseif item.itemid == enigma and allEvolutionsCanBeInduzedByStone then
			eevee = "Espeon"
		elseif item.itemid == dark and allEvolutionsCanBeInduzedByStone then
			eevee = "Umbreon"
		else
			doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")
			return true
		end

		minlevel = pokes[eevee].level

		if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
		end

		if getPokemonLevel(item2.uid) < 20 then
		return doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")
		end

		doRemoveItem(item.uid, 1)

		doEvolvePokemon(cid, item2, eevee, 0, 0)

return true
end

if getPokemonName(item2.uid) == "Shiny Eevee" then

		local eevee = ""

		if item.itemid == sthunder then
			eevee = "Shiny Jolteon"
		elseif item.itemid == swater then
			eevee = "Shiny Vaporeon"
		elseif item.itemid == sfire then
			eevee = "Shiny Flareon"
		else
			doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")
			return true
		end

		minlevel = pokes[eevee].level

		if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
		end

		if getPokemonLevel(item2.uid) < 20 then
		return doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")
		end

		doRemoveItem(item.uid, 1)

		doEvolvePokemon(cid, item2, eevee, 0, 0)

return true
end


if isInArray(specialevo, getPokemonName(item2.uid)) then

	if getPokemonName(item2.uid) == "Poliwhirl" then

		local evolution = 0
		local theevo = ""
		local nlevel = 45

		if item.itemid == water then

			if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, king) >= 1 then
				evolution = king
				theevo = "Politoed"
			elseif getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then
				evolution = punch
				theevo = "Poliwrath"
			else
				if getPokemonLevel(item2.uid) < 36 then
				doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
				return true
				end
				if allEvolutionsCanBeInduzedByStone then
					if getPlayerItemCount(cid, king) <= 0 and getPlayerItemCount(cid, punch) <= 0 then
						doPlayerSendCancel(cid, "You need a water stone and a punch stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
					return true
					end
				else
					if getPlayerItemCount(cid, king) <= 0 then
						doPlayerSendCancel(cid, "You need a Water Stone and a King's Rock to evolve this pokemon to a Politoed.")
					return true
					end
				end
			end

			minlevel = pokes[theevo].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if theevo == "Poliwrath" and getPokemonLevel(item2.uid) < 36 then
				doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
			return true
			end

			if getPlayerItemCount(cid, punch) >= 1 and getPlayerItemCount(cid, king) >= 1 and allEvolutionsCanBeInduzedByStone then
				doPlayerSendCancel(cid, "Please, use your Punch Stone to evolve this pokemon to a Poliwrath, or a King's Rock to a Politoed.")
			return true
			end

			if evolution == 0 then
				if allEvolutionsCanBeInduzedByStone then
					doPlayerSendCancel(cid, "You need at least one Water Stone, and a Punch Stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
				else
					doPlayerSendCancel(cid, "You need at least one Water Stone and a King's Rock to evolve this pokemon.")
				end
			return true
			end

			if evolution ~= 0 then
			doEvolvePokemon(cid, item2, theevo, evolution, water)
			return true
			end

		elseif item.itemid == punch then

			minlevel = pokes["Poliwrath"].level

			if not allEvolutionsCanBeInduzedByStone then
				doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
			return true
			end

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if getPokemonLevel(item2.uid) < 36 then
			doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (45).")
			return true
			end

			if getPlayerItemCount(cid, water) <= 0 then
			doPlayerSendCancel(cid, "You need at least one Punch Stone and one Water Stone to evolve this pokemon.")
			return true
			end

			local theevo = "Poliwrath"
			doEvolvePokemon(cid, item2, theevo, water, punch)
	
		elseif item.itemid == king then

			minlevel = pokes["Politoed"].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if getPlayerItemCount(cid, water) <= 0 then
			doPlayerSendCancel(cid, "You need at least one Punch Stone and one King's Rock to evolve this pokemon.")
			return true
			end

			local theevo = "Politoed"
			doEvolvePokemon(cid, item2, theevo, water, king)
		end

     elseif getPokemonName(item2.uid) == "Shiny Poliwhirl" then

		local evolution = 0
		local theevo = ""
		local nlevel = 45

		if item.itemid == swater then

			if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then
				evolution = spunch
				theevo = "Shiny Poliwrath"
			else
				if getPokemonLevel(item2.uid) < 36 then
				doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
				return true
				end
				if allEvolutionsCanBeInduzedByStone then
					if getPlayerItemCount(cid, punch) <= 0 then
						doPlayerSendCancel(cid, "You need a shining water stone and a shining punch stone Shiny Poliwrath to evolve this pokemon.")
					return true
					end
				else
					
				end
			end

			minlevel = pokes[theevo].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if theevo == "Shiny Poliwrath" and getPokemonLevel(item2.uid) < 36 then
				doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
			return true
			end

			if getPlayerItemCount(cid, spunch) >= 1 and allEvolutionsCanBeInduzedByStone then
				doPlayerSendCancel(cid, "Please, use your shining Punch Stone to evolve this pokemon to a Poliwrath.")
			return true
			end

			if evolution == 0 then
				if allEvolutionsCanBeInduzedByStone then
					doPlayerSendCancel(cid, "You need at least one shining Water Stone and a shining Punch Stone ,Shiny Poliwrath to evolve this pokemon.")
				else
					doPlayerSendCancel(cid, "You need at least one shining Water Stone evolve this pokemon.")
				end
			return true
			end

			if evolution ~= 0 then
			doEvolvePokemon(cid, item2, theevo, evolution, swater)
			return true
			end

		elseif item.itemid == spunch then

			minlevel = pokes["Shiny Poliwrath"].level

			if not allEvolutionsCanBeInduzedByStone then
				doPlayerSendCancel(cid, "This is not the required shining stone to evolve this pokemon.")
			return true
			end

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if getPokemonLevel(item2.uid) < 36 then
			doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (45).")
			return true
			end

			if getPlayerItemCount(cid, swater) <= 0 then
			doPlayerSendCancel(cid, "You need at least one shining Punch Stone and one shining Water Stone to evolve this pokemon.")
			return true
			end

			local theevo = "Shiny Poliwrath"
			doEvolvePokemon(cid, item2, theevo, swater, spunch)
		
		end

	elseif getPokemonName(item2.uid) == "Gloom" then

		if getPokemonLevel(item2.uid) < 31 then
		doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (31).")
		return true
		end

	if item.itemid == leaf then

		local theevo = ""
		local evolution = 0

			if getPlayerItemCount(cid, venom) >= 1 and getPlayerItemCount(cid, sun) >= 1 then
			doPlayerSendCancel(cid, "Please, use your Venom Stone to evolve this pokemon to a Vileplume, or a Sun Stone to a Bellossom.")
			return true
			end

			if getPlayerItemCount(cid, venom) <= 0 and getPlayerItemCount(cid, sun) <= 0 then
			doPlayerSendCancel(cid, "You need at least one Leaf Stone, and a Sun Stone (Bellossom) or a Venom Stone (Vileplume) to evolve this pokemon.")
			return true
			end

			if getPlayerItemCount(cid, venom) >= 1 then
			theevo = "Vileplume"
			evolution = venom
			elseif getPlayerItemCount(cid, sun) >= 1 then
			theevo = "Bellossom"
			evolution = sun
			end

			minlevel = pokes[theevo].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			doEvolvePokemon(cid, item2, theevo, evolution, leaf)

		elseif item.itemid == venom then

			minlevel = pokes["Vileplume"].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if getPlayerItemCount(cid, leaf) <= 0 then
			doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Venom Stone to evolve this pokemon.")
			return true
			end

			doEvolvePokemon(cid, item2, "Vileplume", venom, leaf)

		elseif item.itemid == sun then

			minlevel = pokes["Bellossom"].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if getPlayerItemCount(cid, leaf) <= 0 then
			doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Sun Stone to evolve this pokemon.")
			return true
			end

			doEvolvePokemon(cid, item2, "Bellossom", sun, leaf)
		end

      elseif getPokemonName(item2.uid) == "Shiny Gloom" then

		if getPokemonLevel(item2.uid) < 31 then
		doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (31).")
		return true
		end

	if item.itemid == sleaf then

		local theevo = ""
		local evolution = 0

			if getPlayerItemCount(cid, svenom) >= 1 then
			doPlayerSendCancel(cid, "Please, use your shining Venom Stone to evolve this pokemon to a Shiny Vileplume.")
			return true
			end

			if getPlayerItemCount(cid, svenom) <= 0 then
			doPlayerSendCancel(cid, "You need at least one shining Leaf Stone or a shining Venom Stone (Shiny Vileplume) to evolve this pokemon.")
			return true
			end

			if getPlayerItemCount(cid, svenom) >= 1 then
			theevo = "Shiny Vileplume"
			evolution = svenom
			end

			minlevel = pokes[theevo].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			doEvolvePokemon(cid, item2, theevo, evolution, sleaf)

		elseif item.itemid == svenom then

			minlevel = pokes["Shiny Vileplume"].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			if getPlayerItemCount(cid, sleaf) <= 0 then
			doPlayerSendCancel(cid, "You need at least one Leaf Stone and one shining Venom Stone to evolve this pokemon.")
			return true
			end

			doEvolvePokemon(cid, item2, "Shiny Vileplume", svenom, sleaf)

		end

	elseif getPokemonName(item2.uid) == "Slowpoke" then

		if getPokemonLevel(item2.uid) < 28 then
		doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")
		return true
		end

		if item.itemid == enigma then

			if not allEvolutionsCanBeInduzedByStone then
				doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
			return true
			end

			minlevel = pokes["Slowbro"].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			doEvolvePokemon(cid, item2, "Slowbro", enigma, 0)

		elseif item.itemid == king then

			minlevel = pokes["Slowking"].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			doEvolvePokemon(cid, item2, "Slowking", king, 0)
		end


elseif getPokemonName(item2.uid) == "Shiny Slowpoke" then

		if getPokemonLevel(item2.uid) < 28 then
		doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")
		return true
		end

		if item.itemid == senigma then

			if not allEvolutionsCanBeInduzedByStone then
				doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
			return true
			end

			minlevel = pokes["Shiny Slowbro"].level

			if getPlayerLevel(cid) < minlevel then
			doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
			return true
			end

			doEvolvePokemon(cid, item2, "Shiny Slowbro", senigma, 0)

		end


	elseif getPokemonName(item2.uid) == "Tyrogue" then

		if getPokemonLevel(item2.uid) < 20 then
		doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")
		return true
		end

		if not allEvolutionsCanBeInduzedByStone then
			doPlayerSendCancel(cid, "This pokemon doesn't evolve using stones.")
		return true
		end

		local evolution = ""

		if getOffense(item2.uid) == getDefense(item2.uid) then
			evolution = "Hitmontop"
		elseif getOffense(item2.uid) > getDefense(item2.uid) then
			evolution = "Hitmonlee"
		else
			evolution = "Hitmonchan"
		end

		minlevel = pokes[evolution].level

		if getPlayerLevel(cid) < minlevel then
		doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
		return true
		end

		doEvolvePokemon(cid, item2, evolution, punch, 0)
	end

return true
end

local count = poevo[getPokemonName(item2.uid)].count
local stnid = poevo[getPokemonName(item2.uid)].stoneid
local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2
local evo = poevo[getPokemonName(item2.uid)].evolution
local nlevel = poevo[getPokemonName(item2.uid)].level

local count = poevo[getPokemonName(item2.uid)].count
local stnid = poevo[getPokemonName(item2.uid)].stoneid
local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2
local evo = poevo[getPokemonName(item2.uid)].evolution
local nlevel = poevo[getPokemonName(item2.uid)].level


if stnid2 > 1 and (getPlayerItemCount(cid, stnid2) < count or getPlayerItemCount(cid, stnid) < count) then
doPlayerSendCancel(cid, "You need at least one "..getItemNameById(stnid).." and one "..getItemNameById(stnid2).." to evolve this pokemon!")
return true
end

if getPlayerItemCount(cid, stnid) < count then
local str = ""
	if count >= 2 then
	str = "s"
	end
return doPlayerSendCancel(cid, "You need at least "..count.." "..getItemNameById(stnid)..""..str.." to evolve this pokemon!")
end

minlevel = pokes[evo].level

if getPlayerLevel(cid) < minlevel and evolutionByStoneRequireLevel then
doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
return true
end

if getPokemonLevel(item2.uid) < nlevel and evolutionByStoneRequireLevel then
doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve ("..nlevel..").")
return true
end

if count >= 2 then
stnid2 = stnid
end

doEvolvePokemon(cid, item2, evo, stnid, stnid2)

return TRUE
end

alguem sabe como adiciona uma nova evolução especial ?sm dar erro ? Wurmple virar Silcoon se usar coccon e heart stones, ou virar Cascoon se usar coccon e venom stone obr ja tentei de tudo

Link para o comentário
Compartilhar em outros sites

  • 2 weeks later...
  • 4 years later...
A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.
Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.
×
×
  • Criar Novo...