; Biologic objects doctrine for RA 1.41
;
; More than 6 nmi: not respond
; Between 3-6 nmi: simply evade 
; Less than 3 nmi: extremely jump to surface
 
var Timer
var Jump

If INIT THEN {
} ELSE {
IF NEWTRACK THEN {
	IF TgtSource $= "Active Intercept" THEN {
		IF ( ( TgtRng >= 5556 ) AND ( TgtRng <= 11112 ) ) THEN {
			IF Time > Timer THEN { 
				Timer = ( 300 + RND 900 )
				SetPersist Timer
				SetPriority 255
				SteerAway
				IF OwnSpd < 9.9 THEN {
					SetSpd ( 15 + RND 10 )
					Timer += Time
					Drop
				} ENDIF
			} ENDIF	
		} ELSEIF TgtRng > 11112 Then {
		} ELSE {
			Jump = 1
			Timer = ( Time + 360 + RND 360 )
			SetPersist Timer
			SetSpd MaxSpd
			SetPriority 250
			SetPersist Timer
			SetPitch 60
			Drop
		} ENDIF
	} ENDIF
} ENDIF
} ENDIF
If Jump THEN {
	If Time < Timer Then {
		SteerEvasive
	} ELSE {
		Jump = 0
		Timer = 0
		SetPriority 254
		SetPersist 3
		SetPitch 0
	} ENDIF
} ENDIF
