Dimenv i '设置一个环境变量
i = 0 '初始化变量值为0
mThread = BeginThread(monitor) '开启多线程监控按键
Do
If i = 200 Then
KeyPress "a", 1
KeyPress "b", 1
End If
Delay 100
Loop
Sub monitor()
Do
key = WaitKey
If key = "65" Then '如果按A键
If i = 0 Then '当按下"A"键后，赋值i为200 ，这样主程序的循环就会开始执行(此情况只有启动脚本后第一次按下"A"键的时候才会出现)
i = 200
Call Plugin.Msg.Tips("循环开始，直到你再次按下“A”键")
ElseIf i = 200 Then'按下"A"键后，改变i的值，则主程序的循环停止
i = 201
ElseIf i = 201 Then'按下"A"键后，赋值i为200 ，这样主程序的循环就会开始执行
i = 200
End If
End If
Loop
End Sub