Perfect vip system lib!

[Mock 32]

Autor:

Servidor testado: TFS 0.3.1++++

Versao: 1.1

 

<edit>

aisu ma vez se você é iniciante ou leigo fora daqui ;D esse topico é para intermediarios

Já vi MILHOES de vip systems, todos incompletos ou ambos so funcionam para o player e nao afetam a account toda, entao decidi fazer uma LIB que termine com isso, usando funcções simples. (Esse não é o primeiro e nao é o utimo é apenas mais uma versão diferente.)

 

Para começar devemos criar um arquivo chamado vip sys.lua dentro da pasta LIB do seu server e nele colocar o conteudo abaixo, depois vá até o data.lua e ponha isso:

dofile(getDataDir() .. "lib/vip sys.lua")

Vip sys.lua

vip = {
  name = "Vip system";
  author = "Mock";
  version = "1.0.0.0";
  query="ALTER TABLE `accounts` ADD `vip_time` INTEGER";
  query2="ALTER TABLE `accounts` ADD `vip_time` INT(15) NOT NULL"
}
function vip.setTable()
  dofile('config.lua')
  if sqlType == "sqlite" then
  	db.executeQuery(vip.query)
  else
       db.executeQuery(vip.query2)
  end
end
function vip.getVip(cid)
        assert(tonumber(cid),'Parameter must be a number') 
        if isPlayer(cid) == FALSE then error('Player don\'t find') end; 
        ae =  db.getResult("SELECT `vip_time` FROM `accounts` WHERE `name` = '"..getPlayerAccount(cid).."';")
        if ae:getID() == -1 then
           return 0
        end
local retee = ae:getDataInt("vip_time") or 0
ae:free()
        return retee
end

function vip.getVipByAcc(acc)
        assert(acc,'Account is nil')
        local a = db.getResult("SELECT `vip_time` FROM `accounts` WHERE `name` = '"..acc.."';")
        if a:getID() ~= -1 then
            return a:getDataInt("vip_time") or 0, a:free()
        else
            error('Account don\'t find.')
        end
end

function vip.setVip(cid,time)
        dofile("config.lua")
        assert(tonumber(cid),'Parameter must be a number')
        assert(tonumber(time),'Parameter must be a number')
        if isPlayer(cid) == FALSE then error('Player don\'t find') end; 
        db.executeQuery("UPDATE `"..sqlDatabase.."`.`accounts` SET `vip_time` = '"..(os.time()+time).."' WHERE `accounts`.`name` ='".. getPlayerAccount(cid).."';")
end

function vip.getVipByAccount(acc)
        assert(acc,'Account is nil')
        return db.getResult("SELECT `vip_time` FROM `accounts` WHERE `name` = '"..acc.."';"):getDataInt("vip_time") or 0
end                                      

function vip.hasVip(cid)
        assert(tonumber(cid),'Parameter must be a number')
        if isPlayer(cid) == FALSE then error('Player don\'t find') end;
        local t = vip.getVip(cid) or 0
        if os.time(day) < t then
           return TRUE
        else
           return FALSE
        end
end

function vip.accountHasVip(acc)
        assert(acc,'Account is nil')
        if os.time() < vip.getVipByAccount(acc) then
           return TRUE
        else
           return FALSE
        end
end
function vip.getDays(days)
  return (3600 * 24 * days)
end
function vip.addVipByAccount(acc,time)
  assert(acc,'Account is nil')
  assert(tonumber(time),'Parameter must be a number')
  local a = vip.getVipByAcc(acc)
  a = os.difftime(a,os.time())
  if a < 0 then a = 0 end;
  a = a+time
  return vip.setVipByAccount(acc,a)
end
function vip.setVipByAccount(acc,time)
        dofile("config.lua")
        assert(acc,'Account is nil')
        assert(tonumber(time),'Parameter must be a number')
        db.executeQuery("UPDATE `accounts` SET `vip_time` = '"..(os.time()+time).."' WHERE `accounts`.`name` ='"..acc.."';")
        return TRUE
end
function vip.returnVipString(cid)
  assert(tonumber(cid),'Parameter must be a number')
  if isPlayer(cid) == TRUE then
     return os.date("%d %B %Y %X ", vip.getVip(cid))
  end
end

Feito isso você deve executar UMA VEZ a função vip.setTable() ou entao você simplesmente entra na sua DB e executa essa query: ALTER TABLE `accounts` ADD `vip_time` INT( 15 ) NOT NULL Feito isso sua lib está pronta!

Editado 23 Agosto, 2010 por Mock

