Bonjour, donc première question de ma part, donc la voici : lorsque votre bot socket arrive en jeu comment obtenir la cellid sur laquelle il se trouve ?J'ai fait quelque recherche et je pense qu'il s'agirait du packet 226 qui contiendrait différents List de tous se qui s'affiche sur la map (ex : obstacle, maison, personnage, ....)Donc je voudrais savoir si quelqu'un aurait éventuellement une autre solution

De memoire ca viens d'un objet EntityDisposition un truc du genre.

non c'est bien dans 226 MapComplementaryInformationsDataMessage qui appelle GameRolePlayActorInformations

Ouep c'est bien dans le 226 mais j'ai plus d'erreur mais un overflow lorsque j'arrive sur le packet 226, je pense le même que toi ToOns mais je n'arrive pas à récupérer la cellid ....

Bon alors question simple quelqu'un sait il comment recevoir la cellid de son personnage ou qui a deja réussi a faire le packet 226 ?

> 4R7Y a dit : "J'ai aussi un overflow"[![img](http://img11.hostingpics.net/pics/144389over.png)](http://www.hostingpics.net/viewer.php?id=144389over.png)Je voulais savoir si tu avais sa aussi ?

loc_10 est declaré en Uinteger et est lu en short , un des 2 est faux

J'ai jouer a l'apprenti sorcier ^^en testant différentes valeurs de lecture ou de déclarations et sa ne change rien sa me génère de nouvelles exceptions.- Soit dépassement de lecture de flux dans DofusStream, pour ReadByte.- Soit la valeur de "Console.Write(" ne peut être convertit en Double.- Soit _loc_10 a effectuer une action entrainant un dépassement de capacité.Donc voila si quelqu'un à une idée ?Car la je patoge, mon problême c'est que la lecture du 226 créer des nouveaux objets OK, mais en créant ces objets et en s'en servant ^^ pour différentes lectures de valeurs, cela génére des exceptions dans les fichiers déjà codés comme EntityLook ou encore mieux dans DofusStream function DofusReader .Enfin voila

Quelqu'un est motivé pour se faire le 226 avec moi ?

Ce site est optimisé pour être consulté depuis un navigateur moderne dans lequel JavaScript est activé.

[Requete] Connaître la Cellid ?

ToOnS

loc_10 est un short ou un uinteger ? (déclaré en unsigned et lu en signed donc si lu en negatif il entre pas dans la variable -> depassement de capacité)

Anonymous

Je créer en UInteger et je lis en ReadUnSignedshort()

Cliquez pour révéler Cliquez pour masquer

Public Function deserializeAs_EntityLook(ByVal param1 As Dofus.DofusReader)
            Dim _loc_10 As UInteger = 0
            Dim _loc_11 As Integer = 0
            Dim _loc_12 As Integer = 0
            Dim _loc_13 As SubEntity
            Me.bonesId = Param1.readShort()
            If (Me.bonesId < 0) Then

                console.writeline("Forbidden value (" + Me.bonesId + ") on element of EntityLook.bonesId.")
            End If
            Dim _loc_2 As UShort = param1.ReadUnSignedShort()
            Dim _loc_3 As UInteger = 0
            While (_loc_3 < _loc_2)


                _loc_10 = param1.ReadUnSignedshort()
                If (_loc_10 < 0) Then

                    Console.WriteLine("Forbidden value (" + _loc_10 + ") on elements of skins.")
                End If
                Me.Skins.Add(_loc_10)
                _loc_3 = _loc_3 + 1
            End While

Il me semble pourtant que c'est bon non?

Merci

Anonymous

Ton erreur ce produit avant cet endroit. Un overflow veut dire que tu as une erreur dans une autre partie de ton code que celle qui génère l'erreur.

Anonymous

Ok,

Une autre partie de mon code qui est dans mon EntityLook? Ou avant?

Anonymous

Ca c'est toi qui dois le trouver, tu commences par le début du message, fais du pas à pas dans ton code et regarde chaque valeure de chaque variable qui est lue. Quand tu en vois une qui semble erronée alors tu as une bonne piste de départ.

Anonymous

Bonsoir,

Vu que mon overflow est celui-ci :

Cliquez pour révéler Cliquez pour masquer

Loading Image

Je doit vérifier tout les ReadByte?

Merci

Anonymous

Tout ce qui est lu, pas seulement les readbytes.

Un overflow arrive quand tu ne lis pas quelquechose correctement.

En gros ta lecture devient décaler à un moment donner, c'est pour ca que tu n'a pas asser de bytes pour tout lire dans le message que tu recoit.

Il y a trois causes prédominantes à ce genre de problème:

-Tu saute une variable (alors tout devient décaler après l'endroit ou tu devrait lire la variable)

-Tu ne lis pas la bonne longueur (par exemple tu lis 4 bytes (int) au lieu de 2 (short)), alors après cette variable tout devient décaler.

-Tu ne prends pas en considération le ProtocolTypeManager. Par exemple, une erreur très commune que les gens font quand ils lisent l'inventaire est de tout lire les effets des objets comme un ObjectEffect, mais dépendemment du id tu peux lire ObjectEffectString, ObjectEffectDice, etc. qui sont tous de longueur variables (et différentes de ObjectEffect).

Anonymous

-Tu ne prends pas en considération le ProtocolTypeManager. Par exemple, une erreur très commune que les gens font quand ils lisent l'inventaire est de tout lire les effets des objets comme un ObjectEffect, mais dépendemment du id tu peux lire ObjectEffectString, ObjectEffectDice, etc. qui sont tous de longueur variables (et différentes de ObjectEffect).

A ça doit venir de là alors car je "saute" à chaque fois le proto

Exemple:

_loc_15 = ProtocolTypeManager.getInstance(HouseInformations, _loc_14)

J'ai mis

_loc_15 = New HouseInformations

Le souci viens bien de là :?:

Merci

Anonymous

C'est très probable. Car tu ne demandes pas de code tout fait et que tu cherches à te faire aider (et non à ce que les autres le fasse pour toi), je vais te donner quelques places qui pourraitent également causer ce problème:

-HouseInformations (tu as également HouseInformationExtended)

-GameRolePlayActorInformation (tu as 11 déviations possibles: GameRolePlayCharacterInformations, GameRolePlayHumanoidInformations, etc.)

Anonymous

Edit : J'ai tout compris :D

Je donne des nouvelle demain voir ce que ça donne au debogage ;)

Anonymous

Bonjour,

Mon problème n'est toujours pas résolut...

Voici ce qui ce passe quand je laisse le protocol :

Cliquez pour révéler Cliquez pour masquer

Loading Image

Je ne sais pas si vous arrivez à voir les valeurs

Puis quand je l'enlève :

Cliquez pour révéler Cliquez pour masquer

Loading Image

J'ai pourtant relus mes tout mes codes et je les ai comparés avec les .as mais rien ne diverge ...

Il faudrait que j'arrive à contacter Nocebo pour voir où se situait l'erreur car j'ai exactement le même Overflow ...

Ou si quelqu'un d'autre à réussi je suis preneur ;)

Merci

bouh2

Met à jour tes classes ;)

