Vip Door System 1.0

vejo que muitos estavam atrás desse script,onde só players Vips podem passar pela porta,e não é aquela door que só passa e não da para voltar,pelo contrario,ela abre e fecha normalmente.

Versão testada: 8.54

vá em actions\script crie um arquivo.lua e renomeie para:

vipdoorsystem.lua

dentro coloque:

V1

function onUse(cid, item, frompos, item2, topos)
if getPlayerStorageValue(cid, 13540) - os.time() <= 0 then
return doCreatureSay(cid, "Você não possui Vip Access.", TALKTYPE_ORANGE_1)
end
doTransformItem(item.uid, item.itemid + 1)
playerpos = getPlayerPosition(cid)
doorpos = {x = frompos.x, y = frompos.y, z = frompos.z, stackpos = 253}
if playerpos.y == doorpos.y + 1 and playerpos.x == doorpos.x then
doMoveCreature(cid, 0)
elseif playerpos.x == doorpos.x - 1 and playerpos.y == doorpos.y then
doMoveCreature(cid, 1)
elseif playerpos.y == doorpos.y - 1 and playerpos.x == doorpos.x then
doMoveCreature(cid, 2)
elseif playerpos.y == doorpos.y and playerpos.x == doorpos.x + 1 then
doMoveCreature(cid, 3)
elseif playerpos.x == doorpos.x + 1 and playerpos.y == doorpos.y - 1 then
doMoveCreature(cid, 4)
elseif playerpos.x == doorpos.x - 1 and playerpos.y == doorpos.y - 1 then
doMoveCreature(cid, 5)
elseif playerpos.x == doorpos.x + 1 and playerpos.y == doorpos.y + 1 then
doMoveCreature(cid, 6)
elseif playerpos.x == doorpos.x - 1 and playerpos.y == doorpos.y + 1 then
doMoveCreature(cid, 7)
end
return TRUE
end

V2

function onUse(cid, item, frompos, item2, topos) 
       if getPlayerStorageValue(cid, 13540) - os.time() <= 0 then 
        return doPlayerSendTextMessage(cid,22,'Você não possui Vip Access.')
          end
           pos = getPlayerPosition(cid)
           if pos.x == topos.x then
              if pos.y < topos.y then
                 pos.y = topos.y + 1
              else
                 pos.y = topos.y - 1
              end
           elseif pos.y == topos.y then
                  if pos.x < topos.x then
                     pos.x = topos.x + 1
                  else
                     pos.x = topos.x - 1
                  end
           else
               doPlayerSendTextMessage(cid,22,"Fique na frente da porta.")
           return TRUE
           end
           doTeleportThing(cid,pos)
           doSendMagicEffect(topos,12)
        return TRUE
end

em actions.xml adicione a tag:

<action actionid="2075" script="vipdoorsystem.lua"/>

Nas propriedades da Porta coloque: ActionID = 2075

OU OU AKI PEGO DIBOA DIREITIN MAIS AH 1 PEQUENO ERRO , NAO SEI SE EH DA SCRIPT E TALZ , QUANDO EU VO ABRI A PORTA A PORTA FICA DE LADO E NAO VOLTA A PORTA ELA FICA ABERTA SOH AI QUALQUER 1 PASSA ;s

ah eh pq nesse script a única porta que funciona é a closed door(que tem uma fechadura vermelha)

exemplo dessa:

oque eu tenho que fazer para algum player podeer abrir a porta? eu adicionei o storage 13540 no meu char e ainda continuo nao dando para abrir

OMG

essa porta é pro perfect Vip system 1.6 que tem aqui no xtibia

se tu adc uma storage apenas pro player ele nao vai passa mesmo

a nao ser que vc troque as variaveis pra essa:

vipstatus = getPlayerStorageValue(cid, 13540) <= 0 

if vipstatus ~= TRUE then 

as portas funcionarão de boa aqui mais depois de 38 horas com server on elas viraram essas pedras...porque sera?

tenta assim:

function onUse(cid, item, frompos, item2, topos) 

local config = {
porta_fechada = 5748, -- id da porta fechada 
porta_aberta = 5749 -- id da porta aberta 
} 

vipstatus = getPlayerStorageValue(cid, 13540) - os.time() <= 0

if vipstatus ~= TRUE then
if item.itemid == config.porta_fechada then 
doTransformItem(item.uid,config.porta_aberta) 
elseif item.itemid == config.porta_aberta then 
doTransformItem(item.uid,config.porta_fechada) 
end 
else 
doCreatureSay(cid, "Você não possui Vip Access.", TALKTYPE_ORANGE_1) 
end 
return TRUE 
end

quando eu coloquei isso a porta não feixo mais sozinha... ai tipo se um vip abrisse ela continuava aberta e qualquer 1 podia entrar :S tem como me passa seu msn por mp e me ajudar a fazer uma tile que so quem tem storage x pode passar? vlw =)

manda seu msn :X

ja mandei mp..

Topico perfeito e sistema melhor ainda vlw =)

funciona em pokemon ot??(pokemon flash 8.54)

funciona em pokemon ot (pokemon flash 8.54)??

deve funcionar sim (: