If intX > 0 And intY > 0 Then 
			MoveTo intX, intY
			Delay 200 //  延时
			LeftClick 1
		End If
		
    End If
End Sub
//定义一个过程,可以在脚本中调用这个过程

Sub 右上角关闭()
    //我是一个过程,被你调用了
    Delay 2000
    FindPic 0,0,1366,768,"Attachment:\关闭丝绸之路.bmp",0.9,intX,intY
	If intX > 0 And intY > 0 Then 
		MoveTo intX+5, intY+5
		Delay 200 //  延时
		LeftClick 1
    End If
End Sub
//定义一个过程,可以在脚本中调用这个过程



MessageBox "脚本运行完毕"