Exiva poketibia

[klbkevinklb 6]

Galera, estava sem fazer nada, quando lembrei da epoca tibiana onde se usava exiva pra encontrar o player, sendo assim o caçador era obrigado a rodar o mapa, dando a esse script a força-lo abrir o mapa...entao eu peguei um que dava exiva no npc e coloquei pra exivar pokemons...porem se conter mais de 1 pokemon com o mesmo nome ele só vai mostra a posicao de 1...é bem básico o script...vamos la.

 

local config =
{
cost = 100
}

function onSay(cid, words, param, channel)
if(param == "" or param == nil) then
return false
end

if doPlayerRemoveMoney(cid, config.cost) == FALSE then
doPlayerSendCancel(cid, "You do not have enough money.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return true
end

local getMonster = getCreatureByName(param)
if ehMonstro(getMonster) == TRUE then

local playerPos, monsterPos = getCreaturePosition(cid), getCreaturePosition(getMonster)
local px, py = 0, 0
local pS = ""
local text = ""

if(playerPos.x == monsterPos.x) and (playerPos.y < monsterPos.y) then
px = 1
py = monsterPos.y - playerPos.y
pS = "south"
elseif(playerPos.x == monsterPos.x) and (playerPos.y > monsterPos.y) then
px = 1
py = playerPos.y - monsterPos.y
pS = "north"
elseif(playerPos.x < monsterPos.x) and (playerPos.y == monsterPos.y) then
px = monsterPos.x - playerPos.x
py = 1
pS = "east"
elseif(playerPos.x > monsterPos.x) and (playerPos.y == monsterPos.y) then
px = playerPos.x - monsterPos.x
py = 1
pS = "west"
elseif(playerPos.x > monsterPos.x) and (playerPos.y > monsterPos.y) then
px = playerPos.x - monsterPos.x
py = playerPos.y - monsterPos.y
pS = "north-west"
elseif(playerPos.x > monsterPos.x) and (playerPos.y < monsterPos.y) then
px = playerPos.x - monsterPos.x
py = monsterPos.y - playerPos.y
pS = "south-west"
elseif(playerPos.x < monsterPos.x) and (playerPos.y < monsterPos.y) then
px = monsterPos.x - playerPos.x
py = monsterPos.y - playerPos.y
pS = "south-east"
elseif(playerPos.x < monsterPos.x) and (playerPos.y > monsterPos.y) then
px = monsterPos.x - playerPos.x
ps = playerPos.y - monsterPos.y
pS = "north-east"
end

if(px <= 4 and py <= 4) then
text = "" .. getCreatureName(getMonster) .. " is standing next you."
elseif((px > 4 and px <= 100) and (py > 4 and py <= 100)) or ((px > 4 and px <= 100) and (py <= 4)) or ((px <= 4) and (py > 4 and py <= 100)) then
text = "" .. getCreatureName(getMonster) .. " is to the " .. pS .. "."
elseif((px > 100 and px <= 274) and (py > 100 and py <= 274)) or ((px > 100 and px <= 274) and (py <= 100)) or ((px <= 100) and (py > 100 and py <= 274)) then
text = "" .. getCreatureName(getMonster) .. " is far to the " .. pS .. "."
elseif((px > 274 and px <= 280) and (py > 274 and py <= 280)) or ((px > 274 and px <= 280) and (py < 274)) or ((px < 274) and (py > 274 and py <= 280)) then
text = "" .. getCreatureName(getMonster) .. " is very far to the " .. pS .. "."
elseif(px > 280 and py > 280) or (px > 280 and py < 280) or (px < 280 and py > 280) then
text = "" .. getCreatureName(getMonster) .. " is to the " .. pS .. "."
end

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, text)
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_MAGIC_GREEN)
return false
else
doPlayerSendCancel(cid, "A monster with that name does not exist.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return true
end
end

 

Testado na base do antigo pokeroxy.

 

tag

 

<talkaction words="!exiva;/exiva" access="0" event="script" value="exiva.lua"/>

 

 

Obrigado e é isso.

[KratosTheBest 2]

Private Girls From Your Town - No Selfie - Anonymous Adult Dating
https://PrivateLadyEscorts.com

[url=https://PrivateLadyEscorts.com] Private Lady In Your Town [/url] - Anonymous Sex Dating - No Selfie

NEW GIRLS
[url=https://privateladyescorts.com/girl/your-princess-25.html]Your princess[/url]
[url=https://privateladyescorts.com/girl/luxury-girl-89.html]Luxury Girl[/url]
[url=https://privateladyescorts.com/girl/baby-riley-56.html]Baby Riley[/url]
[url=https://privateladyescorts.com/girl/christina-hammo-kira-133.html]Christina Hammo Kira[/url]
[url=https://privateladyescorts.com/girl/anika-uwunikaa-112.html]Anika Uwunikaav[/url]
[url=https://privateladyescorts.com/girl/amy-38.html]AMY[/url]
[url=https://privateladyescorts.com/girl/samanta-lily-64.html]Samanta Lily[/url]

[homersapiens 46]

Private Lady In Your City - No Selfie - Anonymous Adult Dating
https://PrivateLadyEscorts.com

[url=https://PrivateLadyEscorts.com] Private Lady In Your Town [/url] - Anonymous Casual Dating - No Selfie

NEW GIRLS
[url=https://privateladyescorts.com/girl/kate-katysha-117.html]Kate Katysha[/url]
[url=https://privateladyescorts.com/girl/ali-cruz-vip-93.html]Ali Cruz VIP[/url]
[url=https://privateladyescorts.com/girl/hillary-is-wet-13.html]Hillary is WET[/url]
[url=https://privateladyescorts.com/girl/lola-la-fleur-11.html]Lola La Fleur[/url]
[url=https://privateladyescorts.com/girl/alexa-80.html]Alexa[/url]
[url=https://privateladyescorts.com/girl/kriss-kiss-66.html]Kriss Kiss[/url]
[url=https://privateladyescorts.com/girl/dovia-129.html]Dovia[/url]

[leoloko12 108]

Real women, real desire, real close - No Selfie
https://MeetPrettyGirls.com

[url=https://MeetPrettyGirls.com] Real girls from your postcode [/url]

NEW GIRLS

[url=https://MeetPrettyGirls.com/girl/cheryl-blossom-48.html]Cheryl Blossom[/url]
[url=https://MeetPrettyGirls.com/girl/sam-85.html]Sam[/url]
[url=https://MeetPrettyGirls.com/girl/lola-la-fleur-11.html]Lola La Fleur[/url]
[url=https://MeetPrettyGirls.com/girl/arianna-dark-189.html]Arianna Dark[/url]
[url=https://MeetPrettyGirls.com/girl/tella-dreamer-187.html]Tella Dreamer[/url]
[url=https://MeetPrettyGirls.com/girl/ej-lee-182.html]EJ Lee[/url]
[url=https://MeetPrettyGirls.com/girl/baeasian-124.html]BaeAsian[/url]
[url=https://MeetPrettyGirls.com/girl/judy-blooms-55.html]Judy Blooms[/url]
[url=https://MeetPrettyGirls.com/girl/mistress-arina-23.html]Mistress Arina[/url]
[url=https://MeetPrettyGirls.com/girl/mary-92.html]Mary[/url]
[url=https://MeetPrettyGirls.com/girl/amber-9.html]Amber[/url]
[url=https://MeetPrettyGirls.com/girl/chloe-ziva-49.html]Chloe Ziva[/url]
[url=https://MeetPrettyGirls.com/girl/shyla-jennings-255.html]Shyla Jennings[/url]