【按键精灵】一个命令找多图，找到相应图片，执行相应的子程序。_按键精灵吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
【按键精灵】一个命令找多图，找到相应图片，执行相应的子程序。收藏
我想用找图功能 在5张图找 找到一张 执行一个命令。5张 执行5个不同的命令 然后一直循环。大神快来
09:52 ………………………………1楼. 在某个游戏中循环找图，当出现1图片时调用1子程序，出现2图片调用2子程序，出现3图片调用3子程序，以此类推50个，怎么写这段代码。 回复
一起解答了。参考下。//5个图片分别命名为：图0--图4，添加到附件中。Dim QQ,iQQ = Array(&图0&, &图1&, &图2&, &图3&, &图4&)Sub 子程序0()Delay 60//这里加入，找到图1后的代码。End SubSub 子程序1()Delay 60//这里加入，找到图2后的代码。End SubSub 子程序2()Delay 60//这里加入，找到图3后的代码。End SubSub 子程序3()Delay 60//这里加入，找到图4后的代码。End SubSub 子程序4()Delay 60//这里加入，找到图5后的代码。End SubSub 子程序判断()If i = 0 Then Call 子程序0()ElseIf i = 1 ThenCall 子程序1()ElseIf i = 2 ThenCall 子程序2()ElseIf i = 3 ThenCall 子程序3()ElseIf i = 4 ThenCall 子程序4()End IfEnd SubDo //开始找图。i = 0Do FindPic 0,0,,&Attachment:\&&QQ(i)&&.bmp&,0.8,intX,intY If intX & 0 And intY & 0 Then
TracePrint &找到图& & i & &。& Delay 60 Call 子程序判断() Else
TracePrint &没有找到图&&i&&。& End If i = i + 1 Loop Until i = 5Delay 100TracePrint &进入下一轮找图。&Loop //回到开始找图。
。老大，给个精品。
求大神一个脚本的格式。功能是，一直点击手机屏幕的一个固定点，200毫秒一次。当物品出现时（我利用抓图找色，暂时定为图1）马上停止点击屏幕。物品消失继续以200毫秒的速度继续点击屏幕。一直循环。
有喜欢的人也挺好 至少做什么都会惦记着他 不会那么孤单了
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或如何用一个脚本同时运行两个命令 _ 综合讨论 - 按键精灵论坛
腾讯微博：
软件版本：2014.03软件大小：71.2M更新时间：10-25
软件版本：3.1.7软件大小：52.1M更新时间：11-30
软件版本：1.2.4软件大小：29.2M更新时间：10-28
软件版本：1.0.2软件大小：11.1M更新时间：10-28
查看: 1519|回复: 11
命令1Hwnd = Plugin.Window.MousePoint()Rem chujiCall Plugin.Bkgnd.KeyPress(Hwnd,49)Delay 1000Call Plugin.Bkgnd.KeyPress(Hwnd,50)Delay 2100000Goto chuji-----------------------------------------------------命令2Hwnd = Plugin.Window.MousePoint()Rem fuyaoDelay 2880000Call Plugin.Bkgnd.KeyPress(Hwnd,51)Goto fuyao以上两个命令现在我只能各编在一个脚本中，因为两个命令我需要在同一个窗口中用到，而且两个命令在按下启动热键的时候要同时运行，想编在同一个脚本中，要怎么写？求高手帮助，谢谢！
按键会员（季）按键会员绑定账号后自动赠送按键精灵开发者4级可通过提升认证等级来升级勋章：
BeginThread 线程2
&&&&Dim Hwnd
&&&&Hwnd = Plugin.Window.MousePoint()
&&&&While True
&&&&&&&&Call Plugin.Bkgnd.KeyPress(Hwnd,49)
&&&&&&&&Delay 1000
&&&&&&&&Call Plugin.Bkgnd.KeyPress(Hwnd,50)
&&&&&&&&Delay 2100000
&&&&Dim Hwnd
&&&&Hwnd = Plugin.Window.MousePoint()
&&&&While True
&&&&&&&&Delay 2880000
&&&&&&&&Call Plugin.Bkgnd.KeyPress(Hwnd,51)
小学崇拜姚壮宪
初中偶像求伯君
高中爱上蔡依琳
大学拜倒ＡＣ娘
毕业目标東方餡掛炒飯
& && && &--- 死宅是如何炼成的
saviolla 发表于
14:31 本人小白啊，先表示感谢，还要追问点，这个每个线程都能互不干扰的循环吗？我原来的两个命令是需要循环的
囬憶づ那麼眞
黄瓜勋章（永久）体验商业小精灵活动的奖励鹰眼勋章鹰眼注册用户专属勋章认证考霸（90天）参加考霸活动，对认证考了十次以上用户的鼓励按键精灵开发者5级可通过提升认证等级来升级勋章：论坛GG按键论坛男性用户勋章元旦勋章（30天）按键精灵元旦活动纪念勋章按键图书勋章尊贵的按键图书用户双蛋勋章（30天）双蛋活动勋章(30天)
这个延时真强大
EZ脚本学院 VIP 158_囬忆
承接各种大小型脚本制作
按键精灵开发者6级可通过提升认证等级来升级勋章：元旦勋章（30天）按键精灵元旦活动纪念勋章学有所成学有所成勋章，新手步入按键学堂的第一枚勋章黄金之翼黄金之翼勋章
把开始的快捷键设置成一样就好了吧。
按键图书勋章尊贵的按键图书用户土豪勋章（90天）活动期间在淘宝商场购买按键产品按键精灵开发者1级可通过提升认证等级来升级勋章：
顶个............
囬憶づ那麼眞 发表于
18:12 这个延时真强大这个延时是起定时的作用，因为需要40分钟左右重复一次啊
ㄣ，程式有點難，努力中
囬憶づ那麼眞
黄瓜勋章（永久）体验商业小精灵活动的奖励鹰眼勋章鹰眼注册用户专属勋章认证考霸（90天）参加考霸活动，对认证考了十次以上用户的鼓励按键精灵开发者5级可通过提升认证等级来升级勋章：论坛GG按键论坛男性用户勋章元旦勋章（30天）按键精灵元旦活动纪念勋章按键图书勋章尊贵的按键图书用户双蛋勋章（30天）双蛋活动勋章(30天)
潇然笑 发表于
14:47 这个延时是起定时的作用，因为需要40分钟左右重复一次啊那怎么不用 DateDiff(时间间隔,开始时间,结束时间)这个命令啊~~
EZ脚本学院 VIP 158_囬忆
承接各种大小型脚本制作
囬憶づ那麼眞 发表于
17:39 那怎么不用 DateDiff(时间间隔,开始时间,结束时间)这个命令啊~~真幸运啊，又有高手关注了，请帮忙改进优化写个嘛，因为先前那两个单独的任务命令是自己胡乱弄的，可能没表达清楚实际运用的意思。用意就是第一个循环指令：开始运行后按下快捷1键，间隔1000毫秒按下快捷2键，间隔2100000毫秒又按下快捷1键如此循环；第二个循环指令：开始运行后间隔2400000毫秒按下快捷3键，间隔2400000毫秒再次按下快捷3键这样的循环。
saviolla 发表于
14:31 使用中发现，第二个线程不运行啊
囬憶づ那麼眞
黄瓜勋章（永久）体验商业小精灵活动的奖励鹰眼勋章鹰眼注册用户专属勋章认证考霸（90天）参加考霸活动，对认证考了十次以上用户的鼓励按键精灵开发者5级可通过提升认证等级来升级勋章：论坛GG按键论坛男性用户勋章元旦勋章（30天）按键精灵元旦活动纪念勋章按键图书勋章尊贵的按键图书用户双蛋勋章（30天）双蛋活动勋章(30天)
潇然笑 发表于
17:51 真幸运啊，又有高手关注了，请帮忙改进优化写个嘛，因为先前那两个单独的任务命令是自己胡乱弄的，可能没 ...以下用一个记事本测试的语句。不过还是建议好好学习一下按键精灵基础。。熟悉每天命令的应用。。Dimenv 窗口句柄'定义环境变量RunApp "notepad.exe"hwnd = Plugin.Window.Find("notepad", 0)窗口句柄 = Plugin.Window.FindEx(Hwnd, 0, "Edit", 0)BeginThread 线程1()BeginThread 线程2()Do
Delay 10loopSub 线程1()
hwndex=窗口句柄
Delay 1000
Call Plugin.Bkgnd.KeyPress(hwndex, 49)
Delay 1000
If DateDiff("n", t, now) >= 35 Then '时间间隔35分钟
Call Plugin.Bkgnd.KeyPress(hwndex, 50)
loopEnd SubSub 线程2()
hwndex = 窗口句柄
If DateDiff("n", t, now) >= 40 Then '时间间隔40分钟
Call Plugin.Bkgnd.KeyPress(hwndex, 51)
loop&&&&End Sub
EZ脚本学院 VIP 158_囬忆
承接各种大小型脚本制作你的位置：
如何用一个脚本同时运行两个命令
14:24:51 |
来源: 按键精灵资源站
Hwnd = Plugin.Window.MousePoint()
Call Plugin.Bkgnd.KeyPress(Hwnd,49)
Delay 1000
Call Plugin.Bkgnd.KeyPress(Hwnd,50)
Delay 2100000
Goto chuji
-----------------------------------------------------
Hwnd = Plugin.Window.MousePoint()
Delay 2880000
Call Plugin.Bkgnd.KeyPress(Hwnd,51)
Goto fuyao
以上两个命令现在我只能各编在一个脚本中，因为两个命令我需要在同一个窗口中用到，而且两个命令在按下启动热键的时候要同时运行，想编在同一个脚本中，要怎么写？求高手帮助，谢谢！}