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?