求大神指点下 找到播放点击了一下 然后就不找暂停了 那里有问题?
Dim 播放_x, 播放_y
Dim 暂停_x, 暂停_y
屏幕分辨率_x=Plugin.Sys.GetScRX
屏幕分辨率_y=Plugin.Sys.GetScRY
For 15
FindPic 0,0,屏幕分辨率_x,屏幕分辨率_y, "C:\播放.bmp", 1, 播放_x, 播放_y
If 播放_x > 0 And 播放_y > 0 Then
Exit For
End If
Next
MoveTo 播放_x, 播放_y
if 播放_x >0
LeftClick 1
Else
MessageBox 播放_x
End If
Delay 1000
For 15
FindPic 0,0,屏幕分辨率_x,屏幕分辨率_y, "C:\暂停.bmp", 1, 暂停_x, 暂停_y
If 暂停_x > 0 And 暂停_y > 0 Then
Exit For
End If
Next
MoveTo 暂停_x, 暂停_y
if 暂停_x >0
LeftClick 1
Else
MessageBox 暂停_x
End If
Delay 1000
按键精灵连续找图只找第一张不找第二张怎么回事
答案:2 悬赏:20 手机版
解决时间 2021-02-13 00:30
- 提问者网友:椧運幽默
- 2021-02-12 16:40
最佳答案
- 五星知识达人网友:往事埋风中
- 2021-02-12 17:51
Dim 播放_x, 播放_y
Dim 暂停_x, 暂停_y
屏幕分辨率_x=Plugin.Sys.GetScRX
屏幕分辨率_y=Plugin.Sys.GetScRY
For 15
FindPic 0,0,屏幕分辨率_x,屏幕分辨率_y, "C:\播放.bmp", 1, 播放_x, 播放_y
If 播放_x > 0 And 播放_y > 0 Then
Exit For
End If
Next
MoveTo 播放_x, 播放_y
if 播放_x >0
LeftClick 1
Else
MessageBox 播放_x
End If
Delay 1000
For 15
Delay 500
FindPic 0,0,屏幕分辨率_x,屏幕分辨率_y, "C:\暂停.bmp", 1, 暂停_x, 暂停_y
If 暂停_x > 0 And 暂停_y > 0 Then
Exit For
End If
Next
MoveTo 暂停_x, 暂停_y
if 暂停_x >0
LeftClick 1
Else
MessageBox 暂停_x
End If
Delay 1000
//试试这个。
Dim 暂停_x, 暂停_y
屏幕分辨率_x=Plugin.Sys.GetScRX
屏幕分辨率_y=Plugin.Sys.GetScRY
For 15
FindPic 0,0,屏幕分辨率_x,屏幕分辨率_y, "C:\播放.bmp", 1, 播放_x, 播放_y
If 播放_x > 0 And 播放_y > 0 Then
Exit For
End If
Next
MoveTo 播放_x, 播放_y
if 播放_x >0
LeftClick 1
Else
MessageBox 播放_x
End If
Delay 1000
For 15
Delay 500
FindPic 0,0,屏幕分辨率_x,屏幕分辨率_y, "C:\暂停.bmp", 1, 暂停_x, 暂停_y
If 暂停_x > 0 And 暂停_y > 0 Then
Exit For
End If
Next
MoveTo 暂停_x, 暂停_y
if 暂停_x >0
LeftClick 1
Else
MessageBox 暂停_x
End If
Delay 1000
//试试这个。
全部回答
- 1楼网友:鱼忧
- 2021-02-12 18:05
//先找图 findpic 0,50,1023,767,"attachment:\winmine.bmp",0.9,intx,inty //如果没找到,x值为-1 while x=-1 //找图 findpic 0,50,1023,767,"attachment:\winmine.bmp",0.9,intx,inty delay 1000 wend
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