String := 12345678, Start := 1, Length := 5
loop
{
if ((NewString := SubStr(String, Start, Length)) = "")
break
Send % NewString "{Enter}"
Start+=Length
Sleep 2000
}
msgbox doneString = 12345678
Loop, Parse, String
{
if (A_Index >= 0 and A_Index <= 5)
d .= A_LoopField
if (A_Index >= 6 and A_Index <= 10)
e .= A_LoopField
if (A_Index >= 11 and A_Index <= 15)
w .= A_LoopField
if (A_Index >= 16 and A_Index <= 20)
u .= A_LoopField
}
SendInput, % d "{Enter}"
Sleep 2000
SendInput, % e "{Enter}"
Sleep 2000
SendInput, % w "{Enter}"
Sleep 2000
SendInput, % u "{Enter}"
Sleep 2000
String = zxcvbnmasdfgjqwert
Loop, Parse, String
{
if (A_Index >= 0 and A_Index <= 5)
d .= A_LoopField
if (A_Index >= 6 and A_Index <= 10)
e .= A_LoopField
if (A_Index >= 11 and A_Index <= 15)
w .= A_LoopField
if (A_Index >= 16 and A_Index <= 20)
u .= A_LoopField
}
n := d "`n" e "`n" w "`n" u
MsgBox % nТут он сможет посылать каждую строку с задержкой 2000.
]]>loop 5
{
Send % A_Index
Sleep 2000
}String = zxcvbnmasdfgjqweryuizxcvbnmasdfgjqweryuiasdfgdf
w := 1
Output := StrLen(String)
n := Output / 5
loop % n {
a := SubStr(String, w, 5)
w += 5
d .= a "{Enter}" "{sleep 3000}"
}
SendInput, % d
Или:
String := "zxcvbnmasdfgjqwerty", n := 5
SendInput % RegexReplace(String, ".{" n "}", "$0{Enter}{sleep 3000}")Тут он вставляет первую переменную, нажимает Enter, ждёт 3 секунды, а затем он вставляет в другие строчки следующие переменные, с Enter, но без Sleep 3000, как сделать, чтобы Sleep 3000 применялось к каждой строчке?
]]>String = zxcvbnmasdfgjqweryuizxcvbnmasdfgjqweryuiasdfgdf
w := 1
Output := StrLen(String)
n := Output / 5
loop % n + 1 {
a := SubStr(String, w, 5)
w += 5
d .= a "`n"
}
MsgBox % d