按键精灵如果找不到A图片则执行依次点击B、C、D图片
展开全部
x = Plugin.Sys.GetScRX()
y = Plugin.Sys.GetScRY()
Do
For i = 1 To 4
FindPic 0, 0, x, y, "Attachment:\" & i & ".bmp", 0.9, intX, intY
If intX > 0 And intY > 0 and i = 1 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
Exit Do
ElseIf intX > 0 And intY > 0 and i = 2 and b=0 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
b=1
ElseIf intX > 0 And intY > 0 and i = 3 and b=1 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
c=1
ElseIf intX > 0 And intY > 0 and i = 4 and c=1 Then
Delay 200
MoveTo intX, intY
Delay 200
LeftClick 1
d=1
End If
Delay 100
Next
Loop
图片名为1、2、3、4四张图放到附件,记得用抓抓截。
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询