按键精灵要让它在屏幕一定区域内寻找某种颜色要怎么办
答案:4 悬赏:40 手机版
解决时间 2021-01-28 13:26
- 提问者网友:呐年旧曙光
- 2021-01-27 17:44
按键精灵要让它在屏幕一定区域内寻找某种颜色要怎么办
最佳答案
- 五星知识达人网友:妄饮晩冬酒
- 2021-01-27 18:40
//下面这句是获得屏幕分辨率宽度
Plugin Xmax = Sys.GetScRX()
//下面这句是获得屏幕分辨率高度
Plugin Ymax = Sys.GetScRY()
UserVar x1=0 区域左上角点x座标
UserVar y1=0 区域左上角点y座标
UserVar x2=Xmax-1 区域右下角点x座标
UserVar y2=Ymax-1 区域右下角点y座标
UserVar Clr=FFFFFF 要找的颜色(十六进位字符串)
//按键貌似不能用VB的ForNEXT回圈,所以只能用这个麻烦点地方法..
For y2-y1
For x2-x1
VBSCall Color=GetPixelColor(x1,y1)
If Color=Clr
Gosub main
EndIf
x1=x1+1
EndFor
y1=y1+1
EndFor
EndScript
Sub main
//在这里写上满足条件时要执行的语句
Return main
Plugin Xmax = Sys.GetScRX()
//下面这句是获得屏幕分辨率高度
Plugin Ymax = Sys.GetScRY()
UserVar x1=0 区域左上角点x座标
UserVar y1=0 区域左上角点y座标
UserVar x2=Xmax-1 区域右下角点x座标
UserVar y2=Ymax-1 区域右下角点y座标
UserVar Clr=FFFFFF 要找的颜色(十六进位字符串)
//按键貌似不能用VB的ForNEXT回圈,所以只能用这个麻烦点地方法..
For y2-y1
For x2-x1
VBSCall Color=GetPixelColor(x1,y1)
If Color=Clr
Gosub main
EndIf
x1=x1+1
EndFor
y1=y1+1
EndFor
EndScript
Sub main
//在这里写上满足条件时要执行的语句
Return main
全部回答
- 1楼网友:第幾種人
- 2021-01-27 22:20
不好搞
- 2楼网友:夜余生
- 2021-01-27 21:05
取消就是了啊
- 3楼网友:神也偏爱
- 2021-01-27 19:26
//下面这句是获得屏幕分辨率宽度 plugin xmax = sys.getscrx() //下面这句是获得屏幕分辨率高度 plugin ymax = sys.getscry() uservar x1=0 區域左上角點x座標 uservar y1=0 區域左上角點y座標 uservar x2=xmax-1 區域右下角點x座標 uservar y2=ymax-1 區域右下角點y座標 uservar clr=ffffff 要找的顏色(十六進位字符串) //按鍵貌似不能用vb的fornext迴圈,所以只能用這個麻煩點地方法.. for y2-y1 for x2-x1 vbscall color=getpixelcolor(x1,y1) if color=clr gosub main endif x1=x1+1 endfor y1=y1+1 endfor endscript sub main //在這裡寫上滿足條件時要執行的語句 return main
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