Ir para conteúdo
  • Cadastre-se

(Resolvido)Sistema de Rod Level!


Ir para solução Resolvido por Wakon,

Posts Recomendados

Eai pessoa blz? estou aqui para pedir um sistema de fishing rod! eu já vi muitos servidores usando! o sistema é assim, são 4 rods, cada rod pesca tipos de pokemons diferentes! e cada uma tem um level mínimo para usar, ai vai o funcionamento basico delas!

 

------------------------------------------------------------------------------------------------------------------

 

Normal Rod

 

Pesca Margikarp, Goldeen, krabby, entre outros

 

o level mínimo dela é 10

 

Great Rod

 

Pesca Os mesmos pokemons da normal rod e outros pokemons configurados por min!

 

Level mínimo dela é 30

 

Super Rod

 

Pesca os mesmos pokemons da Great Rod e outros configurados por min!

 

Level mínimo dela é 60

 

Ultra Rod

 

Pesca os mesmos pokemons da super rod e outros configurados por min

 

level mínimo dela é 80

 

------------------------------------------------------------------------------------------------------------------

 

Pronto! acho que deu para entender + ou - como elas funcionam, não acho que seja díficil para alguem que tenha no mínimo um pouco do conhecimento de lua, para fazer. Se tiverem alguma dúvida podem perguntar, este sistema, todos jogos que joguei, com ele fiquei viciadão neles ^^ Eu uso a Versão 854 e tfs 0.3.6! muito obrigado pela atenção, e tenham todos um bom dia!

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites

Você pode pegar seu script de rod e adicionar isso para retornar se não tiver o level necessário:

if getPlayerLevel(cid) < 50 then
   doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")
  return true
end

Coloca logo no inicio do script após o function, se quiser use esse:

local fishing = {
["Magikarp"] = {skill = 0, level = 0},
["Qwilfish"] = {skill = 18, level = 0},
["Remoraid"] = {skill = 16, level = 0},
["Staryu"] = {skill = 22, level = 0}
}

local storage = 15458
local bonus = 1
local limite = 80
local level = 50 -- Aqui você altera o level necessário para utilizar a rod.


local function doFish(cid, pos, ppos, chance, interval, number)
        if getPlayerLevel(cid) < 50 then
           doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")
           return true
        end
        if not isCreature(cid) then return false end

        if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then
        return false end

        if getPlayerStorageValue(cid, storage) ~= number then return false end

        doSendMagicEffect(pos, CONST_ME_LOSEENERGY)

local peixe = 0
local playerpos = getClosestFreeTile(cid, getThingPos(cid))
local fishes = {}
local randomfish = ""

                                                                  --alterado!!
    if getPlayerSkillLevel(cid, 6) < limite then
    doPlayerAddSkillTry(cid, 6, bonus)
    end

for a, b in pairs (fishing) do
    if getPlayerSkillLevel(cid, 6) >= b.skill then
        table.insert(fishes, a)
    end
end

    if math.random(1, 100) <= chance then
        if getPlayerSkillLevel(cid, 6) < limite then
        doPlayerAddSkillTry(cid, 6, bonus)
        end
        randomfish = fishes[math.random(#fishes)]
        peixe = doSummonCreature(randomfish, playerpos)
        if not isCreature(peixe) then
            addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
        return true
        end
    doSetMonsterPassive(peixe)
    doWildAttackPlayer(peixe, cid)
        if #getCreatureSummons(cid) >= 1 then
                doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)
            doChallengeCreature(getCreatureSummons(cid)[1], peixe)
            else
            doSendMagicEffect(getThingPos(cid), 173)
            doChallengeCreature(cid, peixe)
            end
    return true
    end
addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
return true
end

local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}

function onUse(cid, item, fromPos, itemEx, toPos)

if getPlayerGroupId(cid) == 11 then
return true
end

local checkPos = toPos
checkPos.stackpos = 0

if getTileThingByPos(checkPos).itemid <= 0 then
doPlayerSendCancel(cid, '!')
return true
end

if not isInArray(waters, getTileInfo(toPos).itemid) then
return true
end

if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then
doPlayerSendCancel(cid, "You can't fish while surfing/flying.")
return true
end

if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then
doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")
return true
end

if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then
    doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")
return true
end

if not tonumber(getPlayerStorageValue(cid, storage)) then
    local test = io.open("data/sendtobrun123.txt", "a+")
    local read = ""
    if test then
        read = test:read("*all")
        test:close()
    end
    read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""
    local reopen = io.open("data/sendtobrun123.txt", "w")
    reopen:write(read)
    reopen:close()
    setPlayerStorageValue(cid, storage, 1)
end

setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)
    if getPlayerStorageValue(cid, storage) >= 800 then
        setPlayerStorageValue(cid, storage, 1)
    end

local delay = 3500 - getPlayerSkillLevel(cid, 6) * 25
local chance = 5.2 + getPlayerSkillLevel(cid, 6) / 9.5

doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))

return true
end

Link para o post
Compartilhar em outros sites

Você pode pegar seu script de rod e adicionar isso para retornar se não tiver o level necessário:

if getPlayerLevel(cid) < 50 then
   doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")
  return true
end

Coloca logo no inicio do script após o function, se quiser use esse:

