If intX > 0 And intY > 0 Then
    Call Plugin.Bkgnd.MoveTo(win, intX + 8, intY + 4)
    Delay 1000
    Call Plugin.Bkgnd.LeftClick(win,intX + 8, intY + 4)
    Else 
    Goto 开始 
End If
Goto 开始