发布网友 发布时间:2024-10-21 20:42
共4个回答
热心网友 时间:2天前
While Then //无限循环
FindPic 0,0,1024,768,"Attachment:\图片1.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
FindPic 0,0,1024,768,"Attachment:\图片2.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX+2, intY+2 //这里坐标+2是因为找图找出来是图片左上角位置,要移到图片中位置要加一点,多少知己看着办
Delay 50
LeftClick 1
Delay 1000
FindPic 0,0,1024,768,"Attachment:\图片3.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX+2, intY+2
Delay 50
LeftClick 1
//Delay 1000 //这个1秒是我自己加的,个人觉得有必要
end if
end if
End If
Delay 200 //设找图频率
wend
原创~~~~~自己解决图片色差问题,图片放进附件。
热心网友 时间:2天前
我想问下图片123是同时出现的还是依次出现?
如果是同时出现而且位置也是固定的,那就很简单。根本不用找图,图片只要有透明就很难找到,你只需要找图1中的坐标点颜色。代码如下:
Rem 找图1
IfColor 111, 111, "0", 0 Then
//如果图1中坐标点111,111的颜色为0则
//鼠标移动到图2坐标
MoveTo 222, 222
Delay 200
LeftClick 1
Else
Delay 1000
Goto 找图1
End If
Delay 1000
//鼠标移动到图3坐标
MoveTo 333, 333
Delay 200
LeftClick 1
Delay 500
Goto 找图1
如果是图片出现的位置和时间不固定,那你还是选 斩_断刀 的吧。
热心网友 时间:2天前
Do
Delay 100
FindPic 0,0,1024,768,"Attachment:\1.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Delay 100
FindPic 0,0,1024,768,"Attachment:\2.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Delay 100
MoveTo intX,intY
Delay 100
LeftClick 1
End If
Delay 1000
FindPic 0,0,1024,768,"Attachment:\3.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Delay 100
MoveTo intX,intY
Delay 100
LeftClick 1
End If
End If
Loop
热心网友 时间:2天前
这个语法不对.... 找我修改下吧