Erro no sistema de Quest

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

Edite a Linha :

Dim nLength As long 

para as Byte.

Compile e teste. Creio que possa ser apenas isso. 

att <3

Agora quando entra no jogo está dando este erro:

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

Onde ocorre o Overflow?

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

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:

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 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?

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.

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