(Resolvido)[PEDIDO] Dois Scripts Que Podem Ser Simples.

lucasmuniz67 · Junho 13, 2014

Então pessoal, estou aqui para pedir um script que poderá ser simples para alguns, eu estou criando um servidor Baiak, e queria criar 1 magia para cada vocação, porém eu queria que qualquer uma vocação soltasse a magia, mais tinha que ser "Donate" no caso "VIP", a storage da "VIP" que eu uso é (13500).

O outro script é assim, o player que for "VIP" ganha 10% a mais de exp que os player "FREE" ganham, o storage da "VIP" é a mesma da de cima (13500), Caso precisem de alguma coisa, só pedir!

Quem puder me ajudar agradeço muito e dou REP+++ !

Editado Junho 13, 2014 por lucasmuniz67 (veja o histórico de edições)

Jobs · Junho 13, 2014

Double exp para vips:

Vá em creaturescript/script,copie um arquivo.lua existente e renomeie para:

vipexp.lua

Citar
function onLogin(cid)

local rate = 1.5 -- 50%
local config = {
welvip = "você tem "..((rate - 1)*100).."% de exp a mais agora!",
not_vip = "Tornesse vip e ganhe "..((rate - 1)*100).."% a mais de experiencia!",
s = 13500, -- storage vip
}

if getPlayerStorageValue(cid, config.s) - os.time() >= 1 then
doPlayerSetExperienceRate(cid, rate)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.welvip)
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.not_vip)
end
return TRUE
end

Mostrar mais

Agora em creaturescript/scripts/login.lua adicione a tag:

Citar
registerCreatureEvent(cid, "ExpVip")

Mostrar mais

Agora vá para creaturescript.xml e adicione:

Citar
<event type="login" name="ExpVip" script="vipexp.lua"/>

Mostrar mais

Para mudar a porcentagem de exp:

Edite essa parte para alterar a porcentargem de exp a mais para os vip:

Citar
local rate = 1.25 -- 25%

Mostrar mais

No caso está 25% a mais de exp.

Por exemplo,se quiser colocar 50% ficaria assim:

Citar
local rate = 1.50 -- 50%
Mostrar mais

vé se te ajuda

Editado Junho 13, 2014 por jobsonmb (veja o histórico de edições)

lucasmuniz67 · Junho 13, 2014

Amigo, quando o player loga até aparece a mensagem, porém quando o player mata o monster ele ganha a mesma exp. mato o demon ganho 180 mil, usei o item para poder acessar a área donate, que no caso tem o storage 13500. eu desloguei e loguei, até sai da conta e tudo, mais quando loguei a exp era a mesma, não está mudando, sabe oque pode ser? e não apareceu erro nenhum.

O script na action que uso para o player virar donate é esse aqui.

function onUse(cid, item, fromPosition, itemEx, toPosition)

local config={

removeOnUse = "yes" -- remover quando usar ("yes" or "no")

}

local days = 15 -- coloque os dias que serão a VIP!

local daysvalue = days * 24 * 60 * 60

local storageplayer = getPlayerStorageValue(cid, 13500)

local timenow = os.time()

if getPlayerStorageValue(cid, 13500) - 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, 13500, time)

local quantity = math.floor((getPlayerStorageValue(cid, 13500) - timenow)/(24 * 60 * 60))

doSendMagicEffect(getPlayerPosition(cid), math.random(28,30))

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. quantity .." dias de VIP restantes.")

if (config.removeOnUse == "yes") then

doRemoveItem(item.uid, 1)

end

return TRUE

end

Editado Junho 13, 2014 por lucasmuniz67 (veja o histórico de edições)

CLyde · Junho 13, 2014

-em Creaturescript/script Crie um arquivo.lua e renomeie para : vipexp.lua

function onLogin(cid)

local rate = 1.5 -- 50%
local config = {
welvip = "você tem "..((rate - 1)*100).."% de exp a mais agora!",
not_vip = "Tornesse vip e ganhe "..((rate - 1)*100).."% a mais de experiencia!",
s = 13540, -- storage vip
}

if getPlayerStorageValue(cid, config.s) - os.time() >= 1 then
doPlayerSetExperienceRate(cid, rate)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.welvip)
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.not_vip)
end
return TRUE
end

-em Creaturescript/script/login.lua adicione:

registerCreatureEvent(cid, "ExpVip")~

-em Creaturescript.xml adicione a tag:

<event type="login" name="ExpVip" script="vipexp.lua"/>

É só procurar no forum que existe varios Script já feitos...
http://www.tibiaking.com/forum/topic/20477-script-exp-a-mais-para-vips/

Jobs · Junho 13, 2014

Em 13/06/2014 em 05:23, CLyde disse:
-em Creaturescript/script Crie um arquivo.lua e renomeie para : vipexp.lua
function onLogin(cid)

local rate = 1.5 -- 50%
local config = {
welvip = "você tem "..((rate - 1)*100).."% de exp a mais agora!",
not_vip = "Tornesse vip e ganhe "..((rate - 1)*100).."% a mais de experiencia!",
s = 13540, -- storage vip
}

if getPlayerStorageValue(cid, config.s) - os.time() >= 1 then
doPlayerSetExperienceRate(cid, rate)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.welvip)
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.not_vip)
end
return TRUE
end
-em Creaturescript/script/login.lua adicione:
registerCreatureEvent(cid, "ExpVip")~
-em Creaturescript.xml adicione a tag:
<event type="login" name="ExpVip" script="vipexp.lua"/>
É só procurar no forum que existe varios Script já feitos...

http://www.tibiaking.com/forum/topic/20477-script-exp-a-mais-para-vips/
Mostrar mais

mesma coisa que eu postei amigo. isso e

CLyde · Junho 13, 2014

Em 13/06/2014 em 05:26, jobsonmb disse:

mesma coisa que eu postei amigo. isso e

Mostrar mais

Não tinha visto, é que você postou antes de mim... Só vi depois que já havia postado.

lucasmuniz67 · Junho 13, 2014

Como eu disse, o erro continua, fala que ser VIP ganha % de exp a mais, eu uso o item, viro vip e mesmo assim não ta ganhando a % de exp a mais, e não da nenhum erro. :s

Jobs · Junho 13, 2014

Em 13/06/2014 em 05:42, lucasmuniz67 disse:

Como eu disse, o erro continua, fala que ser VIP ganha % de exp a mais, eu uso o item, viro vip e mesmo assim não ta ganhando a % de exp a mais, e não da nenhum erro. :s

Mostrar mais

cara aki sempre funcionou, ta fora da minha ossada :/

lucasmuniz67 · Junho 13, 2014

Ai parceiro, irei te dar REP+ por ter tentando me ajudar, Muito obrigado ! para funcionar eu tive que por o Sistema VIP By Mock no meu servidor, ele ficou PERFEITO ! só que tipo, antigamente o item 10309 dava 15 Dias de VIP, agora com esse do MOCK, o item não funciona, oque devo fazer? para os player adiquirir vip? sabe me dizer?

Jobs · Junho 13, 2014

normalmente e atraves de um comando que o god.

Mostrar conteúdo oculto

Em data/talkactions/scripts acrescente dentro da pasta scripts uma outra pasta com o nome VIP vamos precisar de arquivos.lua que teram os nomes e códigos a seguir:

add.lua

Citar
function onSay(cid, words, param, channel)
doPlayerSendCancel(cid, "Added "..param.." Vip Days.")
return doPlayerAddVipDays(cid, param)
end

Mostrar mais

addvipp.lua

Citar
function onSay(cid, words, param)
         if param == "" then
            return doPlayerPopupFYI(cid,"Está com problemas?\nAprenda os comandos!\n---------------\nAdicionar vip:\n/vip add days player\n/vip add 30 Real\n---------------\nDeletar vip:\n/vip del player\n/vip del Real\n---------------\nVer a vip:\n/vip see player\n/vip see Real\n---------------\n")
         end
         if param:lower():find('add') == 1 and 3 then
            local _,_,id,name = param:lower():find('add (%d+) (.+)')
            name = name or ""
            id = tonumber(id or 1) or 1
            if tonumber(id) == nil or getPlayerByName(name) == false then
             return doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR,"Adicionar vip:\n/vip add days player\n/vip add 30 Real\n [Player: "..name..]")
            end
            if isPlayer(getPlayerByName(name)) == TRUE then
            vip.addVipByAccount(getPlayerAccount(getPlayerByName(name)) ,vip.getDays(id))

            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR,"Foram adicionados "..tonumber(id).." dias de vip a "..name..".")
            doPlayerSendTextMessage(getPlayerByName(name),MESSAGE_INFO_DESCR,"Você recebeu "..tonumber(id).." dias de vip.")
         else
         doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR,name.." não esta online ou não existe.")
         end
         elseif param:lower():find('del') == 1 and 3 then
            local _,_,name = param:lower():find('del (.+)')
            if getPlayerByName(name) == false then
             return doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR,"Deletar vip:\n/vip del player\n/vip del Real\n")
            end

            vip.setVipByAccount(getPlayerAccount(getPlayerByName(name)),-os.time())
            doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR,"A vip de "..name.." foi apagada.")
         elseif param:lower():find('see') == 1 and 3 then
            local _,_,name = param:lower():find('see (.+)')
            name = name or ""
            if getPlayerByName(name) == false then
             return doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR,"Ver a vip:\n/vip see player\n/vip see Real\n")
            end
            local ret_ = vip.getVip(getPlayerByName(name))
            if ret_ == 0 then
             return doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR,name.." Não tem vip, e nunca teve.")
            else
             return doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "A vip de "..name.." Acaba/terminou em "..os.date("%d %B %Y %X ",ret_))
            end
         end
         return TRUE
end

Mostrar mais

get.lua

Citar
function onSay(cid, words, param, channel)
    doPlayerSendCancel(cid, ""..getPlayerVipDays(cid).." days VIP left.")
end

Mostrar mais

is.lua

Citar
function onSay(cid, words, param, channel)
    if isPlayerVip(cid) == TRUE then
        doPlayerSendCancel(cid, "You are a VIP player.")
    else
        doPlayerSendCancel(cid, "You are not a VIP player.")
    end
end

Mostrar mais

removevip.lua

Citar
function onSay(cid, words, param, channel)
    doPlayerSendCancel(cid, "Vip removed.")
    return doPlayerRemoveVip(cid)
end

Mostrar mais

set.lua

Citar
function onSay(cid, words, param, channel)
    doPlayerSendCancel(cid, "VIP Days: "..param..".")
    return setPlayerVipDays(cid, param)
end

Mostrar mais

vipdays.lua

Citar
function onSay(cid, words, param)
         if vip.hasVip(cid) == TRUE then
            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Your vip end in "..os.date("%d %B %Y %X ",vip.getVip(cid)))
         else
             if vip.getVip(cid) ~= 0 then
                doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You're not a vip player. Your vip has finished in "..os.date("%d %B %Y %X ", vip.getVip(cid)).." and now is "..os.date("%d %B %Y %X ", os.time()))
             else
                doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You're not a vip player. You naver has a vip.")
             end
         end
         return TRUE
end

Mostrar mais

Em data/talkactions/talkactions.xml adicione está tag:

Citar


<talkaction log="yes" words="/vip" access="5" event="script" value="VIP/addvipp.lua" />
<talkaction words="!vipdays" event="script" value="VIP/vipdays.lua" />

Mostrar mais

Editado Junho 13, 2014 por jobsonmb (veja o histórico de edições)

lucasmuniz67 · Junho 13, 2014

Amigo, obrigado mais conseguir por pra vender direto do site. MUITO OBRIGADO MESMO pela sua ajuda!

No meu servidor tem o comando também ! haha

VALEU MESMO !

Jobs · Junho 13, 2014

Em 13/06/2014 em 06:14, lucasmuniz67 disse:

Amigo, obrigado mais conseguir por pra vender direto do site. MUITO OBRIGADO MESMO pela sua ajuda!

No meu servidor tem o comando também ! haha

VALEU MESMO !

Expand Mostrar mais

agora uma coisa se poder manda o ip para eu joga

Entrar

(Resolvido)[PEDIDO] Dois Scripts Que Podem Ser Simples.

Posts Recomendados

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Participe da conversa

Quem Está Navegando 0 membros estão online

Estatísticas dos Fóruns

TibiaKing

Open Tibia Server

Redes Sociais

Anuncie no TibiaKing

Informação Importante