Então, tem esse sistema abaixo de adcionar acesso a vips, a primeira parte, parece funcionar, manda a mensagem e tudo,  porém a parte do movements não esta pegando, chego no sqm, passo batido, não manda pro templo e nem nada se eu não tiver a storage do acesso, segue abaixo a configuração

 

Actions

function onUse(cid, item, frompos, item2, topos)
if item.uid ==60008 then -- Aki e o uniqueid que fica no actions.xml sempre mude se for criar outra
queststatus = getPlayerStorageValue(cid,7500) -- Aki Ponhe a mesma storage la de baixo
if queststatus == 1 then
doPlayerSendTextMessage(cid,22,"Você ja fez essa quest.")
else
doPlayerSendTextMessage(cid,22,"Agora você tem acesso a VIP 1.")
doSendMagicEffect(topos,35)
coins_uid = doPlayerAddItem(cid,2160,1000) -- Id do item que vai adicionar e a quantidade
setPlayerStorageValue(cid,7500,1) -- Aki e A Storage da vip so mude aki se vo criar outra vip
end
return 0
end
return 1
end

<action uniqueid="60008" event="script" value="questvipacess/bausystemvip.lua"/>

Movements

function onStepIn(cid, item, pos)
-- teleports config
teleport1 ={x= 1020, y= 1022, z= 7} -- Aki e a pos pra onde ele vai voltar se nao tiver vip

if isPlayer(cid) then
if item.actionid == 7500 then -- Aki e akela storage que tinha no actions
vip = getPlayerStorageValue(cid,7500) -- Aki Também e akela storage e voce poem ela aki
if vip == -1 then
doPlayerSendCancel(cid,"Você não é VIP 1, faça a quest VIP Acess ao lado do Teleports.")

doTeleportThing(cid,teleport1)

else
end
end
end
end

<movevent type="StepIn" uniqueid="7500" event="script" value="questvipacess.lua"/>

Editado Janeiro 3, 2015 10 anos por jNo (veja o histórico de edições)

Refiz:

Action script:

function onUse(cid)
    stor = 7500 -- vip storage
    ccoins = 1000 -- amount of crystal coins
    
    if getPlayerStorageValue(cid, stor) < 1 then
        setPlayerStorageValue(cid, stor, 1)
        doPlayerAddItem(cid, 2160, ccoins)
        doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, 'Agora você tem acesso a VIP 1.')
    else
        doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, 'Você ja fez essa quest.')
    end
    
    return true
end

Movement script:

function onStepIn(cid, item, pos, fromPos)
    stor = 7500 -- vip storage
    
    if getPlayerStorageValue(cid, stor) < 1 then
        doTeleportThing(cid, fromPos)
        doSendMagicEffect(fromPos, CONST_ME_POFF)
        doPlayerSendCancel(cid, 'Você não é VIP 1, faça a quest VIP Acess ao lado dos Teleports.')
    end
    
    doSendMagicEffect(pos, CONST_ME_MAGIC_BLUE)
    return true
end

Basta adicionar o actionid ou uniqueid (qualquer que seja o que você estipulou na tag em movements.xml) ao tile.

@Edit, deu certo, valeuuuuuu

Editado Janeiro 3, 2015 10 anos por jNo (veja o histórico de edições)