[Dark Billie 0]

Nossa Mock, vai liberar quantas coisas hoje?

Bem legal esse aí, mas seria por tempo(time) ou dias(days)?

Se for por tempo, seria milisegundos?

 

E se puder me explicar esta linha:

  [color=#0099ff][b]assert[/b][/color][color=#000099][b]([/b][/color][color=#0099ff][b]tonumber[/b][/color][color=#000099][b]([/b][/color]acc[color=#000099][b])[/b][/color],'Parameter must be a number'[color=#000099][b])[/b][/color]
  [color=#0099ff][b]assert[/b][/color][color=#000099][b]([/b][/color][color=#0099ff][b]tonumber[/b][/color][color=#000099][b]([/b][/color][color=#9900ff][b]time[/b][/color][color=#000099][b])[/b][/color],'Parameter must be a number'[color=#000099][b])[/b][/color]

Não entendi o assert :/

 

E pra quem não sabe como executar o comando vip.setTable(), faça um arquivo chamado table.lua em data/talkactions/scripts e coloque isto:

function onSay(cid, words, param)
 return vip.setTable()
end

 

E em data/talkactions/talkactions.xml:

<talkaction words="/settable" event="script" value="table.lua"/>

Depois in-game, diga /settable somente uma vez.

 

Fuii '-'

[Mock 32]

@Dark Billie

o time é em segundos. mais no caso você pode usar assim:

vip.setVipByAccount(acc,vip.getDays(25))

assim vc vai adcionar 25 dias de vip

 

E assert é o seginte

 

assert =

function assert(v,err)
  if not v then
    return error(err)
  end
  return v
end

 

^^

Se a variavel v for nil ele para o script como erro printando o erro como err

Editado 27 Setembro, 2009 por Mock

[Gpwjhlkdcf 21]

Só acho um ponto negativo esse negócio de usar os.time pra contar o tempo. Todo sistema VIP eu vejo usando algo parecido, tendo jeitos muito mais simples e fáceis de calcular, mas o sistema em si está ótimo, Mock esvaziando os scripts do PC...

[ready 0]

Olá, gostaria de saber como usar esta lib

tipo como definir coord do local vip,

e o comando

 

"ALTER TABLE `accounts` ADD `vip_time` INT( 15 ) NOT NULL"

 

uso sqllitestudio v.1.1.1

 

aonde exatamente deveria exc esse comando?

 

grato!

[Mock 32]

@ready

são apenas funçoes

você chama elas assim

function onSay...

vip.Add..

end

 

E no sqlite studio eu nao sei onde é pois nao uso ele eu uso mysql.

[Dark Billie 0]

Bom cara, vai no sqlite studio e em Open SQL Query Editor, depois digita aquilo que o Mock diz no tópico.

[Mock 32]

@dark

tem pessoas que nãu usam sqlite editor, e outros que usam programas que acredite nem isso da pra fazer por isso é melhor executar aquela função.

[ready 0]

Error while executing query: Cannot add a NOT NULL column with default value NULL

 

 

e memso depois de executar issu, e as coord da area vip?

[Mock 32]

@ready

isso é uma lib e nao um vip system.

[ready 0]

Perfect vip system lib!

 

 

então me explica qual a função dessa lib? abraçs!

[Mock 32]

@ready

o proprio nome ja fala.

é uma lib para se fazer um sistema vip com ela.

[ready 0]

poderia me dar uma dica" de como usa-la?

 

vlws!

[Mock 32]

@ready

você teria que ter um conhecimento mediano de scripting pra isso.

[toninho_xd 0]

O que seria DB?:S

 

DataBase?

[Mathews157 0]

 

Queria saber porque acontece isso?

é tambem o que é data.lua? aonde eu ponho as coordenadas do Tile VIP?

me ajuda please

[Mock 32]

@Mathews157

eu ja falei

isso é uma LIB nao um sistema!

[Mathews157 0]

Bom mais mock porfavor me diga intão para que serve? preciso de um sistema vip o seu é o mais perto de sistema vip que encontrei é agora estou parado nessa LIB

[Mock 32]

@Mathews157

Isso é para você fazer o seu proprio vip system cara

isso é uma lib nao um system.

[Iago Felipe 5]

RAIIRAIRAIAR NAO É SISTEMA POW É LIB oawieio

 

#Ao tópico

 

Mock, eu não mecho muito com sqlitestudio editor, e vou tentar importar por la, porque meu pc não ta funfando o xampp, tem como me ajudar a executar no SQLiteStudio? ou alguem ai pode me ajudar? vlw.s