If DateDiff("s",T找怪2,now)>6
                        T找怪3=now
                        Goto 查找是否战斗2
                    End If             
                    Delay yc+ 200
                    Goto 找怪2
                End If//找怪2
            Else  //查找是否战斗2 
                If DateDiff("s",T查找是否战斗2,now)>6
                    T查找是否战斗2=now
                    Goto 抓怪2
                End If                
                Delay yc+ 200
                Goto 查找是否战斗2                   
            End If//查找是否战斗2
            Delay 200 
            GOTO 抓怪2            
        End If//走想第1个点




   
    ElseIf ditu="轮回" then    
        //   MessageBox "死亡//没写"
        KeyPress "F10", 1
        Delay yc+ 6000
    ElseIf ditu="济世堂" then  
        Call 修正偏移(531,401)
        Delay yc+ 1000
    ElseIf ditu="长安武器店" then  
        Call 修正偏移(391,388)
        Delay yc+ 1000
    ElseIf ditu="张记布庄" then  
        Call 修正偏移(749,380)
        Delay yc+ 1000
    Else //识别地图//未知地图
        KeyPress "F10", 1
        Delay yc+ 6000
    End if//识别地图

    Goto 接任务1

End Sub

//去布店买装备
Sub 去布店买装备()

    Rem 接任务1
    Delay yc+ 500
    Call 识别地图
    If DITU="瑶池" Then //识别地图瑶池111111111111111111111111111111111
        call 瑶池去长安 
    ElseIf DITU="长安" Then //识别地图长安22222222222222222222222222222222222222
        
        t找坐标仙子 =now
        rem 找坐标仙子
        Call 识别地图
        If x=556 and y=248 then//核对坐标556,248   AAA
        Else //核对坐标556,248    AAA
            Call 写坐标(556,248)
            Delay yc+ 200
            Goto 找坐标1仙子
        End if//核对坐标556,248   4AAA
   
        rem 找坐标1仙子
        Call 识别地图
        If x=556 and y=248 then//核对坐标556,248   BBBB
        Else //核对坐标556,248   BBBB
            If DateDiff("s",t找坐标仙子,now)>11  Then 
                t找坐标仙子=now
                Call 写坐标(556,248)
                Goto 找坐标1仙子
            End if  
            Delay yc+ 200
            Goto 找坐标1仙子
        End if//核对坐标556,248   BBBB
   
        Call 修正偏移(190,92)
        Delay yc+ 3000
        Call 识别地图

        
        t点传送=now
        Rem 点传送
        If ditu="张记布庄"Then//进入游戏
            Delay yc+ 1000
            goto 接任务1
        Else  
            If DateDiff("s",t点传送,now)>11  Then
                t点传送=now 
                Call 修正偏移(549,104)
                goto 找坐标仙子
            End If 
            Delay yc+ 200
            goto 点传送   
        End if