; DWX Ver. 1.40 Active Sensor Cones Radiation Fix Doctrine
; final version

var KONUSACTIVE
var KONUSRADAR

IF NOT INIT THEN {
If TgtSource $= "Active Intercept" Then {
IF TgtType $= "Torp" Then { KONUSACTIVE = 20 } Endif
IF ( TgtType $= "Torp" ) AND ( TgtMissileClass "SSM" ) Then { KONUSACTIVE = 30 } Endif
IF ( TgtType $= "Torp" ) AND ( TargetName $= "MK 48 ADCAP Torpedo U" )
OR ( TargetName $= "Mk 48 ADCAP Torpedo" )
OR ( TargetName $= "Mk 48 ADCAP Torp U" ) Then { KONUSACTIVE = 100 } Endif
IF ( ( TgtType $= "Ship" ) OR ( TgtType $= "Sub" ) ) Then { KONUSACTIVE = 150 } Endif
IF ( ( TgtType $= "Helo" ) OR ( TgtType $= "Sonobuoy" ) ) Then { KONUSACTIVE = 180 } Endif
IF ( TgtType $= "Mine" ) AND ( TargetName $= "UUV" ) Then { KONUSACTIVE = 45 } Endif
IF ( TgtClass $= "Sub" ) AND ( TargetName $= "Mobile Decoy" ) Then { KONUSACTIVE = 60 } Endif
IF ( ABS RelativeBearing TgtCrs ( TgtBrg + 180 MOD 360 ) > KONUSACTIVE ) THEN {
	DROP
} ENDIF
} ENDIF

IF TgtSource $= "ESM" then {
IF ( ( TgtType $= "Plane" ) OR ( TgtType $= "Helo" ) ) THEN { KONUSRADAR = 180 } ENDIF
IF ( ( TgtType $= "Plane" ) OR ( TgtType $= "Helo" ) ) AND TgtMissileClass "AAM" THEN { KONUSRADAR = 60 } ENDIF
IF ( ( TgtType $= "Plane" ) OR ( TgtType $= "Helo" ) ) AND TgtMissileClass "ASM" THEN { KONUSRADAR = 80 } ENDIF
IF ( ( TgtType $= "Plane" ) OR ( TgtType $= "Helo" ) ) AND TgtMissileClass "SSM" THEN { KONUSRADAR = 90 } ENDIF
IF ( ( TgtType $= "Ship" ) OR ( TgtType $= "Sub" ) ) Then { KONUSRADAR = 180 } Endif
IF ( TgtClass $= "Missile" ) Then { KONUSRADAR = 20 } Endif
IF ( TgtClass $= "Missile" ) AND ( TargetName $= "Harpoon UGM" )
OR ( TargetName $= "TASM UGM-109B" )
OR ( TargetName $= "AS-4 Kitchen ASM" )
OR ( TargetName $= "AS-6 Kingfish ASM" )
OR ( TargetName $= "C 611 ASM" )
OR ( TargetName $= "SS-N-14 Silex [User]" )
OR ( TargetName $= "Harpoon User" )
OR ( TargetName $= "Exocet UGM User" )
OR ( TargetName $= "ASURA SSM" )
OR ( TargetName $= "C 802 UGM User" )
OR ( TargetName $= "C 602 SSM" )
OR ( TargetName $= "AIR Harpoon User" ) Then { KONUSRADAR = 40 } Endif
IF ( TgtClass $= "Missile" ) AND ( TargetName $= "SS-N-27 Sizzler SSM" )
OR ( TargetName $= "3M-54E1 Club ASCM" ) Then { KONUSRADAR = 30 } Endif
IF ( TgtClass $= "Missile" ) AND ( TargetName $= "SS-N-19 Shipwreck SSM" )
OR ( TargetName $= "SS-N-19 Shipwreck UGM" )
OR ( TargetName $= "SS-N-19 Shipwreck UGM AI" )
OR ( TargetName $= "SS-N-19 Nuklear UGM" ) Then { KONUSRADAR = 45 } Endif
IF ( TgtClass $= "Missile" ) AND ( TargetName $= "SM-1 MR" ) Then { KONUSRADAR = 5 } Endif
IF ( TgtClass $= "LAND" ) Then { KONUSRADAR = 180 } Endif
IF ( ( TgtClass $= "LAND" ) AND ( TargetName $= "Pechora LPAR" ) ) Then { KONUSRADAR = 50 } Endif
IF ( TgtType $= "Float" ) Then { KONUSRADAR = 0.001 } Endif
IF ( ABS RelativeBearing TgtCrs ( TgtBrg + 180 MOD 360 ) > KONUSRADAR ) THEN {
	DROP
} ENDIF
} ENDIF
} ENDIF
