return_num=return_num+1
            t_return=timer
        EndIf 
    Return 自动归位
    Sub 出错原登
        Rem 判断是否跳出系统设置
        KeyPress 27,1
        Delay 2000
        VBSCall esc_1=GetPixelColor(354-move_x,443-move_y)
        VBSCall esc_2=GetPixelColor(454-move_x,496-move_y)
        If esc_1=esc_2
            MoveTo 518-move_x,487-move_y
            Delay 100
            LeftClick 1
            Delay 1000
            MoveTo 358-move_x,352-move_y
            Delay 100
            LeftClick 1
            Delay 10000
        Else 
            Delay 500
            Goto 判断是否跳出系统设置
        EndIf 
        Rem 等待回到人物选择界面
        VBSCall denglu_1=GetPixelColor(147-move_x,599-move_y)
        VBSCall denglu_2=GetPixelColor(190-move_x,600-move_y)
        If denglu_1=denglu_2 and denglu_1="FFFFFF"
            If err_denglu=1
                MoveTo 243-move_x,378-move_y
                Delay 100
                LeftClick 1
                Delay 3000
                KeyPress 13,1
            ElseIf err_denglu=2
                MoveTo 355-move_x,378-move_y
                Delay 100
                LeftClick 1
                Delay 3000
                KeyPress 13,1
            ElseIf err_denglu=3
                MoveTo 465-move_x,376-move_y
                Delay 100
                LeftClick 1
                Delay 3000
                KeyPress 13,1
            ElseIf err_denglu=4
                MoveTo 702-move_x,437-move_y
                Delay 100
                LeftClick 1
                Delay 3000
                KeyPress 13,1
            EndIf 
            Delay 10000
            Rem 判断是否进入游戏
            VBSCall FindCenterColor(684-move_x,63-move_y,777-move_x,141-move_y,color,gwblue_x,gwblue_y)
            If gwblue_x>0
                t_return_err=timer
                Goto 总起始
            Else 
                Delay 1000
                KeyPress 13,1
                Goto 判断是否进入游戏
            EndIf 
        Else 
            Delay 1000
            Goto 等待回到人物选择界面
        EndIf 
    Return 出错原登
    Sub 记录log
        //得到现在的时间
        nowtime=now
        //追加的方式写文本
        //VBSCall MessageBox(todaytime&"~"&nowtime&"您打怪的数量为"&i)
        VBS set file=CreateObject("Scripting.FileSystemObject")
        VBS set mylog=file.createtextfile(url_game&"\凤舞精灵配置文件夹\log.txt")
        VBS set mylog=file.opentextfile(url_game&"\凤舞精灵配置文件夹\log.txt",forappending)
        VBS mylog.writeline(todaytime&"~"&nowtime&"    您打怪的数量为"&guai_dd)
        VBS mylog.writeline("一共归位了"&return_num&"次")
        VBS mylog.writeline("死亡时间为"&die_time)
        VBS mylog.writeline("摆摊时间为"&die_time)
        VBS mylog.Close
    Return 记录log
    Sub 死亡后回城摆摊
        VBSCall sile_color_3=GetPixelColor(393-move_x,373-move_y)
        VBSCall sile_color_4=GetPixelColor(388-move_x,253-move_y)
        If sile_color_3=sile_color_4 and sile_color_3="FFFFFF"
            //死亡时间
            die_time=now
            Gosub 记录log
            Delay 3000
            Rem 回到城市
            MoveTo 393-move_x,373-move_y
            Delay 300
            LeftClick 1
            Delay 15000
            VBSCall cname=GetPixelColor(742-move_x,34-move_y)
            If cname=color_lvse
                Delay 1000
                Rem 摆摊时打开包裹
                KeyPress 66 1