Logo

(resolvido) logar e ganhar 2 dias de vips

marcelinhok
Por marcelinhok
em Resolvidos

marcelinhok

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/04/15Posts: 84
Postado em dezembro 01, 2016

Entao galera, queria saber se alguém pode me disponibiliza um script que ao fazer uma acc ganha 2 dias de vip no char ou na conta, tanto faz.

Storage da minha vip = 13715

DuuhCarvalho

:)
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 19/01/12Posts: 988Gênero: MasculinoChar no Tibia: Xerife Woody
Postado em dezembro 01, 2016
function onLogin(cid)local storage = (getPlayerAccountId(cid)+550)local dias = 2if getGlobalStorageValue(storage) <= 0 then	setGlobalStorageValue(storage, 1)	setPlayerStorageValue(cid, 13715, os.time() + dias*24*60*60)	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você recebeu "..dias.." dias de VIP, bom jogo!")endreturn trueend

 

marcelinhok

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/04/15Posts: 84
Postado em dezembro 02, 2016
2 horas atrás, DuuhCarvalho disse: 
function onLogin(cid)local storage = (getPlayerAccountId(cid)+550)local dias = 2if getGlobalStorageValue(storage) <= 0 then	setGlobalStorageValue(storage, 1)	setPlayerStorageValue(cid, 13715, os.time() + dias*24*60*60)	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você recebeu "..dias.." dias de VIP, bom jogo!")endreturn trueend

 

Tenho que adc alguma coisa no creaturescripts e loguin ?? se tiver passa script pf ?!

DuuhCarvalho

:)
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 19/01/12Posts: 988Gênero: MasculinoChar no Tibia: Xerife Woody
Postado em dezembro 02, 2016

@marcelinhok

 

faz o seguinte, vai em data/creaturescripts/scripts abre o arquivo login.lua e antes do ultimo return true cola essa parte:

  

local storage3 = (getPlayerAccountId(cid)+550)
local diasv = 2
if getGlobalStorageValue(storage3) <= 0 then
	setGlobalStorageValue(storage3, 1)
	setPlayerStorageValue(cid, 13715, os.time() + diasv*24*60*60)
	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você recebeu "..diasv.." dias de VIP, bom jogo!")
end

 

marcelinhok

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/04/15Posts: 84
Postado em dezembro 02, 2016
5 horas atrás, DuuhCarvalho disse:

@marcelinhok

 

faz o seguinte, vai em data/creaturescripts/scripts abre o arquivo login.lua e antes do ultimo return true cola essa parte:

  

local storage3 = (getPlayerAccountId(cid)+550)
local diasv = 2
if getGlobalStorageValue(storage3) <= 0 then
	setGlobalStorageValue(storage3, 1)
	setPlayerStorageValue(cid, 13715, os.time() + diasv*24*60*60)
	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você recebeu "..diasv.." dias de VIP, bom jogo!")
end

 

OH MAN SO ESTA ENTRANDO A VIP PRO ADM, E NAO PRO PLAYS !!
SABE RESOLVER ESSE PROBLEMA ? ESTOU QUERENDO ELE MUITO !

DuuhCarvalho

:)
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 19/01/12Posts: 988Gênero: MasculinoChar no Tibia: Xerife Woody
Postado em dezembro 02, 2016
4 horas atrás, marcelinhok disse:

OH MAN SO ESTA ENTRANDO A VIP PRO ADM, E NAO PRO PLAYS !!

SABE RESOLVER ESSE PROBLEMA ? ESTOU QUERENDO ELE MUITO !

 

não faz sentido, você testou com um player em outra account?

 

se o player que você testou estiver na mesma account que o adm, n vai ganhar msm, pq o adm já ganhou.

o script da a vip por account.

 

se mesmo assim n funcionou. manda o seu login.lua

marcelinhok

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/04/15Posts: 84
Postado em dezembro 02, 2016
5 horas atrás, DuuhCarvalho disse:

 

não faz sentido, você testou com um player em outra account?

 

se o player que você testou estiver na mesma account que o adm, n vai ganhar msm, pq o adm já ganhou.

o script da a vip por account.

 

se mesmo assim n funcionou. manda o seu login.lua

Pedir pra algum play fazer acc e nao veio a vip, tentei fazer outra acc ne outro pc e nao veio a vip, a vip so esta vindo pro GOD =[

 

aque meu loguin.

 

 

local config = {

    loginMessage = getConfigValue('loginMessage')

}

function onLogin(cid)

    local loss = getConfigValue('deathLostPercent')

    if(loss ~= nil) then

        doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)

    end

    local accountManager = getPlayerAccountManager(cid)

    if(accountManager == MANAGER_NONE) then

        local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage

        if(lastLogin > 0) then

            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."

        else

            str = str .. " Please choose your outfit."

            doPlayerSendOutfitWindow(cid)

        end

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

    elseif(accountManager == MANAGER_NAMELOCK) then

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")

    elseif(accountManager == MANAGER_ACCOUNT) then

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")

    else

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")

    end

    if(not isPlayerGhost(cid)) then

        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)

    end

    registerCreatureEvent(cid, "Mail")

    registerCreatureEvent(cid, "GuildMotd")

    

registerCreatureEvent(cid, "killer")

registerCreatureEvent(cid, "attackguild")

registerCreatureEvent(cid, "prevetloss")

registerCreatureEvent(cid, "tkexp4")

registerCreatureEvent(cid, "tkexp3")    

registerCreatureEvent(cid, "advance")

registerCreatureEvent(cid, "AdvEffect")

registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "Antimagebomb")

registerCreatureEvent(cid, "checkmcmanager")

registerCreatureEvent(cid, "effect")

registerCreatureEvent(cid, "onPrepareDeath")

registerCreatureEvent(cid, "DeathSystem")

registerCreatureEvent(cid, "LevelItem")

registerCreatureEvent(cid, "anunciarmorte")

registerCreatureEvent(cid, "CombatDodge")

registerCreatureEvent(cid, "onPrepareDeath")

registerCreatureEvent(cid, "showKD")

registerCreatureEvent(cid, "pvpsystem")

registerCreatureEvent(cid, "SkullCheck")

    registerCreatureEvent(cid, "ReportBug")

registerCreatureEvent(cid, VipReceive)

registerCreatureEvent(cid, "PlayerKill")

    if (InitArenaScript ~= 0) then

    InitArenaScript = 1

    -- make arena rooms free

        for i = 42300, 42309 do

            setGlobalStorageValue(i, 0)

            setGlobalStorageValue(i+100, 0)

        end

    end

    -- if he did not make full arena 1 he must start from zero

    if getPlayerStorageValue(cid, 42309) < 1 then

        for i = 42300, 42309 do

            setPlayerStorageValue(cid, i, 0)

        end

    end

    -- if he did not make full arena 2 he must start from zero

    if getPlayerStorageValue(cid, 42319) < 1 then

        for i = 42310, 42319 do

            setPlayerStorageValue(cid, i, 0)

        end

    end

    -- if he did not make full arena 3 he must start from zero

    if getPlayerStorageValue(cid, 42329) < 1 then

        for i = 42320, 42329 do

            setPlayerStorageValue(cid, i, 0)

        end

    end

    if getPlayerStorageValue(cid, 42355) == -1 then

        setPlayerStorageValue(cid, 42355, 0) -- did not arena level

    end

    setPlayerStorageValue(cid, 42350, 0) -- time to kick 0

    setPlayerStorageValue(cid, 42352, 0) -- is not in arena

if getPlayerStorageValue(cid, 67792) == 1 then

doPlayerPopupFYI(cid, "Seja Bem vindo ao Baiak Zuado\n\nJa Estamos em Clima de NATAL HOHOHOOU.\n\nAqui vou postar algumas dicas para você iniciante.\n1- Se for sua primeira vez em nosso server você acaba de adquirir 2 dias de Super Vip.\n2- Faça a quest Donate Coins e Seja TOP.\n\nLista de principais comandos do server. !aol !bless !stamina !notice !info !reset !superdias !go !bp !doar !evento\n\nAptoveite os Eventos de NATAL.\n\nBom Jogo a Todos!")

doPlayerSetStorageValue(cid, 67792, 1)

local storage3 = (getPlayerAccountId(cid)+550)

local diasv = 2

if getGlobalStorageValue(storage3) <= 0 then

    setGlobalStorageValue(storage3, 1)

    setPlayerStorageValue(cid, 13715, os.time() + diasv*24*60*60)

    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Você recebeu "..diasv.." dias de SUPER VIP, bom jogo!")

end

end

return true

end

 

DuuhCarvalho

:)
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 19/01/12Posts: 988Gênero: MasculinoChar no Tibia: Xerife Woody
Postado em dezembro 02, 2016

@marcelinhok

 

tenta agora:

  

local config = {
    loginMessage = getConfigValue('loginMessage')
}
function onLogin(cid)
    local loss = getConfigValue('deathLostPercent')
    if(loss ~= nil) then
        doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
    end
    local accountManager = getPlayerAccountManager(cid)
    if(accountManager == MANAGER_NONE) then
        local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        else
            str = str .. " Please choose your outfit."
            doPlayerSendOutfitWindow(cid)
        end
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
    elseif(accountManager == MANAGER_NAMELOCK) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
    elseif(accountManager == MANAGER_ACCOUNT) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    else
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end
    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end
    registerCreatureEvent(cid, "Mail")
    registerCreatureEvent(cid, "GuildMotd")
    
registerCreatureEvent(cid, "killer")
registerCreatureEvent(cid, "attackguild")
registerCreatureEvent(cid, "prevetloss")
registerCreatureEvent(cid, "tkexp4")
registerCreatureEvent(cid, "tkexp3")    
registerCreatureEvent(cid, "advance")
registerCreatureEvent(cid, "AdvEffect")
registerCreatureEvent(cid, "Idle")
registerCreatureEvent(cid, "Antimagebomb")
registerCreatureEvent(cid, "checkmcmanager")
registerCreatureEvent(cid, "effect")
registerCreatureEvent(cid, "onPrepareDeath")
registerCreatureEvent(cid, "DeathSystem")
registerCreatureEvent(cid, "LevelItem")
registerCreatureEvent(cid, "anunciarmorte")
registerCreatureEvent(cid, "CombatDodge")
registerCreatureEvent(cid, "onPrepareDeath")
registerCreatureEvent(cid, "showKD")
registerCreatureEvent(cid, "pvpsystem")
registerCreatureEvent(cid, "SkullCheck")
    registerCreatureEvent(cid, "ReportBug")
registerCreatureEvent(cid, VipReceive)
registerCreatureEvent(cid, "PlayerKill")
    if (InitArenaScript ~= 0) then
    InitArenaScript = 1
    -- make arena rooms free
        for i = 42300, 42309 do
            setGlobalStorageValue(i, 0)
            setGlobalStorageValue(i+100, 0)
        end
    end
    -- if he did not make full arena 1 he must start from zero
    if getPlayerStorageValue(cid, 42309) < 1 then
        for i = 42300, 42309 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 2 he must start from zero
    if getPlayerStorageValue(cid, 42319) < 1 then
        for i = 42310, 42319 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 3 he must start from zero
    if getPlayerStorageValue(cid, 42329) < 1 then
        for i = 42320, 42329 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    if getPlayerStorageValue(cid, 42355) == -1 then
        setPlayerStorageValue(cid, 42355, 0) -- did not arena level
    end
    setPlayerStorageValue(cid, 42350, 0) -- time to kick 0
    setPlayerStorageValue(cid, 42352, 0) -- is not in arena
if getPlayerStorageValue(cid, 67792) == 1 then
doPlayerPopupFYI(cid, "Seja Bem vindo ao Baiak Zuado\n\nJa Estamos em Clima de NATAL HOHOHOOU.\n\nAqui vou postar algumas dicas para você iniciante.\n1- Se for sua primeira vez em nosso server você acaba de adquirir 2 dias de Super Vip.\n2- Faça a quest Donate Coins e Seja TOP.\n\nLista de principais comandos do server. !aol !bless !stamina !notice !info !reset !superdias !go !bp !doar !evento\n\nAptoveite os Eventos de NATAL.\n\nBom Jogo a Todos!")
doPlayerSetStorageValue(cid, 67792, 1)
end

local storage3 = (getPlayerAccountId(cid)+550)
local diasv = 2
if getGlobalStorageValue(storage3) <= 0 then
    setGlobalStorageValue(storage3, 1)
    setPlayerStorageValue(cid, 13715, os.time() + diasv*24*60*60)
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Você recebeu "..diasv.." dias de SUPER VIP, bom jogo!")
end

return true
end

 

marcelinhok

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/04/15Posts: 84
Postado em dezembro 02, 2016
20 minutos atrás, DuuhCarvalho disse:

@marcelinhok

 

tenta agora:

  

local config = {
    loginMessage = getConfigValue('loginMessage')
}
function onLogin(cid)
    local loss = getConfigValue('deathLostPercent')
    if(loss ~= nil) then
        doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
    end
    local accountManager = getPlayerAccountManager(cid)
    if(accountManager == MANAGER_NONE) then
        local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        else
            str = str .. " Please choose your outfit."
            doPlayerSendOutfitWindow(cid)
        end
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
    elseif(accountManager == MANAGER_NAMELOCK) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
    elseif(accountManager == MANAGER_ACCOUNT) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    else
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end
    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end
    registerCreatureEvent(cid, "Mail")
    registerCreatureEvent(cid, "GuildMotd")
    