local fishing = {

["Magikarp"] = {skill = 0, level = 0},

["Qwilfish"] = {skill = 18, level = 0},

["Remoraid"] = {skill = 16, level = 0},

["Staryu"] = {skill = 22, level = 0}

}

local storage = 15458

local bonus = 1

local limite = 80

local level = 50 -- Aqui você altera o level necessário para utilizar a rod.

local function doFish(cid, pos, ppos, chance, interval, number)

        if getPlayerLevel(cid) < 50 then

           doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")

           return true

        end

        if not isCreature(cid) then return false end

        if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then

        return false end

        if getPlayerStorageValue(cid, storage) ~= number then return false end

        doSendMagicEffect(pos, CONST_ME_LOSEENERGY)

local peixe = 0

local playerpos = getClosestFreeTile(cid, getThingPos(cid))

local fishes = {}

local randomfish = ""

                                                                  --alterado!!

    if getPlayerSkillLevel(cid, 6) < limite then

    doPlayerAddSkillTry(cid, 6, bonus)

    end

for a, b in pairs (fishing) do

    if getPlayerSkillLevel(cid, 6) >= b.skill then

        table.insert(fishes, a)

    end

end

    if math.random(1, 100) <= chance then

        if getPlayerSkillLevel(cid, 6) < limite then

        doPlayerAddSkillTry(cid, 6, bonus)

        end

        randomfish = fishes[math.random(#fishes)]

        peixe = doSummonCreature(randomfish, playerpos)

        if not isCreature(peixe) then

            addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)

        return true

        end

    doSetMonsterPassive(peixe)

    doWildAttackPlayer(peixe, cid)

        if #getCreatureSummons(cid) >= 1 then

                doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)

            doChallengeCreature(getCreatureSummons(cid)[1], peixe)

            else

            doSendMagicEffect(getThingPos(cid), 173)

            doChallengeCreature(cid, peixe)

            end

    return true

    end

addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)

return true

end

local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}

function onUse(cid, item, fromPos, itemEx, toPos)

if getPlayerGroupId(cid) == 11 then

return true

end

local checkPos = toPos

checkPos.stackpos = 0

if getTileThingByPos(checkPos).itemid <= 0 then

doPlayerSendCancel(cid, '!')

return true

end

if not isInArray(waters, getTileInfo(toPos).itemid) then

return true

end

if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then

doPlayerSendCancel(cid, "You can't fish while surfing/flying.")

return true

end

if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then

doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")

return true

end

if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then

    doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")

return true

end

if not tonumber(getPlayerStorageValue(cid, storage)) then

    local test = io.open("data/sendtobrun123.txt", "a+")

    local read = ""

    if test then

        read = test:read("*all")

        test:close()

    end

    read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""

    local reopen = io.open("data/sendtobrun123.txt", "w")

    reopen:write(read)

    reopen:close()

    setPlayerStorageValue(cid, storage, 1)

end

setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)

    if getPlayerStorageValue(cid, storage) >= 800 then

        setPlayerStorageValue(cid, storage, 1)

    end

local delay = 3500 - getPlayerSkillLevel(cid, 6) * 25

local chance = 5.2 + getPlayerSkillLevel(cid, 6) / 9.5

doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))

return true

end

Este que você acabou de me passar é o script completo?? pq se for avisa ai que vou testar! e se funfa já tem rep garantido!

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites

Este que você acabou de me passar é o script completo?? pq se for avisa ai que vou testar! e se funfa já tem rep garantido!

É completo, fiz apenas a alteração para o level.

Link para o post
Compartilhar em outros sites

É completo, fiz apenas a alteração para o level.

Então Blz! Irei Testar é Agora! Obrigado Pela Atenção!

Eu Fui Testar Deu este erro:

 

[27/05/2015 19:38:27] [Error - Action Interface] 
[27/05/2015 19:38:27] data/actions/scripts/tools/fishing.lua:onUse
[27/05/2015 19:38:27] Description: 
[27/05/2015 19:38:27] data/actions/scripts/tools/fishing.lua:54: attempt to call global 'doSetMonsterPassive' (a nil value)
[27/05/2015 19:38:27] stack traceback:
[27/05/2015 19:38:27] data/actions/scripts/tools/fishing.lua:54: in function 'doFish'
[27/05/2015 19:38:27] data/actions/scripts/tools/fishing.lua:126: in function <data/actions/scripts/tools/fishing.lua:71>

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites

Não tem a função doSetMonsterPassive no seu servidor, você tem algum sistema de fishing do seu servidor? Se tiver pode me passar e informar a base utilizada?

Link para o post
Compartilhar em outros sites

Ta Aqui:

 

