Runa Ou Item Vip

[Admrevolution 19]

Tipo do script:Axo Que É Na Pasta Spell Da Runa...

Protocolo (versão do Tibia):8.6

Servidor utilizado:Real Server

Nível de experiência:Médio

Adicionais/Informações:Por Exemplo Esse É O Script Da Minha Runa :

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)

setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)

setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, TRUE)

 

function onCastSpell(cid, var)

doCreatureAddHealth(cid, math.random(1000,1500))

doCreatureSay(cid,"Health Vip", TALKTYPE_ORANGE_1)

return doCombat(cid, combat, var)

end

Eu Queria Que Somente O Player Com A Storage Vip Pudesse Usar A Runa...Caso Contrario Dava Uma Mensagem Ou Apenas Um Erro!

Desde Já Meu Muito Obrigado!

Att : ADM REVOLUTION

VALE 2 + REP

[Fir3element 185]

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)
setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, TRUE)

function onCastSpell(cid, var)
   local storage = 1000
   local msg = {"You aren't Vip.", "Health Vip"}	
   if getPlayerStorageValue(uid, storage) == true then
      doCreatureAddHealth(cid, math.random(1000,1500))
      doCreatureSay(cid, msg[2], TALKTYPE_ORANGE_1)
   else
      doPlayerSendCancel(cid, msg[1])
      return true
   end
   return doCombat(cid, combat, var)
end

[Admrevolution 19]

@fireelement

Obrigado Por Ajudar Mas Não Esta Funcionando Configurei Assim :

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)
setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, TRUE)

function onCastSpell(cid, var)
   local storage = 13540
   local msg = {"Voce Nao e Vip.", "Health Vip"}       
   if getPlayerStorageValue(uid, storage) == true then
      doCreatureAddHealth(cid, math.random(1000,1500))
      doCreatureSay(cid, msg[2], TALKTYPE_ORANGE_1)
   else
      doPlayerSendCancel(cid, msg[1])
      return true
   end
   return doCombat(cid, combat, var)
end

Alguém Pode Testar Ver Se Na Sua Versão Ele Funciona?

Desde Já Meus Agradecimentos!

ATT:Adm Revolution

[Fir3element 185]

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE)
setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, TRUE)

function onCastSpell(cid, var)
   local storage = 13540
   local msg = {"Voce Nao e Vip.", "Health Vip"}       
   if getPlayerStorageValue(cid, storage) == true then
      doCreatureAddHealth(cid, math.random(1000,1500))
      doCreatureSay(cid, msg[2], TALKTYPE_ORANGE_1)
   else
      doPlayerSendCancel(cid, msg[1])
      return true
   end
   return doCombat(cid, combat, var)
end

[Admrevolution 19]

19:22 Você tem 29 dias de VIP no seu character.

19:22 Seja Bem Vindo a Area vip.

19:21 Using the last health vip...

Não Ta Dando Vou Mostrar Daonde Eu Peguei O Storage

-- Script Vip Sytem 1.0 --

function onStepIn(cid, item, position, fromPosition)

 

local config = {

msgDenied = "Você não e vip ,para adqrir sua vip fale .!buyvip",

msgWelcome = "Seja Bem Vindo a Area vip."

}

 

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

doTeleportThing(cid, fromPosition, true)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgDenied)

doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE)

return TRUE

end

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgWelcome)

return TRUE

end

Ta Certo?

Desde Já Agradeço...

ATT : Adm Revolution