Olá pessoal, estou desenvolvendo esse sistema vip para TFS 1.x, se precisarem de alguma função nova é só comentar, criei para usar em um servidor meu e resolvi postar, bom proveito a todos.
 
É só ir no arquivo data/lib/core/player.lua e adicionar esse código no começo do script:
-- ALTER TABLE `accounts` ADD `vip_time` BIGINT(20) NOT NULL DEFAULT 0; -- player:getVipTime() function Player.getVipTime(self) local resultId = db.storeQuery("SELECT `vip_time` FROM `accounts` WHERE `id` = '".. self:getAccountId() .."';") local time = resultId ~= false and result.getNumber(resultId, "vip_time") or 0 result.free(resultId) return time end -- player:isVip() function Player.isVip(self) return self:getVipTime() > os.time() and true or false end -- player:addVipDays(days) function Player.addVipDays(self, days) return(self:isVip() and tonumber((days * 86400))) and db.query("UPDATE `accounts` SET `vip_time` = '".. (self:getVipTime() + (days * 86400)) .."' WHERE `id` ='".. self:getAccountId() .."' LIMIT 1 ;") or db.query("UPDATE `accounts` SET `vip_time` = '".. (os.time() + (days * 86400)) .."' WHERE `id` ='".. self:getAccountId() .."' LIMIT 1 ;") end -- player:removeVipDays(days) function Player.removeVipDays(self, days) return(self:isVip() and tonumber((days * 86400))) and db.query("UPDATE `accounts` SET `vip_time` = '".. (self:getVipTime() - (days * 86400)) .."' WHERE `id` ='".. self:getAccountId() .."' LIMIT 1 ;") or db.query("UPDATE `accounts` SET `vip_time` = '".. (os.time() - (days * 86400)) .."' WHERE `id` ='".. self:getAccountId() .."' LIMIT 1 ;") end -- player:setVipDays(days) function Player.setVipDays(self, days) return db.query("UPDATE `accounts` SET `vip_time` = '".. (os.time() - (days * 86400)) .."' WHERE `id` ='".. self:getAccountId() .."' LIMIT 1 ;") end -- player:removeVip() function Player.removeVip(self) db.query("UPDATE `accounts` SET `vip_time` = '0' WHERE `id` ='".. self:getAccountId() .."' LIMIT 1 ;") end -- player:sendVipDaysMessage() function Player.sendVipDaysMessage(self) if self:isVip() then local vipTime = self:getVipTime() - os.time() local vipDays = 1 + (math.floor(vipTime / 86400)) return self:getVipTime() ~= false and self:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, 'You have '.. vipDays .. ' vip day(s) in your account.') end end -- player:checkVipLogin() function Player.checkVipLogin(self) if self:getVipTime() > 0 and not self:isVip() then return self:removeVip() and self:teleportTo(self:getTown():getTemplePosition()) end end  
 
As funções são:
• player:getVipTime() - Retorna o valor da tabela vip_time (igual esta na database).
• player:isVip() - Retorna se o player é vip ou não.
• player:addVipDays(days) - Usa-se em algum script para para adicionar dias de vip ao player (parâmetro de entrada "days").
• player:removeVipDays(days) - Usa-se em algum script para para remover dias de vip do player (parâmetro de entrada "days").
• player:setVipDays(days) - Usa-se em algum script para para mudar os dias de vip do player (parâmetro de entrada "days").
• player:removeVip() - Usa-se em algum script para para remover todo tempo de vip do player.
• player:sendVipDaysMessage() - Retorna uma mensagem no player mostrando os dias de vip que ainda restam ao player.
• player:checkVipLogin() - Checa se a vip do player acabou, se sim teleporta ele para o templo.
 

Qualquer dúvida ou erro/bug poste aqui.

Boa Tarde Turma, Hoje vou Postar um sistema De Torneio Para Poketibia!
 
Para que possa funcionar o sistema de Torneio verifique se na (area pvp-zone ) funciona o pvp, caso nao funciona tentem procurar um tutorial de como liberar o pvp-zone e talves tente mudar isso aki no config.lua de voces:
worldType = "pvp-enforced"
protectionLevel = 1   Bom Chega de Mimimi e vamos La:   data/lib/Torneio.lua e add isso:

  Depois vai em Globaleevents/Torneio.lua

  <globalevent name="TournamentStart" time="11:35" event="script" value="Torneio.lua"/>   Depois vai em Actions/Torneio.lua: Atençao: Voce faz uma area do Torneio no Map editor e Coloca PVP-Zone no Mapa editor  e coloca uma Alavanca com a uid "18279"

  XML: <action uniqueid="18279" event="script" value="Torneio.lua"/>   Agora o NPC TORNEIO NPCS/NPCS.XML:

 
