Ir para conteúdo

Neko121587

Campones
  • Total de itens

    5
  • Registro em

  • Última visita

Sobre Neko121587

Informações

  • Char no Tibia
    Neikox
  • Forma que conheci o xTibia
    Otservs
  • Sou
    OT-Admin

Neko121587's Achievements

  1. Hoy se me antojan unos bacachos quien se apunta? #ppv

  2. Pokersin agusto papaaaaa

  3. al parecer regresa a la normalidad #taringa

  4. jaaaaaaaaaaa ahora resulta q el cuerpo de osama lo tiraron al mar "como dice la tradicion musulmana" SIMOOOOOON!!!

  5. El q kiera el relase (milestone 3) de #windows8 solo pidalo es un poco complicado pero pues ya deja ver nuevas funciones

  6. Creo q mañana sera un dia geek... Ojala y jale #changuitos

  7. alguien tiene por ahi un codigo de xbox live (48hrs) q me regale???? o lo cambio por el beta vip de GOW3

  8. Estrenando :) bbpin 22EFE651 para q m agreguen

  9. preciso de ajuda Tenho servidor pokemon pokemon flash com a elite. o problema é que quando um pokemon elite vai morrer, voltar ao pokebloa e abri-lo novamente, ele tem fullhealt ... como posso corrigir isso? e tornar como normal pokemons? disculpen eu mal br penso que é neste arquivo goback.lua 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, "Seu pokemon está morto.") end if getPlayerStorageValue(cid, 25000) == 5 then return doPlayerSendCancel(cid, "Você está montando.") end if getPlayerStorageValue(cid, 23000) == 5 then return doPlayerSendCancel(cid, "Você está voando.") end local summons = getCreatureSummons(cid) if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then doPlayerSendCancel(cid, "Para Soltar seus pokemons, coloque-os no slot da pokeball.") 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, "Go,"..poke_name.."!!", TALKTYPE_ORANGE_1) 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..".", TALKTYPE_ORANGE_1) doRemoveCreature(pid) doTransformItem(getPlayerSlotItem(cid,8).uid, 2532, 1) doItemSetAttribute(getPlayerSlotItem(cid,8).uid,"name", poke_name .." Pokeball") end end end return true end
  10. usei a v1.0 + pokelib modificado e funcionou perfeito, so presiso colocar na pokeball em portrait, e funka booom em pokemon flash Thanks!!!
  11. tenho pokemon em backpack... e pokemon flash
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...