local fishing = {
["Magikarp"] = {skill = 0, level = -2},
["Feebas"] = {skill = 15, level = 15},
["Poliwag"] = {skill = 17, level = 20},
["Azurill"] = {skill = 18, level = 23},
["Horsea"] = {skill = 19, level = 25},
["Goldeen"] = {skill = 19, level = 25},
["Remoraid"] = {skill = 19, level = 27},
["Krabby"] = {skill = 19, level = 28},
["Chinchou"] = {skill = 19, level = 30},
["Mantyke"] = {skill = 20, level = 35},
["Tentacool"] = {skill = 20, level = 35},
["Marill"] = {skill = 20, level = 35},
["Qwilfish"] = {skill = 20, level = 40},
["Poliwhirl"] = {skill = 20, level = 40},
["Seaking"] = {skill = 20, level = 40},
["Mudkip"] = {skill = 20, level = 45},
["Spheal"] = {skill = 21, level = 50},
["Kingler"] = {skill = 21, level = 50},
["Seadra"] = {skill = 21, level = 55},
["Wailmer"] = {skill = 21, level = 60},
["Corsola"] = {skill = 22, level = 55},
["Octillery"] = {skill = 22, level = 60},
["Marshtomp"] = {skill = 22, level = 70},
["Lanturn"] = {skill = 22, level = 75},
["Sealeo"] = {skill = 23, level = 70},
["Crawdaunt"] = {skill = 23, level = 70},
["Azumarill"] = {skill = 23, level = 70},
["Mantine"] = {skill = 23, level = 75},
["Politoed"] = {skill = 23, level = 80},
["Poliwrath"] = {skill = 23, level = 80},
["Vaporeon"] = {skill = 23, level = 80},
["Kingdra"] = {skill = 24, level = 85},
["Dratini"] = {skill = 24, level = 90},
["Gyarados"] = {skill = 25, level = 95},
["Milotic"] = {skill = 25, level = 95},
["Wailord"] = {skill = 25, level = 95},
["Swampert"] = {skill = 25, level = 95},
["Walrein"] = {skill = 25, level = 95},
["Tentacruel"] = {skill = 25, level = 95},
}
 
local storage = 15496
local bonus = 40
local limite = 80
 
local function doFish(cid, pos, ppos, chance, interval, number)
        if not isCreature(cid) then return false end
 
        if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then
        return false end
 
        if getPlayerStorageValue(cid, storage) ~= number then return false end
 
        doSendMagicEffect(pos, CONST_ME_LOSEENERGY)
 
local peixe = 0
local playerpos = getClosestFreeTile(cid, getThingPos(cid))
local fishes = {}
local randomfish = ""
 
                                                                  --alterado!!
 if getPlayerSkillLevel(cid, 6) < limite then
 doPlayerAddSkillTry(cid, 6, 100)--- 100
 end
 
for a, b in pairs (fishing) do
 if getPlayerSkillLevel(cid, 6) >= b.skill then
  table.insert(fishes, a)
 end
end
 
 if math.random(1, 100) <= chance then
  if getPlayerSkillLevel(cid, 6) < limite then
  doPlayerAddSkillTry(cid, 6, bonus)
  end
  randomfish = fishes[math.random(#fishes)]
     peixe = doSummonCreature(randomfish, playerpos)
  if not isCreature(peixe) then
   addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
  return true
  end
  if #getCreatureSummons(cid) >= 1 then
          doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)
   doChallengeCreature(getCreatureSummons(cid)[1], peixe)
         else
   doSendMagicEffect(getThingPos(cid), 173)
   doChallengeCreature(cid, peixe)
         end
  doCreatureSetNoMove(cid, false)
  doRemoveCondition(cid, CONDITION_OUTFIT)
 return true
 end
addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
doCreatureSetNoMove(cid, true)
return true
end
 
local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}
 
function onUse(cid, item, fromPos, itemEx, toPos)
 
if getPlayerGroupId(cid) == 11 then
return true
end
 
local checkPos = toPos
checkPos.stackpos = 0
 
if getTileThingByPos(checkPos).itemid <= 0 then
doPlayerSendCancel(cid, '!')
return true
end
 
if not isInArray(waters, getTileInfo(toPos).itemid) then
return true
end
 
if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then
doPlayerSendCancel(cid, "You can't fish while surfing/flying.")
return true
end
 
if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then
doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")
return true
end
 
if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then
 doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")
return true
end
 
 
 
if not tonumber(getPlayerStorageValue(cid, storage)) then
 local test = io.open("data/sendtobrun123.txt", "a+")
 local read = ""
 if test then
  read = test:read("*all")
  test:close()
 end
 read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""
 local reopen = io.open("data/sendtobrun123.txt", "w")
 reopen:write(read)
 reopen:close()
 setPlayerStorageValue(cid, storage, 1)
end
 
setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)
 if getPlayerStorageValue(cid, storage) >= 800 then
  setPlayerStorageValue(cid, storage, 1)
 end
 
local delay = 1500 - getPlayerSkillLevel(cid, 6) * 50
local chance = 7 + getPlayerSkillLevel(cid, 6) / 6.5
outfit = getCreatureOutfit(cid)
if getPlayerSex(cid) == 0 then
 out = 1467
else
 out = 1468
end
doSetCreatureOutfit(cid, {lookType = out, lookHead = outfit.lookHead, lookBody = outfit.lookBody, lookLegs = outfit.lookLegs, lookFeet = outfit.lookFeet}, -1)
doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))
 
return true
end

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites

Adicionei o level necessário, testa ai:

