xTibia

.com
JU
pedido

Spell Teleport diferente

Por julhinhuu, 22 de set. de 2015 em Scripts

teleport
otserv
10
1.8k
julhinhuuJ
24 de setembro de 2015 às 14:48

Olá galerinha do Xtibia, Boa tarde.

 

Venho aqui pedir-lhes mais 1 spell (Já está ficando clichê) rs, essa spell e para teleportar player em sqms.

 

- O player que usa a magia deverá se teleportar nos sqms, quantidade configurável ou exatamente 3 sqms, se os mesmos estiverem livres sem paredes, players ou outros obstáculos em seu caminho.

 

Bem é isso, obrigado desde já :D


UP ?
Up
zipter98Z
24 de setembro de 2015 às 16:45




local times = 3       --Quantos SQMs o jogador irá se mover.


 



function isWalkable(pos, creature, proj, pz)-- by Nord



    if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end



    if getTopCreature(pos).uid > 0 and creature then return false end



    if getTileInfo(pos).protection and pz then return false, true end



    local n = not proj and 2 or 2



    for i = 0, 255 do



        pos.stackpos = i



        local tile = getTileThingByPos(pos)



        if tile.itemid ~= 0 and not isCreature(tile.uid) then



            if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then



                return false



            end



        end



    end



    return true



end


 



function move_creature(cid, i, direction)



    if not isPlayer(cid) then



        return true



    elseif i <= 0 or not isWalkable(getPosByDir(getThingPos(cid), direction)) then



        return doCreatureSetNoMove(cid, false)



    end


 



    doMoveCreature(cid, direction)



    addEvent(move_creature, 400, cid, i - 1, direction)     --400 = intervalo de tempo entre cada movimento



end


 



function onCastSpell(cid)



    doCreatureSetNoMove(cid, true)



    move_creature(cid, times, getCreatureLookDirection(cid))



    return true



end






 


Editado Setembro 25 por zipter98
julhinhuuJ
24 de setembro de 2015 às 16:58


Eita, obrigado zipter quando eu chegar em casa eu vou testar.


#Pergunta: você faz alguns serviços de scripts por fora?


zipter98Z
24 de setembro de 2015 às 17:07


Agradeço o interesse pelos meus serviços, mas assuntos relacionados à comercialização de produtos de OTServ são proibidos aqui no fórum.


Basicamente, me limito a ajudar na área de suporte.


julhinhuuJ
25 de setembro de 2015 às 00:24


A ta bom é que estou precisando de um scripter, me desculpe pela pergunta, foi uma pergunta inocente.


 


Obrigado novamente pela spell chegar em casa eu vou testar.


local times = 3       --Quantos SQMs o jogador irá se mover.

function isWalkable(pos, creature, proj, pz)-- by Nord
    if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
    if getTopCreature(pos).uid > 0 and creature then return false end
    if getTileInfo(pos).protection and pz then return false, true end
    local n = not proj and 2 or 2
    for i = 0, 255 do
        pos.stackpos = i
        local tile = getTileThingByPos(pos)
        if tile.itemid ~= 0 and not isCreature(tile.uid) then
            if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
                return false
            end
        end
    end
    return true
end

function move_creature(cid, i, direction)
    if not isPlayer(cid) then
        return true
    elseif i <= 0 or not isWalkable(getPosByDir(getThingPos(cid), direction)) then
        doCreatureSetNoMove(cid, false)
    end
    
    doMoveCreature(cid, direction)
    addEvent(move_creature, 400, cid, i - 1, direction)     --400 = intervalo de tempo entre cada movimento
end

function onCastSpell(cid)
    doCreatureSetNoMove(cid, true)
    move_creature(cid, times, getCreatureLookDirection(cid))
    return true
end



 


até funciona zipter mais ele não para de andar e ainda atravessa as paredes e tudo mais.


zipter98Z
25 de setembro de 2015 às 13:06
Makes sense. Corrigido.
julhinhuuJ
26 de setembro de 2015 às 02:06


Makes sense. Corrigido.


 


Quase que perfeito, teria como pular 3 sqms de uma só vez?  :D


zipter98Z
26 de setembro de 2015 às 03:08
Melhor resposta


Ah, eu tinha entendido errado a explicação da spell. Falha minha, desculpe.


Use este código:


 


local times = 3       --Quantos SQMs o jogador irá se mover.
 
function isWalkable(pos, creature, proj, pz)-- by Nord
    if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
    if getTopCreature(pos).uid > 0 and creature then return false end
    if getTileInfo(pos).protection and pz then return false, true end
    local n = not proj and 2 or 2
    for i = 0, 255 do
        pos.stackpos = i
        local tile = getTileThingByPos(pos)
        if tile.itemid ~= 0 and not isCreature(tile.uid) then
            if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
                return false
            end
        end
    end
    return true
end
 
function onCastSpell(cid)
    local playerPos = getThingPos(cid)
    local toPos = {
        [0] = {x = playerPos.x, y = playerPos.y - times, z = playerPos.z},
        [1] = {x = playerPos.x + times, y = playerPos.y, z = playerPos.z},
        [2] = {x = playerPos.x, y = playerPos.y + times, z = playerPos.z},
        [3] = {x = playerPos.x - times, y = playerPos.y, z = playerPos.z}
    }
    
    local spellToPos = toPos[getCreatureLookDirection(cid)]
    if isWalkable(spellToPos) then
        doTeleportThing(cid, spellToPos)
    else
        doPlayerSendCancel(cid, "Sorry, destination not possible.")
    end
    return true
end


julhinhuuJ
26 de setembro de 2015 às 11:19


Vlw zipter se manja demais mano, MDS :D se eu fosse uma mulher dava pra você, rsrsrs


 


Zoa, Brigadão mesmo em :D


LumusL
26 de setembro de 2015 às 11:39
<p><strong class='bbc'>Tópico Movido</strong><br />Este tópico foi movido de "<a href='http://www.xtibia.com/forum/forum/2-otserv/'>OTServ</a>→ <a href='http://www.xtibia.com/forum/forum/988-suporte-otserv/'>Suporte OTServ</a> → <a href='http://www.xtibia.com/forum/forum/86-suporte-scripting/'>Suporte Scripting</a>"<br />para "<a href='http://www.xtibia.com/forum/forum/2-otserv/'>OTServ</a> → <a href='http://www.xtibia.com/forum/forum/988-suporte-otserv/'>Suporte OTServ</a> → <a href='http://www.xtibia.com/forum/forum/86-suporte-scripting/'>Suporte Scripting</a> → <a href='http://www.xtibia.com/forum/forum/718-pedidos-e-duvidas-resolvidos-scripting/'>Pedidos e dúvidas resolvidos - Scripting</a>".</p><p> </p><p> </p>