http://www.xtibia.co...0-para-tfs-035/
ou esse não foi eu que fis dei um Ctrl+c e um Ctrl+v não boto o nome d quei veis pq não sei quei féis estava salvo no meu pc poriso eu não sei que féis
vip para 8.60
Compra Vip Pela talkaction (Commando buyvip! ) - OU SEM o commando.
- Tile parágrafo somente jogadores passarem Vip (also Conta com FUNÇÃO os.time)
- verificação quantos dias de Vip personagem ainda possui o .
- Administradores (GOD) podem adicionar e removedor de dias de caracteres Vip parágrafo .
- Administradores (GOD) podem checkar dias de Jogadores dos Vip .
- e adicionado [VIP] AO nomo e Retirado quando um Acabar vip .
Adicionando e Removendo deus dias de Vip
e Comprando VIP Checkando dia da SUA VIP
Citação
Commando: comprar vip :
! buyvip
checkar dias de vip :
! vipdays
Deus checkar dias de vip do personagem :
/ checkvip Nick
Exemplo: / checkvip Nicekid Deus adionar dias caráter AO :
/ addvip Nick , dias
Exemplo: / addvip Nicekid, 5
. Aqui adicionei 5 dias de vip Deus Retirar dias de Vip do personagem :
/ delvip Nick , dias
Exemplo: / delvip Nicekid, 5
Aqui retirei 5 dias de vip.
Primeiro Passo
VÁ ATÉ talkactions / scripts Crie hum arquivo.lua e renomeie parágrafo systemvip . lua
Dentro coloque:
- -- Script SYtem vip 2.0 --
function onSay(cid, words, param)
if(words == "!vipdays") then
local timenow = os.time()
local quantity = math.floor((getPlayerStorageValue(cid, 13548) - timenow)/(24 * 60 * 60))
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. (quantity < 0 and 0 or quantity) .." dias de VIP no seu character.")
elseif(words == "/checkvip") then
if getPlayerAccess(cid) == 5 then
if not param then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
end
local player = getPlayerByName(param)
if not isPlayer(player) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player "..player.." not found.")
end
local timenow = os.time()
local quantity = math.floor((getPlayerStorageValue(player, 13548) - timenow)/(24 * 60 * 60))
doPlayerPopupFYI(cid, "O jogador tem ".. (quantity < 0 and 0 or quantity) .." dias de VIP no character.")
return TRUE
end
elseif(words == "/addvip") then
if getPlayerAccess(cid) == 5 then
local t = string.explode(param, ",")
if not t[2] then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.")
end
local player = getPlayerByName(t[1])
local name = getCreatureName(player)
local days = t[2]
local pid = getPlayerByNameWildcard(t[1])
if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.")
return TRUE
end
local daysvalue = days*3600*24
local storageplayer = getPlayerStorageValue(player, 13548)
local timenow = os.time()
local time = storageplayer <= 0 and (timenow + daysvalue) or (storageplayer + daysvalue)
if string.find(tostring(getCreatureName(pid)),"[[Vip]]") then
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Foram adicionados "..days.." dias de VIP no seu character.")
setPlayerStorageValue(player, 13548, time)
local quantity = math.floor((getPlayerStorageValue(player,13548) - timenow)/(3600*24))
doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Você tem "..quantity.." dias de VIP restantes.")
else
setPlayerStorageValue(player, 13548, time)
db.executeQuery("UPDATE `players` SET `name` = '[Vip] "..name.."' WHERE `id` = "..getPlayerGUID(player)..";")
doRemoveCreature(player)
end
end
elseif(words == "/delvip") then
if getPlayerAccess(cid) == 5 then
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,13548) < 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,13548,getPlayerStorageValue(C.uid,13548)-C.time)
end
doSendMagicEffect(C.pos, math.random(28,30))
end
end
return TRUE
end
preço = é o QUANTO vai custar um vip los gps dia = quantos dias de vip Serao adicionados AO jogador los talkactions.xml adicione um tag:
<talkaction words="!vipdays;/addvip;/delvip;/checkvip" script="systemvip.lua"/>
Pronto Primeiro Passo terminado . Sistema vip SEM o ! buyvip abra um spoiler
Spoiler
VIP . Segundo Passo VÁ ATÉ movimentos / scripts CRIE UM arquivo.lua e renomeie parágrafo vipe . lua Dentro coloque:
-- Script Vip Sytem 1.0 --
function onStepIn(cid, item, position, fromPosition)
local config = {
msgDenied = "Você não e vip ,fale com Administrador do Server.",
msgWelcome = "Seja Bem Vindo a Area vip."
}
if getPlayerStorageValue(cid, 13548) - os.time() <= 0 then
doTeleportThing(cid, fromPosition, true)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgDenied)
doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE)
return TRUE
end
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgWelcome)
return TRUE
end
Em movements.xml adicione um tag :
<movevent type="StepIn" uniqueid="13539" event="script" value="vip.lua"/>
FIM DA VIP
creaturescript / script CRIE UM arquivo.lua e renomeie parágrafo endvip.lua
`Players` SET `name` = '" .. corda . sub ( getCreatureName ( cid ), 7 ) .. "'WHERE` id `=
Conta vip
los creaturescript.xml adicione um tag:
<Evento tipo = "login" nome = "CheckVip" roteiro = "endvip.lua" />
Pronto Seu Sistema Vip está offline terminado.
rep+
http://youtu.be/22sOobJEgR8




info
Grupo: Campones
Registrado: 25/12/11
Posts: 1
Reputação: 0
Char no Tibia: misters ludicos
Galera estou com uma duvida queria que somento o God podese adicionar vip para os player e queria saber como adicionar a vip e por tile que e liberado para andar em cima .
Editado Dezembro 25 por allanlopescoelhomp