local fishing = {
["Magikarp"] = {skill = 0, level = -2},
["Feebas"] = {skill = 15, level = 15},
["Poliwag"] = {skill = 17, level = 20},
["Azurill"] = {skill = 18, level = 23},
["Horsea"] = {skill = 19, level = 25},
["Goldeen"] = {skill = 19, level = 25},
["Remoraid"] = {skill = 19, level = 27},
["Krabby"] = {skill = 19, level = 28},
["Chinchou"] = {skill = 19, level = 30},
["Mantyke"] = {skill = 20, level = 35},
["Tentacool"] = {skill = 20, level = 35},
["Marill"] = {skill = 20, level = 35},
["Qwilfish"] = {skill = 20, level = 40},
["Poliwhirl"] = {skill = 20, level = 40},
["Seaking"] = {skill = 20, level = 40},
["Mudkip"] = {skill = 20, level = 45},
["Spheal"] = {skill = 21, level = 50},
["Kingler"] = {skill = 21, level = 50},
["Seadra"] = {skill = 21, level = 55},
["Wailmer"] = {skill = 21, level = 60},
["Corsola"] = {skill = 22, level = 55},
["Octillery"] = {skill = 22, level = 60},
["Marshtomp"] = {skill = 22, level = 70},
["Lanturn"] = {skill = 22, level = 75},
["Sealeo"] = {skill = 23, level = 70},
["Crawdaunt"] = {skill = 23, level = 70},
["Azumarill"] = {skill = 23, level = 70},
["Mantine"] = {skill = 23, level = 75},
["Politoed"] = {skill = 23, level = 80},
["Poliwrath"] = {skill = 23, level = 80},
["Vaporeon"] = {skill = 23, level = 80},
["Kingdra"] = {skill = 24, level = 85},
["Dratini"] = {skill = 24, level = 90},
["Gyarados"] = {skill = 25, level = 95},
["Milotic"] = {skill = 25, level = 95},
["Wailord"] = {skill = 25, level = 95},
["Swampert"] = {skill = 25, level = 95},
["Walrein"] = {skill = 25, level = 95},
["Tentacruel"] = {skill = 25, level = 95},
}
 
local storage = 15496
local bonus = 40
local limite = 80
local level = 50
 
local function doFish(cid, pos, ppos, chance, interval, number)
        if getPlayerLevel(cid) < level then
           doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")
           return true
        end
        if not isCreature(cid) then return false end
 
        if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then
        return false end
 
        if getPlayerStorageValue(cid, storage) ~= number then return false end
 
        doSendMagicEffect(pos, CONST_ME_LOSEENERGY)
 
local peixe = 0
local playerpos = getClosestFreeTile(cid, getThingPos(cid))
local fishes = {}
local randomfish = ""
 
                                                                  --alterado!!
 if getPlayerSkillLevel(cid, 6) < limite then
 doPlayerAddSkillTry(cid, 6, 100)--- 100
 end
 
for a, b in pairs (fishing) do
 if getPlayerSkillLevel(cid, 6) >= b.skill then
  table.insert(fishes, a)
 end
end
 
 if math.random(1, 100) <= chance then
  if getPlayerSkillLevel(cid, 6) < limite then
  doPlayerAddSkillTry(cid, 6, bonus)
  end
  randomfish = fishes[math.random(#fishes)]
     peixe = doSummonCreature(randomfish, playerpos)
  if not isCreature(peixe) then
   addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
  return true
  end
  if #getCreatureSummons(cid) >= 1 then
          doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)
   doChallengeCreature(getCreatureSummons(cid)[1], peixe)
         else
   doSendMagicEffect(getThingPos(cid), 173)
   doChallengeCreature(cid, peixe)
         end
  doCreatureSetNoMove(cid, false)
  doRemoveCondition(cid, CONDITION_OUTFIT)
 return true
 end
addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
doCreatureSetNoMove(cid, true)
return true
end
 
local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}
 
function onUse(cid, item, fromPos, itemEx, toPos)
 
if getPlayerGroupId(cid) == 11 then
return true
end
 
local checkPos = toPos
checkPos.stackpos = 0
 
if getTileThingByPos(checkPos).itemid <= 0 then
doPlayerSendCancel(cid, '!')
return true
end
 
if not isInArray(waters, getTileInfo(toPos).itemid) then
return true
end
 
if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then
doPlayerSendCancel(cid, "You can't fish while surfing/flying.")
return true
end
 
if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then
doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")
return true
end
 
if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then
 doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")
return true
end
 
 
 
if not tonumber(getPlayerStorageValue(cid, storage)) then
 local test = io.open("data/sendtobrun123.txt", "a+")
 local read = ""
 if test then
  read = test:read("*all")
  test:close()
 end
 read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""
 local reopen = io.open("data/sendtobrun123.txt", "w")
 reopen:write(read)
 reopen:close()
 setPlayerStorageValue(cid, storage, 1)
end
 
setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)
 if getPlayerStorageValue(cid, storage) >= 800 then
  setPlayerStorageValue(cid, storage, 1)
 end
 
local delay = 1500 - getPlayerSkillLevel(cid, 6) * 50
local chance = 7 + getPlayerSkillLevel(cid, 6) / 6.5
outfit = getCreatureOutfit(cid)
if getPlayerSex(cid) == 0 then
 out = 1467
else
 out = 1468
end
doSetCreatureOutfit(cid, {lookType = out, lookHead = outfit.lookHead, lookBody = outfit.lookBody, lookLegs = outfit.lookLegs, lookFeet = outfit.lookFeet}, -1)
doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))
 
return true
end

Link para o post
Compartilhar em outros sites

Adicionei o level necessário, testa ai:

