CountinueLoop

[Prompt]

Hello

I need your help people.

I have recorded the script with a help of ScriptWriter.

I need that script makes CountinueLoop till I stop it manually.

I have added the attachment

I will appreciate

Thanks in advance.

New1.au3

[IKilledBambi]

Try this.

expandcollapse popup

HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

While 1
    $paused
    WinWait("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    If Not WinActive("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá") Then WinActivate("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    WinWaitActive("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    MouseMove(721, 585)
    MouseDown("left")
    MouseUp("left")
    WinWait("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    If Not WinActive("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá") Then WinActivate("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    WinWaitActive("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    MouseMove(414, 98)
    MouseDown("left")
    MouseUp("left")
    WinWait("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    If Not WinActive("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá") Then WinActivate("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    WinWaitActive("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    MouseMove(287, 277)
    MouseDown("left")
    MouseUp("left")
    MouseMove(727, 592)
    MouseDown("left")
    MouseUp("left")
    WinWait("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    If Not WinActive("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá") Then WinActivate("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    WinWaitActive("Send virtual smile - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    MouseMove(414, 99)
    MouseDown("left")
    MouseUp("left")
    WinWait("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    If Not WinActive("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá") Then WinActivate("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    WinWaitActive("Windows Live Hotmail - Windows Internet Explorer", "Êîìàíäíàÿ ñòðîêà èçá")
    MouseMove(283, 273)
    MouseDown("left")
    MouseUp("left")
WEnd

Func TogglePause()
    $paused = Not $paused
    While $paused
        Sleep(100)
    WEnd
EndFunc  ;==>TogglePause

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

[dbzfanatic]

Look at HotkeySet(), Do ... Until and/or While ... WEnd in the helpfile. Also welcome to the forums. The helpfile is a great place for information as there are 2k+ examples/functions.

[Prompt]

It works! I just had to correct the coordinates of MouseMove.

Thanks a lot!