Valhalla Legends Forums Archive | Battle.net Bot Development | 0x3C Problems

AuthorMessageTime
laurion
Hi, for some reason, 0x3C is refusing to come back with 0x02 (the proper value).
Here is my 0x3C Packet(s):
[code]
''Thanks to Denial for this code
Public Function Authorize()

    With Pbuffer
       
        .InsertBYTE &H59
        .InsertBYTE &H49
        .InsertBYTE &H1
        .InsertBYTE &H0
        .InsertBYTE &H99
        .InsertBYTE &H39
        .InsertBYTE &H8E
        .InsertBYTE &H7D
        .InsertBYTE &H45
        .InsertBYTE &HDC
        .InsertBYTE &H24
        .InsertBYTE &HF0
        .InsertBYTE &H1
        .InsertBYTE &H1E
        .InsertBYTE &H51
        .InsertBYTE &HCA
        .InsertBYTE &H6
        .InsertBYTE &H6E
        .InsertBYTE &HA9
        .InsertBYTE &HE2
        .InsertBYTE &H42
        .InsertBYTE &H7C
        .InsertBYTE &H45
        .InsertBYTE &H2D
       
        .InsertNTString "(4)Lost Temple.scm"

        .SendPacket 0, &H3C
       
        .InsertBYTE &H59
        .InsertBYTE &H49
        .InsertBYTE &H1
        .InsertBYTE &H0
        .InsertBYTE &H99
        .InsertBYTE &H39
        .InsertBYTE &H8E
        .InsertBYTE &H7D
        .InsertBYTE &H45
        .InsertBYTE &HDC
        .InsertBYTE &H24
        .InsertBYTE &HF0
        .InsertBYTE &H1
        .InsertBYTE &H1E
        .InsertBYTE &H51
        .InsertBYTE &HCA
        .InsertBYTE &H6
        .InsertBYTE &H6E
        .InsertBYTE &HA9
        .InsertBYTE &HE2
        .InsertBYTE &H42
        .InsertBYTE &H7C
        .InsertBYTE &H45
        .InsertBYTE &H2D
       
        .InsertNTString "(4)Lost Temple.scm"

        .SendPacket 1, &H3C
       
    End With

End Function
[/code]
I send this after I receive an OK on 0x1C. After I send 0x3C, I get back
[pre]
0x3C
0000:  FF 3C 08 00 00 00 00 00                          ÿ<.............
0x3C
0000:  FF 3C 08 00 00 00 00 00                          ÿ<.............
[/pre]
I have no idea why..if I need to show you any more info, please, just ask.
OnCreate:
[code]
With Pbuffer
        .InsertDWORD &H0
        .InsertDWORD &H0
        .InsertWORD &H2
        .InsertWORD &H1
        .InsertDWORD &H1F
        .InsertDWORD &H0
        .InsertNTString Mod1.GameName
        .InsertBYTE 0
        .InsertNonNTString ",44,14,6,2,2,1,68644703,4,,"
        .InsertNonNTString Mod1.Names(0) & Chr(&HD)
        .InsertNTString "The Lost Temple" & Chr(&HD)
        .SendPacket 0, &H1C
        .SendPacket 0, &H10
        AddText vbWhite, "Creating game " & Mod1.GameName
       

End With
Join
[/code]
Thanks in advance
September 18, 2005, 6:51 PM
LockesRabb
Either you're trying to make a winbot, or you're actually trying to make a bot that can play games... Which is it? And also this is just a question asked purely out of curiousity.
September 18, 2005, 7:09 PM
laurion
A winbot, if you must know...
September 18, 2005, 7:11 PM
Ringo
Witch client are you sending it from?
I think only W2BN and JSTR use this message these days.
September 18, 2005, 7:19 PM
LockesRabb
While I don't have any experience in THAT arena, my only suggestion is to get a packet logger like etheral, and set it to monitor port 6112. Watch what is sent/recieved when it creates, then starts game... Then packetlog your bot when it does same- compare the two results. That should help you pinpoint the problem and fix it.
September 18, 2005, 7:25 PM
laurion
I'm doing SSHR.
Ringo, in your other post you said
C > S 0x08 (Report Join)
S > C 0x08 (Report Join Result)
I'm not reporting a join..how would I do this?

Bot1 and Bot2 are both in the game if you do a /whois..
September 18, 2005, 7:36 PM
Ringo
Hmm, i got board :)

[code]
Public Const GAME_CREATE As Long = 0
Public Const GAME_JOINREPORT As Long = 6
Public Const GAME_START As Long = 14
Dim tmpTime as long
Public Sub GAME_STATE(Index As Integer, ByVal STATE As Long)
If STATE = 0 then tmpTime = GetTickCount()
With Buf
    .InsertDWORD STATE
    .InsertDWORD (GetTickCount / 1000) - (tmpTime / 1000)
    .InsertWORD &H2 'melee
    .InsertWORD &H1 'penalty (none)
    .InsertDWORD &H0 'unused
    .InsertDWORD &H0 'unused
    .InsertNTString "Game Name"
    .InsertNTString "" 'password
    .InsertNTString ",33,12,6,,2,1,2ac374b3,," & _
                    Mod1.Names(Index) & Chr(13) & _
                    "Byways" & Chr(13)
    .SendPacket Index?, &H8
End With
End Sub
[/code]

Then just call it like so:
[code]
Call GAME_STATE(Bot_Num, GAME_CREATE)
Call GAME_STATE(Bot_Num, GAME_JOINREPORT)
Call GAME_STATE(Bot_Num, GAME_START)
[/code]
September 18, 2005, 7:57 PM
laurion
Thanks a lot, I really appreciate it!
Do i need to re-write the Map auth function to support Byways ?
Ringo, got AIM?
September 18, 2005, 8:01 PM
Ringo
[quote author=Tazo link=topic=12847.msg128616#msg128616 date=1127073676]
Thanks a lot, I really appreciate it!
Do i need to re-write the Map auth function to support Byways ?
Ringo, got AIM?
[/quote]
np
0x08 does all of that apart from the end game, witch is 0x2C.
I dont have aim or anything like that at the moment (just reformated)
September 18, 2005, 8:23 PM

Search