[ Resolvido ]Script Sytemvip

[jhonatha14 0]

Tipo do script:sytemvip

Protocolo (versão do Tibia):8.54

Servidor utilizado:The Forgotten Server

Nível de experiência:médio

Adicionais/Informações:tipow vaii ser vip pra compra no site uqeria um script q acabasse em 30 dias e o modo de adicionar a vip com o GOD explo /addvip nick,30 Ajuda-me aii plix vlw...

[guedes100 56]

seria só de adicionar os dias de Vip pelo God certo?

 

eu postei ambas alternativas no topico.

http://www.xtibia.com/forum/topic/131398-perfect-vip-system-10/

 

 

vc pode escolhe os 2 modos com o comando !buyvip ou nao...

 

mais tudo bem vou lhe passar aqui...

 

 

vá em data/talkactions/scripts crie um arquivo.lua e renomeie para systemvip.lua

dentro coloque:

-- Script SYtem vip 1.0 --

 

function onSay(cid, words, param)

if(words == "!vipdays") then

local timenow = os.time()

local quantity = math.floor((getPlayerStorageValue(cid, 13540) - timenow)/(24 * 60 * 60))

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. (quantity < 0 and 0 or quantity) .." dias de VIP no seu character.")

 

elseif(words == "/addvip") then

if getPlayerAccess(cid) == 5 then

local t = string.explode(param, ",")

if not t[2] then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")

end

 

local player = getPlayerByName(t[1])

local days = t[2]

if not isPlayer(player) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player "..player.." not found.")

end

 

local daysvalue = days*3600*24

local storageplayer = getPlayerStorageValue(player, 13540)

local timenow = os.time()

 

local time = storageplayer <= 0 and (timenow + daysvalue) or (storageplayer + daysvalue)

 

doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Foram adicionados "..days.." dias de VIP no seu character.")

setPlayerStorageValue(player, 13540, time)

local quantity = math.floor((getPlayerStorageValue(player,13540) - timenow)/(3600*24))

doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Você tem "..quantity.." dias de VIP restantes.")

end

 

elseif(words == "/delvip") then

if getPlayerAccess(cid) == 5 then

local dec = MESSAGE_INFO_DESCR

if(param == "") then return TRUE,doPlayerSendTextMessage(cid,18,"Command param required.")end

local C,t = {},string.explode(param, ",")

C.pos = getPlayerPosition(cid)

C.uid = getCreatureByName(t[1])

C.time = ((tonumber(t[2]) == nil) and 1 or tonumber(t[2]))*3600*24 --Tempo da vip por dia.

C.days = (tonumber(t[2]) == nil) and 1 or tonumber(t[2]) --Dias de vip.

 

if(getPlayerStorageValue(C.uid,13540) < C.time)then

doPlayerSendTextMessage(cid,dec,'O jogador '..t[1]..' não possui '..C.days..' dias de vip.')

else

doPlayerSendTextMessage(cid,dec,'Você removeu '..C.days..' dias de vip do player '..t[1]..'.')

setPlayerStorageValue(C.uid,13540,getPlayerStorageValue(C.uid,13540)-C.time)

end

doSendMagicEffect(C.pos, math.random(28,30))

end

end

 

return TRUE

end

 

em talkactions.xml adicione a tag:

<talkaction words="!vipdays;/addvip;/delvip" script="systemvip.lua"/>

 

irá ser 3 comandos:

 

para player

!vipdays

 

para God

 

/addvip nick,dias

/delvip nick,dias

Editado Abril 30, 2010 por Nicekid

[Henrique Moura 193]

Tópico fechado!