Sleep with hotkey

[Xav]

how it can sleep 6 sec after each sendet(1)

PS:: ONLY IF HE PRESS 1! If it dont continu to check more

Like he press 1 and stop for 6 sec?

Thanks for any help!

Never mind i just found xDDDDDDDDDDDDD

If @error Then

Send("1")

sleep(6000)

EndIf

; HotKey
HotKeySet ("{PAUSE}","Poting")
HotKeySet ("{ESC}","ExitP")

; Code

While 1
    Sleep (1)
    WEnd

Func Poting()
    While 1
$Color = PixelGetColor(76, 558)
$Coord = PixelSearch( 40, 547, 110, 565, 0x5C0000 )

If @error Then
    Send("1")
    
EndIf
    WEnd
EndFunc

Func ExitP()
Exit
EndFunc

Edited January 20, 2008 by Xav

[FreeFry]

One alternative to using Sleep() is using Timers(TimerInit() and TimerDiff()), but in your case using just Sleep() will probably work just as well.

Edited January 20, 2008 by FreeFry