Anonymous

Salut,

Par "classes" tu entend mon dofus.Stream?

Cliquez pour révéler Cliquez pour masquer

Namespace Dofus
    Public Class DofusReader
        Inherits IO.BinaryReader

        Sub New(ByVal input As IO.Stream)
            MyBase.New(input)
        End Sub

        Sub New(ByVal input As IO.Stream, ByVal encoding As System.Text.Encoding)
            MyBase.New(input, encoding)
        End Sub
        Public Function readUnsignedByte()
            Return ReadByte()
        End Function
        Public Overrides Function ReadByte() As Byte
            Return MyBase.ReadByte()
        End Function

        Public Function ReadUnSignedshort()
            Return ReadUInt16()
        End Function

        Public Overrides Function ReadUInt16() As UShort
            Return (CUShort(ReadByte()) << 8) + ReadByte()
        End Function

        Public Overrides Function ReadBoolean() As Boolean
            Return ReadByte() = 1
        End Function

        Public Function ReadShort()
            Return ReadInt16()
        End Function

        Public Overrides Function ReadInt16() As Short
            Dim Value As UShort = ReadUInt16()
            If Value > Short.MaxValue Then
                Dim Value2 As Short = -(UShort.MaxValue - Value) - 1
                Return Value2
            End If
            Return Value
        End Function

        Public Function ReadInt()
            Return ReadInt32()
        End Function

        Public Overrides Function ReadInt32() As Integer
            Dim Value As UInteger = ReadUInt32()
            If Value > Integer.MaxValue Then
                Dim Value2 As Integer = -(UInteger.MaxValue - Value) - 1
                Return Value2
            End If
            Return Value
        End Function

        Public Overrides Function ReadUInt32() As UInteger
            Return (CUInt(ReadByte()) << 24) + (CUInt(ReadByte()) << 16) + (CUInt(ReadByte()) << 8) + ReadByte()
        End Function

        Public Overrides Function ReadDouble() As Double
            Dim Bytes() As Byte = ReadBytes(8)
            Array.Reverse(Bytes)
            Return BitConverter.ToDouble(Bytes, 0)
        End Function

        Public Function ReadUTF()
            Return ReadString()
        End Function

        Public Overrides Function ReadString() As String
            Dim ByteArray() As Byte = MyBase.ReadBytes(ReadUInt16())
            Return System.Text.Encoding.UTF8.GetString(ByteArray)
        End Function

    End Class
    Public Class DofusWriter
        Shared m_Bytes As New List(Of Byte)

        Private Shared Function ComputeStaticHeader(ByVal PacketId As Integer, ByVal MessageLenghtType As Integer) As Short
            Return (PacketId << 2) Or MessageLenghtType
        End Function

        Private Shared Function ComputeTypeLen(ByVal MessageLenght As Integer) As Short
            Select Case MessageLenght
                Case Is > UShort.MaxValue
                    Return 3
                Case Is > Byte.MaxValue
                    Return 2
                Case Is > 0
                    Return 1
                Case Else
                    Return 0
            End Select
        End Function

        Friend Shared Sub Send(ByVal PacketID As Integer)
            Dim MessageLenghtType As Integer = ComputeTypeLen(m_Bytes.Count)
            Dim Header As Short = ComputeStaticHeader(PacketID, MessageLenghtType)

            Dim BytesToWrite(2 + MessageLenghtType + m_Bytes.Count - 1) As Byte
            BytesToWrite(0) = Header >> 8
            BytesToWrite(1) = Header - 256 * BytesToWrite(0)

            Dim index As Integer

            Select Case MessageLenghtType
                Case 1
                    BytesToWrite(2) = m_Bytes.Count
                    index = 3
                Case 2
                    BytesToWrite(2) = m_Bytes.Count >> 8
                    BytesToWrite(3) = m_Bytes.Count - 256 * BytesToWrite(2)
                    index = 4
                Case 3
                    BytesToWrite(2) = m_Bytes.Count >> 16
                    BytesToWrite(3) = m_Bytes.Count >> 8
                    BytesToWrite(4) = m_Bytes.Count - 256 * BytesToWrite(3) - 256 * 256 * BytesToWrite(2)
                    index = 5
            End Select
            Console.WriteLine("envoie : id = " & PacketID & ", taille = " & m_Bytes.Count) ' on ecrit l'ID et la taille
            Console.Write("0x")
            For i As Integer = index To m_Bytes.Count + index - 1
                BytesToWrite(i) = m_Bytes(i - index)
                Console.Write(BytesToWrite(i).ToString("X2"))
            Next
            Console.WriteLine()
            If Form1._socket_Connexion.Connected Then
                Form1._socket_Connexion.Send(BytesToWrite)
            Else
                Form1._socket_Jeu.Send(BytesToWrite)
            End If

            m_Bytes.Clear()

        End Sub

        Public Sub WriteByte(ByVal Value As Byte)
            m_Bytes.Add(Value)
        End Sub

        Public Sub WriteBoolean(ByVal Value As Boolean)
            If Value Then
                WriteByte(1)
            Else
                WriteByte(0)
            End If
        End Sub
        Public Sub WriteShort(ByVal Value As Short)
            WriteByte(CByte(Value >> 8))
            WriteByte(CByte(Value))
        End Sub
        Public Sub WriteUShort(ByVal Value As UShort)
            WriteByte(CByte(Value >> 8))
            WriteByte(CByte(Value And 255))
        End Sub
        Public Sub WriteUInt32(ByVal Value As UInteger)
            WriteByte(CByte(Value >> 24))
            Value -= (Value >> 24) << 24
            WriteByte(CByte(Value >> 16))
            Value -= (Value >> 16) << 16
            WriteByte(CByte(Value >> 8))
            Value -= (Value >> 8) << 8
            WriteByte(CByte(Value))
        End Sub
        Public Sub WriteDouble(ByVal Value As UInteger)
            WriteByte(CByte(Value >> 56))
            Value -= (Value >> 56) << 56
            WriteByte(CByte(Value >> 48))
            Value -= (Value >> 48) << 48
            WriteByte(CByte(Value >> 40))
            Value -= (Value >> 40) << 40
            WriteByte(CByte(Value >> 32))
            Value -= (Value >> 32) << 32
            WriteByte(CByte(Value >> 24))
            Value -= (Value >> 24) << 24
            WriteByte(CByte(Value >> 16))
            Value -= (Value >> 16) << 16
            WriteByte(CByte(Value >> 8))
            Value -= (Value >> 8) << 8
            WriteByte(CByte(Value))
        End Sub
        Public Sub WriteString(ByVal Value As String)
            WriteUTF(Value)
        End Sub
        Public Sub WriteUTF(ByVal Value As String)
            Dim BytesToWrite() As Byte = System.Text.Encoding.UTF8.GetBytes(Value)
            WriteUShort(BytesToWrite.Length)
            For Each Bit As Byte In BytesToWrite
                WriteByte(Bit)
            Next
        End Sub

        Sub WriteInt32(ByVal Target As Integer)
            Dim arr As Byte()
            arr = BitConverter.GetBytes(Target)
            WriteByte(arr(3))
            WriteByte(arr(2))
            WriteByte(arr(1))
            WriteByte(arr(0))
        End Sub

        Sub WriteInt16(ByVal Target As Integer)
            Dim arr As Byte()
            arr = BitConverter.GetBytes(Target)
            WriteByte(arr(1))
            WriteByte(arr(0))
        End Sub

        Sub WriteSingle(ByVal Target As Double)
            Dim arr As Byte()
            arr = BitConverter.GetBytes(Target)
            For Each bytte As Byte In arr
                WriteByte(bytte)
            Next
        End Sub

    End Class
