; Non Passive Acoustics Ships Doctrine, Self-defense.  DWX ver. 1.41

var TowedAcousticsIdx
var CMTimer
var TowedCounter
var TypeShip

TowedAcousticsIdx = DBIdxFromRecNum 1413

IF ( NEWTRACK ) THEN {

	IF ( TgtSource $= "Visual" ) AND ( TgtAlt <= -1 ) THEN {
		SETTACTIC "AirAtkSub"
	} ENDIF

	IF ( TgtClass $= "MISSILE" ) OR ( TgtClass $= "AIR" ) THEN {
		SETTACTIC "CIWS_CADS_Attack"
	} ENDIF
 
	IF ( TgtSource $= "RADAR" ) AND ( TgtID $= "Hostile" ) THEN {
		SETTACTIC "CIWS_CADS_Attack"
	} ENDIF
	
	IF ( ( TgtClass $= "WEAP" ) AND NOT ( TgtType $= "Sonobuoy" ) AND NOT ( TgtType $= "Mine" ) ) THEN {
		SETTACTIC "SurfEvadeWeap"
	} ENDIF

	IF ( ( TgtClass $= "WEAP" ) AND ( TgtType $= "Sonobuoy" ) AND ( TgtID $= "HOSTILE" ) ) THEN {
		SETTACTIC "SurfEvadeSono"
	} ENDIF

	IF ( TgtType $= "MINE" ) THEN {
		If ABS TgtAOB <= 10 Then {
			SETPRIORITY 252
			SETPERSIST 180
			SteerEvasive
		} ENDIF
	} ENDIF
IF ( TgtClass $= "SUB" ) AND NOT ( TgtType $= "BIOLOGIC" ) THEN {
	If ( ( TypeShip == 1 ) OR ( TypeShip == 3 ) ) Then {
		SETTACTIC "SurfAtkSubPLO"
} ELSEIF TypeShip == 2 THEN {
		TowedCounter += 1
		CountermeasureIdx TowedAcousticsIdx
		AttackBest
} endif
	} ENDIF
} ENDIF

IF ( AUTOSURFIDAIR ) THEN {
	IF ( TgtID $= "UPD" ) AND ( TgtSilos < -500 ) THEN {
		IDENTIFY "UAE"
	} ENDIF
} ENDIF
