找图代码..哪里错了...来看看 按键精灵说 Else错了(错误码0)没有找到合法的符号.怎么改正确啊
Rem继续找图FindPic0,0,1400,800,"Attachment:\1.bmp",1,intX,intYIfintX>0AndintY>0ThenMoveTo...
Rem 继续找图
FindPic 0,0,1400,800,"Attachment:\1.bmp",1,intX,intY
If intX > 0 And intY > 0 Then MoveTo intX, intY
Else
Goto 继续找图
End If 展开
FindPic 0,0,1400,800,"Attachment:\1.bmp",1,intX,intY
If intX > 0 And intY > 0 Then MoveTo intX, intY
Else
Goto 继续找图
End If 展开
3个回答
展开全部
因为只贴了38行代码,所以我不保证修改好没有其他错误,有错误的话可以继续帖。修改后的代码如下:
Hwnd = Plugin.Window.GetKeyFocusWnd()
Call Plugin.Window.Move(Hwnd, 0, 0)
Rem 开始
FindColor 0,0,134,57,"D2D2D2",x,y
If x > 0 And y > 0 Then
MoveTo 15, 537
End If
Delay 200
FindPic 0,0,134,57,"E:\图库\混沌时空五层.bmp",1,x,y
If x > 0 And y > 0 Then
Delay 50
End If
FindPic 26,114,694,518,"E:\图库\长.bmp",1,x,y
If x > 0 And y > 0 Then
MoveTo x+24, y-46
LeftClick 1
End If
FindPic 312,392,459,408,"D:\图片\照打.bmp",0.9,x,y
If x > 0 And y > 0 Then
MoveTo x + 24, y - 46
LeftClick 1
End If
Delay 50
FindPic 179,280,388,347,"E:\图库\攻击精英1.bmp",0.9,x,y
If x > 0 And y > 0 Then
MoveTo x+26, y+4
LeftClick 1
End If
FindPic 312,392,459,408,"D:\图片\照打.bmp",0.9,x,y
If x > 0 And y > 0 Then
MoveTo x + 24, y - 46
LeftClick 1
else
Delay 50
End If
FindPic 179,280,388,347,"E:\图库\攻击精英2.bmp",0.9,x,y
If x > 0 And y > 0 Then
MoveTo x+26, y+4
LeftClick 1
End If
FindPic 312,392,459,408,"D:\图片\照打.bmp",0.9,x,y
If x > 0 And y > 0 Then
MoveTo x + 24, y - 46
LeftClick 1
End If
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询