Makeservers

[GoSuGaMING]

do u mean on the data_arrival?

[BinaryzL]

Well you're supposed to parse 2 "MCP Chunks" when you recieve packet 0x3e from battle.net.

Code Select Expand


(DWORD)       Cookie
(DWORD)       Status
(DWORD[2])    MCP Chunk 1
(DWORD)       IP
(DWORD)       Port
(DWORD[12])    MCP Chunk 2
(STRING)       BNCS unique name
(WORD)       Unknown


Then you send those on MCP packet 0x01.

Code Select Expand


(STRING)       MCP Startup Data
(STRING)       Battle.net Unique Name


[PaiD]

you wouldnt get a _error event b/c if the chucks are bad you would get disconnected or be sent 0x01 saying you failed.

[GoSuGaMING]

i think it has to be my dataarrival...

[BinaryzL]

Well what is the code?

[GoSuGaMING]

it isnt much its just

Code Select Expand


Dim strTemp As String, strBuffer As String
sckMCP.GetData strTemp, vbString
strBuffer = strBuffer & strTemp
ParseMCP strBuffer


friend sent me this... i dont think it is going to work

[Trickle]

10 bucks its his packet header for mcp

[BinaryzL]

Well that doesn't help what is the beginning of "ParseMCP" look like?

[GoSuGaMING]

Public Sub ParseMCP(Data As String)

Dim PacketID As String
   PacketID = Asc(Mid(Data, 3, 1))

Select Case PacketID

   Case &H1 'MCP_STARTUP
     
        Select Case (GetDWORD(Mid(Data, 4, 4)))
         
            Case &H0 '0x00 SUCCESS

[BinaryzL]

Yeah that looks good.

[GoSuGaMING]

thats all i have on it so far ^^

lets help meh write the rest? <3

[BaDDBLooD]

Public Sub ParseMCP(Data As String)

Dim PacketID As String
   PacketID = Asc(Mid(Data, 3, 1))

Select Case PacketID

   Case &H1 'MCP_STARTUP
     
        Select Case (GetDWORD(Mid(Data, 4, 4)))
         
            Case &H0 '0x00 SUCCESS

code supplied by me

[GoSuGaMING]

indeed ^^

now send me the rest of it

*bows down*

[Eric]

Public Sub ParseMCP(Data As String)

Dim PacketID As String
   PacketID = Asc(Mid(Data, 3, 1))

Select Case PacketID

   Case &H1 'MCP_STARTUP
     
        Select Case (GetDWORD(Mid(Data, 4, 4)))
         
            Case &H0 '0x00 SUCCESS

code supplied by me

Ew. Why is your PacketID a string?

[BaDDBLooD]

cause i felt like it?