How do I pause all other functions?

[plankton]

Hi, I'm new into this, I have been learning for 2 days but I couldn't figure out how to stop other functions while "Func Pause ()" is activated, I want the program to rest for 15 minutes after pressing ESC and mouseclick then after that will continue all functions in the program again without closing the program. Is this possible? Thank you.

expandcollapse popup

HotKeySet("{END}", "End")
HotKeySet("{HOME}", "Start")

While 1
    Sleep(100)
WEnd

Func Start()
    While 1
        Pause()
        CHECK()
        PLAY()
    WEnd
EndFunc   ;==>Start


Func Pause()
    PixelSearch(712, 137, 906, 244, 0xA60000)
    If @error Then
        Send("{ESC}")
        Sleep(1000)
        Send("^" & MouseClick("left", 504, 409, 1, 1) & "")

        Sleep(900000)
    EndIf
EndFunc   ;==>Pause

Func CHECK()
    PixelSearch(115, 213, 116, 641, 0xF00000)
    If Not @error Then
        Run("C:\Program Files (x86)\The KMPlayer\KMPlayer.exe")
    EndIf
EndFunc   ;==>CHECK

Func PLAY()
    If (PixelGetColor(290, 115) == 0x000000) Then
        Send("{F1}")

        Sleep(1000)

        Send("{F2}")
    EndIf
EndFunc   ;==>PLAY



Func End()
    Exit 0
EndFunc   ;==>End

 

Edited July 1, 2019 by Jos
Tidied code and added codebox

[Jos]

5 hours ago, plankton said:

pressing ESC and mouseclick then after that will continue all functions in the program again without closing the program. Is this possible?

Yes, just do not use the sleep() like you do now, but rather set an indicator variable for pause and test on that in the main loop. This will allow you to keep on doing other things.

Jos