Question

按键精灵怎么同时执行多个判断语句?我要这些语句一起执行。并循环。求高手教

IfColor 1168,331,"954C03",0 Then
KeyPress "O", 1
End If
IfColor 625,119,"954C03",0 Then
KeyPress "K", 1

End If

IfColor 130,190,"954C03",0 Then
KeyPress "A", 1
End If
IfColor 133,257,"954C03",0 Then
KeyPress "Z", 1

End If

Answer 1

DimEnv 线程ID1, 线程ID2,线程ID3,线程ID4
线程ID1 = BeginThread(z1)
线程ID2 = BeginThread(z2)
线程ID3 = BeginThread(z3)
线程ID4 = BeginThread(z4)
Sub z1()
IfColor 1168,331,"954C03",0 Then
KeyPress "O", 1
End If
End Sub
Sub z2()
IfColor 625,119,"954C03",0 Then
KeyPress "K", 1
End If
End Sub
Sub z3()
IfColor 130,190,"954C03",0 Then
KeyPress "A", 1
End If
End Sub
Sub z4()
IfColor 133,257,"954C03",0 Then
KeyPress "Z", 1
End If
End Sub
试试这个

追问

不行。而且屏幕一直闪烁.

追答

DimEnv 线程ID1, 线程ID2,线程ID3,线程ID4
线程ID1 = BeginThread(z1)
线程ID2 = BeginThread(z2)
线程ID3 = BeginThread(z3)
线程ID4 = BeginThread(z4)
Sub z1()
While 1=1
IfColor 1168,331,"954C03",0 Then
KeyPress "O", 1
End If
Wend
End Sub
Sub z2()
While 1=1
IfColor 625,119,"954C03",0 Then
KeyPress "K", 1
End If
Wend
End Sub
Sub z3()
While 1=1
IfColor 130,190,"954C03",0 Then
KeyPress "A", 1
End If
Wend
End Sub
Sub z4()
While 1=1
IfColor 133,257,"954C03",0 Then
KeyPress "Z", 1
End If
Wend
End Sub
你要的是循环脚本