How to exit A endless while loop

[brad25 0]

Hi everyone, like the topic says but im using a button to exit the program but once it starts the loop it will not close. any help would be great.

expandcollapse popup

func test()
    
    
    while 1
    $scoord = PixelSearch( 727, 100, 953, 401, 0x9e9e00)
       if not @error Then
        MouseMove ( $scoord[0], $scoord[1])
        sleep(1000)
        MouseMove ( $scoord[0]+40, $scoord[1])
MouseClick("right")
   MouseMove ( $scoord[0]+70, $scoord[1])
        MouseClick("left")
        sleep(1000)
        MouseMove(426, 396)
    
    EndIf
    
WEnd
EndFunc

func exit1()
    if $nMsg=$button2 then Exit
    EndFunc
    
    

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Jumper = GUICreate("Jumper", 188, 81, 409, 433)
$Button1 = GUICtrlCreateButton("Start", 16, 40, 73, 25)
$Button2 = GUICtrlCreateButton("Exit", 96, 41, 73, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###



While 1
    

    $nMsg = GUIGetMsg()
    
    if $nMsg=$button1 then test()
    if $nMsg=$button2 then exit1()
WEnd

[JohnOne 1,603]

If the right condition are met for you, use ExitLoop keyword.

[Thlitmi 0]

Add this

$nMsg = GUIGetMsg()
Switch $nMsg
    Case $GUI_EVENT_CLOSE
EndSwitch

Clicing X will exit loop and program

[brad25 0]

Add this

$nMsg = GUIGetMsg()
Switch $nMsg
    Case $GUI_EVENT_CLOSE
EndSwitch

Clicing X will exit loop and program

that doesnt work either

[Thlitmi 0]

How did you add it ? Show the code.

Edited December 8, 2010 by Thlitmi

[JohnOne 1,603]

that doesnt work either

Well you dont have a GUI thats why.

When you say "Either", do you mean exitloop is not exiting the while loop?

[Varian 8]

The Exit button works if you click it first. If you click the Start button, the script is stuck in an endless loop. That's why clicking on the Exit button after clicking on the Start button does no good. You cannot break into the loop. Consider using an ExitLoop or Return after the MouseMoves have finished or if there is an @error

Func test()
    While 1
        $Scoord = PixelSearch(727, 100, 953, 401, 0x9e9e00)
        If Not @error Then
            MouseMove($Scoord[0], $Scoord[1])
            Sleep(1000)
            MouseMove($Scoord[0] + 40, $Scoord[1])
            MouseClick("right")
            MouseMove($Scoord[0] + 70, $Scoord[1])
            MouseClick("left")
            Sleep(1000)
            MouseMove(426, 396)
            Return
        Else
            Return
        EndIf
    WEnd
EndFunc   ;==>test

FYI, you just need Exit in your Exit1() function. Technically $nMsg and $Button2 are not Global variables and you did not pass them to the function.

Func exit1()
    Exit
EndFunc   ;==>exit1

Edited December 8, 2010 by Varian

[MvGulik 86]

"How to exit A endless while loop"

You can't! ... It would not be a endless loop anymore. (o.O)

^*hic_k*