(Resolvido)[Resolvido] Script de Vip

[Aberos 23]

galera sera que alguem poderia me arruma uma talk que venda vip por diamodns para poketibia?

 

[Cat 2605]

creditos: roskas

 

 

local days = 10
local price = 50000
local storage = 7777
local daysvalue = days * 24 * 60 * 60
local storageplayer = getPlayerStorageValue(cid, 13001)
local timenow = os.time()

function onSay(cid, words, param)
if getPlayerStorageValue(cid, 13001) - os.time() <= 0 then
time = timenow + daysvalue
else
time = storageplayer + daysvalue
end
if(words == "!buyvip") then
if not doPlayerRemoveMoney(cid, price) then
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você precisa de "..price.." gp's para colocar vip.")
doPlayerAddItem(cid,2148,50000)
return true
end
if getPlayerStorageValue(cid, storage) ~= 1 then
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você precisa completar a quest para renovar sua vip.") return true
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados "..days.." dias de VIP no seu character.")
setPlayerStorageValue(cid, 13001, time)
end
return true
end

 

em vermelho é o item e a quantidade

<talkaction log="no" words="!buyvip" event="script" value="newstor.lua"/>

[Aberos 23]

mas essa ai vende vipo por price eu queria que cobra-se diamonds? id 2145

[Cat 2605]

local days = 10
local price = 1
local storage = 7777
local daysvalue = days * 24 * 60 * 60
local storageplayer = getPlayerStorageValue(cid, 13001)
local timenow = os.time()

function onSay(cid, words, param)
if getPlayerStorageValue(cid, 13001) - os.time() <= 0 then
time = timenow + daysvalue
else
time = storageplayer + daysvalue
end
if(words == "!buyvip") then
if not doPlayerRemoveMoney(cid, price) then
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você precisa de "..price.." gp's para colocar vip.")
doPlayerAddItem(cid,2145,1)
return true
end
if getPlayerStorageValue(cid, storage) ~= 1 then
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você precisa completar a quest para renovar sua vip.") return true
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados "..days.." dias de VIP no seu character.")
setPlayerStorageValue(cid, 13001, time)
end
return true
end

[Aberos 23]

 

 

if(words == "!buyvip") then

if not doPlayerRemoveMoney(cid, price) then

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você precisa de "..price.." gp's para colocar vip.")

doPlayerAddItem(cid,2145,1)

return true

mas  doPlayerAddItem(cid,2145,1)  significa que vai add item para o player e nao remover

[Cat 2605]

if(words == "!buyvip") then
if not doPlayerRemoveMoney(cid, price) then
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você precisa de "..price.." gp's para colocar vip.")
doPlayerRemoveItem(cid,2145,1)
return true

 

;p

[Aberos 23]

vlw

[Cat 2605]

Dúvida sanada, tag adicionada.

Tópico movido!

[Visitante]

Dúvida sanada, tag adicionada.

Tópico movido!