查找屏幕颜色,图片

我们在写按键精灵找矿时,在游戏屏幕的左上方会出现一个特殊的颜色代表矿的颜色.

/*
功能  : 查找屏幕内某个区域内的是否存在某种颜色 
参数 
	x,y,x1,y1: 范围坐标
	radio: 模糊度 
	color: 颜色值

*/

Function find_color(x, y, x1, y1, radio, color)

FindColorEx x, y, x1, y1, color, 0, radio,intX, intY

If intX > 0 and intY > 0 Then  
	ret = 1	
	Else 	
	ret = 0	
End If
	find_color = ret
End Function



If find_color(600, 300, 700, 320, 0.9, "BD7B20") = 1 Then 


    MessageBox "找到了"
    Else 
    MessageBox "没找到了"
    
End If

查找屏幕中是否有某个图片 

/*
功能  : 查找屏幕内某个区域内的是否存在某张图 

参数 
	x,y,x1,y1: 范围坐标
	radio: 模糊度 
	path  : 路径(绝对路径,例如:"D:\按键精灵\按键精灵2014\screen\地图.bmp" )

返回值:0: 表示没找到, 1: 表示找到了
	

*/
Global pic_x, pic_y//由于不能使用指针,只能干个全局变量来获取找到图片的坐标了

Function find_pic(x, y, x1, y1, radio, path)

FindPic x, y, x1, y1, path, radio, intX, intY


If intX > 0 and intY > 0 Then 
	pic_x = intX
	pic_y = intY
	ret = 1	
	Else 	
	ret = 0	
End If
	find_pic = ret
End Function




If find_pic(0, 0, 1200, 708, 0.9, "D:\按键精灵\按键精灵2014\screen\地图.bmp") = 1 Then 
	MessageBox pic_x
	MessageBox pic_y
	MessageBox "找到了"
	Else 
	MessageBox "没找到了"
End If