Creating Infinite Loop - Possible to end it by specific key press (Such as control+s)

[PopSmith]

Hello,

I have got my script to do just about everything I want it too except one (or maybe more if its coded wrong) thing.

Here is my script:

While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    
    Select
    ;;;;;;;;;;;;;;;;;;;;;;;
    ;;                ;;
    ;;     LinkY's    ;;
    ;;                ;;
    ;;;;;;;;;;;;;;;;;;;;;;;
        
    ;case for "AutoCM"
        
        Case $msg = $Click_For_Auto_CM
        Send("{LWIN}{UP 22}{ENTER}")
        Sleep(500)
        Send("{TAB 17}{DOWN 8}")
        
    EndSelect
WEnd

Here is what I want it to do:

While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()
    
    Select
    ;;;;;;;;;;;;;;;;;;;;;;;
    ;;                ;;
    ;;     LinkY's    ;;
    ;;                ;;
    ;;;;;;;;;;;;;;;;;;;;;;;
        
    ;case for "AutoCM"
        
        Case $msg = $Click_For_Auto_CM
        Send("{LWIN}{UP 22}{ENTER}")
        Sleep(500)
        Send("{TAB 17}{DOWN 8}")
             StatusbarGetText ( "Outlook Express - My Emails" [, 1] )
                ;Start Loop HERE
                  If Status Bar Text 1 is 0 messages(s), 0 unread
                  Then Sleep (300000) Check Status Bar Text again.
                  Else Send({TAB}{ENTER}{TAB}{ENTER})
                  Sleep(1500000)
                ;End Loop
    EndSelect
WEnd

[greenmachine]

Not exactly sure what you're doing, but I can answer the question in the title of the thread. What I would do is make a Hotkey, and inside that function set a variable to 1 that tells the loop to exitloop. Example:

HotKeySet ("^s", "NoMoreLooping")
Global $StopLoop = 0

While 1
   ; this is your loop
    Sleep (100)
    If $StopLoop = 1 Then
        $StopLoop = 0
        ExitLoop
    EndIf
WEnd

Func NoMoreLooping()
    $StopLoop = 1
EndFunc

[flaxcrack]

  greenmachine said:

Not exactly sure what you're doing, but I can answer the question in the title of the thread. What I would do is make a Hotkey, and inside that function set a variable to 1 that tells the loop to exitloop. Example:

HotKeySet ("^s", "NoMoreLooping")
Global $StopLoop = 0

While 1
  ; this is your loop
    Sleep (100)
    If $StopLoop = 1 Then
        $StopLoop = 0
        ExitLoop
    EndIf
WEnd

Func NoMoreLooping()
    $StopLoop = 1
EndFunc

So sayeth the Lord. Yep you are right muh friend. You hit the nail on the head when it comes to the topic! I award you 10 Experts Exchange Points!

[PopSmith]

OK, sorry I am not quite sure how to integrate the looping into my script.

Here is the basics of my script:

While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()

    Select
    ;;;;;;;;;;;;;;;;;;;;;;;
    ;;                ;;
    ;;     LinkY's    ;;
    ;;                ;;
    ;;;;;;;;;;;;;;;;;;;;;;;

    ;case for "AutoCM"

        Case $msg = $Click_For_Auto_CM
        Send("{LWIN}{UP 22}{ENTER}")
        Sleep(500)
        Send("{TAB 17}{DOWN 8}")
        Sleep(1000)
        $x = StatusbarGetText("Classical-Mail - Outlook Express")
        MsgBox(0, "Classical-Mail status bar says:", $x)

Basically I want it to check what the box says (example, 2 message(s), 2 unread) and if it says anything other then 0 message(s), 0 unread then it will continue looping the script until I press Control+S (which, as greenmachine pointed out, is done with a HotKeySet Function).

Thank you for any help you can provide

[SmOke_N]

If $Var <> 0 Then ContinueLoop? (this restarts the loop from the beginning)

[PopSmith]

EDIT: NVM, I figured it all out. Turns out I was missing a piece and had another in the wrong place!!

Edited February 14, 2006 by PopSmith