UX=CInt(MyArray(0))-4:UY=CInt(MyArray(1))-30
        If 任务="戒指" and i=0 Then
            UX=CInt(MyArray(0))-4+26
        End If
        If CInt(MyArray(0)) > 0 And CInt(MyArray(1)) > 0 Then
            Call 右键单击()
            If i=0 Then
                Call 清窗()
                Call 万流归宗()
                Call 搜索()
                Call 师门任务()
                i=1
                Goto 判断4
            End If
            Call Plugin.bgkms3_02.KeyPress(KMData, "X")
            Delay 1000
            Call 接受()
        Else
            Goto 判断4
        End If
    Else
        Goto 判断3
    End If
    Call 清窗()
    任务="":i=0
    Goto 接任务
End Sub
Sub 调整窗口大小()
    MoveTo 1029, 207
    Delay 50
    LeftDown 1
    Delay 50
    MoveTo 1030, 207
    Delay 50
    LeftUp 1
    Delay 50
    MoveTo 168, 791
    Delay 50
    LeftDown 1
    Delay 50
    MoveTo 168, 792
    Delay 50
    LeftUp 1
    Delay 50
End Sub
Sub 邮件短信(提示)
    //短信提示必须开通139油箱,且需要开启短信通知功能(免费功能,非飞信)
    返回值 = lib.网络.发送邮件("账号@139.com","密码","账号@139.com","倩女幽魂-师门任务脚本提示!",提示,"")
    If 返回值 = True Then
        Call Plugin.File.WriteFileEx("C:\Log.txt", "短信发送成功!--时间:"&NOW)
    Else
        Call Plugin.File.WriteFileEx("C:\Log.txt", "短信发送失败!--时间:"&NOW)
    End If
End Sub