Jump to content

help with loop


Recommended Posts

ok, i'm wondering how how i can make an auto-it script loop, but... i want it to stop once i press D..

ok so i looked in the help file, and either i passed it up or it isnt in there, but i know this is possible cuz i have seen scripts that do such things....

ok so say i want a script something like this..... just as an example, say i want something like this to loop throu

Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)

someone told me it'd go something like this

$i = D
Do
Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)
Until Keypress = $i

but im about 99% sure that isnt even close.... can sum1 help me out here?

Link to comment
Share on other sites

ok, i'm wondering how how i can make an auto-it script loop, but... i want it to stop once i press D..

ok so i looked in the help file, and either i passed it up or it isnt in there, but i know this is possible cuz i have seen scripts that do such things....

ok so say i want a script something like this..... just as an example, say i want something like this to loop throu

Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)

someone told me it'd go something like this

$i = D
Do
Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)
Until Keypress = $i

but im about 99% sure that isnt even close.... can sum1 help me out here?

How about

HotKeySet("d", "Terminate")

While 1
    Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)
WEnd

Func Terminate()
    Exit 0
EndFunc


Time you enjoyed wasting is not wasted time ......T.S. Elliot
Suspense is worse than disappointment................Robert Burns
God help the man who won't help himself, because no-one else will...........My Grandmother

Link to comment
Share on other sites

ok, i'm wondering how how i can make an auto-it script loop, but... i want it to stop once i press D..

ok so i looked in the help file, and either i passed it up or it isnt in there, but i know this is possible cuz i have seen scripts that do such things....

ok so say i want a script something like this..... just as an example, say i want something like this to loop throu

Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)

someone told me it'd go something like this

$i = D
Do
Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)
Until Keypress = $i

but im about 99% sure that isnt even close.... can sum1 help me out here?

Hi,

i modified the example out of the helpfile a bit ;)

HotKeySet ( "d" , "_exitScript")

While 1
  Send("{ALT}")
  Send("{RCTRL}")
  Sleep(1000)
WEnd

Func _exitScript()
    exit 0
Endfunc

eh, BigDod was faster than me :P

Edited by jonk
Link to comment
Share on other sites

thanks guys, but now i got another question.... tell me if this would work lol cuz i aint too sure.....

i wanna know if this would work to use F to pause the script, and un-pause it all in the same.... like say i press F to pause it so i can do something else, press F to start it again, then whenever i'm done D to terminate, would this script work properly for that?

HotKeySet("d", "Terminate")
HotKeySet("f", "Pause")

While 1
    Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)
WEnd

Func Terminate()
    Exit 0
EndFunc

Func Pause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
    WEnd
EndFunc
Link to comment
Share on other sites

ok that didnt work, it gave me an error witch terminated the script.... now i tried this one, and it STILL doesnt work, no error.... but it dont pause (someone told me to do these lol)

HotKeySet("d", "Terminate")

While 1
    Send("{ALT}")
Send("{RCTRL}")
Sleep(1000)
WEnd

Func Terminate()
    Exit 0
EndFunc

HotKeySet("f", "Pause")

While 1
    Sleep(9000)
WEnd

Func Pause()
    $Paused = NOT $Paused
    While $Paused
    Sleep(9000)
    WEnd
EndFunc
Link to comment
Share on other sites

(someone told me to do these lol)

You should listen to the other voices in your head...
HotKeySet("d", "Terminate")
    HotKeySet("f", "Pause")
    dim $Paused = 0
    
    While 1
        TrayTip("State", "Running", 10)
        Send("{ALT}")
        Send("{RCTRL}")
        Sleep(1000)
    WEnd
    
    Func Terminate()
        Exit 0
    EndFunc
    
    Func Pause()
        $Paused = NOT $Paused
        HotKeySet("f", "UnPause")
        TrayTip("State", "Paused", 10)
        While $Paused
            sleep(100)
        WEnd
    EndFunc
    
    Func UnPause()
        $Paused = NOT $Paused
        HotKeySet("f", "Pause")
    EndFunc

Edit: Removed useless comment indicators.

Edited by Skruge

[font="Tahoma"]"Tougher than the toughies and smarter than the smarties"[/font]

Link to comment
Share on other sites

thanks worked fine.... after i deleted those ;~ things, lol those were kinda useless... :| lmao

Yeah, for testing, I commented out those Send(...) things. They were kinda useless. ;)

[font="Tahoma"]"Tougher than the toughies and smarter than the smarties"[/font]

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...