//去武器店买武器
Sub 去武器店买武器()
    Rem 接任务1
    Delay yc+ 500
    Call 识别地图
    
  
    If DITU="瑶池" Then //识别地图瑶池111111111111111111111111111111111
        call 瑶池去长安 
    ElseIf DITU="长安" then //地图等于长安
    
    
        if Sqr(abs(x-197)*abs(x-197)+abs(y-55)*abs(y-55))<Sqr(abs(x-480)*abs(x-480)+abs(y-275)*abs(y-275))
           
            ///////查找离那个近
            Rem 到长安第一楼去
            Call 识别地图
            If x=197 and y=55 then//核对坐标256,22AAA
                Call 修正偏移(549,104)
                Delay yc+ 3000
            Else //核对坐标256,22AAA
                Call 写坐标(197,55)
                Delay yc+ 4000   
                Goto 到长安第一楼去
            End if//核对坐标256,22AAA

        Else///////查找离那个近
         
            Rem 到长安东市去
            Call 识别地图
            If x=480 and y=275 then//核对坐标256,22AAA
                Goto 走到点
            Else //核对坐标256,22AAA
                Call 写坐标(480,275)
                Delay yc+ 4000  
                Goto 到长安东市去
            End if//核对坐标256,22AAA
        End If///////查找离那个近  
    
        Rem 走到点
        If x=480 and y=275 then//核对坐标480,275AAA
            Call 修正偏移(663,235)
            Delay yc+ 500 
            T长安第一楼=now
            Rem 长安第一楼
            dm_ret = dm.FindStr(0,0,800,627,"长安","08f448-000000",1.0,intX,intY)
            If intX > 0 And intY > 0 Then//进入长安第一楼
                Call 修正偏移(intX,intY +9)
                Delay yc+ 3000
                t到长安第一楼=now
                Rem 到长安第一楼
                Call 识别地图
                If x=256 and y=22 then//核对坐标256,22AAA
                    Rem 去长安
                    goto 到长安第一楼去 
                Else 
                    If DateDiff("s",t到长安第一楼,now)>11  Then 
                        t到长安第一楼=now
                        Goto 长安第一楼
                    End if               
                    Delay yc+ 200
                    Goto到长安第一楼 
                End If//核对坐标256,22AAA  
            Else//进入长安第一楼
                If DateDiff("s",T长安第一楼,now)>11  Then 
                    长安第一楼=now
                    Goto 走到点
                End if  
                Delay yc+ 200
                Goto 长安第一楼
            End If //进入长安第一楼 
        Else//核对坐标480,275AAA   
        End if//核对坐标480,275AAA 
        


    ElseIf DITU="傲来" Then //识别地图傲来33333333333333333333333333333333333333
        call 傲来去长安
    ElseIf DITU="大唐东" Then //识别地图大唐东44444444444444444444444444444
        call 大唐东去长安
    ElseIf DITU="大唐南" Then //识别地图大唐南55555555555555555555555555

        call 大唐南去长安 
    ElseIf DITU="阳关" Then //识别地图阳关、阳关66666666666666666666666666666
        call 阳关去长安
    ElseIf ditu="轮回" then    
        //   MessageBox "死亡//没写"
        KeyPress "F10", 1
        Delay yc+ 6000 
    ElseIf ditu="济世堂" then  
        Call 修正偏移(531,401)
        Delay yc+ 1000 
    ElseIf ditu="长安武器店" then 
        T找NPC=now
        rem 找武器店NPC   
        FindPic 0,0,807,621,"C:\XYW\n武器店.bmp",0.9,intX,intY
        If intX >0 and intY>0 then//找武器店NPC
            Call 修正偏移(intX,intY)
            T点NPC = now
            Rem T点NPC