elitepvpers

elitepvpers (https://www.elitepvpers.com/forum/)
-   SRO Coding Corner (https://www.elitepvpers.com/forum/sro-coding-corner/)
-   -   [vb.net] B3ncoEmu (https://www.elitepvpers.com/forum/sro-coding-corner/791241-vb-net-b3ncoemu.html)

chea77er 10/20/2010 09:19

Why you want to use LINQ. ADO.NET FTW :)

carra 10/23/2010 10:31

have database? and loginserver/gameserver?

benco 10/24/2010 13:08

LINQ for finding object, if u want to use mysql server u can dl mysql connector for .Net on mysql website.

killerlk 10/30/2010 06:59

Thank you i've been looking for something like this.

killerlk 10/30/2010 09:06

Where's the database?

benco 11/04/2010 13:22

There's no DB for MySQL :p . It's MS-SQL DB. I'll up it as soon as possible

benco 02/19/2011 18:10

Hi,
Foregive me for late, this is MSQ SQL Scripts for emu source code
[Only registered and activated users can see links. Click Here To Register...]

try it please

Murgen 02/19/2011 19:22

oooo its my language :) I will look into this.

SkyBlue~ 02/19/2011 21:44

Quote:

Originally Posted by benco (Post 9227754)
Hi,
Foregive me for late, this is MSQ SQL Scripts for emu source code
[Only registered and activated users can see links. Click Here To Register...]

try it please

what's properties ?

x*Manu*x 02/19/2011 22:26

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

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

ZiXiRo 02/23/2011 12:50

nice...
project maybe will be continued... or no
good job for db

x*Manu*x 02/23/2011 15:43

Quote:

Originally Posted by ZiXiRo (Post 9286911)
nice...
project maybe will be continued... or no
good job for db

yeah i will ;)

benco 02/23/2011 22:12

Good luck for your project ;)

x*Manu*x 02/24/2011 06:38

Quote:

Originally Posted by benco (Post 9298535)
Good luck for your project ;)

thanks ;)

PS: Is this the full source or ? :)

benco 02/25/2011 08:14

yep


All times are GMT +2. The time now is 11:02.

Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.