registerCreatureEvent(cid, "killer")
registerCreatureEvent(cid, "attackguild")
registerCreatureEvent(cid, "prevetloss")
registerCreatureEvent(cid, "tkexp4")
registerCreatureEvent(cid, "tkexp3")    
registerCreatureEvent(cid, "advance")
registerCreatureEvent(cid, "AdvEffect")
registerCreatureEvent(cid, "Idle")
registerCreatureEvent(cid, "Antimagebomb")
registerCreatureEvent(cid, "checkmcmanager")
registerCreatureEvent(cid, "effect")
registerCreatureEvent(cid, "onPrepareDeath")
registerCreatureEvent(cid, "DeathSystem")
registerCreatureEvent(cid, "LevelItem")
registerCreatureEvent(cid, "anunciarmorte")
registerCreatureEvent(cid, "CombatDodge")
registerCreatureEvent(cid, "onPrepareDeath")
registerCreatureEvent(cid, "showKD")
registerCreatureEvent(cid, "pvpsystem")
registerCreatureEvent(cid, "SkullCheck")
    registerCreatureEvent(cid, "ReportBug")
registerCreatureEvent(cid, VipReceive)
registerCreatureEvent(cid, "PlayerKill")
    if (InitArenaScript ~= 0) then
    InitArenaScript = 1
    -- make arena rooms free
        for i = 42300, 42309 do
            setGlobalStorageValue(i, 0)
            setGlobalStorageValue(i+100, 0)
        end
    end
    -- if he did not make full arena 1 he must start from zero
    if getPlayerStorageValue(cid, 42309) < 1 then
        for i = 42300, 42309 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 2 he must start from zero
    if getPlayerStorageValue(cid, 42319) < 1 then
        for i = 42310, 42319 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    -- if he did not make full arena 3 he must start from zero
    if getPlayerStorageValue(cid, 42329) < 1 then
        for i = 42320, 42329 do
            setPlayerStorageValue(cid, i, 0)
        end
    end
    if getPlayerStorageValue(cid, 42355) == -1 then
        setPlayerStorageValue(cid, 42355, 0) -- did not arena level
    end
    setPlayerStorageValue(cid, 42350, 0) -- time to kick 0
    setPlayerStorageValue(cid, 42352, 0) -- is not in arena
if getPlayerStorageValue(cid, 67792) == 1 then
doPlayerPopupFYI(cid, "Seja Bem vindo ao Baiak Zuado\n\nJa Estamos em Clima de NATAL HOHOHOOU.\n\nAqui vou postar algumas dicas para você iniciante.\n1- Se for sua primeira vez em nosso server você acaba de adquirir 2 dias de Super Vip.\n2- Faça a quest Donate Coins e Seja TOP.\n\nLista de principais comandos do server. !aol !bless !stamina !notice !info !reset !superdias !go !bp !doar !evento\n\nAptoveite os Eventos de NATAL.\n\nBom Jogo a Todos!")
doPlayerSetStorageValue(cid, 67792, 1)
end

local storage3 = (getPlayerAccountId(cid)+550)
local diasv = 2
if getGlobalStorageValue(storage3) <= 0 then
    setGlobalStorageValue(storage3, 1)
    setPlayerStorageValue(cid, 13715, os.time() + diasv*24*60*60)
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Você recebeu "..diasv.." dias de SUPER VIP, bom jogo!")
end

return true
end

 

Perfeito mano, Muito obrigado Mesmo !

Poccnn

Enquanto houver armas no mundo, haverá guerra!
avatar
Herói
Herói

INFOS

Grupo: HeróiRegistrado: 07/03/16Posts: 1418Gênero: Masculino
Postado em dezembro 03, 2016

Caro membro, seu tópico foi movido de Otserv > Suporte Otserv para Suporte Otserv > Otserv > Pedidos e Dúvidas Resolvidos.

 

"Deus é amor, mas matou 99,99999% de todos os seres viventes do mundo com o diluvio.

Deus é misericórdia, mas condena as pessoas ao tormento eterno do inferno.

Deus é pai, mas abandonou seus filhos a servidão.

Deus é vida, mas condenou a humanidade a morte.

Deus é o senhor. Senhor das guerras, da morte, do ódio.

 

Ninguém que ame a humanidade, mataria 99,99999% da população, não só de humanos, bem como dos demais animais, por amor. Isso não é amor, é doença, psicose de um sádico que gosta de ver sua 'criação' sofrer e ainda quer 'pagar' de misericordioso, de deus amor.

 

Não quero seu amor; não quero sua misericórdia, não quero ser seu filho, não quero sua vida, não quero que seja meu senhor.

Tu és um psicótico, doente, hipócrita, assassino; não me venha querer se passar por bondoso, amoroso, misericordioso."