2 Whiles and 2 Sleeps

[Who]

While (1) 
Sleep (5000)
; Do something 1
WEnd

While (2) 
Sleep (10000)
; Do something 2
WEnd

I want to do 2 actions like this. Action 1 is to wait for 5 secs and action 2 is to wait for 10 secs before performing action. I tried my code but the program only did the action 1 ? Can anyone tell me what the problem is please ? Thanks

[narayanjr]

Sleep (5000)
; Do something 1

Sleep (10000)
; Do something 2

[Who]

Thanks but I put my 2 "While" statements in order to loop the actions. Can you give me another suggestion please ?

[enaiman]

Of course it did only Action1 because

While (1)

Sleep (5000)

; Do something 1

WEnd

is an endless loop.

Let me get this right ... so you want A1 to be performed every 5 sec and A2 every 10 sec ... but it will come to the following situation: A1 to be executed at the same time with A2 ... and that is not possible. It is possible if you accept a delay between their executions.

What you will have to do is to use a counter.

For your ... erm ... vague and particular case (5 sec and 10 sec) this will do the trick:

$count = 0
While 1
    Sleep(5000)
    $count +=1
    $time = $count*5
    If Mod ($count, 2) = 1 Then
        MsgBox(0, "time: "&$time&" sec", "Action 1", 2)
    Else
        MsgBox(0, "time: "&$time&" sec", "Action 1 and Action2", 2)
    EndIf
WEnd

[Who]

Thank you very much for your answer and it works very well . But if I want to set the sleep time for action 1 is 3600000 ( 3600s or 60 mins ) and for action 2 is 900000 ( 900s or 15 mins ), is it available to use this script again ?

[PsaltyDS]

Thank you very much for your answer and it works very well . But if I want to set the sleep time for action 1 is 3600000 ( 3600s or 60 mins ) and for action 2 is 900000 ( 900s or 15 mins ), is it available to use this script again ?

Just put you time checks all in the same loop. You can add as many timers to this loop as you need:

$Time_1 = TimerInit()
$Time_2 = TimerInit()

While 1
    If TimerDiff($Time_1) > 3600000 Then
        ; Action One Goes Here
        $Time_1 = TimerInit()
    EndIf
    
    If TimerDiff($Time_2) > 900000 Then
        ; Action Two Goes Here
        $Time_2 = TimerInit()
    EndIf
    
    Sleep(20)
WEnd

This method can break down if the actions performed take so long that they interfere with checking the other timers. Then you have to get more complicated, using AdLibEnable() to interrupt what's going on and check for other actions.

[enaiman]

The solution PsaltyDS gave you works better in this case considering the large amount of time you need to wait for an action (I imagine your script is doing something else meanwhile).

[Who]

Just put you time checks all in the same loop. You can add as many timers to this loop as you need:

$Time_1 = TimerInit()
$Time_2 = TimerInit()

While 1
    If TimerDiff($Time_1) > 3600000 Then
        ; Action One Goes Here
        $Time_1 = TimerInit()
    EndIf
    
    If TimerDiff($Time_2) > 900000 Then
        ; Action Two Goes Here
        $Time_2 = TimerInit()
    EndIf
    
    Sleep(20)
WEnd

This method can break down if the actions performed take so long that they interfere with checking the other timers. Then you have to get more complicated, using AdLibEnable() to interrupt what's going on and check for other actions.

The solution PsaltyDS gave you works better in this case considering the large amount of time you need to wait for an action (I imagine your script is doing something else meanwhile).

I have tried out and the solution of PsaltyDS and it works very well. Thank you for all your helps