[Ajuda]Goback Com Level (Thalia)

[jeancassio2010 13]

Olá, eu uso o goback do thalia, queria saber se tem como por pra ter level pra usar pokemon, vou postar o script aki em baixo, desde ja agradeço!!!

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

function getPokemonMaxLife(name)

local file = io.open('data/monster/monsters.xml','r')

local arquivo = file:read(-1):lower():match('<monster name="'..name:lower()..'" file="(.-)"/>')

file:close()

local data = io.open('data/monster/'..(arquivo or ''),'r')

if not data then

return 100

end

local maximo = data:read(-1):match('max%s*=%s*"(%d+)"')

data:close()

return maximo

end

----- Config -----

local MaximoSummon = 1

local nome = getItemName(item.uid)

local poke_name = nome:match('(.-) Pokeball')

local summons = getCreatureSummons(cid)

local action_id = getItemAttribute(item.uid, "aid")

----- Config -----

if getItemAttribute(item.uid, "aid") == -1 then

return doPlayerSendCancel(cid, "Your Pokemon Is Dead.")

end

 

if getPlayerStorageValue(cid, 25000) == 5 then

return doPlayerSendCancel(cid, "You are riding.")

end

if getPlayerStorageValue(cid, 23000) == 5 then

return doPlayerSendCancel(cid, "You are flying.")

end

local summons = getCreatureSummons(cid)

if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then

doPlayerSendCancel(cid, "Sorry, you must put your pokeball in the pokeball place.")

return TRUE

end

if(table.maxn(summons) < MaximoSummon) then -- no summons

creature = doSummonCreature(poke_name, getCreaturePosition(cid))

doConvinceCreature(cid, creature)

registerCreatureEvent(creature, "DiePoke")

registerCreatureEvent(cid, "PlayerPokeDeath")

registerCreatureEvent(cid, "LogoutPoke")

doPlayerSay(cid, poke_name .. " eu escolho você!!")

doSendMagicEffect(getCreaturePosition(creature), 188)

doTransformItem(getPlayerSlotItem(cid,8).uid, 2531, 1)

doItemSetAttribute(getPlayerSlotItem(cid,8).uid,"name", poke_name .." Pokeball")

if action_id ~= 0 then

doCreatureAddHealth(creature, -(tonumber(getPokemonMaxLife(poke_name) - action_id)))

else

doCreatureAddHealth(creature, getPokemonMaxLife(poke_name))

end

else

for _, pid in ipairs(summons) do

if (table.maxn(summons) >= 1) then

doItemSetAttribute(item.uid, "aid", getCreatureHealth(summons[1]))

doSendMagicEffect(getCreaturePosition(getCreatureSummons(cid)[1]), 188)

doPlayerSay(cid,"Back, "..poke_name.."")

doRemoveCreature(pid)

doTransformItem(getPlayerSlotItem(cid,8).uid, 2532, 1)

doItemSetAttribute(getPlayerSlotItem(cid,8).uid,"name", poke_name .." Pokeball")

end

end

end

return true

end