CRIEI UMA SCRIPT QUE ESTA DANDO ERRO 

Spoiler

local function doMarkPos(cid, posx, posy, posz)
    setPlayerStorageValue(cid, 19000, posx)
    setPlayerStorageValue(cid, 19001, posy)
    setPlayerStorageValue(cid, 19002, posz)
end

local function removeTeleport(pos)
    tp = getTileItemById(pos, 1387).uid
    doRemoveItem(tp, 1)
    doSendMagicEffect(pos, 2)
end

local teleportar_para = {x = 1244, y = 731, z = 6}
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, 10)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)

local function x(p, d)
    local t = {{x=p.x,y=p.y-1,z=p.z},{x=p.x+1,y=p.y,z=p.z},{x=p.x,y=p.y+1,z=p.z},{x=p.x-1,y=p.y,z=p.z}}
return t[d+1]
end

function onCastSpell(cid, var)
    local pos = getCreaturePosition(cid)
    local criar_tp = pos
    doCreateTeleport(1387, teleportar_para, criar_tp)
    doMarkPos (cid, pos.x, pos.y, pos.z)
    local tp = getTileItemById(criar_tp, 1387).uid
    doItemSetAttribute(tp, "aid", 5678)
    --doTeleportThing(cid, teleportar_para, true) --Tira essa linha se nao for teleportar o player q usou a magia automaticamente.
    
    if getPlayerStorageValue(cid, 5677) == 1 then
        doPlayerSendCancel(cid, "Você não pode usar tal magia aqui")
    return false
    end

    for i = 1, 5 do
        addEvent(doSendMagicEffect, i*1000, criar_tp, 134)
    end
    addEvent(removeTeleport, 5000, criar_tp)
return doCombat(cid, combat, var)
end

MOVEMENTS/SCRIPT

Spoiler

function onStepIn(cid, item, position, fromPosition)
    function getMarkPos(cid)
        return {x=getPlayerStorageValue(cid, 19000), y=getPlayerStorageValue(cid, 19001), z=getPlayerStorageValue(cid, 19002)}
    end
    if getMarkPos(cid).x > 0 then
        doTeleportThing (cid, getMarkPos)
    end
return true
end
 

NAO SEI CUAL ERRO PQ QUANDO COLOCO ESSA SCRIPT EM UM PORTAL ACTION ID E O PLAYER PASSA PRA VOLTAR PARA O LOCAL QUE ELE USOU A SPELL ELE NAO VOLTA ALGUEM PODE AJUDAR JA TOU 4 DIAS TENTANDO ARRUMAR CRIEI  A CONTA PRA ALGUEM PODER AJUDAR SOU NOVO MAS SEI USAR JA SEI DAR REP ETC SE ALGUEM PUDER AJUDAR REP+ VLW

 

                                                                                                                            --Creditos--

                                                                                                                              @Talesigorvr

ajudou numa parte do script quando meu amigo  @zPerseu teve um pequeno erro 

Editado Junho 5, 2016 8 anos por ZikaLord (veja o histórico de edições)

3 horas atrás, ZikaLord disse:

CRIEI UMA SCRIPT QUE ESTA DANDO ERRO 

  Mostrar conteúdo oculto

local function doMarkPos(cid, posx, posy, posz)
    setPlayerStorageValue(cid, 19000, posx)
    setPlayerStorageValue(cid, 19001, posy)
    setPlayerStorageValue(cid, 19002, posz)
end

local function removeTeleport(pos)
    tp = getTileItemById(pos, 1387).uid
    doRemoveItem(tp, 1)
    doSendMagicEffect(pos, 2)
end

local teleportar_para = {x = 1244, y = 731, z = 6}
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, 10)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)

local function x(p, d)
    local t = {{x=p.x,y=p.y-1,z=p.z},{x=p.x+1,y=p.y,z=p.z},{x=p.x,y=p.y+1,z=p.z},{x=p.x-1,y=p.y,z=p.z}}
return t[d+1]
end

function onCastSpell(cid, var)
    local pos = getCreaturePosition(cid)
    local criar_tp = pos
    doCreateTeleport(1387, teleportar_para, criar_tp)
    doMarkPos (cid, pos.x, pos.y, pos.z)
    local tp = getTileItemById(criar_tp, 1387).uid
    doItemSetAttribute(tp, "aid", 5678)
    --doTeleportThing(cid, teleportar_para, true) --Tira essa linha se nao for teleportar o player q usou a magia automaticamente.
    
    if getPlayerStorageValue(cid, 5677) == 1 then
        doPlayerSendCancel(cid, "Você não pode usar tal magia aqui")
    return false
    end

    for i = 1, 5 do
        addEvent(doSendMagicEffect, i*1000, criar_tp, 134)
    end
    addEvent(removeTeleport, 5000, criar_tp)
return doCombat(cid, combat, var)
end

MOVEMENTS/SCRIPT

  Mostrar conteúdo oculto

function onStepIn(cid, item, position, fromPosition)
    function getMarkPos(cid)
        return {x=getPlayerStorageValue(cid, 19000), y=getPlayerStorageValue(cid, 19001), z=getPlayerStorageValue(cid, 19002)}
    end
    if getMarkPos(cid).x > 0 then
        doTeleportThing (cid, getMarkPos)
    end
return true
end
 

NAO SEI CUAL ERRO PQ QUANDO COLOCO ESSA SCRIPT EM UM PORTAL ACTION ID E O PLAYER PASSA PRA VOLTAR PARA O LOCAL QUE ELE USOU A SPELL ELE NAO VOLTA ALGUEM PODE AJUDAR JA TOU 4 DIAS TENTANDO ARRUMAR CRIEI  A CONTA PRA ALGUEM PODER AJUDAR SOU NOVO MAS SEI USAR JA SEI DAR REP ETC SE ALGUEM PUDER AJUDAR REP+ VLW

 

                                                                                                                            --Creditos--

                                                                                                                              @Talesigorvr

ajudou numa parte do script quando meu amigo  @zPerseu teve um pequeno erro 

Seu gay '===='

2 minutos atrás, zPerseu disse:

Seu gay '===='

amigos da vida amigos de nome amigos de nto '=='

Coloque o cid na função getMarkPos, em doTeleportThing.

Editado Junho 6, 2016 8 anos por Talesigorvr (veja o histórico de edições)