Call 识别地图
        If x=504 and y=279 then//查看坐标1111111111111111111111111111111111111
            Delay yc+ 200 
        Else //查看坐标111111111111111111111111111111111111111111111111111111 
            If DateDiff("s",T查看坐标,now) >10  Then
                T查看坐标=now 
                dm_ret = dm.FindStr(172,333,474,414,"1","08f448-000000",0.9,intX,intY)
                If intX>0 and intY>0 then//点1
                    Goto 点1
                Else
                    Delay 200
                    Goto 查看坐标
                End if
                Call 去找小
            End If 
            Delay yc+ 200
            goto 查看坐标
        End if//查看坐标  111111111111111111111111111111111111      
        
        
        
        t点1=now
        Rem 点1
        dm_ret = dm.FindStr(172,333,474,414,"1","08f448-000000",0.9,intX,intY)
        If intX>0 and intY>0 then//点133333333333333333333333333333
            Call 修正偏移(intX+5,intY+9)
            Delay yc+ 600
            dm_ret = dm.FindStr(172,333,474,414,"1","08f448-000000",0.9,intX,intY)
            If intX>0 and intY>0 then//在次查看 点144444444444444444444
                Goto 点1
            Else //在次查看 点1444444444444444444444444444444
                T找流氓=now
                Rem 找流氓
                Call 打开任务
                dm_ret = dm.FindStr(0,0,807,621,"55","f80000-000000",0.9,intX,intY)
                If intX>0 and intY>0 then//找流氓
                    Call 修正偏移(intX,intY+7)
                    T战斗=NOW
                    Rem 战斗
                    FindPic 0,0,807,621,"C:\XYW\战斗标识.bmp",0.9,intX,intY
                    If intX > 0 And intY > 0 Then//战斗
                        Delay yc+ 2000
                        Call 关闭任务
                        rem 自动
                        FindPic 0,0,807,621,"C:\XYW\自动.bmp",0.9,intX,intY//自动
                        If intX > 0 And intY > 0 Then//自动  
                        Else 
                            Rem 战斗条
                            FindPic 0,0,807,621,"C:\XYW\战斗条.bmp",0.9,intX,intY
                            If intX > 0 And intY > 0 Then//战斗条
                                Call 按F1
                            
                                Delay yc+ 200
                                KeyDown 18, 1
                                KeyPress 56, 1
                                KeyUp 18, 1
                                Delay yc+ 200
                            Else //战斗条
                                Delay yc+ 200
                                Goto 战斗条
                            End if//战斗条

                        End If//自动
                   
                        FindPic 0,0,807,621,"C:\XYW\战斗标识.bmp",0.9,intX,intY
                        If intX > 0 And intY > 0 Then//等待战斗结束
                            Delay yc+ 200
                            Goto 自动
                        Else 
                            Delay yc+ 2000
                            Call 识别任务
                        End If //等待战斗结束
                    Else    //战斗
                        If DateDiff("s",T战斗,now) >6  Then
                            T战斗=NOW 
                            Goto 找流氓
                        End If
                        Delay yc+ 200
                        Goto 战斗
                    end if    //战斗
                Else//找流氓
                    If DateDiff("s",T找流氓,now) >6 Then
                        T找流氓=now
                        Goto  找流氓             
                    End If 
                    Delay yc+ 200
                    Goto  找流氓       
                End If //找流氓
            end if  //在次查看 点144444444444444444444444
        Else //点13333333333333333333333333333333333
            If DateDiff("s",t点1,now) >30  Then
                t点1=now 
                dm_ret = dm.FindStr(172,333,474,414,"1","08f448-000000",0.9,intX,intY)
                If intX>0 and intY>0 then//点1
                Else
                    Delay 200
                    Goto 找坐标
                End if
            End If 
            Delay yc+ 200