Replace Sleep() in a loop

[MyEarth 10]

Hello. I need to replace a Sleep() with something similar but without Sleep() all the While-WEnd but just the If-EndIf

An example:

HotKeySet("{ESC}", "ESC")
HotKeySet("{F1}", "Var")

Local $iVar1 = 0, $iVar2 = 0

While 1
    ; other things
    Sleep(10)
    If $iVar1 = $iVar2 Then
        Sleep(1000) ; replace this!
        ConsoleWrite("$iVar1 = $iVar2" & @CR)
    EndIf
WEnd

Func Var()
    $iVar2 = 1 ; stop the ConsoleWrite
EndFunc

Func ESC()
    Exit
EndFunc

As you can see i have a main Sleep of 10ms ( in the script is done by GUIGetMsg() ) and another Sleep if a condition found, i want to replace that. I have think to use TimerInt - TimerDiff but for what i have understand i need to put TimerInt OUTSIDE the loop. No i don't want to have two different loop.

Thanks for the help

[Jos 1,508]

Untested but should show an options:

ocal $iVar1 = 0, $iVar2 = 0, $itimer = 0

While 1
    ; other things
    Sleep(10)
    If $iVar1 = $iVar2 Then
        $itimer = TimerInit()
    EndIf
    If $itimer <> 0 and TimerDiff($itimer) >= 1000 Then
        ConsoleWrite("$iVar1 = $iVar2" & @CR)
        $itimer = 0
    EndIf
WEnd

Jos

[MyEarth 10]

Thanks Yoda-Jos but not work, i don't see any ConsoleWrite. Probably because the $itimer is reset every 10ms and never goes to 1000ms

[Jos 1,508]

Then simply ensure that it isn't reset in each loop by adding a test like:

If $iVar1 = $iVar2 and $iTimer = 0 Then

Jos