NPC/SCRIPTS/Torneio.lua:



 
 
[*] Bom é so Isso Flw bj ;*
 
   

Servidor Testado:
erondino,pokemon dash v6,tfs  0.3.6
 
Servidor Nao Testado:
Pokemon Dash Advanced
 
Precisa de: Noçoes basica de script pois so irei postar a parte principal dos script, pois eu nao sei oque voces editaram nos seus scripts !
 
Bom Dia Turma, Hoje Eu Vou Postar:
Sistema de Gender System "Sexos nos Pokemons":  O Sexo dos pokemons so vai ter em seus Pokemons capturados, Boxs,nao vai ter em pokes das hunts etc..
 
Sistema Completo de "PokeLevel":  Level nos Seus Pokemons "Porem" a cada Level o Pokemon so Ganha HP Baseado no Servidor:
Hidden Content
Give reaction to this post to see the hidden content. . Pois dar força ao Summon Somente adicionando funçoes na Sources. o Sistema completo do Pokelevel vem: Rare candy,Evolution,Pokelevel  
Intao Vamos La =)
 
Gender System:
*Primeiro antes de tudo tem que ver se no seu client tem o icone dos Sexos dos Pokemons, fazendo o comando /attr skull "Numero 1 a  4"
 
*Eu So vo postar as funçoes eu nao vou mandar o script inteiro pois eu nao sei o que voces editaram no script do catch.lua mais mesmo assim e facil de editar intao Vamos la:
 
vai em actions/catch.lua :



 
Vai em actions/goback.lua:
 



 
Vai em actions/box.lua



*XML: <action itemid="ID" event="script" value="box.lua"/>
 
PokeLevel System:
 
 
* Limite de Pokelevel : 30
* Para adicionar mais Level Segue esse Mini-Tutorial:



 
 
 
Cria um Arquivo , creaturescripts/Pokelevel.lua:
 



 
*XML: <event type="kill" name="kill" event="script" value="PokeLevel.lua"/>
* registerCreatureEvent(cid, "kill")
 
Troca seu look.lua creaturescripts/look.lua:
 



 
Vai em actions/Goback.lua:
 



 
 
 
*Aki quando voce dar primeiro Goback no Pokemon ele recebe o Level: 1
 
actions/evolution.lua:



 
*Exemplo de Evoluçao:
["Bulbasaur"] = {level = 40, evolution = "Ivysaur", maxh = 2600, count = 1, Stoneid = 2293, Stoneid2 = 0},
["Nome do Pokemon"] ={level = "level que precisa para Evoluir" , evolution = "Nome do Pokemon",maxh ="o Max de Hp que vai ter",count = "quantidade de stone",Stoneid = "Id da Stone", Stoneid2 = "id da stone 2"},
 
vai em Actions/Rarecandy.lua
 



 
*XML: <action itemid="ID" allowfaruse="1" event="script" value="Rarecandy.lua"/>
 
 
 
 
 
 
 
 
 
 
 
 

Bem procurei aqui na comunidade um VIP System mais informativo e nada, além de ter tido problema com os que estão aqui e acabei achando em outro lugar um que funcionou perfeitamente para mim.
 
Usando tfs disponibilizado neste tópico http://www.tibiaking.com/forum/topic/53099-1078-tfs-12-cast-system-novos-outfits-mounts/
 
Só estou trazendo o conteúdo e por não conhecer bem não posso dar suporte mas do jeito que está é só 'instalar' e vai funcionar.
 
Creditos.: Summ
 
Sistema Vip
 



 
Talkaction !checkvip para todos os players
 



 
Talkaction /vip para membros da staff
- /vip adddays, NomedoPlayer, 5 --> Adiciona 5 dias vip para o Player. - /vip removedays, NomedoPlayer, 5 --> Remove 5 dias vip do Player. - /vip remove, PlayerName --> Remove todos os dias vip do Player. - /vip check, NomedoPlayer --> Checa quantos dias vip o Player tem. - /vip addinfinite, NomedoPlayer --> Adiciona tempo vip infinito para o Player.


 
Tiles VIP



 
Portas VIP / Actions



 
Items que adicionam dias VIP
ItemId 10135 adiciona 10 dias vip. ItemId 10134 adiciona 30 dias vip. ItemId 10133 adiciona 90 dias vip.


 
Imagens
 
Comando !checkvip mas sem ter vip



 
Comando /vip adddays, dracoknight, 5



 
Comando !checkvip após adicionar 5 dias



 
Comando /vip addinfinite, dracoknight



 
Comando !checkvip após usar infinite 



 
Comando /vip remove, dracoknight

TFS 1.0
Pessoal, preciso de uma spell que gaste % de vida ao invés de mana

Atualmente ela ta assim
Quem souber da um help, vlw