perhaps?:
Code: Select all
#MaxThreadsPerHotkey 2
F12::
Send,% (run:=["ab","b","b","b","b"]).RemoveAt(1)
If !Count
While, Count:=run.Count(){
Sleep, 1000
Send,% run.RemoveAt(1)
}
Return
Code: Select all
#MaxThreadsPerHotkey 2
F12::
Send,% (run:=["ab","b","b","b","b"]).RemoveAt(1)
If !Count
While, Count:=run.Count(){
Sleep, 1000
Send,% run.RemoveAt(1)
}
Return
Code: Select all
#MaxThreadsPerHotkey 2
F12::
run := ["ab", "b", "b", "b", "b"]
If !Count
While, Count:=run.Count() {
Send % run.RemoveAt(1)
Sleep, 1000
}
Return
Code: Select all
z::SetTimer, z Up,% (go:=!go)?20:"Off"
z Up::Send,% go?A_Space:
Code: Select all
String := "ABCD"
Len := StrLen(String)
q::
Loop,% Len**Len
{
n := A_Index-1
Loop,% Len
{
z := Mod(n, Len)
Out := SubStr(String, z+1, 1) Out
n := (n-z)//Len
}
SendInput,% Out "`n"
Out =
}
Code: Select all
String := "ABCD"
q::
Loop, Parse, String
{
Out1 := A_LoopField
Loop, Parse, String
{
Out2 := Out1 A_LoopField
Loop, Parse, String
{
Out3 := Out2 A_LoopField
Loop, Parse, String
{
Out4 := Out3 A_LoopField
SendInput,% Out4 "`n"
}
}
}
}
Code: Select all
$F8::
IF F8
Goto, SecondPart
FirstPart:
Send, {3}
Sleep, 250
SecondPart:
Send, {e up}
endtime := A_TickCount + 1500
While ((F8:=GetKeyState("F8","P")) && A_TickCount < endtime)
{
Send, {e down}
Sleep, 200
}
return
Code: Select all
~*x::X := True
#IF X
*x::Return
#IF
~*y::X := False
Code: Select all
q::
ClipBoard = 2+3
FileDelete, ~.ahk
FileAppend, ClipBoard := %ClipBoard%, ~.ahk, UTF-8
RunWait, ~.ahk
MsgBox,% ClipBoard ;5
Return