local fishing = {

["Magikarp"] = {skill = 0, level = -2},

["Feebas"] = {skill = 15, level = 15},

["Poliwag"] = {skill = 17, level = 20},

["Azurill"] = {skill = 18, level = 23},

["Horsea"] = {skill = 19, level = 25},

["Goldeen"] = {skill = 19, level = 25},

["Remoraid"] = {skill = 19, level = 27},

["Krabby"] = {skill = 19, level = 28},

["Chinchou"] = {skill = 19, level = 30},

["Mantyke"] = {skill = 20, level = 35},

["Tentacool"] = {skill = 20, level = 35},

["Marill"] = {skill = 20, level = 35},

["Qwilfish"] = {skill = 20, level = 40},

["Poliwhirl"] = {skill = 20, level = 40},

["Seaking"] = {skill = 20, level = 40},

["Mudkip"] = {skill = 20, level = 45},

["Spheal"] = {skill = 21, level = 50},

["Kingler"] = {skill = 21, level = 50},

["Seadra"] = {skill = 21, level = 55},

["Wailmer"] = {skill = 21, level = 60},

["Corsola"] = {skill = 22, level = 55},

["Octillery"] = {skill = 22, level = 60},

["Marshtomp"] = {skill = 22, level = 70},

["Lanturn"] = {skill = 22, level = 75},

["Sealeo"] = {skill = 23, level = 70},

["Crawdaunt"] = {skill = 23, level = 70},

["Azumarill"] = {skill = 23, level = 70},

["Mantine"] = {skill = 23, level = 75},

["Politoed"] = {skill = 23, level = 80},

["Poliwrath"] = {skill = 23, level = 80},

["Vaporeon"] = {skill = 23, level = 80},

["Kingdra"] = {skill = 24, level = 85},

["Dratini"] = {skill = 24, level = 90},

["Gyarados"] = {skill = 25, level = 95},

["Milotic"] = {skill = 25, level = 95},

["Wailord"] = {skill = 25, level = 95},

["Swampert"] = {skill = 25, level = 95},

["Walrein"] = {skill = 25, level = 95},

["Tentacruel"] = {skill = 25, level = 95},

}

 

local storage = 15496

local bonus = 40

local limite = 80

local level = 50

 

local function doFish(cid, pos, ppos, chance, interval, number)

        if getPlayerLevel(cid) < level then

           doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")

           return true

        end

        if not isCreature(cid) then return false end

 

        if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then

        return false end

 

        if getPlayerStorageValue(cid, storage) ~= number then return false end

 

        doSendMagicEffect(pos, CONST_ME_LOSEENERGY)

 

local peixe = 0

local playerpos = getClosestFreeTile(cid, getThingPos(cid))

local fishes = {}

local randomfish = ""

 

                                                                  --alterado!!

 if getPlayerSkillLevel(cid, 6) < limite then

 doPlayerAddSkillTry(cid, 6, 100)--- 100

 end

 

for a, b in pairs (fishing) do

 if getPlayerSkillLevel(cid, 6) >= b.skill then

  table.insert(fishes, a)

 end

end

 

 if math.random(1, 100) <= chance then

  if getPlayerSkillLevel(cid, 6) < limite then

  doPlayerAddSkillTry(cid, 6, bonus)

  end

  randomfish = fishes[math.random(#fishes)]

     peixe = doSummonCreature(randomfish, playerpos)

  if not isCreature(peixe) then

   addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)

  return true

  end

  if #getCreatureSummons(cid) >= 1 then

          doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)

   doChallengeCreature(getCreatureSummons(cid)[1], peixe)

         else

   doSendMagicEffect(getThingPos(cid), 173)

   doChallengeCreature(cid, peixe)

         end

  doCreatureSetNoMove(cid, false)

  doRemoveCondition(cid, CONDITION_OUTFIT)

 return true

 end

addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)

doCreatureSetNoMove(cid, true)

return true

end

 

local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}

 

function onUse(cid, item, fromPos, itemEx, toPos)

 

if getPlayerGroupId(cid) == 11 then

return true

end

 

local checkPos = toPos

checkPos.stackpos = 0

 

if getTileThingByPos(checkPos).itemid <= 0 then

doPlayerSendCancel(cid, '!')

return true

end

 

if not isInArray(waters, getTileInfo(toPos).itemid) then

return true

end

 

if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then

doPlayerSendCancel(cid, "You can't fish while surfing/flying.")

return true

end

 

if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then

doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")

return true

end

 

if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then

 doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")

return true

end

 

 

 

if not tonumber(getPlayerStorageValue(cid, storage)) then

 local test = io.open("data/sendtobrun123.txt", "a+")

 local read = ""

 if test then

  read = test:read("*all")

  test:close()

 end

 read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""

 local reopen = io.open("data/sendtobrun123.txt", "w")

 reopen:write(read)

 reopen:close()

 setPlayerStorageValue(cid, storage, 1)

end

 

setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)

 if getPlayerStorageValue(cid, storage) >= 800 then

  setPlayerStorageValue(cid, storage, 1)

 end

 

local delay = 1500 - getPlayerSkillLevel(cid, 6) * 50

local chance = 7 + getPlayerSkillLevel(cid, 6) / 6.5

outfit = getCreatureOutfit(cid)

if getPlayerSex(cid) == 0 then

 out = 1467

else

 out = 1468

end

doSetCreatureOutfit(cid, {lookType = out, lookHead = outfit.lookHead, lookBody = outfit.lookBody, lookLegs = outfit.lookLegs, lookFeet = outfit.lookFeet}, -1)

doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))

 

return true

end

 

Tipo ele funcionou! mas dai poderia adicionar a função de só poder pescar tbm usando uma outfit configurada?? e tbm quando o player não tem level suficiente para usar, ela troca de outfit e fica com a outfit que ele fica no exato momento que ele usa a rod na água!

Wakon???

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites

Evite dar "UP" no tópico antes de 24 horas, estou meio ocupado no momento, assim que eu editar o script eu te passo :).

Link para o post
Compartilhar em outros sites

Ok, Malz aew, e vlw por estar me ajudando ^^

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites
  • Sub-Admin

Ok, Malz aew, e vlw por estar me ajudando ^^

 

add isso em baixo disso

function onUse(cid, item, fromPos, itemEx, toPos)

 

if getPlayerSex(cid) == 1 then

if getCreatureOutfit(cid).lookType ~= 520 then <<<< ID da roupa masculina de pesca.

doPlayerSendCancel(cid, "coloque a roupa de pesca para pescar.")

return false

end

else

if getCreatureOutfit(cid).lookType ~= 521 then <<<< ID da roupa feminina de pesca.

doPlayerSendCancel(cid, "coloque a roupa de pesca para pescar.") 

return false

end

end

Editado por alexxxxxxx (veja o histórico de edições)

 

20230912_034613.png.cf49b650c34dd7d7b1f79bd49c70f53c.png

Eu sou um entusiasta da programação apaixonado por ajudar a comunidade open source a crescer. Sempre em busca de novos desafios e oportunidades para contribuir com meu código.  #OpenSource #Programação #Contribuição

 

Link para o post
Compartilhar em outros sites

add isso em baixo disso

function onUse(cid, item, fromPos, itemEx, toPos)

 

if getPlayerSex(cid) == 1 then

if getCreatureOutfit(cid).lookType ~= 520 then <<<< ID da roupa masculina de pesca.

doPlayerSendCancel(cid, "coloque a roupa de pesca para pescar.")

return false

end

else

if getCreatureOutfit(cid).lookType ~= 521 then <<<< ID da roupa feminina de pesca.

doPlayerSendCancel(cid, "coloque a roupa de pesca para pescar.") 

return false

end

end

Irei testar!

add isso em baixo disso

function onUse(cid, item, fromPos, itemEx, toPos)

 

if getPlayerSex(cid) == 1 then

if getCreatureOutfit(cid).lookType ~= 520 then <<<< ID da roupa masculina de pesca.

doPlayerSendCancel(cid, "coloque a roupa de pesca para pescar.")

return false

end

else

if getCreatureOutfit(cid).lookType ~= 521 then <<<< ID da roupa feminina de pesca.

doPlayerSendCancel(cid, "coloque a roupa de pesca para pescar.") 

return false

end

end

o seu funcionou mais fica crashando meu serv quando o player leva dano de um pokémon! mas dx pra la

 

Gostaria de perguntar se alguem sabe aonde posso encontrar sprites de rods! Pfv!

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites
  • Solução

Desculpe a demora para responder, tente assim:

local fishing = {
["Magikarp"] = {skill = 0, level = -2},
["Feebas"] = {skill = 15, level = 15},
["Poliwag"] = {skill = 17, level = 20},
["Azurill"] = {skill = 18, level = 23},
["Horsea"] = {skill = 19, level = 25},
["Goldeen"] = {skill = 19, level = 25},
["Remoraid"] = {skill = 19, level = 27},
["Krabby"] = {skill = 19, level = 28},
["Chinchou"] = {skill = 19, level = 30},
["Mantyke"] = {skill = 20, level = 35},
["Tentacool"] = {skill = 20, level = 35},
["Marill"] = {skill = 20, level = 35},
["Qwilfish"] = {skill = 20, level = 40},
["Poliwhirl"] = {skill = 20, level = 40},
["Seaking"] = {skill = 20, level = 40},
["Mudkip"] = {skill = 20, level = 45},
["Spheal"] = {skill = 21, level = 50},
["Kingler"] = {skill = 21, level = 50},
["Seadra"] = {skill = 21, level = 55},
["Wailmer"] = {skill = 21, level = 60},
["Corsola"] = {skill = 22, level = 55},
["Octillery"] = {skill = 22, level = 60},
["Marshtomp"] = {skill = 22, level = 70},
["Lanturn"] = {skill = 22, level = 75},
["Sealeo"] = {skill = 23, level = 70},
["Crawdaunt"] = {skill = 23, level = 70},
["Azumarill"] = {skill = 23, level = 70},
["Mantine"] = {skill = 23, level = 75},
["Politoed"] = {skill = 23, level = 80},
["Poliwrath"] = {skill = 23, level = 80},
["Vaporeon"] = {skill = 23, level = 80},
["Kingdra"] = {skill = 24, level = 85},
["Dratini"] = {skill = 24, level = 90},
["Gyarados"] = {skill = 25, level = 95},
["Milotic"] = {skill = 25, level = 95},
["Wailord"] = {skill = 25, level = 95},
["Swampert"] = {skill = 25, level = 95},
["Walrein"] = {skill = 25, level = 95},
["Tentacruel"] = {skill = 25, level = 95},
}
 
local storage = 15496
local bonus = 40
local limite = 80
local level = 50
local outfitz = {520, 521} -- Outfit male/female.
 
local function doFish(cid, pos, ppos, chance, interval, number)
        if not isCreature(cid) then return false end
 
        if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then
        return false end
 
        if getPlayerStorageValue(cid, storage) ~= number then return false end
 
        doSendMagicEffect(pos, CONST_ME_LOSEENERGY)
 
local peixe = 0
local playerpos = getClosestFreeTile(cid, getThingPos(cid))
local fishes = {}
local randomfish = ""
 
                                                                  --alterado!!
 if getPlayerSkillLevel(cid, 6) < limite then
 doPlayerAddSkillTry(cid, 6, 100)--- 100
 end
 
for a, b in pairs (fishing) do
 if getPlayerSkillLevel(cid, 6) >= b.skill then
  table.insert(fishes, a)
 end
end
 
 if math.random(1, 100) <= chance then
  if getPlayerSkillLevel(cid, 6) < limite then
  doPlayerAddSkillTry(cid, 6, bonus)
  end
  randomfish = fishes[math.random(#fishes)]
     peixe = doSummonCreature(randomfish, playerpos)
  if not isCreature(peixe) then
   addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
  return true
  end
  if #getCreatureSummons(cid) >= 1 then
          doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)
   doChallengeCreature(getCreatureSummons(cid)[1], peixe)
         else
   doSendMagicEffect(getThingPos(cid), 173)
   doChallengeCreature(cid, peixe)
         end
  doCreatureSetNoMove(cid, false)
  doRemoveCondition(cid, CONDITION_OUTFIT)
 return true
 end
addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)
doCreatureSetNoMove(cid, true)
return true
end
 
local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}
 
function onUse(cid, item, fromPos, itemEx, toPos)
if getPlayerLevel(cid) < level then
doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")
return true
end
 
 
if getPlayerGroupId(cid) == 11 then
return true
end
 
local checkPos = toPos
checkPos.stackpos = 0
 
if getTileThingByPos(checkPos).itemid <= 0 then
doPlayerSendCancel(cid, '!')
return true
end
 
if not isInArray(waters, getTileInfo(toPos).itemid) then
return true
end
 
if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then
doPlayerSendCancel(cid, "You can't fish while surfing/flying.")
return true
end
 
if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then
doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")
return true
end
 
if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then
 doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")
return true
end
 
 
 
if not tonumber(getPlayerStorageValue(cid, storage)) then
 local test = io.open("data/sendtobrun123.txt", "a+")
 local read = ""
 if test then
  read = test:read("*all")
  test:close()
 end
 read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""
 local reopen = io.open("data/sendtobrun123.txt", "w")
 reopen:write(read)
 reopen:close()
 setPlayerStorageValue(cid, storage, 1)
end
 
setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)
 if getPlayerStorageValue(cid, storage) >= 800 then
  setPlayerStorageValue(cid, storage, 1)
 end
 
local delay = 1500 - getPlayerSkillLevel(cid, 6) * 50
local chance = 7 + getPlayerSkillLevel(cid, 6) / 6.5
outfit = getCreatureOutfit(cid)
if getPlayerSex(cid) == 0 then
 out = 1467
else
 out = 1468
end
if outfit.lookType == outfitz[1] or outfit.lookType == outfitz[2] then
doSetCreatureOutfit(cid, {lookType = out, lookHead = outfit.lookHead, lookBody = outfit.lookBody, lookLegs = outfit.lookLegs, lookFeet = outfit.lookFeet}, -1)
doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))
else
doPlayerSendCancel(cid, "Você precisa colocar a roupa de pescador para pescar..")
end
return true
end

Link para o post
Compartilhar em outros sites

Desculpe a demora para responder, tente assim:

local fishing = {

["Magikarp"] = {skill = 0, level = -2},

["Feebas"] = {skill = 15, level = 15},

["Poliwag"] = {skill = 17, level = 20},

["Azurill"] = {skill = 18, level = 23},

["Horsea"] = {skill = 19, level = 25},

["Goldeen"] = {skill = 19, level = 25},

["Remoraid"] = {skill = 19, level = 27},

["Krabby"] = {skill = 19, level = 28},

["Chinchou"] = {skill = 19, level = 30},

["Mantyke"] = {skill = 20, level = 35},

["Tentacool"] = {skill = 20, level = 35},

["Marill"] = {skill = 20, level = 35},

["Qwilfish"] = {skill = 20, level = 40},

["Poliwhirl"] = {skill = 20, level = 40},

["Seaking"] = {skill = 20, level = 40},

["Mudkip"] = {skill = 20, level = 45},

["Spheal"] = {skill = 21, level = 50},

["Kingler"] = {skill = 21, level = 50},

["Seadra"] = {skill = 21, level = 55},

["Wailmer"] = {skill = 21, level = 60},

["Corsola"] = {skill = 22, level = 55},

["Octillery"] = {skill = 22, level = 60},

["Marshtomp"] = {skill = 22, level = 70},

["Lanturn"] = {skill = 22, level = 75},

["Sealeo"] = {skill = 23, level = 70},

["Crawdaunt"] = {skill = 23, level = 70},

["Azumarill"] = {skill = 23, level = 70},

["Mantine"] = {skill = 23, level = 75},

["Politoed"] = {skill = 23, level = 80},

["Poliwrath"] = {skill = 23, level = 80},

["Vaporeon"] = {skill = 23, level = 80},

["Kingdra"] = {skill = 24, level = 85},

["Dratini"] = {skill = 24, level = 90},

["Gyarados"] = {skill = 25, level = 95},

["Milotic"] = {skill = 25, level = 95},

["Wailord"] = {skill = 25, level = 95},

["Swampert"] = {skill = 25, level = 95},

["Walrein"] = {skill = 25, level = 95},

["Tentacruel"] = {skill = 25, level = 95},

}

 

