Consider the following
Code: Select all
#UseHook On
x::
KeyWait x
n := TRUE
While (n)
{
Send {a down}
Sleep 10000
Send {a up}
Send {right down}
sleep 2000
Send {right up}
}
Return
3:: n := FALSE
Code: Select all
#UseHook On
x::
KeyWait x
n := TRUE
While (n)
{
Send {a down}
Sleep 10000
Send {a up}
Send {right down}
sleep 2000
Send {right up}
}
Return
3:: n := FALSE
Code: Select all
OnExit("done")
#MaxThreadsPerHotkey 2
F3::
on := !on
SoundBeep, 1000 + 500 * on
While on {
Send {a down}
Loop, 20
Sleep, 500 * on
Send % "{a up}" (on ? "{Left down}" : "")
Loop, 2
Sleep, 500 * on
Send {Left up}
}
Return
done(exitReason, exitCode) {
Send {a up}{Left up}
SoundBeep, 1900
}
Code: Select all
#UseHook On
x::
KeyWait x
n := TRUE
While (n)
{
Send a
Sleep 50
}
Return
3:: n := FALSE