[code]

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

[/code]

[code]

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

[/code]

[code]

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

[/code]

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[code][/code]

[quote author=BaDDBLooD link=board=17;threadid=5982;start=0#msg51607 date=1080220076]
i am unsure of how to send 0x01 ( mcp_startup data )

when i packetlogged my other bot, i got this:

[code]

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.

[/code]
[/quote]

You create a socket, connect it to the realm server, and send the data from the packet.

[code]

you create a socket, connect it to the realm server, and send the data from the packet.

[/code]

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. 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 )

[code]

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

[/code]

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 author=BaDDBLooD link=board=17;threadid=5982;start=0#msg51740 date=1080274813]
anyone? ;\
[/quote]

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.