Ir para conteúdo
TK News
  • Cadastre-se

[PEDIDO] Sistema VIP

Movie

Por ,
em Suporte Tibia OTServer

 Share Seguidores 0

Posts Recomendados

  • Moderador
Movie

Movie 298

Postado
  • Moderador
Postado

Gostaria de ajuda para criar um script assim:

 

Ao usar o item, você ganha 30 dias(configurável) de área donate. Após esses 30 dias, ele não consiga mais entra nessa área e será teletransportado para o templo.

 

Obrigado desde já.

Link para o post
Compartilhar em outros sites
Snowsz

Snowsz 339

Postado
Postado

Gostaria de ajuda para criar um script assim:

 

Ao usar o item, você ganha 30 dias(configurável) de área donate. Após esses 30 dias, ele não consiga mais entra nessa área e será teletransportado para o templo.

 

Obrigado desde já.

Pode explicar melhor? Ele ganha uma determinada storage ou dias de premium?

                              _
                          .-'` `}
                  _./)   /       }
                .'o   \ |       }
                '.___.'`.\    {`
                /`\_/  , `.    }                                      ME DA UMA NOZ!
                \=' .-'   _`\  {
                 `'`;/      `,  }
                    _\   @   ;  }
                   /__`;-...'--'

Cluck!

Link para o post
Compartilhar em outros sites
Wend II

Wend II 170

Postado
Postado

Servidor\data\actions\scripts

vipname.lua

 

function onUse(cid, item, fromPosition, itemEx, toPosition)
 
local name = getCreatureName(cid)
local days = 30 -- dias que serão adicionados
local strg = 33339 -- valor da sua storage
local strg_n = 12120 -- não precisa editar
local daysvalue = days * 24 * 60 * 60
local storageplayer = getPlayerStorageValue(cid, strg)
local timenow = os.time()
 
 
    if getPlayerStorageValue(cid, strg) - os.time() <= 0 then
time = timenow + daysvalue
    else
time = storageplayer + daysvalue
    end
 
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP no seu character.")
        setPlayerStorageValue(cid, strg, time)
local quantity = math.floor((getPlayerStorageValue(cid, strg) - timenow)/(24 * 60 * 60))
        doSendMagicEffect(getPlayerPosition(cid), math.random(28,30))
        doPlayerAddPremiumDays(cid, 30)
doRemoveItem(item.uid, 1)
    if getPlayerStorageValue(cid, strg_n) < 1  then
        setPlayerStorageValue(cid, strg_n, 1) 
addEvent(doRemoveCreature, 5000, cid)
    end
return TRUE
end

 

C:\Users\Wend\Desktop\Servidor\data\actions

actions.xml adicione essa tag

<action itemid="1819" script="vipname.lua"/>

 

C:\Users\Wend\Desktop\Servidor\data\creaturescripts\scripts

endvip.lua

 

local strg = 33339 -- valor da sua storage
local strg_n = 12120 -- não precisa editar
 
        function onLogin(cid)
    if getPlayerPremiumDays(cid) <= 0 and getPlayerStorageValue(cid, strg_n) == 1 then
        setPlayerStorageValue(cid, 9898, 1)
    end
    if getPlayerStorageValue(cid, 9898) == 1 and getPlayerPremiumDays(cid) <= 0 then
        local temple = getTownTemplePosition(getPlayerTown(cid))
        doTeleportThing(cid, temple)
        doPlayerPopupFYI(cid, "Sua vip Account acabou.")
        setPlayerStorageValue(cid, 9898, -1)
        setPlayerStorageValue(cid, strg_n, -1)
    if string.find(tostring(getCreatureName(cid)),"[Vip]") then    
        addEvent(EddyHavoc, 3*1000, cid)
    end
  end
 return TRUE
end
 
        function EddyHavoc(cid)
    if isPlayer(cid) then    
        db.executeQuery("UPDATE `players` SET `name` = '"..string.sub(getCreatureName(cid), 7).."' WHERE `id` = "..getPlayerGUID(cid)..";")
        doRemoveCreature(cid)
    end
end

 

C:\Users\Wend\Desktop\Servidor\data\creaturescripts

creaturescripts.xml adicione essa tag

<event type="login" name="CheckVip" script="endvip.lua"/>

 

registre o evento no login.lua

registerCreatureEvent(cid, "CheckVip")
Link para o post
Compartilhar em outros sites
  • 1 month later...
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado (editado)

 

Servidor\data\actions\scripts

vipname.lua

 

function onUse(cid, item, fromPosition, itemEx, toPosition)
 
local name = getCreatureName(cid)
local days = 30 -- dias que serão adicionados
local strg = 33339 -- valor da sua storage
local strg_n = 12120 -- não precisa editar
local daysvalue = days * 24 * 60 * 60
local storageplayer = getPlayerStorageValue(cid, strg)
local timenow = os.time()
 
 
    if getPlayerStorageValue(cid, strg) - os.time() <= 0 then
time = timenow + daysvalue
    else
time = storageplayer + daysvalue
    end
 
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP no seu character.")
        setPlayerStorageValue(cid, strg, time)
local quantity = math.floor((getPlayerStorageValue(cid, strg) - timenow)/(24 * 60 * 60))
        doSendMagicEffect(getPlayerPosition(cid), math.random(28,30))
        doPlayerAddPremiumDays(cid, 30)
doRemoveItem(item.uid, 1)
    if getPlayerStorageValue(cid, strg_n) < 1  then
        setPlayerStorageValue(cid, strg_n, 1) 
addEvent(doRemoveCreature, 5000, cid)
    end
return TRUE
end

 

C:\Users\Wend\Desktop\Servidor\data\actions

actions.xml adicione essa tag

<action itemid="1819" script="vipname.lua"/>

C:\Users\Wend\Desktop\Servidor\data\creaturescripts\scripts

endvip.lua

 

local strg = 33339 -- valor da sua storage
local strg_n = 12120 -- não precisa editar
 
        function onLogin(cid)
    if getPlayerPremiumDays(cid) <= 0 and getPlayerStorageValue(cid, strg_n) == 1 then
        setPlayerStorageValue(cid, 9898, 1)
    end
    if getPlayerStorageValue(cid, 9898) == 1 and getPlayerPremiumDays(cid) <= 0 then
        local temple = getTownTemplePosition(getPlayerTown(cid))
        doTeleportThing(cid, temple)
        doPlayerPopupFYI(cid, "Sua vip Account acabou.")
        setPlayerStorageValue(cid, 9898, -1)
        setPlayerStorageValue(cid, strg_n, -1)
    if string.find(tostring(getCreatureName(cid)),"[Vip]") then    
        addEvent(EddyHavoc, 3*1000, cid)
    end
  end
 return TRUE
end
 
        function EddyHavoc(cid)
    if isPlayer(cid) then    
        db.executeQuery("UPDATE `players` SET `name` = '"..string.sub(getCreatureName(cid), 7).."' WHERE `id` = "..getPlayerGUID(cid)..";")
        doRemoveCreature(cid)
    end
end

 

C:\Users\Wend\Desktop\Servidor\data\creaturescripts

creaturescripts.xml adicione essa tag

<event type="login" name="CheckVip" script="endvip.lua"/>

registre o evento no login.lua

registerCreatureEvent(cid, "CheckVip")

Não funcionou a parte de "acabar" o vip

Programadores.. Preciso da ajuda de vocês :/

Up

Editado por moviebr (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
Pedro.

Pedro. 535

Postado
Postado (editado)

tente assim.

 

action/

function onUse(cid, item)
              if getPlayerStorageValue(cid, 13540) - os.time() < 0 then
              doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR,"Agora voce e um player VIP.")
              setPlayerStorageValue(cid, 9898, os.time() + (30*24*60*60)) 
              doRemoveItem(item.uid, 1)
          else
             doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR,"Voce ja e VIP so poderá renovar daqui 30 dias.")
          end
return TRUE
end

creturescript/

 function onLogin(cid)

if getPlayerStorageValue(cid, 13540) - os.time() > 0 then
setPlayerStorageValue(cid, 9898, 1)
end

local pos = {x = 157, y = 50, z = 7} -- posiçao do templo. 

function EddyHavoc(cid)
if isPlayer(cid) then    
db.executeQuery("UPDATE `players` SET `name` = '"..string.sub(getCreatureName(cid), 7).."' WHERE `id` = "..getPlayerGUID(cid)..";")
doRemoveCreature(cid)
end
end

if getPlayerStorageValue(cid, 9898) == 1 and getPlayerStorageValue(cid, 13540) - os.time() < 1 or getPlayerStorageValue(cid, 13540) - os.time() == 0 then
doTeleportThing(cid, pos)
doPlayerPopupFYI(cid, "Sua vip Account acabou.")
setPlayerStorageValue(cid, 9898, -1)
if string.find(tostring(getCreatureName(cid)),"[[Vip]]") then    
addEvent(EddyHavoc, 3*1000, cid)
end
end
return TRUE
end
Editado por pedrook (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado

 

tente assim. /endvip.lua

function onLogin(cid)
local temple = { x =32369, y = 32246, z = 6}
if vip.hasVip(cid) == true then
if getPlayerStorageValue(cid,33339) ~= 1 then
setPlayerStorageValue(cid,33339,1)
end
else
if getPlayerStorageValue(cid,33339) == 1 then
doTeleportThing(cid, temple)
doPlayerSendTextMessage(cid, 22, "Your VIP Time over!")
db.executeQuery("UPDATE `accounts` SET `vip_time` = 0 WHERE `id` = ".. getAccountIdByName(getPlayerName(cid)) ..";")
setPlayerPromotionLevel(cid, 1)
setPlayerStorageValue(cid, 33339, 0)
end
end
return true
end

O meu VIP não é pela DB, e sim por Storage, não testei o código mas pelo o que vi, acho que não funcionará.

Link para o post
Compartilhar em outros sites
  • Moderador
Movie

Movie 298

Postado
  • Autor
  • Moderador
Postado (editado)

 

tente assim.

 

action/

function onUse(cid, item)
              if getPlayerStorageValue(cid, 13540) - os.time() < 0 then
              doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR,"Agora voce e um player VIP.")
              setPlayerStorageValue(cid, 9898, os.time() + (30*24*60*60)) 
              doRemoveItem(item.uid, 1)
          else
             doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR,"Voce ja e VIP so poderá renovar daqui 30 dias.")
          end
return TRUE
end

creturescript/

 function onLogin(cid)

if getPlayerStorageValue(cid, 13540) - os.time() > 0 then
setPlayerStorageValue(cid, 9898, 1)
end

local pos = {x = 157, y = 50, z = 7} -- posiçao do templo. 

function EddyHavoc(cid)
if isPlayer(cid) then    
db.executeQuery("UPDATE `players` SET `name` = '"..string.sub(getCreatureName(cid), 7).."' WHERE `id` = "..getPlayerGUID(cid)..";")
doRemoveCreature(cid)
end
end

if getPlayerStorageValue(cid, 9898) == 1 and getPlayerStorageValue(cid, 13540) - os.time() < 1 or getPlayerStorageValue(cid, 13540) - os.time() == 0 then
doTeleportThing(cid, pos)
doPlayerPopupFYI(cid, "Sua vip Account acabou.")
setPlayerStorageValue(cid, 9898, -1)
if string.find(tostring(getCreatureName(cid)),"[[Vip]]") then    
addEvent(EddyHavoc, 3*1000, cid)
end
end
return TRUE
end

Vish, agora nem na área donate ele entra mais ;/ Meu Storage é 13500

UP

Editado por moviebr (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
p e o p l e

p e o p l e 50

Postado
Postado (editado)

Em creaturescripts/creaturescripts.xml adiciona á tag:

<event type="login" name="FimVip" event="script" value="fimvip.lua"/>

 

Em creaturescripts/scripts/fimvip.lua adicione:

function onLogin(cid)
local temple = { x =655, y = 1014, z = 7}
if vip.hasVip(cid) == true then
if getPlayerStorageValue(cid,13500) ~= 1 then
setPlayerStorageValue(cid,13500)
end
else
if getPlayerStorageValue(cid,13500) == 1 then
doTeleportThing(cid, temple)
doPlayerSendTextMessage(cid, 22, "Your VIP Time over!")
db.executeQuery("UPDATE `accounts` SET `vip_time` = 0 WHERE `id` = ".. getAccountIdByName(getPlayerName(cid)) ..";")
setPlayerPromotionLevel(cid, 1)
setPlayerStorageValue(cid, 13500, 0)
end
end
return true
end

E no login.lua adicione a tag: 

registerCreatureEvent(cid, "FimVip")

Eu sei que é por storage, porém no meu server funcionava desse jeito, mas mudei, testa e me fala.

Editado por p e o p l e (veja o histórico de edições)

Actions;

Vip door Systema By Mock

 

Movements;

Piso que TELEPORTA apenas players PREMIUM

 

 

9GLcFU3.png

Link para o post
Compartilhar em outros sites
p e o p l e

p e o p l e 50

Postado
Postado

Caso não funcionar utilize a que @Wise fez.

Ele criou um método que envolve outra storage key, possibilitando assim a identificação de um player com tempo de vip ativo/inativo.

 

autocheckvip.lua (data\creaturescripts\scripts):

local key = {13500, 53100} -- storages
local default = 1 -- default town id

function onLogin(cid)
    if getPlayerStorageValue(cid, key[1]) < os.time() and getPlayerStorageValue(cid, key[2]) > 0 then
        doPlayerSetTown(cid, default)
        setPlayerStorageValue(cid, key[2], -1)
        doTeleportThing(cid, getTownTemplePosition(default))
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
        doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Your VIP time is over.')
    end
    
    return true
end

function onLogout(cid)
    return getPlayerStorageValue(cid, key[1]) > os.time() and getPlayerStorageValue(cid, key[2]) < 1 and setPlayerStorageValue(cid, key[2], 1) or true
end

 

creaturescripts.xml (data\creaturescripts):

<event type="login" name="CheckLogin" event="script" value="autocheckvip.lua"/>
<event type="logout" name="CheckLogout" event="script" value="autocheckvip.lua"/>

 

Basta o player vip fazer logout 1 vez para que o resto execute perfeitamente.

Sugiro que remova a vip de todos os players ou que faça uso de uma nova storage key para evitar possíveis falhas na identificação do player vip ativo/inativo.

Actions;

Vip door Systema By Mock

 

Movements;

Piso que TELEPORTA apenas players PREMIUM

 

 

9GLcFU3.png

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito