Ir para conteúdo

Featured Replies

Postado

Versão: 1.0

Versão de tibia: 9.7+

Descrição: Eu estava vendo as guilds do servidor quando achei que deveria fazer um script para o dono da guild usar e saber o que está acontecendo.

Features:

- Ver quem está online em sua guild

- Ver os comandos em sua guild

TAG:


<talkaction words="!guild;/guild" event="script" value="guild.lua"/>
[/code]




[b][i]Script:[/i][/b]

[i]data/talkactions/guild.lua[/i]

[code]
local commands = [[[ -- Guilds Commands -- ]
/disband - Deleta a guild
/invite - Invitar um membro na guild
/leave - Sai da guild
/revoke - Tira o convite de membro para a guild
/promote - Promove o membro da guild
/demote - Tira a promoção de um membro da guild
/passleadership - Passa o lider para outro membro
/kick - Kika o membro da guild
/nick - Adiciona um "guildnick" ao membro
/setrankname - Muda o nome de algum rank da guild
/setmotd - Muda a mensagem inicial da guild
/cleanmotd - Limpa a mensagem inicial da guild]]
function CountGuildMembers(GuildName) -- function by vodkart
    local count = 0
    local lista = db.getResult("SELECT `name`, `rank_id` FROM `players` WHERE `rank_id` IN (SELECT `id` FROM `guild_ranks` WHERE `guild_id` = " .. getGuildId(GuildName) .. ");")  
    if(lista:getID() ~= -1) then  
    repeat  count = count + 1 until not lista:next()  lista:free() return count end
end
modaldialog5 = {
    title = "Guild Help",
    message = "Escolha o que você quer visualizar:",
    buttons = {
        { id = 1, value = "Ver" },
        { id = 2, value = "Cancelar" },
    },
    buttonEnter = 1,
    buttonEscape = 2,
    choices = {
        { id = 1, value = "Membros Online" },
        { id = 2, value = "Comandos" }
    },
    popup = false
}
function callback5(cid, button, choice)
    if (button == 1) then
        if (choice == 1) then
            local players,str,GuildName = {},'',getPlayerGuildName(cid)
            if getPlayerGuildId(cid) <= 0 then
                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"Você precisa estar em uma Guild.") return true end
                for _, cid in pairs(getPlayersOnline()) do
                if getPlayerGuildName(cid) == GuildName then
                    table.insert(players, cid)
                end
            end
            str = str .. "Membros total da guild: "..CountGuildMembers(GuildName).." Players.\n\nExiste "..#players.." Players online na sua guild:\n\n"
            for i = 1, #players do
                str = str.."\n["..getPlayerName(players[i]).."]["..getPlayerGuildRank(players[i]).."]"
            end
            return doShowTextDialog(cid, 2533, str)
        elseif (choice == 2) then
            str = commands
            doShowTextDialog(cid, 2529, str)
        end
    end
end
function onSay(cid, words, param)
    if getPlayerGuildId(cid) <= 0 then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"Você não está em nenhuma guild.")
        return true
    end
    addDialog(modaldialog5, 1005, cid, callback5);
    return true
end

Como usar:

Digite /guild e descubra.

Créditos:

Vodkart

Comedinha (BrunoCarvalho)

Bruno Carvalho / Ex-Administrador TibiaKing

b.camara@live.com

 

  Em 26/12/2016 em 05:47, Spraypaint disse:

A força da alienação vem dessa fragilidade dos indivíduos, quando apenas conseguem identificar o que os separa e não o que os une.

-miltinho

 

wMwSJFE.png?1

 

  • Respostas 6
  • Visualizações 2.6k
  • Created
  • Última resposta

Top Posters In This Topic

Postado

Tava mesmo precisando ai vei vlw cara :D

Msn : joaovictorbona123@hotmail.com

Skype: joaobona1

Se voce Gosto Da ReP + Pra ajuda :D

  • 2 weeks later...
Postado
  • Autor
  Em 18/02/2013 em 01:44, chapolin disse:

Tava mesmo precisando ai vei vlw cara :D

Nada =D

  Em 27/02/2013 em 16:44, Dyn disse:

Comedinhas nao tem como vc fazer um para tibia 8.54?

Essa janela não aceita no cliente...

Bruno Carvalho / Ex-Administrador TibiaKing

b.camara@live.com

 

  Em 26/12/2016 em 05:47, Spraypaint disse:

A força da alienação vem dessa fragilidade dos indivíduos, quando apenas conseguem identificar o que os separa e não o que os une.

-miltinho

 

wMwSJFE.png?1

 

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

Quem Está Navegando 0

  • Nenhum usuário registrado visualizando esta página.

Estatísticas dos Fóruns

  • Tópicos 96.9k
  • Posts 519.7k

Informação Importante

Confirmação de Termo