Diga em poucas palavras a base utilizada (Nome do servidor ou nome do website).
 
	Ex. TFS 1.3;
 
	Base: 
 
	Tfs 0.4
 
	 
 
	Qual erro está surgindo/O que você procura?
 
	quando evolui nao desconta stone
 
	 
 
	Você tem o código disponível? Se tiver publique-o aqui:
 
	local special = specialevo                  --alterado v1.9 \/ peguem ele todo!
 
	local types = { 
	[leaf] = {"Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute", "Chikorita", "Bayleef", "Hoppip", "Skiploom", "Sunkern"}, 
	[water] = {"Squirtle", "Wartortle", "Horsea", "Goldeen", "Magikarp", "Psyduck", "Poliwag", "Poliwhirl", "Tentacool", "Krabby", "Staryu", "Omanyte", "Eevee", "Totodile", "Croconow", "Chinchou", "Marill", "Wooper", "Slowpoke", "Remoraid", "Seadra"}, 
	[venom] = {"Zubat", "Ekans", "Nidoran male", "Nidoran female", "Nidorino", "Nidorina", "Gloom", "Venonat", "Tentacool", "Grimer", "Koffing", "Spinarak", "Golbat"}, 
	[thunder] = {"Magnemite", "Pikachu", "Voltorb", "Eevee", "Chinchou", "Pichu", "Mareep", "Flaaffy", "Elekid"}, 
	[rock] = {"Geodude", "Graveler", "Rhyhorn", "Kabuto", "Slugma", "Pupitar"}, 
	[punch] = {"Machop", "Machoke", "Mankey", "Poliwhirl", "Tyrogue"}, 
	[fire] = {"Charmander", "Charmeleon", "Vulpix", "Growlithe", "Ponyta", "Eevee", "Cyndaquil", "Quilava", "Slugma", "Houndour", "Magby"}, 
	[coccon] = {"Caterpie", "Metapod", "Weedle", "Kakuna", "Paras", "Venonat", "Scyther", "Ledyba", "Spinarak", "Pineco"}, 
	[crystal] = {"Dratini", "Dragonair", "Magikarp", "Omanyte", "Kabuto", "Seadra"}, 
	[dark] = {"Gastly", "Haunter", "Eevee", "Houndour", "Pupitar"}, 
	[earth] = {"Cubone", "Sandshrew", "Nidorino", "Nidorina", "Diglett", "Onix", "Rhyhorn", "Wooper", "Swinub", "Phanpy", "Larvitar"}, 
	[enigma] = {"Abra", "Kadabra", "Psyduck", "Slowpoke", "Drowzee", "Eevee", "Natu", "Smoochum"}, 
	[heart] = {"Rattata", "Pidgey", "Pidgeotto", "Spearow", "Clefairy", "Jigglypuff", "Meowth", "Doduo", "Porygon", "Chansey", "Sentret", "Hoothoot", "Cleffa", "Igglybuff", "Togepi", "Snubull", "Teddiursa"}, 
	[ice] = {"Seel", "Shellder", "Smoochum", "Swinub"}, 
	[metal] = {"Onix", "Scyther"}, 
	[ancient] = {"Sunkern", "Gloom", "Slowpoke", "Poliwhirl", "Seadra", "Porygon"}, 
	[sfire] = {"Shiny Charmander", "Shiny Charmeleon", "Shiny Magmortar", "Shiny Vulpix", "Shiny Growlithe", "Shiny Ponyta", "Shiny Eevee"}, 
	[swater] = {"Shiny Squirtle", "Shiny Wartortle", "Shiny Horsea", "Shiny Goldeen", "Shiny Magikarp", "Shiny Psyduck", "Shiny Poliwag", "Shiny Poliwhirl", "Shiny Tentacool", "Shiny Krabby", "Shiny Staryu", "Shiny Omanyte", "Shiny Eevee"}, 
	[sleaf] = {"Shiny Bulbasaur", "Shiny Ivysaur", "Shiny Oddish", "Shiny Gloom", "Shiny Bellsprout", "Shiny Weepinbell", "Shiny Exeggcute"}, 
	[sheart] = {"Shiny Rattata", "Shiny Pidgey", "Shiny Pidgeotto", "Shiny Spearow", "Shiny Clefairy", "Shiny Jigglypuff", "Shiny Meowth", "Shiny Doduo", "Shiny Porygon", "Shiny Chansey"}, 
	[senigma] = {"Shiny Abra", "Shiny Kadabra", "Shiny Psyduck", "Shiny Slowpoke", "Shiny Drowzee", "Shiny Eevee"}, 
	[srock] = {"Shiny Geodude", "Shiny Graveler", "Shiny Rhyhorn", "Shiny Kabuto"}, 
	[svenom] = {"Shiny Zubat", "Shiny Ekans", "Shiny Nidoran male", "Shiny Nidoran female", "Shiny Nidorino", "Shiny Nidorina", "Shiny Gloom", "Shiny Venonat", "Shiny Tentacool", "Shiny Grimer", "Shiny Koffing"}, 
	[sice] = {"Shiny Seel", "Shiny Shellder"}, 
	[sthunder] = {"Shiny Magnemite", "Shiny Pikachu", "Shiny electivire", "Shiny Voltorb", "Shiny Eevee"}, 
	[scrystal] = {"Shiny Dratini", "Shiny Dragonair", "Shiny Magikarp", "Shiny Omanyte", "Shiny Kabuto"}, 
	[scoccon] = {"Shiny Caterpie", "Shiny Metapod", "Shiny Weedle", "Shiny Kakuna", "Shiny Paras", "Shiny Venonat", "Shiny Scyther"}, 
	[sdarkness] = {"Shiny Gastly", "Shiny Haunter", "Shiny Eevee"}, 
	[spunch] = {"Shiny Machop", "Shiny Machoke", "Shiny Mankey", "Shiny Poliwhirl"}, 
	[searth] = {"Shiny Cubone", "Shiny Sandshrew", "Shiny Nidorino", "Shiny Nidorina", "Shiny Diglett", "Shiny Onix", "Shiny Rhyhorn"}
 
	}
 
	local specEvos = {   --alterado v1.9 \/ 
	["Eevee"] = { 
	               [thunder] = "Jolteon", 
	               [water] = "Vaporeon", 
	               [fire] = "Flareon", 
	               [enigma] = "Espeon", 
	               [dark] = "Umbreon", 
	            }, 
	}
 
	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 #getCreatureSummons(cid) > 1 then 
	   return true                           --alterado v1.9 
	end
 
	if isInArray({"ditto", "shiny ditto"}, getItemAttribute(pokeball.uid, "poke"):lower()) then 
	   doSendMsg(cid, "Ditto não tem evolução.") 
	   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 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 = specEvos["Eevee"][item.itemid] 
	   if not eevee then 
	      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
 
	   doRemoveItem(item.uid, 1) 
	   doEvolvePokemon(cid, item2, eevee, 0, 0) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no") 
	   return true 
	end
 
	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, earth) >= 1 then 
	            evolution = earth 
	            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 earth stone (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, earth) >= 1 then 
	            doPlayerSendCancel(cid, "Please, use your Punch Stone to evolve this pokemon to a Poliwrath, or a earth stone to a Politoed.") 
	            return true 
	         end 
	         doEvolvePokemon(cid, item2, theevo, evolution, water) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doTransformItem(ball, pokeballs[theevo:lower()].use)
 
	      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) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no") 
	              doItemSetAttribute(ball, "Icone", "yes")     
	              doTransformItem(ball, pokeballs[theevo:lower()].use) 
	     
	      elseif item.itemid == earth 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 earth stone to evolve this pokemon.") 
	            return true 
	         end 
	         local theevo = "Politoed" 
	         doEvolvePokemon(cid, item2, theevo, water, earth) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no") 
	      end
 
	    elseif getPokemonName(item2.uid) == "Gloom" then 
	       local theevo = "" 
	       local evolution = 0 
	       if item.itemid == leaf or item.itemid == venom then 
	          if getPlayerItemCount(cid, leaf) >= 1 and getPlayerItemCount(cid, venom) >= 1 then 
	             theevo = "Vileplume" 
	             evolution = venom 
	          elseif getPlayerItemCount(cid, leaf) >= 2 then 
	             theevo = "Bellossom" 
	             evolution = leaf 
	          else 
	             doPlayerSendCancel(cid, "You need at least one Leaf Stone, and a Sun Stone (Bellossom) or a 2 Leaf Stone (Vileplume) 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, venom) >= 1 and getPlayerItemCount(cid, sun) >= 1 then 
	             doPlayerSendCancel(cid, "Please, use your Leaf Stone to evolve this pokemon to a Vileplume, or a Sun Stone to a Bellossom.") 
	             return true 
	          end 
	           
	          doEvolvePokemon(cid, item2, theevo, evolution, leaf) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no")
 
	       elseif item.itemid == leaf or 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 or getPlayerItemCount(cid, venom) <= 0 then 
	             doPlayerSendCancel(cid, "You need at least 1 Leaf Stone and 1 Venom stone to evolve this pokemon.") 
	             return true 
	          end 
	          doEvolvePokemon(cid, item2, "Vileplume", leaf, venom) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no") 
	           
	       elseif item.itemid == leaf 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 2 Leaf Stone and one Sun Stone to evolve this pokemon.") 
	             return true 
	          end 
	           doEvolvePokemon(cid, item2, "Bellossom", sun, leaf) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no") 
	       end 
	        
	    elseif getPokemonName(item2.uid) == "Slowpoke" then 
	       if item.itemid == enigma then 
	          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) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no")
 
	        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) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no") 
	        end
 
	    elseif getPokemonName(item2.uid) == "Tyrogue" then 
	        local evolution = ""
 
	        evolution = choose("Hitmonlee", "Hitmonchan", "Hitmontop") 
	        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) 
	           local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no") 
	    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
 
	    if not pokes[evo] then 
	       doSendMsg(cid, "Este pokemon nao existe.") 
	       print(">>>>>>EVO BUG: " .. evo) 
	       return true 
	    end
 
	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 then 
	   doPlayerSendCancel(cid, "Você não possui level necessario para evoluir esse pokemon ("..minlevel..").") 
	   return true 
	end
 
	 
	              doEvolvePokemon(cid, item2, evo, stnid, stnid2, count) 
	              local ball = getPlayerSlotItem(cid, 8).uid 
	              doItemEraseAttribute(ball, "boost")     
	              doItemSetAttribute(ball, "morta", "no")
 
	return TRUE 
	end
 
	 
 
	Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui.