Tipo do script: Pokemon Inicial

Protocolo (versão do Tibia):8.54

Servidor utilizado:tfs 0.3.6

Nível de experiência: Nao sei '-'

Adicionais/Informações:

Gente eu criei um script pra adiciona mais 3 pokemons iniciais queria saber se ele estah certo:

-- annihilator chests

function onUse(cid, item, frompos, item2, topos)
  		local hp = 800 
  	if item.uid == 2222 then
  		queststatus = getPlayerStorageValue(cid,8749)
  		if queststatus == -1 then
  			doPlayerSendTextMessage(cid,22,"Charmander.")
  		local ball1 = doPlayerAddItem(cid,2527,1)
  		   			doPlayerAddItem(cid,2160,1)
  		   						doPlayerAddItem(cid,2149,50)
  		doItemSetAttribute(ball1, "aid", hp)
       setPlayerStorageValue(cid,8749,1)
  		else
  			doPlayerSendTextMessage(cid,22,"Voce ja pegou seu pokemon.")
  		end
  	elseif item.uid == 6666 then
  		queststatus = getPlayerStorageValue(cid,8749)
  		if queststatus == -1 then
  			doPlayerSendTextMessage(cid,22,"Bulbasaur.")
  			doPlayerAddItem(cid,2149,50)
  			doPlayerAddItem(cid,2160,1)
  		local ball2 =	doPlayerAddItem(cid,2526,1)
  		   		doItemSetAttribute(ball2, "aid", hp)
  			setPlayerStorageValue(cid,8749,1)
  		else
  			doPlayerSendTextMessage(cid,22,"Voce ja pegou seu pokemon.")
  		end
  	elseif item.uid == 7777 then
   		queststatus = getPlayerStorageValue(cid,8749)
  		if queststatus == -1 then
  			doPlayerSendTextMessage(cid,22,"Squirtle.")
  		local ball3 = 	doPlayerAddItem(cid,2522,1)
  		   			doPlayerAddItem(cid,2160,1)
  		   						doPlayerAddItem(cid,2149,50)
  		   		doItemSetAttribute(ball3, "aid", hp)
  			setPlayerStorageValue(cid,8749,1)
  		else
  			doPlayerSendTextMessage(cid,22,"Voce ja pegou seu pokemon.")
  		end
      elseif item.uid == 2473 then
   		queststatus = getPlayerStorageValue(cid,8749)
  		if queststatus == -1 then
  			doPlayerSendTextMessage(cid,22,"Cyndaquil.")
  		local ball4 = 	doPlayerAddItem(cid,2477,1)
  		   			doPlayerAddItem(cid,2160,1)
  		   						doPlayerAddItem(cid,2149,50)
  		   		doItemSetAttribute(ball4, "aid", hp)
  			setPlayerStorageValue(cid,8749,1)
  		else
  			doPlayerSendTextMessage(cid,22,"Voce ja pegou seu pokemon.")
  		end

      elseif item.uid == 2474 then
   		queststatus = getPlayerStorageValue(cid,8749)
  		if queststatus == -1 then
  			doPlayerSendTextMessage(cid,22,"Chikorita.")
  		local ball5 = 	doPlayerAddItem(cid,2474,1)
  		   			doPlayerAddItem(cid,2160,1)
  		   						doPlayerAddItem(cid,2149,50)
  		   		doItemSetAttribute(ball5, "aid", hp)
  			setPlayerStorageValue(cid,8749,1)
  		else
  			doPlayerSendTextMessage(cid,22,"Voce ja pegou seu pokemon.")
  		end
      elseif item.uid == 2475 then
   		queststatus = getPlayerStorageValue(cid,8749)
  		if queststatus == -1 then
  			doPlayerSendTextMessage(cid,22,"Totodile.")
  		local ball6 = 	doPlayerAddItem(cid,2475,1)
  		   			doPlayerAddItem(cid,2160,1)
  		   						doPlayerAddItem(cid,2149,50)
  		   		doItemSetAttribute(ball6, "aid", hp)
  			setPlayerStorageValue(cid,8749,1)
  		else
  			doPlayerSendTextMessage(cid,22,"Voce ja pegou seu pokemon.")
  		end


else
	return 0
  	end

  	return 1
end

Eu testei ele e parece ter dado certo mas quando eu clico pro pokemon sai da pokebola ele nao sai, no caso o squirtle, charmander e bulba tao pegando soh os novos que eu add que nao funciona...

Um mlk no msn falo que tinha q cria o item eu criei mas n sei se o id que peguei eh o culpado por n pegar ajuda eu plzzz..

Se o script tiver errado alguem me manda 1 certo?

aki Mudar poke inicial

dica: da uma procurada no forum antes de fazer um pedido, o post é meu, se ajudei, de Rep+

Bye