Thank benco for Database
Back to Topic:
Now i have the DB but i dont find the Client xD When i use a newer Version of Csro 1.175 than 1.075 maybe one of you have the client?
PS: I think something in this part is wrong:
Public Sub EnterWorld(ByVal sender As sr_Game.Client, ByVal sdata As String)
sender.Send(cv_StringFromHex("010001b00000" & "01"))
sender.Send(cv_StringFromHex("0000A5340000"))
GetCharacterInfo(sender, sdata)
sender.Send(cv_StringFromHex("0000A6340000"))
SendDay(sender)
sender.Send(cv_StringFromHex("020009380000" & "01A9")) '?must see
GetPlayerStat(sender)
LoadSilk(sender)
'GuildInfo(sender)
FortressWar(sender)
sender.Send(cv_StringFromHex("01000533000000")) '?must see
sender.Send(cv_StringFromHex("020009380000" & "01AA")) '?must see
test(sender)
sender.InGame = True
sender.CanMove = True
sender.CurrentSpeed = sender.RunSpeed
sender.ObjectVisited.Clear()
If sender.InGame Then
sender.MoveToX = sender.XPos
sender.MoveToY = sender.YPos
sender.MovementFlag = 3
'sender._startmove = Now
sender.Timer_move.Start()
Else
sender.Timer_move.Stop()
End If
End Sub