With buffer
If BnetBot.UseRealm = True And BnetBot.Product = "VD2D" Xor BnetBot.Product = "PX2D" Then
Realm = True
.InsertDWORD &H0
.InsertDWORD &H0
.InsertBYTE &H0
.SendPacket &H34
Else
Realm = False
.InsertNTString BnetBot.username
.InsertBYTE &H0
.SendPacket &HA
.InsertDWORD &H1
.InsertNTString "L"
.SendPacket &HC
End If
End With
Private Sub WinsockMCP_Connect()
AddChat vbGreen, "MCP: Connected, sending startup.."
Main.WinsockMCP.SendData Chr(1)
With buffer
.InsertNonNTString MCP1
.InsertNonNTString MCP2
.InsertNTString BNCSName
.SendMCPPacket &H1
End With
End Sub
Select Case PacketID
Case &H1
Select Case (GetDWORD(Mid(strTemp, 4, 4)))
Case &H0
AddChat vbGreen, "MCP: Startup accepted, ", vbYellow, "Logging on to Realm character..."
With buffer
.InsertDWORD &H8
.SendMCPPacket &H17
End With
End Select
Case &H17
With buffer
.InsertNTString BnetBot.CharName
.SendMCPPacket &H7
End With
Case &H7
Select Case (GetDWORD(Mid(strTemp, 4, 4)))
Case &H0
AddChat vbGreen, "MCP: Logged on to Realm Character"
With buffer
.InsertNTString BnetBot.username
.InsertBYTE &H0
.SendPacket &HA
End With
With buffer
.InsertNonNTString BnetBot.Product
.SendPacket &HB
End With
With buffer
.InsertDWORD 1
.InsertNTString "L"
.SendPacket &HC
End With
End Select
End Select
i'm having problems after i send 0x07
i seem to be getting a ip ban after sending 0x0A, and 0x0C
Any help would be GREATLY Apreciated
Quote from: BaDDBLooD on March 25, 2004, 07:07 AM
i am unsure of how to send 0x01 ( mcp_startup data )
when i packetlogged my other bot, i got this:
0000 01 4D 00 01 0C EC 84 A0 9B 7F 7B 53 3F F0 CA 82 .M........{S?...
0010 45 77 71 00 00 00 00 00 2A ED 7F 06 1D B9 E2 DE Ewq.....*.......
0020 50 58 32 44 36 38 58 49 3F F0 CA 82 33 10 00 00 PX2D68XI?...3...
0030 D5 5D 07 41 59 98 F8 A2 79 21 77 C5 2A 24 1F C2 .].AY...y!w.*$..
0040 76 AB B9 94 42 61 44 44 42 4C 6F 6F 44 00 v...BaDDBLooD.
You create a socket, connect it to the realm server, and send the data from the packet.
you create a socket, connect it to the realm server, and send the data from the packet.
Thanks, i already have a socket, i connected to realm server, what exactly do i send from 0x3E in 0x01
Try the "Reply with quote" feature. Check out BnetDocs (http://bnetdocs.valhallalegends.com/). I believe it's all on there.
It is. I was doing this not four days ago. BNetDocs contains all the information you need.
when i get the &H0 Success from &H7 ( MCP_CharLogon )
Case &H7
Select Case (GetDWORD(Mid(strTemp, 4, 4)))
Case &H0
AddChat vbGreen, "MCP: Logged on to Realm Character"
With buffer
.SendMCPPacket &H12
End With
With buffer
.InsertNonNTString BnetBot.Product
.SendPacket &HB
End With
With buffer
.InsertNTString BnetBot.username
.InsertNTString BnetBot.Realm & "," & BnetBot.CharName
.SendPacket &HA
End With
End Select
i get ipbanned...
It looks like you start talking to the realm server and then just continue to log on normally to Battle.net. You should suspend your connection to Battle.net (not send 0x0B/0x0A) until you've successfully logged onto a Realm character.
i thought i did log on it?
anyone? ;\
Quote from: BaDDBLooD on March 25, 2004, 10:20 PM
anyone? ;\
We can see that you already posted something that indicated you were confused about your connection process. The people here are not your slaves. Be patient.
just am Exasperated ;O
sorry, my bad ;o
anyone??
What do i do after i get the Success from &H7, send &H12, and before i send &HA, and &HB To bnet.