Delay 300
                LeftClick 1
            End If
        End If
    	
        If p > 20 Then
            FindPic 0,0,Ux,Uy,"Attachment:\Msn定位目标用.bmp",0.8,intX3,intY3
            If intX3 > 0 And intY3 > 0 Then 			
                MoveTo intX3 + 510, intY3 - 186
                Delay 300
                LeftClick 1
            End If	
        End If
        If p = 40 Then 
            Goto pp
        End If
        p = p + 1 - 1
    Next


End Sub

Sub 结束()
    //MessageBox "输入错误 脚本停止运行"
    EndScript
End Sub