Public Class GameRolePlayHumanoidInformations
Inherits GameRolePlayNamedActorInformations
Public HumanoidInfo As HumanInformations
Public Overloads Sub Deserialize(ByVal DR As DofusReader)
MyBase.Deserialize(DR)
Dim _loc2 As Short = DR.ReadUnsignedShort
HumanoidInfo = ProtocolTypeManager.GetInstance(_loc2)
HumanoidInfo.Deserialize(DR)
End Sub
End Class
Public Class GameRolePlayCharacterInformations
Inherits GameRolePlayHumanoidInformations
Public AlignmentInfos As ActorAlignmentInformations
Public Overloads Sub Deserialize(ByVal DR As DofusReader)
MyBase.Deserialize(DR)
AlignmentInfos = New ActorAlignmentInformations
AlignmentInfos.Deserialize(DR)
End Sub
End Class