Remove Vip Por Talkaction

Olha eu de novo =D, agora venho pedir um script de remove vip days mas por talkaction!

\/ Add Vip \/

function onSay(cid, words, param)
playerpos = getPlayerPosition(cid)

-- configs
access = 6
days = 1
-- end configs

player = getPlayerByName(param)
daysvalue = days*3600*24
storageplayer = getPlayerStorageValue(player,13540)
timenow = os.time()
if storageplayer == -1 or storageplayer == 0 then
time = timenow+daysvalue
else
time = storageplayer+daysvalue
end


if param ~= "" then
if getPlayerGroupId(cid) >= access then
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP no seu character.")
setPlayerStorageValue(player,13540,time)
quantity = math.floor((getPlayerStorageValue(player,13540) - timenow)/(3600*24))
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Você tem ".. quantity .." dias de VIP restantes.")
else
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Somente jogadores com acesso maior que "..access.." podem adicionar vips.")
end
doSendAnimatedText(playerpos,"ADD 1 Day", math.random(01,255))
doSendMagicEffect(getCreaturePosition(cid), math.random(28,30)) 
end
return true
end

Preciso de 1 script que tire por talkaction, na mesma base que o que adiciona!

Versão: 8.54

Talkaction

Abraços,

BRIGU

acho que é isso:

function onSay(cid, words, param)
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 = getPlayerByName(t[1])
C.days = ((tonumber(t[2]) == nil) and 1 or tonumber(t[2]))*3600*24

if(getPlayerStorageValue(C.player,13540) < C.days)then
doPlayerSendTextMessage(cid,dec,'O jogador '..t[1]..' não possui '..t[2]..' dias de vip.')
else
doPlayerSendTextMessage(cid,dec,'Você removeu '..t[2]..' dias de vip do player '..t[1]..'.')
setPlayerStorageValue(C.uid,13540,getPlayerStorageValue(C.uid,13540)-C.days)
end
doSendMagicEffect(C.pos, math.random(28,30)) 
return true
end

nem testei ver se dar algum erro.

Marcryzius, desculpa a demora para responder, tive prova essa sexta (09/04) tava estudando feito mulo... testei teu script... deu erro...

[09/04/2010 11:23:19] [Error - LuaScriptInterface::loadFile] data/talkactions/scripts/removevip.lua:12: '<name>' expected near '' dias de vip do player ''
[09/04/2010 11:23:19] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/removevip.lua)
[09/04/2010 11:23:19] data/talkactions/scripts/removevip.lua:12: '<name>' expected near '' dias de vip do player ''

See Ya!

error de sintaxe.

ajustado tente agora.

Marcryzius... creio que tem outro erro =x

[09/04/2010 12:43:18] [Error - TalkAction Interface] 
[09/04/2010 12:43:18] data/talkactions/scripts/removevip.lua:onSay
[09/04/2010 12:43:18] Description: 
[09/04/2010 12:43:18] data/talkactions/scripts/removevip.lua:9: attempt to compare boolean with number
[09/04/2010 12:43:18] stack traceback:
[09/04/2010 12:43:18] 	data/talkactions/scripts/removevip.lua:9: in function <data/talkactions/scripts/removevip.lua:1>

See Ya! ='(

testei agora removi algums erros.

--[[( Marcryzius )]]--
function onSay(cid, words, param)
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)) 
   return true
end

eu to começando a mecher em ot,pelo que entendi,talkaction é tp,!buypremium algo assim não é?

eu to com o comando pra add vip aqui que você postou,mas qual o comando in-game que devo usar?

@caraio

usa esse :

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