按键精灵怎么让它开始2个子程序独立运行

怎么让它开始2个子程序独立运行喝药在上面可以运行可魔法盾不运行Call喝药()Call魔法盾()Sub喝药()IfColor202,99,"22EE",1ThenKeyP... 怎么让它开始2个子程序独立运行
喝药在上面可以 运行 可 魔法盾 不运行
Call 喝药()
Call 魔法盾()

Sub 喝药()
IfColor 202,99,"22EE",1 Then
KeyPress "1", 1
Else
End If
IfColor 178,115,"887711",1 Then
KeyPress "2", 1
Else
End If
Delay 200
Call 喝药()
End Sub
Sub 魔法盾()
KeyPress "F4", 1
Delay 100
RightClick 1
Delay 100
KeyPress "F1", 1
Delay 150000
Call 魔法盾()
End Sub
展开
 我来答
dlbabo
2011-05-09 · TA获得超过5676个赞
知道大有可为答主
回答量:2016
采纳率:57%
帮助的人:1539万
展开全部
按键是按命令一句一句执行的.
你在 Sub 喝药() 中调用 喝药() 相当于让这个子程序无限循环.
所以在
Call 喝药()
Call 魔法盾()
中就不可能执行到Call 魔法盾()这句.

把:开头两句:
Call 喝药()
Call 魔法盾()
换成:
ID1 = BeginThread(喝药)
ID2 = BeginThread(魔法盾)
试试 好用的话别忘了给个好评
chenpinzhong1
2011-05-09 · 超过24用户采纳过TA的回答
知道答主
回答量:114
采纳率:0%
帮助的人:51.5万
展开全部
CPU 做事情的时候 也是分开做的,多线程技术。你试试多线程就OK了 ,按键精灵里有 多线程的支持库,代码加在里面就OK了
下面的是代码,自己理解吧。我不再多说。

MessageBox "多线程命令还在测试当中,并不稳定,请谨慎使用!不推荐新手使用。"
线程ID=BeginThread(测试)
Delay 3000
//<>-----------------------------------------启动“测试”线程的运行,并返回线程ID编号

MsgBox "线程暂停运行!3秒", 64, "演示:"
PauseThread 线程ID
Delay 3000
//<>-----------------------------------------等待3秒后暂停“测试”线程的运行

MsgBox "线程继续运行!3秒", 64, "演示:"
ContinueThread 线程ID
Delay 3000
//<>-----------------------------------------等待3秒后继续“测试”线程的运行

MsgBox "线程停止运行!", 64, "演示:"
StopThread 线程ID
//<>-----------------------------------------3秒后停止“测试”线程的运行

ExitScript
//<>-----------------------------------------停止并退出脚本运行
Sub 测试()
i=0
Do
Call Plugin.Msg.ShowScrTXT(0, 0, 600, 100, "线程1屏幕内容填写" & i, "0000FF")
TracePrint "屏幕内容填写" & i
Call Plugin.Msg.Tips("我是气泡!线程1屏幕内容填写" & i)
Delay 1000
i=i+1
Loop
End Sub
追问
看不知道怎么懂   能帮我弄上去吗
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
魔怔l1
2011-05-09 · TA获得超过492个赞
知道小有建树答主
回答量:2856
采纳率:65%
帮助的人:919万
展开全部
rem aa
Call 喝药()
Call 魔法盾()
goto aa
追问
加标记也没用  开始我不要它循环   2个子程序启动了就可以了  我要他独立都启动
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式