Ok, agora vc tem que ir em PastaDoSeuOt/data/action e postar o script do rattata.lua

ta aki

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

if getPlayerStorageValue(cid, 15215) <= 0 then

doPlayerAddItem(cid, 7884, 1)

doPlayerAddItem(cid, 7885, 1)

doPlayerAddItem(cid, 7886, 1)

doPlayerAddItem(cid, 7891, 1)

doPlayerAddItem(cid, 8777, 100)

doPlayerAddExp(cid, 1847300)

addVipDays(cid, 30)

doPlayerSendTextMessage(cid, 20,"Bem vindo ao Pokemon Xtreme!")

setPlayerStorageValue(cid, 15215, 1)

local rat = {x=1031,y=1010,z=5}

local cat = {x=1029,y=1010,z=5}

local wee = {x=1027,y=1010,z=5}

local pox = getTownTemplePosition(1)

local health = 325

local maxhealth = 325

local description = "Contains a Rattata."

local poke1 = "This is Rattata's pokeball. HP = ["..health.."/"..maxhealth.."]"

item = doCreateItemEx(2219)

doItemSetAttribute(item, "poke", poke1)

doItemSetAttribute(item, "nome", "Rattata")

doItemSetAttribute(item, "apelido", "Rattata")

doItemSetAttribute(item, "description", description)

doPlayerAddItemEx(cid, item, true)

doTransformItem(item, 2222)

doPlayerSendTextMessage(cid, 27, "You got your first pokemon! Here is some experience to help you on your way.")

doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")

doPlayerAddExp(cid, 800)

doTeleportThing(cid, pox)

doPlayerAddItem(cid, 2152, 30)

doSendMagicEffect(pox, 21)

doPlayerAddSoul(cid, 1)

setPlayerStorageValue(cid, 54842, "Rattata, ")

return TRUE

else

doPlayerSendTextMessage(cid, 20, "Você já pegou seu pokemon")

end

end

eu tentei fazer o q o doughell falou mais ai qnd eu tento colocar a pokebola no lugar fala q não pode colocar o objeto nakele lugar

Eu nunca tive vontade de mecher com algo de pokemon, entao nao posso lhe ajudar,

Mais com essas informações que tu passou, alguem ja tenha mechido podera ajuda-lo facilmente.

Aew gente consegui é so fazer o que o Doughell falou

por exemplo

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

  if getPlayerStorageValue(cid, 15215) <= 0 then


	doPlayerAddItem(cid, 7884, 1)

	doPlayerAddItem(cid, 7885, 1)

	doPlayerAddItem(cid, 7886, 1)

	doPlayerAddItem(cid, 7891, 1)

	doPlayerAddItem(cid, 8777, 100)

	doPlayerAddExp(cid, 1847300)

	addVipDays(cid, 30)


	doPlayerSendTextMessage(cid, 20,"Bem vindo ao Pokemon Xtreme!")


	setPlayerStorageValue(cid, 15215, 1)

	local rat = {x=1031,y=1010,z=5}

	local cat = {x=1029,y=1010,z=5}

	local wee = {x=1027,y=1010,z=5}

	local pox = getTownTemplePosition(1)

	local health = 1200

	local maxhealth = 1200

	local description = "Contains a Squirtle."

	local poke1 = "This is Squirtle's pokeball. HP = ["..health.."/"..maxhealth.."]"


	item = doCreateItemEx(2219)

	doItemSetAttribute(item, "poke", poke1)

	doItemSetAttribute(item, "nome", "Squirtle")

	doItemSetAttribute(item, "apelido", "Squirtle")


	doItemSetAttribute(item, "description", description)

	doPlayerAddItemEx(cid, item, true)

	doTransformItem(item, 2222)

	doPlayerSendTextMessage(cid, 27, "You got your first pokemon! Here is some experience to help you on your way.")

	doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")

	doPlayerAddExp(cid, 800)

	doTeleportThing(cid, pox)

	doPlayerAddItem(cid, 2152, 30)

	doSendMagicEffect(pox, 21)

	doPlayerAddSoul(cid, 1)

	setPlayerStorageValue(cid, 54842, "Squirtle, ")

	return TRUE

  else

	doPlayerSendTextMessage(cid, 20, "Voc&#234; j&#225; pegou seu pokemon")

  end

end

Isso vc encontra na pastadoseuot/data/actions

o nome dos arquivos vai ser o nome dos pokemons iniciais atuais

todos os lugares onde estiver escrito Squirtle (ou o nome de qualquer outro pokemon) vc coloca o nome do pokemon desejado e onde tiver "health" e "maxhealth" vc coloca o health do poke é so olhar na xml do pokemon.

vlw pela ajuda de todos.

Rep ++ Doughell e Kimoszin

Editado Outubro 29, 2011 13 anos por raulot (veja o histórico de edições)