local SafariOut = {x=1052,y=1489,z=7} -- Cinnabar

 

local ballcatch = {                    --id normal, id da ball shiy

[2147] = {cr = 1, on = 24, off = 23, ball = {2222, 8687}, send = 47, typeee = "normal"},  --alterado v1.9  \/

[2642] = {cr = 2, on = 198, off = 197, ball = {2651, 8688}, send = 48, typeee = "great"},

[2645] = {cr = 4, on = 202, off = 201, ball = {2653, 8689}, send = 46, typeee = "super"},

[2146] = {cr = 5, on = 200, off = 199, ball = {2220, 8690}, send = 49, typeee = "ultra"},

[2644] = {cr = 3, on = 204, off = 203, ball = {2655, 8693}, send = 35, typeee = "saffari"},   --

}

 

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

 

local item2 = getTopCorpse(topos)

if item2 == null then

   return true

end

 

if getItemAttribute(item2.uid, "catching") == 1 then

   return true

end

 

if getItemAttribute(item2.uid, "golden") and getItemAttribute(item2.uid, "golden") == 1 then

   return doPlayerSendCancel(cid, "Sorry, not possible")

end

 

local name = string.lower(getItemNameById(item2.itemid))

      name = string.gsub(name, "fainted ", "")

      name = string.gsub(name, "defeated ", "")

      name = doCorrectPokemonName(name)

local x = pokecatches[name]

 

if not x then return true end

 

if item.itemid == 14207 and isShinyName(name) then

doPlayerSendCancel(cid, "you not caught pokemons shinys using master ball.")

return false

end

 

local storage = newpokedex[name].stoCatch

if getPlayerStorageValue(cid, storage) == -1 or not string.find(getPlayerStorageValue(cid, storage), ";") then  --alterado v1.9

   setPlayerStorageValue(cid, storage, "normal = 0, great = 0, super = 0, ultra = 0, saffari = 0;")             --alterado v1.9

end

 

local owner = getItemAttribute(item2.uid, "corpseowner")

 

if owner and isCreature(owner) and isPlayer(owner) and cid ~= owner then

   doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")

   return true

end

 

local newidd = isShinyName(name) and ballcatch[item.itemid].ball[2] or ballcatch[item.itemid].ball[1] --alterado v1.9

local typeee = ballcatch[item.itemid].typeee

 

local catchinfo = {}

      catchinfo.rate = ballcatch[item.itemid].cr

      catchinfo.catch = ballcatch[item.itemid].on

      catchinfo.fail = ballcatch[item.itemid].off

      catchinfo.newid = newidd

      catchinfo.name = doCorrectPokemonName(name)

      catchinfo.topos = topos

      catchinfo.chance = x.chance

 

doSendDistanceShoot(getThingPos(cid), topos, ballcatch[item.itemid].send)

doRemoveItem(item.uid, 1)

 

local d = getDistanceBetween(getThingPos(cid), topos)

 

if getPlayerStorageValue(cid, 98796) >= 1 and getPlayerItemCount(cid, 2644) <= 0 then  --alterado v1.9

   setPlayerStorageValue(cid, 98796, -1)

   setPlayerStorageValue(cid, 98797, -1)

   doRetur(cid, nurse)

   doTeleportThing(cid, SafariOut, false)

   doSendMagicEffect(getThingPos(cid), 21)

 --  doPlayerSendTextMessage(cid, 27, "You spend all your saffari balls, good luck in the next time...")

end

 

addEvent(doSendPokeBall, d * 70 + 100 - (d * 14) , cid, catchinfo, false, false, typeee)

addEvent(doSendMagicEffect, (d * 70 + 100 - (d * 14)) - 100, topos, 3)

return true

end

 

 local ballcatch = {                    --id normal, id da ball shiy

[2394] = {cr = 3, on = 24, off = 23, ball = {11826, 11737}, send = 47, typeee = "normal"},  --alterado v1.9  \/

[2391] = {cr = 6, on = 198, off = 197, ball = {11832, 11740}, send = 48, typeee = "great"},

[2393] = {cr = 10, on = 202, off = 201, ball = {11835, 11743}, send = 46, typeee = "super"},

[2392] = {cr = 15, on = 200, off = 199, ball = {11829, 11746}, send = 49, typeee = "ultra"},

[12617] = {cr = 3, on = 204, off = 203, ball = {10975, 12621}, send = 35, typeee = "saffari"}, 

}

 

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

 

local item2 = getTopCorpse(topos)

if item2 == null then

   return true

end

 

if getItemAttribute(item2.uid, "catching") == 1 then

   return true

end  

 

if getItemAttribute(item2.uid, "golden") and getItemAttribute(item2.uid, "golden") == 1 then

   return doPlayerSendCancel(cid, "You can't try to catch a pokemon in the Golden Arena!")   

end

 

local name = string.lower(getItemNameById(item2.itemid))

      name = string.gsub(name, "fainted ", "")

      name = string.gsub(name, "defeated ", "")

      name = doCorrectPokemonName(name)

local x = pokecatches[name]

 

if not x then return true end

 

local storage = newpokedex[name].stoCatch 

if getPlayerStorageValue(cid, storage) == -1 or not string.find(getPlayerStorageValue(cid, storage), ";") then  --alterado v1.9 

   setPlayerStorageValue(cid, storage, "normal = 0, great = 0, super = 0, ultra = 0, saffari = 0;")             --alterado v1.9 

end     

 

local owner = getItemAttribute(item2.uid, "corpseowner")

 

if owner and isCreature(owner) and isPlayer(owner) and cid ~= owner then   

   doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")

   return true

end

 

local newidd = isShinyName(name) and ballcatch[item.itemid].ball[2] or ballcatch[item.itemid].ball[1] --alterado v1.9       

local typeee = ballcatch[item.itemid].typeee

 

local catchinfo = {}

      catchinfo.rate = ballcatch[item.itemid].cr

      catchinfo.catch = ballcatch[item.itemid].on

      catchinfo.fail = ballcatch[item.itemid].off

      catchinfo.newid = newidd                      

      catchinfo.name = doCorrectPokemonName(name)

      catchinfo.topos = topos

      catchinfo.chance = x.chance

 

doSendDistanceShoot(getThingPos(cid), topos, ballcatch[item.itemid].send)

doRemoveItem(item.uid, 1)

 

local d = getDistanceBetween(getThingPos(cid), topos)

 

if getPlayerStorageValue(cid, 98796) >= 1 and getPlayerItemCount(cid, 12617) <= 0 then  --alterado v1.9

   setPlayerStorageValue(cid, 98796, -1) 

   setPlayerStorageValue(cid, 98797, -1)                                              

   doTeleportThing(cid, SafariOut, false)

   doSendMagicEffect(getThingPos(cid), 21)

   doPlayerSendTextMessage(cid, 27, "You spend all your saffari balls, good luck in the next time...")

end

 

addEvent(doSendPokeBall, d * 70 + 100 - (d * 14) , cid, catchinfo, false, false, typeee) 

addEvent(doSendMagicEffect, (d * 70 + 100 - (d * 14)) - 100, topos, 3)

return true

end  

Editado Outubro 29, 2014 10 anos por gugu1002 (veja o histórico de edições)

Não funcionou no dash advanced!

@UP #REP+

 

QUE DELICIA DE MOD!

dlç de mod mano, porém qnd o player cata um poke ex: venu, nao pode atacar ball novamente nele, e outra coisa meu cliente nao tem a pasta mods como eu faria para poder adaptar a pasta catchwindow no meu cliente? rep++