Back again. Im have trouble on the create account packet, perhaps im doing it wrong. I get ipbanned on sending this packet. (Local hashed with Bnetauth.dll)
Private Sub CreateAccount()
Dim accounthash As String
Dim result As Variant
accounthash = String(5 * 4, vbNullChar)
result = x(accounthash, m_Password)
Clear
InsertNonNTString accounthash
InsertNTString m_Username
SendPacket &H52
End Sub
I'm pretty sure bnetauth.dll does not support 0x52. You'll need to use BNLS if you want the appropriate contents for doing an NLS account create.
You might be right, but im am pretty sure you are able to create accounts using bnetauth.dll, for I have many bots that do that. Possibly I need to use an older account create method? Ill try to see If I can find anything on bnetdocs.
Try switching &H52 with &H3A. 0x52 is for NLS (New Logon System) which currently only Warcraft III & it's Expansion uses. The hashing for those games are much different and advanced.