PaulT Posted May 19, 2009 Share Posted May 19, 2009 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 ] Link to comment Share on other sites More sharing options...
PaulT Posted May 19, 2009 Author Share Posted May 19, 2009 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. Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now