End Namespace

Je le trouve à quelle endroit dans le Invoker?

Merci

Anonymous

Je crois que la c'est des Classes fait par des devs pour faciliter les sockets 2.0 !

Ca ne se trouve pas dans le Invoker

A confirmer !

FastFrench

Pour info, cette fonction est fausse :

        Public Sub WriteDouble(ByVal Value As UInteger)
            WriteByte(CByte(Value >> 56))
            Value -= (Value >> 56) << 56
            WriteByte(CByte(Value >> 48))
            Value -= (Value >> 48) << 48
            WriteByte(CByte(Value >> 40))
            Value -= (Value >> 40) << 40
            WriteByte(CByte(Value >> 32))
            Value -= (Value >> 32) << 32
            WriteByte(CByte(Value >> 24))
            Value -= (Value >> 24) << 24
            WriteByte(CByte(Value >> 16))
            Value -= (Value >> 16) << 16
            WriteByte(CByte(Value >> 8))
            Value -= (Value >> 8) << 8
            WriteByte(CByte(Value))
        End Sub

Anonymous

Merci,

Mais sais-tu où les trouver ?

Pas dans le invoker d'après ce que j'ai compris :?

Anonymous

Sur pimp je pense qu'ils ont beaucoup de ressources !

je pense ils ont

Anonymous

NullReferenceException: Ton ProtocolTypeManager.GetInstance() retourne null (rien) quand il devrait retourner un nouvel objet. Alors verifie pourquoi un appel a cette methode ne retourne rien.

Anonymous

Mon _loc_17 est Nothing car mon_loc_16 a des valeurs bizarre...

Donc mon screen plus haut _loc_16 = 12 et dans le proto.as il n'y a pas de valeur pour 12 ...

_loc_16 = param1.ReadUnSignedshort()
            _loc_17 = ProtocolTypeManager.getInstance(_loc_16)

Je précise que j'ai le même problème pour récupérer l'inventaire dans ObjectItem:

_loc_4 = param1.ReadUnSignedshort()
                _loc_5 = ProtocolTypeManager.getInstance(_loc_4)
_loc_5.deserialize(param1)
                Me.effects.Add(_loc_5)

Ici mon _loc_4 prend la valeur 1 ...

Merci pour votre aide :D

Anonymous

Alors tu as encore un probleme avant meme d'arriver a cet endroit.

« Page précédente Page suivante »