local storage = 15496

local bonus = 40

local limite = 80

local level = 50

local outfitz = {520, 521} -- Outfit male/female.

 

local function doFish(cid, pos, ppos, chance, interval, number)

        if not isCreature(cid) then return false end

 

        if getThingPos(cid).x ~= ppos.x or getThingPos(cid).y ~= ppos.y then

        return false end

 

        if getPlayerStorageValue(cid, storage) ~= number then return false end

 

        doSendMagicEffect(pos, CONST_ME_LOSEENERGY)

 

local peixe = 0

local playerpos = getClosestFreeTile(cid, getThingPos(cid))

local fishes = {}

local randomfish = ""

 

                                                                  --alterado!!

 if getPlayerSkillLevel(cid, 6) < limite then

 doPlayerAddSkillTry(cid, 6, 100)--- 100

 end

 

for a, b in pairs (fishing) do

 if getPlayerSkillLevel(cid, 6) >= b.skill then

  table.insert(fishes, a)

 end

end

 

 if math.random(1, 100) <= chance then

  if getPlayerSkillLevel(cid, 6) < limite then

  doPlayerAddSkillTry(cid, 6, bonus)

  end

  randomfish = fishes[math.random(#fishes)]

     peixe = doSummonCreature(randomfish, playerpos)

  if not isCreature(peixe) then

   addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)

  return true

  end

  if #getCreatureSummons(cid) >= 1 then

          doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 173)

   doChallengeCreature(getCreatureSummons(cid)[1], peixe)

         else

   doSendMagicEffect(getThingPos(cid), 173)

   doChallengeCreature(cid, peixe)

         end

  doCreatureSetNoMove(cid, false)

  doRemoveCondition(cid, CONDITION_OUTFIT)

 return true

 end

addEvent(doFish, interval, cid, pos, ppos, chance, interval, number)

doCreatureSetNoMove(cid, true)

return true

end

 

local waters = {4614, 4615, 4616, 4617, 4618, 4619, 4608, 4609, 4610, 4611, 4612, 4613, 7236, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}

 

function onUse(cid, item, fromPos, itemEx, toPos)

if getPlayerLevel(cid) < level then

doPlayerSendCancel(cid, "Você precisa ser level "..level.." para usar essa rod.")

return true

end

 

 

if getPlayerGroupId(cid) == 11 then

return true

end

 

local checkPos = toPos

checkPos.stackpos = 0

 

if getTileThingByPos(checkPos).itemid <= 0 then

doPlayerSendCancel(cid, '!')

return true

end

 

if not isInArray(waters, getTileInfo(toPos).itemid) then

return true

end

 

if (getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 63215) >= 1) and not canFishWhileSurfingOrFlying then

doPlayerSendCancel(cid, "You can't fish while surfing/flying.")

return true

end

 

if isInArray(waters, getTileInfo(getThingPos(cid)).itemid) then

doPlayerSendCancel(cid, "You can\'t fish while surfing neither flying above water.")

return true

end

 

if getTileInfo(getThingPos(getCreatureSummons(cid)[1] or cid)).protection then

 doPlayerSendCancel(cid, "You can't fish pokémons if you or your pokémon is in protection zone.")

return true

end

 

 

 

if not tonumber(getPlayerStorageValue(cid, storage)) then

 local test = io.open("data/sendtobrun123.txt", "a+")

 local read = ""

 if test then

  read = test:read("*all")

  test:close()

 end

 read = read.."\n[fishing.lua] "..getCreatureName(cid).." - "..getPlayerStorageValue(cid, storage)..""

 local reopen = io.open("data/sendtobrun123.txt", "w")

 reopen:write(read)

 reopen:close()

 setPlayerStorageValue(cid, storage, 1)

end

 

setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage) + 1)

 if getPlayerStorageValue(cid, storage) >= 800 then

  setPlayerStorageValue(cid, storage, 1)

 end

 

local delay = 1500 - getPlayerSkillLevel(cid, 6) * 50

local chance = 7 + getPlayerSkillLevel(cid, 6) / 6.5

outfit = getCreatureOutfit(cid)

if getPlayerSex(cid) == 0 then

 out = 1467

else

 out = 1468

end

if outfit.lookType == outfitz[1] or outfit.lookType == outfitz[2] then

doSetCreatureOutfit(cid, {lookType = out, lookHead = outfit.lookHead, lookBody = outfit.lookBody, lookLegs = outfit.lookLegs, lookFeet = outfit.lookFeet}, -1)

doFish(cid, toPos, getThingPos(cid), chance, delay, getPlayerStorageValue(cid, storage))

else

doPlayerSendCancel(cid, "Você precisa colocar a roupa de pescador para pescar..")

end

return true

end

Vlw cara tu é top!

wq3bBzt.png
Pokémon Dust Evolution
 
É aonde começa sua nova aventura!! 

 

Facebook

 
Verifique Atualizações

 

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo