MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!

Participe do fórum, é rápido e fácil

MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!
MMORPG Brasil
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

[ALL]Motd para Guild

2 participantes

Ir para baixo

[ALL]Motd para Guild Empty [ALL]Motd para Guild

Mensagem por Slash Sáb 03 Out 2009, 15:13

Començamos.

Cria um Arquivo na pasta do seu server chamado:

Código:
guilds.ini

Bom agora vai na pasta Scripts e abra o Main.txt
Quando voce ja tive aberto procure por:
Código:
' Global Variables

Abaixo do:

Código:
Public MOTD

Coloque:

Código:
Public GMOTD

Agora vc terá que fazer o proximo procedimento por duas vezes, procure por:

Código:
MOTD = GetVar("motd.ini", "MOTD", "Msg")

De Um Enter e coloque isso:

Código:
GMOTD = Trim(GetVar("guilds.ini", GetPlayerGuild(index), "Motd"))

Agora um pouco mais abaixo aparece isso ou sim nao procure com Control + B ou Control + F por:

Código:
 If LenB(MOTD) <> 0 Then
      Call PlayerMsg(Index, "MOTD: " & MOTD, BRIGHTCYAN)
   End If

De um Enter e Coloque isso:

Código:
If GetPlayerGuild(index) = "" Then
Call PlayerMsg(index, "Voce Nao Tem Guild!", 9)
Else
Call PlayerMsg(index, GetPlayerGuild(index) & ": " & GMOTD, 9)
End If
End Sub

Agora onde tem os comandos onde voce quiser coloque isso:

Código:
If LCase(Mid(TextSay, 1, 6)) = "/gmotd" Then
        If Len(TextSay) > 7 Then
            TextSay = Mid(TextSay, 7, Len(TextSay) - 6)       
                If GetPlayerGuildAccess(index) < 3 Then
                  Call PlayerMsg(index, "So o dono da guild pode mudar o mensagem!", 12)
      Exit Sub
                ElseIf GetPlayerGuildAccess(index) => 3 Then
                  Call PutVar("guilds.ini", GetPlayerGuild(index), "Motd", Trim(TextSay))
                  Call PlayerMsg(index, GetPlayerGuild(index) & " Mensagem Mudado Para: " & TextSay & ".", 11)
                End if 
            End If
            Exit Sub
        End If

Agora testem, se tiver algo de errado postem aqui.

Creditos: Batista e Slash (Adriano)
Slash
Slash
Membro Junior
Membro Junior

Mensagens : 54

Ir para o topo Ir para baixo

[ALL]Motd para Guild Empty Re: [ALL]Motd para Guild

Mensagem por Noah Sex 01 Jan 2010, 17:38

/gmotd = Esse comando não existe.

E o tutorial ta meio confuso.

ex: If LenB(MOTD) <> 0 Then
Call PlayerMsg(Index, "MOTD: " & MOTD, BRIGHTCYAN)
End If

Aonde fica isso? nem no control F tem porque tem mains que o <>0 then não é isso é <""> então os usuários ficam meio perdidos.

Não consegui colocar pra funcionar aqui.

Ta tudo certinho só que fala que o comando não existe e não da pra alterar o GMOTD.
Noah
Noah
Novato
Novato

Mensagens : 24

http://www.noaa.com.br/zeon

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos