Sign in to follow this  
Followers 0
PaulT

Recursive operation with an Escape

2 posts in this topic

I would like to use a working script, but for the life of me, cannot grasp the Loop calls. I would like this script to run Indefinitely but with the ability to exit rapidly if the need arises. Could someone offer a solution?

[ code ]WinWait("LexaPro","")

If Not WinActive("LexaPro","") Then WinActivate("LexaPro","")

WinWaitActive("LexaPro","")

Opt("WinWaitDelay",100)

Opt("WinTitleMatchMode",4)

Opt("WinDetectHiddenText",1)

Opt("MouseCoordMode",0)

WinWait("LexaPro","")

If Not WinActive("LexaPro","") Then WinActivate("LexaPro","")

WinWaitActive("LexaPro","")

Send("{F1}")

Sleep (1000)

MouseMove(525,561)

MouseDown("left")

MouseUp("left")

Sleep (1000)

MouseMove(214,257)

MouseDown("left")

MouseUp("left")

MouseDown("left")

MouseUp("left")

Sleep (500)

MouseDown("left")

MouseUp("left")

MouseDown("left")

MouseUp("left")

Sleep (1000)

MouseMove(261,256)

MouseDown("left")

MouseUp("left")

MouseDown("left")

MouseUp("left")

Sleep (1000)

MouseDown("left")

MouseUp("left")

MouseDown("left")

MouseUp("left")

MouseDown("left")

MouseUp("left")

Sleep (1000)

Send("{F6}")

[ /code ]

Share this post


Link to post
Share on other sites



Never mind, I was able to figure it out

While 1 = 1 at beginning and Wend at end of chain

As for an exit Strategy:

Found this: HotKeySet("^!x", "MyExit")

With this as an end Statement:

Func MyExit()

Exit

EndFunc

Works perfectly.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0