Erro no sistema de Quest

    Compartilhe

    Snoopy
    Iniciante
    Iniciante

    Mensagens : 56
    Créditos : 7

    Erro no sistema de Quest

    Mensagem por Snoopy em Sex Mar 13, 2015 4:45 pm

    Bom, eu peguei para editar a eclipse EO 2.0 já com o sistema de Quest implantado e postada pelo valentine aqui no forum,mas dai eu fui editando a engine ate que um dia eu resolvi testar o sistema de Quest (ja havia testado antes e não deu erro) e quando cliquei no picQuestButton:


    Deu este erro no Servidor:



    Nesta sub:



    Acho que foi algo que eu editei enquanto adicionava algum sistema mas agora não consigo resolver

    ~Snoopy

    Profane ~
    Moderador Local
    Moderador Local

    Mensagens : 366
    Créditos : 66

    Re: Erro no sistema de Quest

    Mensagem por Profane ~ em Sex Mar 13, 2015 5:41 pm

    Edite a Linha :

    Dim nLength As long 

    para as Byte.

    Compile e teste. Creio que possa ser apenas isso. 

    att <3


    _________________

    Snoopy
    Iniciante
    Iniciante

    Mensagens : 56
    Créditos : 7

    Re: Erro no sistema de Quest

    Mensagem por Snoopy em Sex Mar 13, 2015 6:57 pm

    Agora quando entra no jogo está dando este erro:

    Profane ~
    Moderador Local
    Moderador Local

    Mensagens : 366
    Créditos : 66

    Re: Erro no sistema de Quest

    Mensagem por Profane ~ em Sex Mar 13, 2015 7:03 pm

    Debug e diga que onde está o Track =P.

    Onde ocorre o Overflow?


    _________________

    Pablo Kawan
    Experiente
    Experiente

    Mensagens : 478
    Créditos : 156

    Re: Erro no sistema de Quest

    Mensagem por Pablo Kawan em Sex Mar 13, 2015 10:15 pm

    tenta criar um novo char...
    qual quer coisa dou edit aq


    _________________
    Assinatura removida pela Staff
    ^ Tenho nova, surprise

    Snoopy
    Iniciante
    Iniciante

    Mensagens : 56
    Créditos : 7

    Re: Erro no sistema de Quest

    Mensagem por Snoopy em Sab Mar 14, 2015 7:09 pm

    O Overflow acontece quando eu clico em entrar nesta linha da Sub WriteBytes:
    Código:
    nLength = (UBound(nByte) - LBound(nByte)) + 1

    Assim ficou a determinada sub:

    Spoiler:
    Public Sub WriteBytes(ByRef nByte() As Byte)
    Dim nLength As Byte

        nLength = (UBound(nByte) - LBound(nByte)) + 1
        
        If WriteHead + nLength - 1 > BufferSize Then Allocate nLength
        
        CopyMemory Buffer(WriteHead), nByte(0), nLength
        WriteHead = WriteHead + nLength
    End Sub

    DragonicK
    Ocasional
    Ocasional

    Mensagens : 207
    Créditos : 42

    Re: Erro no sistema de Quest

    Mensagem por DragonicK em Sab Mar 14, 2015 8:09 pm

    Altere novamente para: Dim nLenght As Long

    Sobre o erro, provalvemente, o cliente não está enviando todos os dados corretamente; deve estar faltando algo, dê uma revisada no sistema de quest.

    Snoopy
    Iniciante
    Iniciante

    Mensagens : 56
    Créditos : 7

    Re: Erro no sistema de Quest

    Mensagem por Snoopy em Sab Mar 14, 2015 9:59 pm

    Caronne escreveu:Altere novamente para: Dim nLenght As Long

    Sobre o erro, provalvemente, o cliente não está enviando todos os dados corretamente; deve estar faltando algo, dê uma revisada no sistema de quest.
    Caronne, o Quest system é um sistema muito complicado e avançado para min, acho que ainda não estou apto para este nível de programação. Você pode me ajudar me explicando oque fazer para resolver este problema?

    DragonicK
    Ocasional
    Ocasional

    Mensagens : 207
    Créditos : 42

    Re: Erro no sistema de Quest

    Mensagem por DragonicK em Sab Mar 14, 2015 10:08 pm

    Comece verificando os dados que são enviados pelo cliente.

    Exemplo
    Código:

    Dim saci As string
    Dim level  As Integer 
    Dim sprite As Integer

    level = 15
    sprite = 25
    saci = "macumba"

    buffer.WriteString(saci)
    buffer.WriteInteger(level)
    buffer.WriteInteger(sprite)

    socket.Send(buffer.ToArray())

    Depois, verifique se no servidor, os dados estão na mesma ordem.

    Código:

    Dim saci As string
    Dim level  As Integer 
    Dim sprite As Integer

    saci = buffer.ReadString()
    level = buffer.ReadInteger()
    sprite = buffer.ReadInteger()

    socket.Send(buffer.ToArray())

    Pede para o kawanzii te ajudar.

    Profane ~
    Moderador Local
    Moderador Local

    Mensagens : 366
    Créditos : 66

    Re: Erro no sistema de Quest

    Mensagem por Profane ~ em Sab Mar 14, 2015 11:07 pm

    Snoopy, Manda via Pm ou por aqui mesmo o tutorial para eu poder analisar. 

    Se tiver um backup de sua engine posso adiciona-lo para você, caso eu não consiga resolver a olho.

    Att


    _________________

      Data/hora atual: Seg Dez 05, 2016 1:23 am