help me plz!

[Michael]

Code Select Expand

        rtbAdd "clan invite recived" & vbNewLine, vbYellow
        rtbAdd StrToHex(data) & vbNewLine, vbYellow
        profileend = Mid(data, 8, Len(data))
        rtbAdd profileread & vbNewLine, vbYellow
        Dim buttonaccept As String
        buttonaccept = MsgBox("accept clan invite", vbYesNo)
        If buttonaccept = vbYes Then
        SendPacket &H6
        rtbAdd "clan invite accepted" & vbNewLine, vbYellow
        End If


When i press yes to accept the clan invite i get ipbanned, why dosent this work.

[UserLoser.]

Just a random guess, but sending packet 0x06 (SID_STARTVERSIONING) is totally out of place, and has nothing to do with accepting clan invitations.  Also it seems you're sending it with no data

[Michael]

i am so confused....
i am guessing that i dont send &H6 i sent something else and that

Code Select Expand

[14:54:56] clan invite recived
[14:54:56]  FF 79 1A 00 B7 2A 03 00 00 00 57 44 43 6C 61 6E 20 44 57 00 44 57 5B 31 5D 00
is how i get the info for the clantag and all that?

[Michael]

Code Select Expand

        rtbAdd "clan invite recived" & vbNewLine, vbYellow
        rtbAdd StrToHex(data) & vbNewLine, vbYellow
        profileend = Mid(data, 8, Len(data))
        rtbAdd profileread & vbNewLine, vbYellow
        Dim buttonaccept As String
        buttonaccept = MsgBox("accept clan invite", vbYesNo)
        If buttonaccept = vbYes Then
        InsertBYTE &H6
        SendPacket &H76
        rtbAdd "clan invite accepted" & vbNewLine, vbYellow
        End If
thats my code now and i still get ipbanned

[Michael]

opps
ok

Code Select Expand


        rtbAdd "clan invite recived" & vbNewLine, vbYellow
        rtbAdd StrToHex(data) & vbNewLine, vbYellow
        profileend = Mid(data, 8, Len(data))
        rtbAdd profileread & vbNewLine, vbYellow
        Dim buttonaccept As String
        buttonaccept = MsgBox("accept clan invite", vbYesNo)
        If buttonaccept = vbYes Then
        InsertBYTE &H6
        SendPacket &H79
        rtbAdd "clan invite accepted" & vbNewLine, vbYellow
        End If

dosent accept but does disconnect me but i don't get ip banned i still need more help

[QwertyMonster]

Get rid of ur &H6, and just put &H79 then try

I can still see a &H6 in there ^_^

[Michael]

Still don't work but from what i have gathered you need to send insertbyte &H6 as the accept but i think you need other data.

[QwertyMonster]

Oh ok, i havent done much work on clan invites ect...

Try searching the forum, or www.google.com 

Well atleast i stopped you from getting ipbanned 

[Michael]

can someone show me how to phrase the data and reply correctly please?

[UserLoser.]

Code Select Expand

        rtbAdd "clan invite recived" & vbNewLine, vbYellow
        rtbAdd StrToHex(data) & vbNewLine, vbYellow
        profileend = Mid(data, 8, Len(data))
        rtbAdd profileread & vbNewLine, vbYellow
        Dim buttonaccept As String
        buttonaccept = MsgBox("accept clan invite", vbYesNo)
        If buttonaccept = vbYes Then
        InsertBYTE &H6
        SendPacket &H76
        rtbAdd "clan invite accepted" & vbNewLine, vbYellow
        End If
thats my code now and i still get ipbanned

0x76 id is used to quit a clan... and there's no client->server message for it.  This is on BnetDocs like you even told me & pasted the format used on AIM...

http://bnetdocs.valhallalegends.com/content.php?Section=m&Code=378

[Michael]

Code Select Expand

        rtbAdd "clan invite recived" & vbNewLine, vbYellow
        rtbAdd ToHex(data) & vbNewLine, vbYellow
        rtbAdd GetWORD(Mid(data, 5, 2)) & vbNewLine, vbYellow
        rtbAdd HexToStr(data) & vbNewLine, vbYellow
        Dim buttonaccept As String
        buttonaccept = MsgBox("accept clan invite", vbYesNo)
        If buttonaccept = vbYes Then
        InsertBYTE &H6
        SendPacket &H79
        rtbAdd "clan invite accepted" & vbNewLine, vbYellow
        End If

Fixed that little bug but i still need to no how to turn the data into the info i need.

i am guessing that i need something like

Code Select Expand


insertDWord cookie (i dont no how to find out what the cookie is from the data)
insertDWord clantag (dont understand how to get it out of the data tho.)
insertNTString person_inviting (dont no how to get this either)
insertBYTE &H6
sendpacket &H79

would be how to do it. can someone help me phrase the data into that?

So how can i get the info needed from

Code Select Expand

FF 79 1A 00 B7 2A 03 00 00 00 57 44 43 6C 61 6E 20 44 57 00 44 57 5B 31 5D 00?

[UserLoser.]

All that is in the packet you received...

[Michael]

All that is in the packet you received...

How can i turn that into the info tho...

[Blaze]

Read bnetdocs on receiving that packet..

[Michael]

(DWORD)       Cookie
(DWORD)       Clan Tag
(STRING)     Clan Name
(STRING)     Inviting Leader
Ya but how do i make the data come out into works and stuff?