Rem i
do
key = WaitKey()
If key = 99 Then
StopThread 线程c
StopThread 线程b
线程a=BeginThread(a)
ElseIf key=98 Then
StopThread 线程a
StopThread 线程c
线程b=BeginThread(b)
ElseIf key=97 then
StopThread 线程a
StopThread 线程b
线程c=BeginThread(c)
End If
Delay 100
loop
Sub a
// Goto i//这个就不知所谓了
End Sub
Sub b
For 100
KeyPress "F", 1
Next
End Sub
Sub c
For 100
LeftClick 1
Next
End Sub