MoveTo intx,inty
            Delay 30
            LeftClick 1
            Delay 30
            Call 技能()
        End If
 
      
    End if
    Delay 500  
    Call 优先打近身怪()
   
End Sub


 
Sub 捡物品()
    Delay 30
    
    
    FindCenterColor zcw-350,zch-350,zcw+350,zch+350,"F89400",injw,intjh
    If injw > 0 And intjh > 0 Then
        MoveTo injw,intjh
        Delay 500
        LeftClick 1
        Delay 300
    Else
        FindCenterColor zcw-350,zch-350,zcw+350,zch+350,"30FC30",injw,intjh
        If injw > 0 And intjh > 0 Then
            MoveTo injw,intjh
            Delay 500
            LeftClick 1
            Delay 300
        
        Else
            FindCenterColor zcw-350,zch-350,zcw+350,zch+350,"F8CC30",injw,intjh
            If injw > 0 And intjh > 0 Then
                MoveTo injw,intjh
                Delay 500
                LeftClick 1
                Delay 300
            
            Else
                FindCenterColor zcw-350,zch-350,zcw+350,zch+350,"F8FCF8",injw,intjh
                If injw > 0 And intjh > 0 Then
                    MoveTo injw,intjh
                    Delay 500
                    LeftClick 1
                    Delay 300
                    Call 优先打近身怪()
                End If
            End If 
        End If
    End If
    Delay 500  
    Call 优先打近身怪()

End Sub


    





Sub 加红蓝()
    // 检测是否有红蓝
    Delay 30

    
    IfColor 494+w1,777+h1,"000000",0 Then
    
        Delay 100
      
        moveto 515+w1,476+h1
        Delay 100
        LeftClick 1
      
        Delay 30
        Call 买红蓝()
    Else 

        IfColor 544+w1,777+h1,"000000",0 Then
            Delay 100    
            moveto 515+w1,476+h1
            Delay 100
            LeftClick 1
      
            Delay 30
            Call 买红蓝()
        Else
        
            //是否挂机加血
            If gjzs= 1 then
                Delay 30
                Call 挂机加血()
            End if
        
        End if