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
- Fórum
- xTibia - Notícias e Suporte
- Soluções
- Archived
- Runa Ou Item Vip
info
Grupo: Conde
Registrado: 16/06/08
Posts: 998
Reputação: +185
Gênero: Masculino

info
Grupo: Campones
Registrado: 25/06/11
Posts: 24
Reputação: +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
info
Grupo: Conde
Registrado: 16/06/08
Posts: 998
Reputação: +185
Gênero: Masculino

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
info
Grupo: Campones
Registrado: 25/06/11
Posts: 24
Reputação: +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


info
Grupo: Campones
Registrado: 25/06/11
Posts: 24
Reputação: +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 :
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