Jump to content

After Elseif click. It closes


Recommended Posts

This bot is just about completed..but everything goes well till it selects the character. In the "Game Login" part. After these lines..when it chooses a character..it just stops after it clicks the needed character.

If GuiCtrlRead($Radio_8) = $GUI_CHECKED Then
    MouseClick("left", 252, 343, 1)
    ElseIf GuiCtrlRead($Radio_9) = $GUI_CHECKED Then
    MouseClick("left", 380, 339, 1)
    Else 
    If GuiCtrlRead($Radio_11) = $GUI_CHECKED Then
    MouseClick("left", 508, 329, 1)
    Sleep(1000)
    MouseClick("left", 624, 159, 1) :::::::NEVER GETS TO THIS PART.
    Sleep(3000)
Endif
Endif
EndFunc;==>GameLogin

This is the entire script

#include <GuiConstants.au3>

If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000

GuiCreate("..::Cha0TiC::..", 272, 86, -1, -1, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$n=GUICtrlCreatePic("Backround.bmp", -1, -1, 0, 0)
GuiCtrlSetState(-1, $GUI_DISABLE)
$Group_1 = GuiCtrlCreateGroup("Password", 180, 0, 90, 72)
$Radio_2 = GuiCtrlCreateRadio("Scania", 10, 20, 50, 10)
$Radio_3 = GuiCtrlCreateRadio("Bera", 10, 30, 50, 10)
$Group_4 = GuiCtrlCreateGroup("Server", 0, 0, 70, 50)
$Group_5 = GuiCtrlCreateGroup("Character", 80, 0, 90, 70)
$Input_3 = GuiCtrlCreateInput("", 186, 25, 66, 18,$ES_PASSWORD)
$Button_2 = GuiCtrlCreateButton("Go!", 215, 45, 48, 20)
$Radio_8 = GuiCtrlCreateRadio("Character 1", 87, 19, 76, 12)
$Radio_9 = GuiCtrlCreateRadio("Character 2", 87, 36, 82, 12)
$Radio_11 = GuiCtrlCreateRadio("Character 3", 87, 54, 72, 12)

GUISetState()

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $Button_2
      GameLogin()
      GoZapIt()

Case Else
    
   EndSelect
WEnd

;======================================================================================
; Func GameLogin()                                          Hot Key = None
;======================================================================================
 Func GameLogin()
If WinGetState("MapleStory") = 16 Then
   WinSetState("MapleStory", "", @SW_MAXIMIZE)
EndIf
    Sleep(1000)
    MouseClick("left", 419, 334, 1)
    Sleep(1000)
    MouseClick("left", 454, 286, 1)
    Send(GuiCtrlRead($Input_3) & "{Enter}") 
    Sleep(1000)
If GuiCtrlRead($Radio_2) = $GUI_CHECKED Then
    MouseClick("left", 163, 157, 1)
    ElseIf GuiCtrlRead($Radio_3) = $GUI_CHECKED Then
    MouseClick("left", 197, 160, 1)
EndIf
 Sleep(1000)
Dim $channel   
 $channel = Random(0, 19, 1)
If $channel = 0 Then MouseClick("left", 284, 431, 1); Channel 17
If $channel = 1 Then MouseClick("left", 274, 400, 1); Channel 13
If $channel = 2 Then MouseClick("left", 366, 334, 1); Channel 6
If $channel = 3 Then MouseClick("left", 265, 364, 1); Channel 9
If $channel = 4 Then MouseClick("left", 553, 305, 1); Channel 4
If $channel = 5 Then MouseClick("left", 275, 332, 1); Channel 5
If $channel = 6 Then MouseClick("left", 363, 304, 1); Channel 2
If $channel = 7 Then MouseClick("left", 458, 305, 1); Channel 3
If $channel = 8 Then MouseClick("left", 259, 303, 1); Channel 1
If $channel = 9 Then MouseClick("left", 453, 336, 1); Channel 7
If $channel = 10 Then MouseClick("left", 558, 337, 1); Channel 8
If $channel = 11 Then MouseClick("left", 364, 367, 1); Channel 10
If $channel = 12 Then MouseClick("left", 461, 370, 1); Channel 11
If $channel = 13 Then MouseClick("left", 552, 367, 1); Channel 12
If $channel = 14 Then MouseClick("left", 368, 400, 1); Channel 14
If $channel = 15 Then MouseClick("left", 463, 397, 1); Channel 15
If $channel = 16 Then MouseClick("left", 561, 398, 1); Channel 16
If $channel = 17 Then MouseClick("left", 372, 430, 1); Channel 18
If $channel = 18 Then MouseClick("left", 466, 432, 1); Channel 19
If $channel = 19 Then MouseClick("left", 557, 431, 1); Channel 20

    Sleep(1000)
    MouseClick("left", 555, 252, 1)
    Sleep(1000)
If GuiCtrlRead($Radio_8) = $GUI_CHECKED Then
    MouseClick("left", 252, 343, 1)
    ElseIf GuiCtrlRead($Radio_9) = $GUI_CHECKED Then
    MouseClick("left", 380, 339, 1)
    Else 
    If GuiCtrlRead($Radio_11) = $GUI_CHECKED Then
    MouseClick("left", 508, 329, 1)
    Sleep(1000)
    MouseClick("left", 624, 159, 1)
    Sleep(3000)
Endif
Endif
EndFunc;==>GameLogin

;======================================================================================
; Func GoZapIt()                                            Hot Key = None
;======================================================================================
Func GoZapIt()

    Local $iMax = 70; Change this if you want to change the number of times it hits
    Local $iCnt    ; This does the counting
    For $iCnt = 1 To $iMax
        Send("a")
        Sleep(200)
If WinGetState("MapleStory") = 16 Then
   WinSetState("MapleStory", "", @SW_MAXIMIZE)
EndIf
    

    Next
     Return
EndFunc;==>GoZapIt

;======================================================================================
; Func Terminate()                                          Hot Key = Escape
;======================================================================================
Func Terminate()                                          ; Hot Key = Escape
    MsgBox(0, "Terminating Script", "Script Name: " & @ScriptName & @LF & @LF & "Located: " & @ScriptDir & @LF & @LF & "is now Terminated")
    Exit 0
EndFunc;==>Terminate
Edited by Leprechaun
Link to comment
Share on other sites

Can't see anything wrong, try this but...

If GuiCtrlRead($Radio_8) = $GUI_CHECKED Then
    MouseClick("left", 252, 343, 1)
ElseIf GuiCtrlRead($Radio_9) = $GUI_CHECKED Then
    MouseClick("left", 380, 339, 1)
ElseIf GuiCtrlRead($Radio_11) = $GUI_CHECKED Then
    MouseClick("left", 508, 329, 1)
    Sleep(1000)
    MouseClick("left", 624, 159, 1) :::::::NEVER GETS TO THIS PART.
    Sleep(3000)
EndIf

qq

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...