请教暂停脚本

chenxianpeng

TrayTip('程序启动成功','本程序按HOME开始,按END结束',0)
Sleep(100)

HotKeySet('{Home}','Start');定位热键启动
HotKeySet('{end}','Pause');定位热键停止
hotkeyset('{esc}','QUIT');退出程序

While 1
Sleep(200)
WEnd

Func Start()
$i = 0
While $i <= 99999999999999999
send('{2}')
$i = $i + 1
sleep(700)
TrayTip('热键正在运行中..',',0);启动热键
WEnd
EndFunc

Func Pause()
;暂停脚本不知道怎么写好了

EndFunc



func QUIT()
        traytip('程序正在退出请稍候','程序将在1秒钟后自动退出',0)
        Sleep(1000)
       
        Exit
EndFunc


上面的pause我不知道里面应该写什么才可以暂停上面的start循环了！请教一下！

chenxianpeng

别沉啦！！！

水木子

设置热键跳出循环！

要不就使用 AdlibRegister  做循环 再用AdlibUnRegister 退出，感觉这样比较方便。

chenxianpeng

不懂啊！！！！！

水木子

你这个问题很多人提过，多搜索吧！相信能找到你要的答案。

gapkiller

按照楼主的逻辑....下面这样就可以了..
Func Pause()
;暂停脚本不知道怎么写好了
while 1
    sleep(1000)
wend
EndFunc

不过这显然不是一样正常的逻辑....
建议楼主参考Hotkeyset的例子
$paused = Not $paused
....

netegg

do
until controlclick()

xz00311

帮助文档里面有

包谷面

学习学习