按键精灵如何让一个程序循环多次调用子程序然后继续循环?

 我来答
认真又清新丶赤子4775
推荐于2018-05-09 · TA获得超过298个赞
知道答主
回答量:455
采纳率:0%
帮助的人:288万
展开全部
你描述的不是很清楚
按我理解的意思给你个大概思路,你自己改下,要是不行就给我hi
-----------
//之前的代码你自己搞
BT = Plugin.Sys.GetTime() //获得当前系统时间
CT = Plugin.Sys.GetTime() //获得当前系统时间
While CT - BT < 180000 //如果时间差小于3分钟就循环运行
Call 子程序()//如果你的子程序很短下面再加一个“delay ”不然CPU运行会很高,延时多少你自己定
CT = Plugin.Sys.GetTime()
Wend//按键7用Endwhile
//这儿就是超过三分钟后你要执行的代码了
Sub 子程序()
//别忘了子程序的内容放这儿
End Sub
------------------
希望对你有帮助

Rem 开始
Hwnd = Plugin.Window.Foreground()
s = Window.GetClientRect(hwnd)
MyArray = Split(s, "|", -1, 1)
sx = MyArray(0)
sy = Myarray(1)
FindColor 801+sx,232+sy,1006+sx,593+sy,"A5F7BD",intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 200
RightClick 1
End If
BT = Plugin.Sys.GetTime()
CT = Plugin.Sys.GetTime()
While CT - BT < 180000
Call aa()
CT = Plugin.Sys.GetTime()
Wend
goto 开始

Sub aa()
KeyDown 105,25
MoveTo 220+sx,433+sy
LeftClick 1
MoveTo 216+sx,389+sy
LeftClick 1
End Sub
//建议你在子程序里面多一些delay不然电脑很卡的~
百度网友be89764
2011-06-30 · TA获得超过484个赞
知道小有建树答主
回答量:1221
采纳率:0%
帮助的人:713万
展开全部
rem A
for 10
call 调用子程序
next
goto A
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式