Bem vindo visitante.
Caso ainda não tenha uma conta,pedimos para que crie uma,assim você terá acesso a todos os links e imagens disponíveis no fórum.

Você não está conectado. Conecte-se ou registre-se

[Correção de Bugs] Mensagens privadas

Ir em baixo  Mensagem [Página 1 de 1]

1Normal [Correção de Bugs] Mensagens privadas em Qua Fev 15, 2012 11:48 pm

Terabin

avatar
Administrador
Administrador
Bom,isso vai normalizar o sistema de mensagens privadas em seu jogo.
Esse é um bug que já veio com a engine...

Em modInput,troque isso:
Código:
' Player message
        If Left$(ChatText, 1) = "!" Then
            Exit Sub
            ChatText = Mid$(ChatText, 2, Len(ChatText) - 1)
            Name = vbNullString

            ' Get the desired player from the user text
            For i = 1 To Len(ChatText)

                If Mid$(ChatText, i, 1) <> Space(1) Then
                    Name = Name & Mid$(ChatText, i, 1)
                Else
                    Exit For
                End If

            Next

            ChatText = Mid$(ChatText, i, Len(ChatText) - 1)

            ' Make sure they are actually sending something
            If Len(ChatText) - i > 0 Then
                MyText = Mid$(ChatText, i + 1, Len(ChatText) - i)
                ' Send the message to the player
                Call PlayerMsg(ChatText, Name)
            Else
                Call AddText("Usage: !playername (message)", AlertColor)
            End If

            MyText = vbNullString
            frmMain.txtMyChat.text = vbNullString
            Exit Sub
        End If

Por isso:
Código:
' Player message
        If Left$(ChatText, 1) = "!" Then
            ChatText = Mid(MyText, 2, Len(MyText) - 1)
            Name = ""
                   
            ' Get the desired player from the user text
            For i = 1 To Len(ChatText)
                If Mid(ChatText, i, 1) <> " " Then
                    Name = Name & Mid(ChatText, i, 1)
                Else
                    Exit For
                End If
            Next i
                   
            ' Make sure they are actually sending something
            If Len(ChatText) - i > 0 Then
                ChatText = Mid(ChatText, i + 1, Len(ChatText) - i)
                   
                ' Send the message to the player
                Call PlayerMsg(ChatText, Name)
            Else
                Call AddText("Usage: !playername msghere", AlertColor)
            End If
            MyText = ""
            frmMain.txtMyChat.text = ""
            Exit Sub
        End If

Agora,no modClientTCP em PlayerMsg,troque isso:
Código:
Buffer.WriteLong CSayMsg

Por isso:
Código:
    Buffer.WriteLong CPlayerMsg

Ver perfil do usuário http://pokepokepoke.forumeiros.com

2Normal Re: [Correção de Bugs] Mensagens privadas em Ter Fev 21, 2012 1:21 pm

wyvern670

avatar
Iniciante
Iniciante
Vlw tera aqui funfo certinho Smile

Ver perfil do usuário

3Normal Re: [Correção de Bugs] Mensagens privadas em Ter Fev 21, 2012 5:05 pm

Kisuke

avatar
Organizador
Organizador
Eu nem sabia que dava pra enviar mensagens privadas... nossa...


_______________________________________
Se não se pode vencer o jogo,o quebra cabeças não resolve... perde-se.
Ver perfil do usuário

4Normal Re: [Correção de Bugs] Mensagens privadas em Sex Fev 24, 2012 9:27 pm

Sakuray

avatar
Colaborador
Colaborador
/\ tenso ein..

sobre o bug, aqui não tinha nenhum, mais eu já troquei por precaução

Ver perfil do usuário http://narutoghostonline.blogspot.com

5Normal Re: [Correção de Bugs] Mensagens privadas em Sex Mar 02, 2012 3:42 am

Sakuray

avatar
Colaborador
Colaborador
Se bem que está errado isso, se trocar o Buffer.WriteLong CSayMsg por aquilo lá, vai bugar o chat do MAP, ficadik

Ver perfil do usuário http://narutoghostonline.blogspot.com

6Normal Re: [Correção de Bugs] Mensagens privadas em Sex Mar 02, 2012 12:42 pm

Terabin

avatar
Administrador
Administrador
Na verdade o sistema não esta implantado,isso fará com que ele seja usado.

E não,não vai bugar o chat do mapa...


_______________________________________
[Você precisa estar registrado e conectado para ver esta imagem.]
Ver perfil do usuário http://pokepokepoke.forumeiros.com

7Normal Re: [Correção de Bugs] Mensagens privadas em Seg Mar 05, 2012 9:28 pm

Speakgp

avatar
Iniciante
Iniciante
Obrigado =D !

Ver perfil do usuário

Conteúdo patrocinado


Voltar ao Topo  Mensagem [Página 1 de 1]

Permissão deste fórum:
Você não pode responder aos tópicos neste fórum