Loop in a Loop

[JellyFish666]

I got a loop in a loop and have to stop one loop when a button is pushed and not sure how to do that.

I hope this example will explain when you click "Stop" it will give you a message box but when you hit "Go" and try and hit "Stop" it won't stop it.

I know why it is not working but not sure of another method or way to do this so I am just using it to show an example.

Actually now that I think of it will my "Do Loop" even work because I got a "While Loop" inside of the "Do Loop" ?

#include <GUIConstants.au3>
$Test = GUICreate("test", 160 , 25)
$Go = GUICtrlCreateButton("Go", 0, 0, 80, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 80, 0, 80, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $Msg = GUIGetMsg()
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Go
            $i = 0
            Do
                While 1
                    ToolTip($i , 0 , 0)
                    $i = $i +1
                WEnd
            Until $Stop
        Case $Stop
            MsgBox(0 , "" , "Stop")         
    EndSwitch
WEnd

Edited February 26, 2008 by JellyFish666

[Tomb]

I got a loop in a loop and have to stop one loop when a button is pushed and not sure how to do that.

I hope this example will explain when you click "Stop" it will give you a message box but when you hit "Go" and try and hit "Stop" it won't stop it.

I know why it is not working but not sure of another method or way to do this so I am just using it to show an example.

Actually now that I think of it will my "Do Loop" even work because I got a "While Loop" inside of the "Do Loop" ?

#include <GUIConstants.au3>
$Test = GUICreate("test", 160 , 25)
$Go = GUICtrlCreateButton("Go", 0, 0, 80, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 80, 0, 80, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $Msg = GUIGetMsg()
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Go
            $i = 0
            Do
                While 1
                    ToolTip($i , 0 , 0)
                    $i = $i +1
                WEnd
            Until $Stop
        Case $Stop
            MsgBox(0 , "" , "Stop")         
    EndSwitch
WEnd

first decide what will cause the loop to end. then make it like this

If (you fill this in) Then
ExitLoop
EndIf

this will retun to just the main loop

[Zedna]

#include <GUIConstants.au3>
$Test = GUICreate("test", 160 , 25)
$Go = GUICtrlCreateButton("Go", 0, 0, 80, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 80, 0, 80, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $Msg = GUIGetMsg()
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Go
            $i = 0
                While 1
                    If GUIGetMsg() = $Stop Then ExitLoop

                    ToolTip($i , 0 , 0)
                    $i = $i +1
                WEnd
;        Case $Stop
;            MsgBox(0 , "" , "Stop")   
    EndSwitch
WEnd

Also look here

[PsaltyDS]

It cries out for EventMode:

#include <GUIConstants.au3>

Opt("GuiOnEventMode", 1)

Global $iRunFlag = False, $i = 0

$GUI = GUICreate("test", 200 , 50)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Quit")
$Button = GUICtrlCreateButton("Go", 50, 10, 100, 30)
GUICtrlSetOnEvent(-1, "_ButtonHit")
GUISetState(@SW_SHOW)

While 1
    Sleep(100)
    If $iRunFlag Then
        ToolTip($i)
        $i += 1
    EndIf
WEnd

Func _ButtonHit()
    $iRunFlag = Not $iRunFlag
    If $iRunFlag Then
        ControlSetText($GUI, "", $Button, "STOP")
    Else
        ControlSetText($GUI, "", $Button, "GO")
    EndIf
EndFunc

Func _Quit()
    Exit
EndFunc

Edited February 26, 2008 by PsaltyDS

[GEOSoft]

It cries out for EventMode:

#include <GUIConstants.au3>

Opt("GuiOnEventMode", 1)

Global $iRunFlag = False, $i = 0

$GUI = GUICreate("test", 200 , 50)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Quit")
$Button = GUICtrlCreateButton("Go", 50, 10, 100, 30)
GUICtrlSetOnEvent(-1, "_ButtonHit")
GUISetState(@SW_SHOW)

While 1
    Sleep(100)
    If $iRunFlag Then
        ToolTip($i)
        $i += 1
    EndIf
WEnd

Func _ButtonHit()
    $iRunFlag = Not $iRunFlag
    If $iRunFlag Then
        ControlSetText($GUI, "", $Button, "STOP")
    Else
        ControlSetText($GUI, "", $Button, "GO")
    EndIf
EndFunc

Func _Quit()
    Exit
EndFunc

Not to me it doesn't. I NEVER use GUIEventMode. Never have and I'm not about to start now. Before you ask, Yes I have tried it.

[JellyFish666]

I was actually thought about something like that Zenda yours did the trick though and thanks to everyone else for helping, I learned something new today and I guess that answered my question, "you can't have a "Do Until Loop if there is a While Loop in use".

[PsaltyDS]

Not to me it doesn't. I NEVER use GUIEventMode. Never have and I'm not about to start now. Before you ask, Yes I have tried it.

Other things GEOSoft has tried and rejected:

1. Any version of Windows with 32bits or more

2. Cell phones

3. Microwave ovens

4. Indoor plumbing

5. Horseless cariages

6. Shoes

[GEOSoft]

Other things GEOSoft has tried and rejected:

1. Any version of Windows with 32bits or more

2. Cell phones

3. Microwave ovens

4. Indoor plumbing

5. Horseless cariages

6. Shoes

Wrong! I don't reject 1, 4, 5 or 6.

Everybody has their own preferences. In my case I prefer not to use GUIEventMode because I end up having to write a bunch of useless functions to do what can easily be handled in a standard message loop. Beside some of the code I use in the message loop doesn't lend itself well to OnEvent.

I'm not saying that it isn't good for some people though.

If we were to be asked what functions, keywords, options etc. we could do without then that one would be on my list. As a matter of fact the whole Opt/AutoItSetOption thing could go on the chopping block except that I'm pretty sure it would require a lot of code changes in AutoIt.

And I also wouldn't mind geting rid of a few UDF functions and Constants either. Although I usually get around that by copying the functions or Constants that I need directly into my code.

[wolf9228]

#include <GUIConstants.au3>
$Test = GUICreate("test", 160 , 25)
$Go = GUICtrlCreateButton("Go", 0, 0, 80, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 80, 0, 80, 25, 0)
GUISetState(@SW_SHOW)
$X = 0
While 1
    $Msg = GUIGetMsg()
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Go
            $i = 0
            Do
                While NOT ($Msg = $Stop)
                $Msg = GUIGetMsg()
                   ToolTip($i , 0 , 0)
                    $i = $i +1
                WEnd
            Until  $Msg = $Stop
            MsgBox(0 , "" , "Stop1")
            Switch $Msg
            Case $Stop
            MsgBox(0 , "" , "Stop2")
            EndSwitch
    EndSwitch
WEnd

[JellyFish666]

#include <GUIConstants.au3>
$Test = GUICreate("test", 160 , 25)
$Go = GUICtrlCreateButton("Go", 0, 0, 80, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 80, 0, 80, 25, 0)
GUISetState(@SW_SHOW)
$X = 0
While 1
    $Msg = GUIGetMsg()
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Go
            $i = 0
            Do
                While NOT ($Msg = $Stop)
                $Msg = GUIGetMsg()
                   ToolTip($i , 0 , 0)
                    $i = $i +1
                WEnd
            Until  $Msg = $Stop
            MsgBox(0 , "" , "Stop1")
            Switch $Msg
            Case $Stop
            MsgBox(0 , "" , "Stop2")
            EndSwitch
    EndSwitch
WEnd

Aw, cool I haven't ran it but looks like that answered my question you can Edited February 27, 2008 by JellyFish666

[wolf9228]

Aw, cool I haven't ran it but looks like that answered my question you can

#include <GUIConstants.au3>
$Test = GUICreate("test", 160 , 25)
$Go = GUICtrlCreateButton("Go", 0, 0, 80, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 80, 0, 80, 25, 0)
GUISetState(@SW_SHOW)
$i1 = 0
While 1
    $Msg = GUIGetMsg()
    $L = "LOOP1"
    $i1 = $i1 + 1
    ToolTip($L & @CRLF & $i1 , 0 , 0)
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Go
            $i2 = 0
            $i3 = 0
            Do
                $L = "LOOP2"
                $i2 = $i2 +1
                ToolTip($L & @CRLF & $i2 , 0 , 0)
                While NOT ($Msg = $Stop) AND $L = "LOOP2"
                $Msg = GUIGetMsg() 
                    $i3 = $i3 +1
                $L = "LOOP3"
                TrayTip($L , $i3 ,0)
                WEnd
            Until  $Msg = $Stop 
        Switch $Msg
        Case $Stop
            MsgBox(0 , "" , "Stop LOOP2 IN " & $i2 & @CRLF & "Stop LOOP3 IN " & $i3)
        EndSwitch           
        Case $Stop
        MsgBox(0 , "" , "Stop LOOP1 IN " & $i1)
    EndSwitch
WEnd

[JellyFish666]

#include <GUIConstants.au3>
$Test = GUICreate("test", 160 , 25)
$Go = GUICtrlCreateButton("Go", 0, 0, 80, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 80, 0, 80, 25, 0)
GUISetState(@SW_SHOW)
$i1 = 0
While 1
    $Msg = GUIGetMsg()
    $L = "LOOP1"
    $i1 = $i1 + 1
    ToolTip($L & @CRLF & $i1 , 0 , 0)
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Go
            $i2 = 0
            $i3 = 0
            Do
                $L = "LOOP2"
                $i2 = $i2 +1
                ToolTip($L & @CRLF & $i2 , 0 , 0)
                While NOT ($Msg = $Stop) AND $L = "LOOP2"
                $Msg = GUIGetMsg() 
                    $i3 = $i3 +1
                $L = "LOOP3"
                TrayTip($L , $i3 ,0)
                WEnd
            Until  $Msg = $Stop 
        Switch $Msg
        Case $Stop
            MsgBox(0 , "" , "Stop LOOP2 IN " & $i2 & @CRLF & "Stop LOOP3 IN " & $i3)
        EndSwitch           
        Case $Stop
        MsgBox(0 , "" , "Stop LOOP1 IN " & $i1)
    EndSwitch
WEnd

haha your awesome ill remember that I sort of feel bad for making you write the code hope it wasn't to much trouble I was just wondering if it was possible with Autoit but now I know it is thanks for sharing your great knowledge with me and hopefully others

[wolf9228]

haha your awesome ill remember that I sort of feel bad for making you write the code hope it wasn't to much trouble I was just wondering if it was possible with Autoit but now I know it is thanks for sharing your great knowledge with me and hopefully others

thanks dear and u r welcome any time ...

[emoyasha]

from what i know this could be dangoruous, not saying you would use it that way, but i however made a similar script to make an endless array and write hundeds of thousands of files on a cirtual pc, and when stop was pressed all files where ran and the array was doubled, so im saying i fyou are doing somethign like this, it wouldent be wise to release it anywhere, because if so, autoit fans would kill you for getting autoit flagged

[JellyFish666]

from what i know this could be dangoruous, not saying you would use it that way, but i however made a similar script to make an endless array and write hundeds of thousands of files on a cirtual pc, and when stop was pressed all files where ran and the array was doubled, so im saying i fyou are doing somethign like this, it wouldent be wise to release it anywhere, because if so, autoit fans would kill you for getting autoit flagged

I understand but as much as it is dangerous it is also useful but if people wanted to screw with people there are much easier ways but I am not going to name them but really I don't need that function right now but I was wondering if it was possible and now thanks to all of you one of my projects is completed.

You always have to ask yourself when your writing a computer language should I add it since it would be useful or should I just not put it in because it could be dangerous, but yes I understand were you are coming from and don't worry.

Edited February 27, 2008 by JellyFish666

[emoyasha]

lol, i know there are more efficient ways, i was just saying that i hope you where not thinking of doing so. because even though there are better ways, autoit can do the job, very quickly based on my tests