按键精灵循环查找多图
UserVar cy="18" "图片高度"
Dim ay, bx, by, sTime, qw, op
dw=Plugin.Sys.GetScRX()&
//dw-&屏幕分辨率宽
dh=Plugin.Sys.GetScRY()&
//dh-&屏幕分辨率高
ax=0:ay = 0:sTime = Timer:bbs = 0
&&& FindPic ax,
ay, dw, dh, "Attachment:\我.bmp", 1, intX2, intY2
&&& If intX2
& 0 and intY2 & 0 Then
bbs=bbs+1:Ux=intX2+1:ay = inty2 + 1
qw=qw&intX2&","&intY2&vbcrlf
&&& End If
&&& Do Until
FindPic Ux, ay-1, dw, ay-1+cy, "Attachment:\我.bmp", 1, intX1,
If intX1 & 0 and intY1 & 0 Then
&&&&&&&&&&&
bbs=bbs+1:Ux=intX1+1
&&&&&&&&&&&
qw = qw & intX1 & ","
& intY1 & vbcrlf
MessageBox "查找到符合条件的图片"& bbs
&"张!"&vbcrlf&"
"&vbcrlf&"耗时"&
Timer-sTime
&"秒"&vbcrlf&"
"&vbcrlf&"他们的坐标为:"&vbcrlf&qw
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。按键精灵如何连续找图？就是找到当前图后执行下一条找图命令？_百度知道
按键精灵如何连续找图？就是找到当前图后执行下一条找图命令？
比如找到图1后，执行操作，跳过继续找图2，同上如此很多个图最好是找到某图执行操作后逃过这个找图程序
我有更好的答案
按默认排序
1024,0,intYIf intX &Attachment。 FindPic 0;任务; 0 And intY &在你找到图一的时候进行的相关操作后,0,0.bmp&quot.bmp&quot, intYDelay 300LeftClick 1Delay 300End IfFindPic 0,1280;A 0 And intY &gt,intX,1280。要给适当的延时, intYLeftClick 1Delay 300End If你这是区域找色的话你可以把找图的范围适当的调整下试试.9;日常任务; 0 ThenMoveTo intX; 0 ThenMoveTo intX,intYIf intX &gt.9:&#92,intX:&#92,&,&quot,1024,0
你现在有解决方法么？我也遇到了这个问题。
其他类似问题
按键精灵的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁你的位置：
【分享】基于区域找图命令所写的增强型找多图命令（让代码更简洁）
来源: 按键精灵资源站
[i=s] 本帖最后由 游9 于
23:16 编辑
今天给大家分享一个基于按键基本找图命令
编写的支持图片路径使用连接符的找多图命令！
循环找图，找多图在实战中应用广泛！
对于找多图的情况在代码的写法处理上，的找图命令与大漠找图命令相比，略显繁琐。
因为按键找图命令的“图片路径”这一参数不支持连接符“|”！即：
正确写法：
QUOTE:FindPic 0,0,,&Attachment:\图1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
End If不可以这样：QUOTE:FindPic 0,0,,&图1.bmp|图2.bmp|图3.bmp|图4.bmp|图5.bmp|图6.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
End If版版曾有过这样一帖，各种写法各种收！很全面，用数组与循环处理找多图的情况：
热帖地址：QUOTE:【循环找图】教你如何循环找图,查找多图!【总结脚本】
那么如何才能让按键的找图命令中“图片路径”参数支持使用分隔符的简洁写法呢！？！
答案here we go！
下面是我写的一个增强型找图命令满足你对找多图代码简化的渴望，
特此分享！！
【开源喽】
命令名称FindPicSx 找图命令功能在屏幕区域查找指定相似度的图片命令参数参数1 整数型，屏幕左上角x坐标
参数2 整数型，屏幕左上角y坐标
参数3 整数型，屏幕右下角x坐标
参数4 整数型，屏幕右下角y坐标
参数5 字符串型，bmp格式图片路径，支持使用分隔符“|”，例如：&图1.bmp|图2.bmp&
参数6 整数型，相似度
返回数组，其中，
第1个元素为 找到的图片序号，没找到时返回0。
第2个元素为 图片左上角横坐标，没找到时返回-1。
第3个元素为 图片左上角纵坐标，没找到时返回-1。
按键精灵8及以上语法& &
CODE:CK = FindPicSx(0, 0, , &1.bmp|2.bmp|3.bmp&, 0.9)
If CK(1) &= 0 And CK(2)&=0 Then&&
& & TracePrint &找到第&& CK(0) &&张图片！鼠标已移动到该图片左上角！&
& & MoveTo CK(1),CK(2)
【函数源码】
本帖隐藏的内容需要回复才可以浏览
【完整的演示例子】
本帖隐藏的内容需要回复才可以浏览
可能很多人会问，图片路径支持连接符意义何在？通过长期实战，不难发现多图处理用大漠，整体代码会简洁不少。毕竟实战中可能碰到的问题多多，为了增强脚本稳定性，强化判断机制，我们通常抓好几个图，找多图！尤其对象是动态图，变色字等等情况！
所以在大型实战脚本中找多图问题处理上，FindPicSx定会大显神通！！
最后，再次分享相识前辈找多图热帖：QUOTE:【循环找图】教你如何循环找图,查找多图!【总结脚本】
多图实战，总结很到位！！
喜欢请给力杀花哈！！ 如有任何异议欢迎跟帖留言！！言之有理者小花银元伺候~02-0202-02
02-0202-02
02-0202-02
02-0202-02
02-0202-02
02-0202-02
02-0202-02
02-0202-02
02-0202-02后使用快捷导航没有帐号？
新浪微博：
&&&&腾讯微博：
只需一步，快速开始
查看: 200|回复: 4
UID2984854精华0在线时间0 小时阅读权限20鲜花0 个铜币6 个银币0 个金币0 个积分10帖子注册时间最后登录
小学一年级, 积分 10, 距离下一级还需 20 积分
鲜花0 个铜币6 个银币0 个积分10帖子
如图，前几天发了个类似的帖子，依大神的写法照葫芦画瓢写了一段，感觉有点不怎么好用，求修改（也有可能我写的不对？反正是感觉用点不好用）
Call Lib.API.运行程序(&F:\Program Files\1.exe&)
Delay 2000
FindPic 0,0,,&Attachment:\1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
If t2-t1&3 Then
Call Lib.系统.结束进程(&1.exe&)
FindPic 0,0,,&Attachment:\2.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MessageBox &图片2已找到&
If t2-t1&3 Then
Call Lib.系统.结束进程(&1.exe&)
Delay 1000
附件: 您需要
才可以下载或查看，没有帐号？
依需求自行修改
UID331910精华0在线时间2649 小时阅读权限100鲜花664 个铜币1131 个银币1031 个金币0 个积分4005帖子注册时间最后登录
鲜花664 个铜币1131 个银币1031 个积分4005帖子
普劳斯 发表于
好像写错了，重新发次
依需求自行修改Do
Call Lib.API.運行程序(&F:\Program Files\1.exe&)
t1=Plugin.Sys.GetTime()
While Plugin.Sys.GetTime()-t1&3000
Delay 200
FindPic 0,0,,&Attachment:\1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
t1=Plugin.Sys.GetTime()
While Plugin.Sys.GetTime()-t1&3000
Delay 200
FindPic 0,0,,&Attachment:\2.bmp&,0.9,intX,intY
If intX&0 And intY&0 Then Exit Do
Wend
End If
Wend
Call Lib.系統.結束進程(&1.exe&)
Loop
MsgBox &圖片2已找到&复制代码
↑體諒你眼睛 字體放大處理↑
UID2984854精华0在线时间0 小时阅读权限20鲜花0 个铜币6 个银币0 个金币0 个积分10帖子注册时间最后登录
小学一年级, 积分 10, 距离下一级还需 20 积分
鲜花0 个铜币6 个银币0 个积分10帖子
好像写错了，重新发次
Call Lib.API.运行程序(&F:\Program Files\1.exe&)
Delay 2000
FindPic 0,0,,&Attachment:\1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
If t2-t1&3 Then
Call Lib.系统.结束进程(&1.exe&)
FindPic 0,0,,&Attachment:\2.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MessageBox &图片2已找到&
If t2-t1&3 Then
Call Lib.系统.结束进程(&1.exe&)
Delay 1000
UID2580593精华0在线时间0 小时阅读权限101鲜花39 个铜币901 个银币422 个金币0 个积分436帖子注册时间最后登录
鲜花39 个铜币901 个银币422 个积分436帖子
普劳斯 发表于
好像写错了，重新发次
Call Lib.API.运行程序(&F:\Program Files\1.exe&)
Delay 2000
T1 = now()
Rem B//移动到这里
FindPic 0,0,,&Attachment:\1.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & Goto C
& & T2=now()
& & If t2-t1&3 Then
& && &&&Call Lib.系统.结束进程(&1.exe&)
& && &&&Goto B
& & End If
T1 = now()//这里的计时会产生干扰,所以下面增加一个D
Rem D //增加一个D
FindPic 0,0,,&Attachment:\2.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
& & MessageBox &图片2已找到&
& & T2=now()
& & If t2-t1&3 Then
& && &&&Call Lib.系统.结束进程(&1.exe&)
& & & & & & //Goto C
& && &&&Goto D //修改成了D，前面增加了一个D，用于把时间的赋值略过，不然每次时间都刷新
& && &&&Delay 1000//这里的delay和下面的goto A都没用了，因为已经跳到C去了。
& && &&&Goto A
& & End If
总评分:&鲜花 + 1&
实名接单作者，有需求可以联系。
UID2921534精华0在线时间0 小时阅读权限20鲜花11 个铜币278 个银币63 个金币0 个积分89帖子注册时间最后登录
小学四年级, 积分 89, 距离下一级还需 1 积分
鲜花11 个铜币278 个银币63 个积分89帖子
欢迎常来帮助新人!
总评分:&鲜花 + 1&
按键精灵开发者4级
可通过提升认证等级来升级勋章：
积极帮助新手（可向管理员进行申请）
黄瓜勋章（永久）
体验商业小精灵活动的奖励
按键精灵开发者5级
可通过提升认证等级来升级勋章：
学有所成勋章，新手步入按键学堂的第一枚勋章
按键精灵开发者1级
可通过提升认证等级来升级勋章：
按键精灵论坛推荐 /2
第二届“新浪&按键杯”脚本竞技大赛报名进入最后倒计时：1天0小时！ 你是否报名参赛！？小2兴之所至，觉得脚本写起来好简单，特来分享源码给大家！欢迎各位看官点评~ PS：源码作品不参赛，仅供大家娱乐哟！连小2这4级小菜鸟都会写的前台脚本，难道5级大神们还不会么？点击立即下载02源码
2015羊年到，小精灵重磅改版上线了
新等级规则和页面优化哟！
窗窗看到这次的改版可是很兴奋滴~大家呢？跟着我的介绍来一睹为快吧！VIP等级不再减!尊享永久不降级！VIP首页换新装，信息更贴心！VIP成长记录，你的成长看得见！
看完回复有好礼！
Powered by