按键精灵循环找图,有点慢。谁能帮我怎么才能快点
DoFindPic0,0,1024,768,"Attachment:\笔,文字.bmp",0.9,intX,intYIfintX>0AndintY>0ThenFindPi...
Do
FindPic 0,0,1024,768,"Attachment:\笔,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\笔,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\草莓,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\草莓,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\大熊猫,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\大熊猫,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\电磁炉,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\电磁炉,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\电脑,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\电脑,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\狗,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\狗,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\蝴蝶,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\蝴蝶,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
Loop
Rem 跳出循环 展开
FindPic 0,0,1024,768,"Attachment:\笔,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\笔,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\草莓,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\草莓,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\大熊猫,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\大熊猫,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\电磁炉,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\电磁炉,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\电脑,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\电脑,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\狗,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\狗,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
FindPic 0,0,1024,768,"Attachment:\蝴蝶,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\蝴蝶,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
End If
Loop
Rem 跳出循环 展开
1个回答
展开全部
1:缩小找图的左上角,和右下角X,Y坐标的范围。
2:if…找图命令then,多个找图命令,中间插入elseif找图。
2:if…找图命令then,多个找图命令,中间插入elseif找图。
追答
比如说像这样
按键精灵循环找图,有点慢。谁能帮我怎么才能快点Do
FindPic 0,0,1024,768,"Attachment:\笔,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic intX-100,intY-100,intX+100,intY+100,"Attachment:\笔,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
FindPic 0,0,1024,768,"Attachment:\草莓,文字.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
FindPic intx-100,inty-100,intx+100,inty+100,"Attachment:\草莓,图案.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
Delay 500
LeftClick 1
End If
Goto 跳出循环
Else
//继续编写找图命令
End If
End If
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询