Goto 窗口二

End Sub

Sub 窗口二采集

//--------------------------------------------------------------------------------------------

FindPic Ux,Uy+160,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\"&C2&".bmp",0.7,intX,intY
//以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
If intX > 0 And intY > 0 Then
    //在这里可以添加找到坐标后,需要做的处理。

MoveTo intX + 5, intY + 5
Delay 900
LeftClick 1
Delay 900
MoveTo Ux+90, Uy+300
End If

//--------------------------------------------------------------------------------------------

FindPic Ux,Uy+160,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\"&B2&".bmp",0.65,intX,intY
//以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
If intX > 0 And intY > 0 Then
    //在这里可以添加找到坐标后,需要做的处理。
    MoveTo intX+8,intY+8
    Delay 900
    LeftClick 1
    Delay 900
End If
	
//--------------------------------------------------------------------------------------------

FindPic Ux,Uy+160,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\"&C2&".bmp",0.7,intX,intY
//以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
If intX > 0 And intY > 0 Then
    //在这里可以添加找到坐标后,需要做的处理。

MoveTo intX + 5, intY + 5
Delay 900
LeftClick 1
Delay 900
MoveTo Ux+90, Uy+300
End If

Goto 窗口三
	
End Sub

Sub 窗口三采集

//--------------------------------------------------------------------------------------------

FindPic Ux,Uy+160,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\"&C3&".bmp",0.7,intX,intY
//以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
If intX > 0 And intY > 0 Then
    //在这里可以添加找到坐标后,需要做的处理。

MoveTo intX + 5, intY + 5
Delay 900
LeftClick 1
Delay 900
MoveTo Ux+90, Uy+300
End If

//--------------------------------------------------------------------------------------------

FindPic Ux,Uy+160,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\"&B3&".bmp",0.65,intX,intY
//以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
If intX > 0 And intY > 0 Then
    //在这里可以添加找到坐标后,需要做的处理。
    MoveTo intX+8,intY+8
    Delay 900
    LeftClick 1
    Delay 900
End If
	
//--------------------------------------------------------------------------------------------

FindPic Ux,Uy+160,Ux+800,Uy+600,"E:\按键精灵\按键精灵8\QQ寻仙图\"&C3&".bmp",0.7,intX,intY
//以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
If intX > 0 And intY > 0 Then
    //在这里可以添加找到坐标后,需要做的处理。

MoveTo intX + 5, intY + 5
Delay 900
LeftClick 1
Delay 900
MoveTo Ux+90, Uy+300
End If

Goto 窗口一
	
End Sub

Sub 清除异常窗口

Delay 1000