Valhalla Legends Archive

Quote from: DueL on July 20, 2005, 03:34 PM
I am in shock that you got this far and dont know how to trim strings.....

Because I had to trim no other fucking strings. OMG GOD I AM GETTING PISSED ALL IT IS, IS ONE SIMPLE FUCKING THING THAT I NEED HELP WITH. GOD! SOMEONE HELP ME! Erm, sorry for the yelling but I do know how to use the Trim$,Right$ and Left$ functions but! I am not sure how I would trim the username string because I end up cutting off either a letter or some of it disappears and I can't find it. I get ipbanned each time I try to connect so I can't test it that much but someone give me more hints on this on how to trim it right.. 

Yea what a lot of help that was. Am I not doing something right here? 

Quote from: MyndFyre on July 20, 2005, 02:17 PM

Quote from: Jaquio on July 20, 2005, 02:04 PM
Erm, how exactly would I do that? >.< I am new to all this packet stuff I was using csb for the longest time and decided to do it the right way.

You don't know how to handle a string?  I don't think you know Visual Basic well enough to continue.

You might look into Trim$, Left$, and Right$.

Another hint: you should do this with the string BEFORE you put it in the packet.  It has nothing to do with "all this packet stuff."

No no no, I know how to use the Trim$,Left$ and Right$ functions in vb but I wouldn't know how to trim the username string to work with the 0x3A packet.

Quote from: MyndFyre on July 20, 2005, 01:44 PM
This is the problem:

0050  b5 40 74 6a 6d 89 00 00  00 00 00 00 00 00 4a 61   .@tjm... ......Ja
0060  71 75 69 6f 00                                     quio.           

You need to trim your username string.

Erm, how exactly would I do that? >.< I am new to all this packet stuff I was using csb for the longest time and decided to do it the right way.

Quote from: MyndFyre on July 20, 2005, 11:59 AM

Quote from: Jaquio on July 20, 2005, 11:52 AM
Meh, can no one help me with this?  All I need to do is get 0x3A then it's done.. because I know how to do the rest of the packets. Just it is not hashing the password right or maybe I screwed up in the other packets because it disconnects after 0x3A..

Provide a packet log of your sent 0x3a.

And don't whine.  It's annoying.

Meh, sorry lol here is a packet log of me sending 0x3A I think.. I am not to good with this little packet logger..


0000  00 0f db 20 91 97 00 03  c9 4f 1c f4 08 00 45 00   ... .... .O....E.
0010  00 57 79 94 40 00 80 06  b4 cd c0 a8 01 2d 3f f0   .Wy.@... .....-?.
0020  ca 79 0b d3 17 e0 e5 2c  a0 9a 58 16 21 86 50 18   .y....., ..X.!.P.
0030  43 9c 2a cc 00 00 ff 3a  2f 00 73 19 a3 1c 00 00   C.*....: /.s.....
0040  30 00 12 19 01 03 52 7c  dd 5a 65 bd fc ac 7b 95   0.....R| .Ze...{.
0050  b5 40 74 6a 6d 89 00 00  00 00 00 00 00 00 4a 61   .@tjm... ......Ja
0060  71 75 69 6f 00                                     quio.                       


I hope that is 0x3A.. I have no idea what to look for really(for solving my problem.).

Meh, can no one help me with this?  All I need to do is get 0x3A then it's done.. because I know how to do the rest of the packets. Just it is not hashing the password right or maybe I screwed up in the other packets because it disconnects after 0x3A..

Yea, I tried that and no luck it still crashed I think I am using it wrong or something. Either that or there is something wrong with my bnetauth.dll..


Edit: Oops sorry for posting I should have searched the forums fist. You use it like this


Public Declare Function X Lib "BnetAuth.dll" (ByVal outbuf As String, ByVal Password As String) As Long
TmpP = String(7 * 4, vbNullChar)
PassHash = X(TmpP, Password)


Thanks though

Ok, I need to hash the password for 0x3A and I am using BNetAuth.dll Which I have been told I shouldn't because it sucks, by a couple of people. But oh well this is what I am learning with, anyways my problem is you use it like this


Public Declare Function X Lib "BnetAuth.dll" (ByVal outbuf As String, ByVal Password As String) As Long
PassHash = X(PassHash, Password)


I think... but when I used it like this when it gets down to send 0x3A my bot crashes.. Any idea why at all?

Quote from: Tontow on July 19, 2005, 08:48 PM

Quote from: Jaquio on July 19, 2005, 05:45 PM
How do I know exactly what packet I am looking at when I look at them? How do you tell >.<

simple, look at the header
http://bnetdocs.valhallalegends.com/content.php?Section=d&id=6

Oh! Ok I got it now thanks a lot.

Quote from: Blaze on July 19, 2005, 06:54 PM
There are other datatypes other then string you know.

Yea I know.. I am just not to sure what each of them strings are gonna end up to be until I debug it and choose the right datatype..

Quote from: Blaze on July 19, 2005, 06:54 PM
Also everyone one of those "Functions" should be Subs.

Even in a class file? I wasn't sure so I left them as functions..

Quote from: MyndFyre on July 19, 2005, 05:51 PM

Quote from: Jaquio on July 19, 2005, 02:51 PM
If I could just get past the connection code I could do just fine with the rest of it.

Generally, you'll find people here who are willing to help if you want to learn how that works.  However, you won't find people who are particularly willing to just give it to you.  I believe that attitude is because, once you get it, it's *really* easy.

Look at it as an opportunity to learn something new.

Well yea I want to learn how it works, and I guess everyone is right you won't learn much about it if you take it from someone elses source or something. Maybe someone would be willing to give me a lot of hints to help me with this. Because right now I have no clue on some of these, right now this is what my bot looks like...


Public Username As String, Password As String, Server As String
Public Product As String, CDKey As String, CDKeyEXP As String
Public Trigger As String, HomeChannel As String, BotMaster As String
Private VerByte As String, Executable As String, HashPath As String
Private CToken As String, SToken As String

Public Function Send_0x01()
'0x01 Stuff Here
End Function

Public Function Send_0x14()
'0x14 Stuff Here
End Function

Public Function Send_0x50()
'0x50 Stuff Here
End Function

Public Function Send_0x51()
'0x51 Stuff Here
End Function

Public Function Send_0x0A()
'0x0A Stuff Here
End Function

Public Function Send_0x3A()
'0x3A Stuff Here
End Function

Public Function ParsePacket(Data As String)
Dim PacketID As String
PacketID = Asc(Mid(Data, 2, 1))
Select Case PacketID
'Gotta work on this once everything else is done
End Select
End Function


I am still working on it I am just now going to bnet docs to get the packet information. However I feel I will be stuck on the Client Token and Server Token again.. As well as the Password Hash if anyone wants to give me hints on this..

Yes, I have read that topic however that still didn't help me. Because I never see what it shows there.. Am I doing something wrong?

Ok, I downloaded Ethereal to log packet errors in my bot and stuff.. However.. I do not understand Ethereal to much, I got it where I know how to capture the packets sent/recv but.. How do I know exactly what packet I am looking at when I look at them? How do you tell >.<

Alright, thanks I found that very helpful I am gonna look at it some more and read alot of stuff on it. I guess I will be back here if I get stuck on something else, or the same damn thing. Thanks everyone for the help.

Meh! If I could just get past the connection code I could do just fine with the rest of it. I have no idea where to learn about BNet Packets or nothing, it sucks I have looked on google and only place I found was BNetDocs which has helped me alot already. Just I am missing 3 things to connect.. Password Hash,Client Token and Server Token. But I guess I can sit here for awhile at my computer until I get it.