怎么设置暂停AB线程的共享变量， _ 按键精灵手机版 - 按键精灵论坛
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.3.0软件大小：62.5M更新时间：5-24
软件版本：1.3.3软件大小：29.2M更新时间：06-14
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 1230|回复: 6
按键精灵开发者4级可通过提升认证等级来升级勋章：rz.anjian.com
怎么设置暂停，AB线程的共享变量，达到可以A线程控制B线程，AB都是同时干着不同的事情(47.75 K) 0:20:59(51.79 K) 0:20:59Dim
h,lh=Thread.Start(程序B)l=Thread.Start(程序A)Do
delay 2000LoopSub 程序A()&&&& TracePrint&程序A&&&&& TracePrint&程序A&&&&& Thread.Wait h&&&& TracePrint&程序A&&&&& TracePrint&程序A&&&&& Thread.Start hEnd SubSub 程序B()
Delay 1000
TracePrint &我爱按键精灵&
TracePrint &我爱按键精灵&
TracePrint &我爱按键精灵&
TracePrint &我爱按键精灵&
TracePrint &我爱按键精灵&
TracePrint &我爱按键精灵&
HACKHY110 最后编辑于
单身汪勋章单身贵族的专属勋章月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com爱心大使积极帮助新手（可向管理员进行申请）
可用 SetShareVar 设置共享变量 和 GetShareVar 获取共享变量 来实现多线程变量互通
按键精灵开发者4级可通过提升认证等级来升级勋章：rz.anjian.com
回复 这个我知道。具体怎么实施、问题
小红帽对论坛提出良好建议（可向管理员申请）
我也遇到了 快来啊
为什么认证只有PC题
论坛搜&线程&
闽网文 (-037号
注意: 以下为数据查询分析工具，正式站点使用请使用官方发布版本或自行Release编译。按键精灵运行长时间后假死，只能停止进程重启才恢复 _ 按键精灵手机版 - 按键精灵论坛
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.3.0软件大小：62.5M更新时间：5-24
软件版本：1.3.3软件大小：29.2M更新时间：06-14
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 4202|回复: 6
按键精灵脚本运行长时间后假死，看着按键精灵还是红色的还是运行状态，但是脚本停止执行，手动无法停止，只可以强制停止进程重启按键精灵才正常，我脚本的写法是开两条线程，但子线程运行的时候我会先让子线程运行完才继续主线程，占用内存应该不会很多吧，为什么长时间就会假死，请问有好的办法可以解决吗？跪求大神解决，可有偿！
求帮助啊 大神们 有偿啊！！
单身汪勋章单身贵族的专属勋章月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。按键精灵开发者6级可通过提升认证等级来升级勋章：rz.anjian.com爱心大使积极帮助新手（可向管理员进行申请）
你使用的是 Thread.Wait 等待线程 命令来等待子程序运行结束嘛，大概是运行多久后出现假死的情况？你的运行环境是模拟器还是手机，可否加qq提供源码给我方便的时候测试下？
过大年勋章俩小福娃给大家拜年啦！双十一绝版纪念勋章双十一绝版纪念勋章单身汪勋章单身贵族的专属勋章按键精灵开发者6级（新浪V认证）通过新浪微博加V后自动发放，并替换普通的认证6级勋章。 微博达人（90天）完成新浪微博加V的奖励，结合活动不定期开放申请。幸运草勋章（永久）商业小精灵限时活动勋章。官方脚本作者工会官方脚本作者工会专属勋章 鹰眼勋章鹰眼注册用户专属勋章黄瓜勋章（永久）体验商业小精灵活动的奖励按键卫士（90天）参与“打击山寨，维护按键”活动图灵勋章参与按键精灵验证码识别大赛奖励按键图书勋章尊贵的按键图书用户小红帽对论坛提出良好建议（可向管理员申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章
我感觉 脚本逻辑混乱 的可能性更大一点.
脚本自查 一下, 加大延迟, 并确保 任何一个循环内的任何一次循环都能至少执行到一个延迟
还有就是 杜绝使用 Goto
回复 是的 用的
Thread.Wait
按键精灵假死但是没感觉手机变卡 ，不过刚刚测试了会，发现清除内存的函数没生效，我换了下位置，生效了，现在还在测试中，4个小时了没问题，我看情况，还出现就只能让你帮我了，运行环境是手机的
回复 好的，我已经加大延迟了，没用过GOTO，我是用主线程控制子线程的，子线程的暂停开启还有防卡屏都是主线程控制跟检测的，子线程在运行的时候我写了个wait，等子线程运行完，主线程再检查运行状态，我是利用共享变量来反映运行状态的,刚刚还加了一个内存的释放，现在还在正常运行中，不知道解决没！
回复 问题还是没能解决 我已经加你QQ了 能指定一下吗？会不会是频繁启动停止线程有关啊？
&加了，有可能的&
闽网文 (-037号
注意: 以下为数据查询分析工具，正式站点使用请使用官方发布版本或自行Release编译。按键精灵不用多线程有没有办法让一段命令暂停2分钟，但又不耽误主线程继续运行？_百度知道
按键精灵不用多线程有没有办法让一段命令暂停2分钟，但又不耽误主线程继续运行？
sub变量Ifb&=5andn&=2andq&=5andc&=5Thenxuan=1Traceprint：我是猪elseIfb&=5andn&=5andq&=2andc&=2Thenxuan=2Traceprint：我是牛elseIfb&=5andn&=5andq&=2andc&=0Thenxuan=3Tracepri...
sub 变量 If b &= 5 and n &= 2 and q &= 5 and c &= 5 Then
xuan = 1Traceprint ：我是猪 elseIf b &= 5 and n &= 5 and q &= 2 and c &= 2 Then xuan=2Traceprint ：我是牛 elseIf b &= 5 and n &= 5 and q &= 2 and c &= 0 Then xuan=3Traceprint ：我是羊 elseIf b &= 5 and n &= 0 and q &= 5 and c &= 0 Then xuan=4Traceprint ：我是狼 ElseIf b &= 5 and n &= 0 and q &= 3 and c &= 0 Then xuan = 5Traceprint ：我是猫 Else
xuan=0end sub比如这样一段代码，刚开始是要全部判断一遍，得到xuan的变量，比如得到xuan=1，调试窗口弹出我是猪那在接下来的运行中就不要在判断这一段代码：If b &= 5 and n &= 2 and q &= 5 and c &= 5 Then
xuan = 1Traceprint ：我是猪直接跳到：elseIf b &= 5 and n &= 5 and q &= 2 and c &= 2 Then xuan=2Traceprint ：我是牛开始判断，或者让这条代码单独延时5分钟，在接下来五分钟都不再判断！
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
huangchao209
huangchao209
采纳数：18
获赞数：38
用datediff&函数例doif&datediff(&s&,时间,now)&120&thencall&&变量时间=nowend&ifcall&主程序Loop
我这样说吧，比如打怪的时候我控制五个宠物同时打怪，sub变量就是五个宠物攻击怪物时，判断怪物是否死亡，当怪物死亡也就是XUAN变量在1至5其中一个的话，我要让宠物停止攻击，并且等待五分钟，但还其他四条命令将继续判断怪物是否死亡！
一样的，也是可以用 DATEDIFF 函数来做，当你要停止的时候用 一个时间 变量来保存当前时间然后用 datediff 函数来判断是否 满足5分钟，是则开启，不是则做别的事情
为你推荐：
其他类似问题
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。按键精灵多线程命令循环一定时间后终止_百度知道
按键精灵多线程命令循环一定时间后终止
谁能告诉我源码，我想让脚本多线程启动后循环一定时间然后全部停止，怎么做。好用给100财富。...
谁能告诉我源码，我想让脚本多线程启动后循环一定时间然后全部停止，怎么做。好用给100财富。
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
采纳数：2726
获赞数：5657
线程ID1=BeginThread(a)线程ID2=BeginThread(b)Dim nn=nowRem q//脚本15秒后停止
Delay 1000
If DateDiff(&s&,n,now)&= 15 thenStopThread 线程ID1
StopThread 线程ID2ElseGoto q
End IfSub a
Delay 1000
Goto qEnd SubSub b
Delay 1000
Goto qEnd SubSub OnScriptExit() MessageBox &脚本已经停止！&End Sub
你的脚本好用，但是不是我需要用的。
启动两个线程，第一个线程 w a s d，第二个线程 上 下 左 右 ，执行一段时间后停止该怎么写？
子程序a 可理解第一线程子程序b 第二线程你根据实际应用修改这两个子程序目前按键精灵多线程BUG太多，需要时间测试和修改，但愿你明白语句意思
为你推荐：
其他类似问题
您可能关注的内容
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。你的位置：
同时运行多个线程时，如何让其他的线程暂停，只运行某一个线程？
20:08:58 |
来源: 按键精灵资源站
本帖最后由 o47o10 于
20:14 编辑
DimEnv j,Hwnd
Dim i,HwndEx
HwndEx = Plugin.Window.Search(&记事本&)
HwndEx= Split(HwndEx,&|&)
For UBound(HwndEx)
Hwnd=HwndEx(i)
BeginThread 线程
If j&i Then
//这里的判断是逐个开始每个线程，也就是每个窗口的操作，从最前台到最后台
//比如我开了3个记事本窗口，依次是窗口 HwndEx(0)..HwndEx(1)..HwndEx(2)
Sub 线程()
HD = Plugin.Window.FindEx(HD, 0, &Edit&, 0)
For 999999 //无限循环打怪回城
Call Plugin.Bkgnd.SendString(HD,&我&&7 && &)
//这里我换上打怪脚本
很多游戏屏蔽了后台鼠标，当返回挂机点、回城买卖的时候，需要窗口前置，前台鼠标操作，
这个时候就要暂停其他线程，或者暂时取消其他线程的窗口前置操作！！
请问，如何可以做到这点呢？会的给个思路啦~~{:4_99:}}