112 lines
3.3 KiB
Plaintext
112 lines
3.3 KiB
Plaintext
|
# ****************************************************************************
|
||
|
|
# CUI
|
||
|
|
#
|
||
|
|
# The Advanced Framework for Simulation, Integration, and Modeling (AFSIM)
|
||
|
|
#
|
||
|
|
# The use, dissemination or disclosure of data in this file is subject to
|
||
|
|
# limitation or restriction. See accompanying README and LICENSE for details.
|
||
|
|
# ****************************************************************************
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
behavior radar-control
|
||
|
|
|
||
|
|
script_debug_writes off
|
||
|
|
|
||
|
|
script_variables
|
||
|
|
bool mTurnOnFiringRadarInRange = false;
|
||
|
|
string mFiringRadarName = "radar"; // replace with sensor name on platform
|
||
|
|
double mFiringRadarRange = 1852 * 50; // 50 nautical miles (units: meters)
|
||
|
|
bool mTurnOnFiringRadarIfRWR = true;
|
||
|
|
end_script_variables
|
||
|
|
|
||
|
|
|
||
|
|
precondition
|
||
|
|
writeln_d("precondition radar-control");
|
||
|
|
if (!PROCESSOR.IsA_TypeOf("WSF_QUANTUM_TASKER_PROCESSOR"))
|
||
|
|
{
|
||
|
|
return Failure("behavior not attached to a quantum tasker processor!");
|
||
|
|
}
|
||
|
|
|
||
|
|
WsfTaskList tasks = ((WsfQuantumTaskerProcessor)PROCESSOR).TasksReceivedOfType("weapon");
|
||
|
|
if ((mTurnOnFiringRadarInRange && tasks.Count()>0) || mTurnOnFiringRadarIfRWR)
|
||
|
|
{
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
return false;
|
||
|
|
end_precondition
|
||
|
|
|
||
|
|
|
||
|
|
script bool RWR_ShowsBeingTracked()
|
||
|
|
for (int i=0; i < PLATFORM.SensorCount(); i=i+1)
|
||
|
|
{
|
||
|
|
WsfSensor sensor = PLATFORM.SensorEntry(i);
|
||
|
|
if (sensor.IsA_TypeOf("WSF_ESM_SENSOR"))
|
||
|
|
{
|
||
|
|
foreach (WsfLocalTrack t in PLATFORM.MasterTrackList())
|
||
|
|
{
|
||
|
|
if (t.ContributorOf(PLATFORM, sensor))
|
||
|
|
{
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return false;
|
||
|
|
end_script
|
||
|
|
|
||
|
|
|
||
|
|
execute
|
||
|
|
writeln_d(PLATFORM.Name(), " executing radar-control, T=", TIME_NOW);
|
||
|
|
|
||
|
|
WsfTaskList tasks = ((WsfQuantumTaskerProcessor)PROCESSOR).TasksReceivedOfType("weapon");
|
||
|
|
#WsfTrack curTarget = ((WsfRIPRProcessor)PROCESSOR).GetTarget();
|
||
|
|
WsfTrack curTarget;
|
||
|
|
|
||
|
|
bool turnOnFiringRadar = false;
|
||
|
|
//turn on firing radar if in range
|
||
|
|
if (mTurnOnFiringRadarInRange && tasks.Count()>0)
|
||
|
|
{
|
||
|
|
foreach(WsfTask task in tasks)
|
||
|
|
{
|
||
|
|
curTarget = PLATFORM.MasterTrackList().Find(task.LocalTrackId());
|
||
|
|
if (curTarget.IsValid())
|
||
|
|
{
|
||
|
|
if (PLATFORM.SlantRangeTo(curTarget) < mFiringRadarRange)
|
||
|
|
{
|
||
|
|
turnOnFiringRadar = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
//turn on firing radar if being tracked
|
||
|
|
if (mTurnOnFiringRadarIfRWR && !turnOnFiringRadar)
|
||
|
|
{
|
||
|
|
turnOnFiringRadar = RWR_ShowsBeingTracked();
|
||
|
|
}
|
||
|
|
|
||
|
|
if (turnOnFiringRadar)
|
||
|
|
{
|
||
|
|
//make sure radar is on
|
||
|
|
WsfSensor firingRadar = PLATFORM.Sensor(mFiringRadarName);
|
||
|
|
if (firingRadar.IsValid())
|
||
|
|
{
|
||
|
|
if (!firingRadar.IsTurnedOn())
|
||
|
|
{
|
||
|
|
firingRadar.TurnOn();
|
||
|
|
writeln_d(PLATFORM.Name(), " turned on active radar ", mFiringRadarName);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
writeln_d("radar already turned on");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
end_execute
|
||
|
|
|
||
|
|
end_behavior
|
||
|
|
|