Question

按键精灵，每隔2小时，执行一段非循环语句，这期间执行另一段循环语句，求高手帮助~

循环语句已经做成了，就差（每隔2小时，执行一段非循环语句）！ 举个例子：2小时到了，执行一段非循环语句后，剩下时间再执行循环语句，在过2小时后，停止循环语句，执行完非循环语句后，然后再执行那个循环语句。。。。一直这样下去。。分不多了 采纳答案一定给好评 谢谢~~~

Answer 1

DimEnv Hwnd
Hwnd = Plugin.Window.MousePoint()
a=BeginThread(work)
b=BeginThread(tim1)
Sub work
While 1
//以下加入循环语句

//以上加入循环语句
Wend
End sub
Sub tim1
time1 = now
Rem t1
if datediff("s",time1,now)>=7200 then
PauseThread a
//以下加入非循环语句

//以上加入非循环语句
time1 = now
Delay 200
ContinueThread a

Goto t1
Else
Delay 500
Goto t1
End If
End Sub

追问

测试下 貌似非循环语句执行时，循环语句没有停止。我设置每隔30秒运行下非循环语句（每隔4秒，一次输出y e a r四个字母），其他时间 运行循环语句（每隔1秒输出一个z）结果 如图

是不是 我那个地方出问题了呀？谢谢了

追答

哦，是这样的。。。
把开头第一句改成以下
DimEnv Hwnd,a

Answer 2

最新的版本可以搜脚本，搜一下看看有没有现成的。
你这个就是{执行循环语句2h再执行一次独立语句}，然后这个结构无限循环，这样来优化脚本结构，你叙述的太麻烦了。

追问

怎么控制 循环语句的循环时间呢？

Answer 3

有帮助