FindPic 找图 |
|
在屏幕区域查找指定相似度的图片 |
|
参数1 整数型，屏幕左上角x坐标
参数2 整数型，屏幕左上角y坐标 参数3 整数型，屏幕右下角x坐标 参数4 整数型，屏幕右下角y坐标 参数5 字符串型，bmp格式图片路径 参数6 整数型，相似度 参数7 整数型，返回x坐标 参数8 整数型，返回y坐标 |
|
无 |
|
//FindPic left,top,right,bottom,filename,similar,x,y
//在区域内从左到右，从上到下找文件名为filename的bmp文件，把找到的坐标保存在变量x和y中
//left,top,right,bottom都是整数或者整数型变量，说明了区域的左，上，右，下界限
//filename是一个bmp格式的图片，需要您自己抓取，zui好是24位，把边缘都设为单一的颜色
//similar为相似度，取0.5到1之间的小数。数值越大，对图片的相似度要求越严格，速度也越快。推荐取0.9
//如果没有找到图片，则x和y的值都被置为-1
//推荐使用周围颜色单一的图片
MessageBox "这个例子会启动一个Windows自带的扫雷程序，然后查找扫雷程序里的笑脸图形"
RunApp "winmine.exe"
//加入一点延时，让扫雷程序顺利启动
Delay 2000
FindPic 0,50,1023,767,"winmine.bmp",0.9,intX,intY
If intX>0 and intY>0 Then
MoveTo intX,intY
MessageBox "找到图形，鼠标已经移到图形上面"
Else
MessageBox "没找到！请确认扫雷程序已经打开，并且您用的是WinXP系统"
End If
//在区域(0,50,1023,767)中找与文件winmine.bmp中的图形比较接近的地方，如果找到，则把鼠标移动到这个地方
//6.30版之后，找图的文件路径可以直接引用附件中的图片，不需要释放，例子
MessageBox "下面把鼠标先移到0，0点，再用附件找图的方式继续查找笑脸"
FindPic 0,50,1023,767,"Attachment:\winmine.bmp",0.9,intX,intY
If intX>0 and intY>0 Then
MoveTo intX,intY
MessageBox "找到图形，鼠标已经移到图形上面"
Else
MessageBox "没找到！请确认扫雷程序已经打开，并且您用的是WinXP系统"
End If
MessageBox "脚本演示结束，zui好的脚本永远是您自己制作的。 :-)"
EndScript
|
|
|
|
//VBSCall FindPic(left,top,right,bottom,filename,similar,x,y)
//在区域内从左到右，从上到下找文件名为filename的bmp文件，把找到的坐标保存在变量x和y中
//left,top,right,bottom都是整数或者整数型变量，说明了区域的左，上，右，下界限
//filename是一个bmp格式的图片，需要您自己抓取，zui好是24位，把边缘都设为单一的颜色
//similar为相似度，取0.5到1之间的小数。数值越大，对图片的相似度要求越严格，速度也越快。推荐取0.9
//如果没有找到图片，则x和y的值都被置为-1
//推荐使用周围颜色单一的图片
MessageBox "这个例子会启动一个Windows自带的扫雷程序，然后查找扫雷程序里的笑脸图形"
VBSCall RunApp("winmine.exe")
//加入一点延时，让扫雷程序顺利启动
Delay 2000
VBSCall FindPic(0,50,1023,767,"winmine.bmp",0.9,intX,intY)
If intX>0 and intY>0
MoveTo intX,intY
MessageBox "找到图形，鼠标已经移到图形上面"
Else
MessageBox "没找到！请确认扫雷程序已经打开，并且您用的是WinXP系统"
EndIf
//在区域(0,50,1023,767)中找与文件winmine.bmp中的图形比较接近的地方，如果找到，则把鼠标移动到这个地方
//6.30版之后，找图的文件路径可以直接引用附件中的图片，不需要释放，例子
MessageBox "下面把鼠标先移到0，0点，再用附件找图的方式继续查找笑脸"
VBSCall FindPic(0,50,1023,767,"Attachment:\winmine.bmp",0.9,intX,intY)
If intX>0 and intY>0
MoveTo intX,intY
MessageBox "找到图形，鼠标已经移到图形上面"
Else
MessageBox "没找到！请确认扫雷程序已经打开，并且您用的是WinXP系统"
EndIf
MessageBox "脚本演示结束，zui好的脚本永远是您自己制作的。 :-)"
EndScript
|