GrassBiel

Pressiso de uma forma de hackia a cotna de pokemon no PokexGames daria sempre rep +++ quando estiver disponivel

o pokemon 8.54 pokemon 2.0 algo assim

Tem portatil tem tudo

Nome:Gabriel Idade:14 Cargo:mapper ,scripter Experiencia:5anos e 1 ano Meus Trabalhos:(opicional) Tempo Disponivel:8h por semana e 20 por fim de semana Email para contato:gabriel-laila@hotmail.com

Idade:14 Experiencia:mapper ,scripter e web site Tempo Disponivel:8 por semana e 20h por fim de semana Email para contato:gabriel-laila@hotmail.com Porque quer entra pra ekip:Vi que seu serve tem bastante capacidade de ser um bom serve entaoq ueria ajduar para se tornar o melhor do melhor do mundo

Bom vou ser sincero com seu mapa está uma merda vc copio partes de outros mapa e colocando em lugares fes em autoborde varias coisa Nao gostei :withstupidsmiley: REP ++

Vai no ot/data/actions/go/back e coloque isso dentro 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 REP ++

Dentro do bloco de notas do go/back coloque isso dentro 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 REP++++

Mais o v.5 é a ultima versao dele mesmo ,ele falo que nao postaria mais serve e que a versao v.5 sera a ultima

Bom a primeira pergunta eu nao entendi mais a segunda é só vc fala com o god /gogo Rattata com a primeira letra do pokemon maiuscula REP+++

Bom galerinha do xtibia tenho um problema ao tentar abrir o mapa de pokemon ja tentei abrir com tibia dat e tibia spr más nao conssegui por favor me ajudem que darei rep ++

Bruninho pq vc nao fais um ot ja daora com shiny johto tudo sem bug e posta no xtibia iria gnahar muito rep +

Daora os 151 mais acho que demora d+ Demoro pra min faser os johto