Ir para conteúdo
TK News
  • Cadastre-se

Como Remover Para PESCAR Sem Usar As Worm

raell5 2

Por ,
em Suporte Tibia OTServer

 Share Seguidores 0

Posts Recomendados

raell5 2

raell5 2 281

Postado
Postado (editado)

eae galera queria saber se tem como pescar com a vara normal sem usar as worm ?

local config = {

waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625},

}

local ctfArena = {

frompos = {x=659, y=483, z=7},

topos = {x=769, y=569, z=7},

}

local warArena = {

frompos = {x=638, y=711, z=7},

topos = {x=751, y=780, z=7},

}

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

local pos = getCreaturePosition(cid)

local fishSkill = getPlayerSkill(cid, SKILL_FISHING)

local maxChance2 = 400 - fishSkill

local maxChance = 200 - fishSkill

local minChance = 1

local chance = math.random(minChance,maxChance)

if isInArea(getPlayerPosition(cid), ctfArena.frompos, ctfArena.topos) or isInArea(getPlayerPosition(cid), warArena.frompos, warArena.topos) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you cannot fish in the arena.")

return true

end

if isInArray(config.waterIds, itemEx.itemid) then

if getTilePzInfo(pos) == false then

if getPlayerItemCount(cid, ITEM_WORM) > 0 or item.itemid == 10223 then

if math.random(1, (100 + fishSkill / 10)) < fishSkill then

if (item.itemid ~= 10223) then

doPlayerRemoveItem(cid, ITEM_WORM, 1)

end

doPlayerAddSkillTry(cid, SKILL_FISHING, 1)

doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)

--summon smallboss--

if getPlayerLevel(cid) >= 500 and chance == 1 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Hydromancer", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Hydromancer!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Hydromancer!")

end

if getPlayerLevel(cid) >= 500 and chance == 2 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Constrictor", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Constrictor!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Constrictor!")

end

--summon mediumboss--

if getPlayerLevel(cid) >= 1500 and chance == 3 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Mantassin", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Mantassin!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Mantassin!")

end

if getPlayerLevel(cid) >= 1500 and chance == 4 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Pincher", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Pincher!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Pincher!")

end

--summon mediumboss--

if getPlayerLevel(cid) >= 3000 and chance == 5 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Predator", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Predator!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Predator!")

end

if getPlayerLevel(cid) >= 3000 and chance == 6 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Serpent Spawn", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Serpent Spawn!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Serpent Spawn!")

end

--summon hardboss--

if getPlayerLevel(cid) >= 5000 and chance == 7 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Wyrm", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Wyrm!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Undead Mob Raell's!")

end

if getPlayerLevel(cid) >= 5000 and chance == 8 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Sea Serpent", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Sea Serpent!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Undead Water Raell's Element!")

end

if getPlayerLevel(cid) >= 5000 and fishSkill > 100 and math.random(1,maxChance2) == 50 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Oceanus", pos, false)

doPlayerSendChannelMessage(cid, false, ''..getPlayerName(cid)..' has angered the Titan Goddess of Water, Oceanus!',TALKTYPE_CHANNEL_W,10)

end

if getPlayerLevel(cid) >= 5000 and fishSkill > 100 and math.random(1,maxChance2) == 50 then

doSendMagicEffect(toPosition, 65)

doCreateMonster("Undead Frog", pos, false)

doPlayerSendChannelMessage(cid, false, ''..getPlayerName(cid)..' has angered the Titan Of Hell, Santan !',TALKTYPE_CHANNEL_W,10)

end

else

doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)

end

else

doPlayerSendCancel(cid, "You do not have any worms.")

end

else

doPlayerSendCancel(cid, "You may not fish from a protection zone.")

end

else

doPlayerSendCancel(cid, "Cast into open water.")

end

return true

end

Editado por raell5 (veja o histórico de edições)
13978461.png
Link para o post
Compartilhar em outros sites
karlkalvin

karlkalvin 73

Postado
Postado

local config = {

waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625},

}

local ctfArena = {

frompos = {x=659, y=483, z=7},

topos = {x=769, y=569, z=7},

}

local warArena = {

frompos = {x=638, y=711, z=7},

topos = {x=751, y=780, z=7},

}

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

local pos = getCreaturePosition(cid)

local fishSkill = getPlayerSkill(cid, SKILL_FISHING)

local maxChance2 = 400 - fishSkill

local maxChance = 200 - fishSkill

local minChance = 1

local chance = math.random(minChance,maxChance)

if isInArea(getPlayerPosition(cid), ctfArena.frompos, ctfArena.topos) or isInArea(getPlayerPosition(cid), warArena.frompos, warArena.topos) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you cannot fish in the arena.")

return true

end

if isInArray(config.waterIds, itemEx.itemid) then

if getTilePzInfo(pos) == false then

if math.random(1, (100 + fishSkill / 10)) < fishSkill then

doPlayerAddSkillTry(cid, SKILL_FISHING, 1)

doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)

--summon smallboss--

if getPlayerLevel(cid) >= 500 and chance == 1 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Hydromancer", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Hydromancer!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Hydromancer!")

end

if getPlayerLevel(cid) >= 500 and chance == 2 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Constrictor", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Constrictor!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Constrictor!")

end

--summon mediumboss--

if getPlayerLevel(cid) >= 1500 and chance == 3 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Mantassin", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Mantassin!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Mantassin!")

end

if getPlayerLevel(cid) >= 1500 and chance == 4 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Pincher", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Pincher!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Pincher!")

end

--summon mediumboss--

if getPlayerLevel(cid) >= 3000 and chance == 5 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Quara Predator", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Predator!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Predator!")

end

if getPlayerLevel(cid) >= 3000 and chance == 6 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Serpent Spawn", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Serpent Spawn!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Serpent Spawn!")

end

--summon hardboss--

if getPlayerLevel(cid) >= 5000 and chance == 7 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Wyrm", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Wyrm!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Undead Mob Raell's!")

end

if getPlayerLevel(cid) >= 5000 and chance == 8 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Sea Serpent", pos, false)

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Sea Serpent!")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Undead Water Raell's Element!")

end

if getPlayerLevel(cid) >= 5000 and fishSkill > 100 and math.random(1,maxChance2) == 50 then

doSendMagicEffect(toPosition, 33)

doCreateMonster("Oceanus", pos, false)

doPlayerSendChannelMessage(cid, false, ''..getPlayerName(cid)..' has angered the Titan Goddess of Water, Oceanus!',TALKTYPE_CHANNEL_W,10)

end

if getPlayerLevel(cid) >= 5000 and fishSkill > 100 and math.random(1,maxChance2) == 50 then

doSendMagicEffect(toPosition, 65)

doCreateMonster("Undead Frog", pos, false)

doPlayerSendChannelMessage(cid, false, ''..getPlayerName(cid)..' has angered the Titan Of Hell, Santan !',TALKTYPE_CHANNEL_W,10)

end

else

doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY)

end

else

doPlayerSendCancel(cid, "You do not have any worms.")

end

else

doPlayerSendCancel(cid, "You may not fish from a protection zone.")

end

else

doPlayerSendCancel(cid, "Cast into open water.")

end

return true

end

Testa ai amigo, se der erro, poste o erro..

                               ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Assinatura~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                                                                pmnz1.jpg

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.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito