summaryrefslogtreecommitdiffhomepage
path: root/Stars45/Sensor.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'Stars45/Sensor.cpp')
-rw-r--r--Stars45/Sensor.cpp1724
1 files changed, 874 insertions, 850 deletions
diff --git a/Stars45/Sensor.cpp b/Stars45/Sensor.cpp
index 6c3d1cc..165d80c 100644
--- a/Stars45/Sensor.cpp
+++ b/Stars45/Sensor.cpp
@@ -1,850 +1,874 @@
-/* Project Starshatter 5.0
- Destroyer Studios LLC
- Copyright © 1997-2007. All Rights Reserved.
-
- SUBSYSTEM: Stars.exe
- FILE: Sensor.cpp
- AUTHOR: John DiCamillo
-
-
- OVERVIEW
- ========
- Integrated (Passive and Active) Sensor Package class implementation
-*/
-
-#include "MemDebug.h"
-#include "Sensor.h"
-#include "Contact.h"
-#include "Element.h"
-#include "Ship.h"
-#include "ShipDesign.h"
-#include "Shot.h"
-#include "Drone.h"
-#include "WeaponDesign.h"
-#include "Sim.h"
-#include "CombatGroup.h"
-#include "CombatUnit.h"
-
-#include "Game.h"
-
-// +----------------------------------------------------------------------+
-
-const double SENSOR_THRESHOLD = 0.25;
-
-// +----------------------------------------------------------------------+
-
-Sensor::Sensor()
-: System(SENSOR, 1, "Dual Sensor Pkg", 1, 10, 10, 10),
-mode(STD), target(0),
-nsettings(0), range_index(0)
-{
- name = Game::GetText("sys.sensor");
- abrv = Game::GetText("sys.sensor.abrv");
-
- SetMode(mode);
- power_flags = POWER_WATTS;
-
- ZeroMemory(range_settings, sizeof(range_settings));
-}
-
-// +----------------------------------------------------------------------+
-
-Sensor::Sensor(const Sensor& s)
-: System(s), mode(STD), target(0),
-nsettings(s.nsettings), range_index(0)
-{
- Mount(s);
-
- SetMode(mode);
- power_flags = POWER_WATTS;
-
- CopyMemory(range_settings, s.range_settings, sizeof(range_settings));
-
- if (nsettings)
- range_index = nsettings-1;
-}
-
-// +--------------------------------------------------------------------+
-
-Sensor::~Sensor()
-{
- ClearAllContacts();
-}
-
-// +--------------------------------------------------------------------+
-
-void
-Sensor::ClearAllContacts()
-{
- contacts.destroy();
-}
-
-// +--------------------------------------------------------------------+
-
-double
-Sensor::GetBeamLimit() const
-{
- if (mode == ACM)
- return 15*DEGREES;
-
- if (mode <= GM)
- return 45*DEGREES;
-
- return 175*DEGREES;
-}
-
-double
-Sensor::GetBeamRange() const
-{
- return (double) range_settings[range_index];
-}
-
-void
-Sensor::IncreaseRange()
-{
- if (range_index < nsettings-1)
- range_index++;
- else
- range_index = nsettings-1;
-}
-
-void
-Sensor::DecreaseRange()
-{
- if (range_index > 0)
- range_index--;
- else
- range_index = 0;
-}
-
-void
-Sensor::AddRange(double r)
-{
- if (nsettings < 8)
- range_settings[nsettings++] = (float) r;
-
- range_index = nsettings-1;
-}
-
-void
-Sensor::SetMode(Mode m)
-{
- if (mode != m) {
- // dump the contact list when changing in/out of GM:
- if (mode == GM || m == GM)
- ClearAllContacts();
-
- // dump the current target on mode changes:
- if (m <= GM) {
- if (ship)
- ship->DropTarget();
-
- Ignore(target);
- target = 0;
- }
- }
-
- mode = m;
-}
-
-// +----------------------------------------------------------------------+
-
-bool
-Sensor::Update(SimObject* obj)
-{
- if (obj == target) {
- target = 0;
- }
-
- return SimObserver::Update(obj);
-}
-
-const char*
-Sensor::GetObserverName() const
-{
- return "Sensor";
-}
-
-// +--------------------------------------------------------------------+
-
-void
-Sensor::ExecFrame(double seconds)
-{
- if (Game::Paused())
- return;
-
- System::ExecFrame(seconds);
-
- if (!IsPowerOn() || energy <= 0) {
- ClearAllContacts();
- return;
- }
-
- if (ship && ship->GetAIMode() < 2) {
- // just pretend to work this frame:
- energy = 0.0f;
- return;
- }
-
- if (ship && ship->GetRegion()) {
- const Camera* cam = &ship->Cam();
- double az1 = -45*DEGREES;
- double az2 = 45*DEGREES;
-
- if (mode > GM) {
- az1 = -175*DEGREES;
- az2 = 175*DEGREES;
- }
-
- ListIter<Ship> ship_iter(ship->GetRegion()->Ships());
- while (++ship_iter) {
- Ship* c_ship = ship_iter.value();
-
- if (c_ship != ship) {
- ProcessContact(c_ship, az1, az2);
- }
- else {
- Contact* c = FindContact(c_ship);
-
- if (!c) {
- c = new(__FILE__,__LINE__) Contact(c_ship, 0.0f, 0.0f);
- contacts.append(c);
- }
-
- // update track:
- if (c) {
- c->loc = c_ship->Location();
- c->d_pas = 2.0f;
- c->d_act = 2.0f;
-
- c->UpdateTrack();
- }
- }
- }
-
- ListIter<Shot> threat_iter(ship->GetThreatList());
- while (++threat_iter) {
- ProcessContact(threat_iter.value(), az1, az2);
- }
-
- ListIter<Drone> drone_iter(ship->GetRegion()->Drones());
- while (++drone_iter) {
- ProcessContact(drone_iter.value(), az1, az2);
- }
-
- List<Contact>& track_list = ship->GetRegion()->TrackList(ship->GetIFF());
- ListIter<Contact> c_iter(contacts);
-
- while (++c_iter) {
- Contact* contact = c_iter.value();
- Ship* c_ship = contact->GetShip();
- Shot* c_shot = contact->GetShot();
- double c_life = -1;
-
- if (c_ship) {
- c_life = c_ship->Life();
-
- // look for quantum jumps and orbit transitions:
- if (c_ship->GetRegion() != ship->GetRegion())
- c_life = 0;
- }
-
- else if (c_shot) {
- c_life = c_shot->Life();
- }
-
- else {
- c_life = 0;
- }
-
- if (contact->Age() < 0 || c_life == 0) {
- delete c_iter.removeItem();
- }
-
- else if (ship && ship->GetIFF() >= 0 && ship->GetIFF() < 5) {
- // update shared track database:
- Contact* t = track_list.find(contact);
-
- if (c_ship) {
- if (!t) {
- Contact* track = new(__FILE__,__LINE__) Contact(c_ship, contact->d_pas, contact->d_act);
- track->loc = c_ship->Location();
- track_list.append(track);
- }
-
- else {
- t->loc = c_ship->Location();
- t->Merge(contact);
- t->UpdateTrack();
- }
- }
-
- else if (c_shot) {
- if (!t) {
- Contact* track = new(__FILE__,__LINE__) Contact(c_shot, contact->d_pas, contact->d_act);
- track->loc = c_shot->Location();
- track_list.append(track);
- }
-
- else {
- t->loc = c_shot->Location();
- t->Merge(contact);
- t->UpdateTrack();
- }
- }
- }
- }
-
-
- if (mode == ACM) {
- if (!ship->GetTarget())
- ship->LockTarget(SimObject::SIM_SHIP, true, true);
- }
- }
-
- energy = 0.0f;
-}
-
-// +--------------------------------------------------------------------+
-
-void
-Sensor::ProcessContact(Ship* c_ship, double az1, double az2)
-{
- if (c_ship->IsNetObserver())
- return;
-
- double sensor_range = GetBeamRange();
-
- // translate:
- const Camera* cam = &ship->Cam();
- Point targ_pt = c_ship->Location() - ship->Location();
-
- // rotate:
- double tx = targ_pt * cam->vrt();
- double ty = targ_pt * cam->vup();
- double tz = targ_pt * cam->vpn();
-
- // convert to spherical coords:
- double rng = targ_pt.length();
- double az = asin(fabs(tx) / rng);
- double el = asin(fabs(ty) / rng);
- if (tx < 0) az = -az;
- if (ty < 0) el = -el;
-
- double min_range = rng;
- Drone* probe = ship->GetProbe();
- bool probescan = false;
-
- if (ship->GetIFF() == c_ship->GetIFF()) {
- min_range = 1;
- }
-
- else if (probe) {
- Point probe_pt = c_ship->Location() - probe->Location();
- double prng = probe_pt.length();
-
- if (prng < probe->Design()->lethal_radius && prng < rng) {
- min_range = prng;
- probescan = true;
- }
- }
-
- bool vis = tz > 1 && (c_ship->Radius()/rng > 0.001);
- bool threat = (c_ship->Life() != 0 &&
- c_ship->GetIFF() &&
- c_ship->GetIFF() != ship->GetIFF() &&
- c_ship->GetEMCON() > 2 &&
- c_ship->IsTracking(ship));
-
- if (!threat) {
- if (mode == GM && !c_ship->IsGroundUnit())
- return;
-
- if (mode != GM && c_ship->IsGroundUnit())
- return;
-
- if (min_range > sensor_range || min_range > c_ship->Design()->detet) {
- if (c_ship == target) {
- ship->DropTarget();
- Ignore(target);
- target = 0;
- }
-
- return;
- }
- }
-
- // clip:
- if (threat || vis || mode >= PST || tz > 1) {
-
- // correct az/el for back hemisphere:
- if (tz < 0) {
- if (az < 0) az = -PI - az;
- else az = PI - az;
- }
-
- double d_pas = 0;
- double d_act = 0;
- double effectivity = energy/capacity * availability;
-
- // did this contact get scanned this frame?
- if (effectivity > SENSOR_THRESHOLD) {
- if (az >= az1 && az <= az2 && (mode >= PST || fabs(el) < 45*DEGREES)) {
- double passive_range_limit = 500e3;
- if (c_ship->Design()->detet > passive_range_limit)
- passive_range_limit = c_ship->Design()->detet;
-
- d_pas = c_ship->PCS() * effectivity * (1 - min_range/passive_range_limit);
-
- if (d_pas < 0)
- d_pas = 0;
-
- if (probescan) {
- double max_range = probe->Design()->lethal_radius;
- d_act = c_ship->ACS() * (1 - min_range/max_range);
- }
-
- else if (mode != PAS && mode != PST) {
- double max_range = sensor_range;
- d_act = c_ship->ACS() * effectivity * (1 - min_range/max_range);
- }
-
- if (d_act < 0)
- d_act = 0;
- }
- }
-
- // yes, update or add new contact:
- if (threat || vis || d_pas > SENSOR_THRESHOLD || d_act > SENSOR_THRESHOLD) {
- Element* elem = c_ship->GetElement();
- CombatUnit* unit = c_ship->GetCombatUnit();
-
- if (elem && ship && elem->GetIFF() != ship->GetIFF() && elem->IntelLevel() < Intel::LOCATED) {
- elem->SetIntelLevel(Intel::LOCATED);
- }
-
- if (unit && ship && unit->GetIFF() != ship->GetIFF()) {
- CombatGroup* group = unit->GetCombatGroup();
-
- if (group && group->IntelLevel() < Intel::LOCATED &&
- group->IntelLevel() > Intel::RESERVE) {
- group->SetIntelLevel(Intel::LOCATED);
- }
- }
-
- Contact* c = FindContact(c_ship);
-
- if (!c) {
- c = new(__FILE__,__LINE__) Contact(c_ship, 0.0f, 0.0f);
- contacts.append(c);
- }
-
- // update track:
- if (c) {
- c->loc = c_ship->Location();
- c->d_pas = (float) d_pas;
- c->d_act = (float) d_act;
- c->probe = probescan;
-
- c->UpdateTrack();
- }
- }
- }
-}
-
-// +--------------------------------------------------------------------+
-
-void
-Sensor::ProcessContact(Shot* c_shot, double az1, double az2)
-{
- double sensor_range = GetBeamRange();
-
- if (c_shot->IsPrimary() || c_shot->IsDecoy())
- return;
-
- // translate:
- const Camera* cam = &ship->Cam();
- Point targ_pt = c_shot->Location() - ship->Location();
-
- // rotate:
- double tx = targ_pt * cam->vrt();
- double ty = targ_pt * cam->vup();
- double tz = targ_pt * cam->vpn();
-
- // convert to spherical coords:
- double rng = targ_pt.length();
- double az = asin(fabs(tx) / rng);
- double el = asin(fabs(ty) / rng);
- if (tx < 0) az = -az;
- if (ty < 0) el = -el;
-
- bool vis = tz > 1 && (c_shot->Radius()/rng > 0.001);
- bool threat = (c_shot->IsTracking(ship));
-
- // clip:
- if (threat || vis || ((mode >= PST || tz > 1) && rng <= sensor_range)) {
-
- // correct az/el for back hemisphere:
- if (tz < 0) {
- if (az < 0) az = -PI - az;
- else az = PI - az;
- }
-
- double d_pas = 0;
- double d_act = 0;
- double effectivity = energy/capacity * availability;
-
- // did this contact get scanned this frame?
- if (effectivity > SENSOR_THRESHOLD) {
- if (az >= az1 && az <= az2 && (mode >= PST || fabs(el) < 45*DEGREES)) {
- if (rng < sensor_range/2)
- d_pas = 1.5;
- else
- d_pas = 0.5;
-
- if (mode != PAS && mode != PST)
- d_act = effectivity * (1 - rng/sensor_range);
-
- if (d_act < 0)
- d_act = 0;
- }
- }
-
- // yes, update or add new contact:
- if (threat || vis || d_pas > SENSOR_THRESHOLD || d_act > SENSOR_THRESHOLD) {
- Contact* c = FindContact(c_shot);
-
- if (!c) {
- c = new(__FILE__,__LINE__) Contact(c_shot, 0.0f, 0.0f);
- contacts.append(c);
- }
-
- // update track:
- if (c) {
- c->loc = c_shot->Location();
- c->d_pas = (float) d_pas;
- c->d_act = (float) d_act;
-
- c->UpdateTrack();
- }
- }
- }
-}
-
-Contact*
-Sensor::FindContact(Ship* s)
-{
- ListIter<Contact> iter(contacts);
- while (++iter) {
- Contact* c = iter.value();
- if (c->GetShip() == s)
- return c;
- }
-
- return 0;
-}
-
-Contact*
-Sensor::FindContact(Shot* s)
-{
- ListIter<Contact> iter(contacts);
- while (++iter) {
- Contact* c = iter.value();
- if (c->GetShot() == s)
- return c;
- }
-
- return 0;
-}
-
-// +--------------------------------------------------------------------+
-
-bool
-Sensor::IsTracking(SimObject* tgt)
-{
- if (tgt && mode != GM && mode != PAS && mode != PST && IsPowerOn()) {
- if (tgt == target)
- return true;
-
- Contact* c = 0;
-
- if (tgt->Type() == SimObject::SIM_SHIP) {
- c = FindContact((Ship*) tgt);
- }
- else {
- c = FindContact((Shot*) tgt);
- }
-
- return (c != 0 && c->ActReturn() > SENSOR_THRESHOLD && !c->IsProbed());
- }
-
- return false;
-}
-
-// +--------------------------------------------------------------------+
-
-const double sensor_lock_threshold = 0.5;
-
-struct TargetOffset {
- static const char* TYPENAME() { return "TargetOffset"; }
-
- SimObject* target;
- double offset;
-
- TargetOffset() : target(0), offset(10) { }
- TargetOffset(SimObject* t, double o) : target(t), offset(o) { }
- int operator< (const TargetOffset& o) const { return offset < o.offset; }
- int operator<=(const TargetOffset& o) const { return offset <= o.offset; }
- int operator==(const TargetOffset& o) const { return offset == o.offset; }
-};
-
-SimObject*
-Sensor::LockTarget(int type, bool closest, bool hostile)
-{
- if (!ship || ship->GetEMCON() < 3) {
- Ignore(target);
- target = 0;
- return target;
- }
-
- SimObject* test = 0;
- ListIter<Contact> contact(ship->ContactList());
-
- List<TargetOffset> targets;
-
- while (++contact) {
- if (type == SimObject::SIM_SHIP)
- test = contact->GetShip();
- else
- test = contact->GetShot();
-
- if (!test)
- continue;
-
- // do not target own missiles:
- if (contact->GetShot() && contact->GetShot()->Owner() == ship)
- continue;
-
- double tgt_range = contact->Range(ship);
-
- // do not target ships outside of detet range:
- if (contact->GetShip() && contact->GetShip()->Design()->detet < tgt_range)
- continue;
-
- double d_pas = contact->PasReturn();
- double d_act = contact->ActReturn();
- bool vis = contact->Visible(ship) || contact->Threat(ship);
-
- if (!vis && d_pas < sensor_lock_threshold && d_act < sensor_lock_threshold)
- continue;
-
- if (closest) {
- if (hostile && (contact->GetIFF(ship) == 0 || contact->GetIFF(ship) == ship->GetIFF()))
- continue;
-
- targets.append(new(__FILE__,__LINE__) TargetOffset(test, tgt_range));
- }
-
- // clip:
- else if (contact->InFront(ship)) {
- double az, el, rng;
-
- contact->GetBearing(ship, az, el, rng);
- az = fabs(az / PI);
- el = fabs(el / PI);
-
- if (az <= 0.2 && el <= 0.2)
- targets.append(new(__FILE__,__LINE__) TargetOffset(test, az+el));
- }
- }
-
- targets.sort();
-
- if (target) {
- int index = 100000;
- int i = 0;
-
- if (targets.size() > 0) {
- ListIter<TargetOffset> iter(targets);
- while (++iter) {
- if (iter->target == target) {
- index = i;
- break;
- }
-
- i++;
- }
-
- if (index < targets.size()-1)
- index++;
- else
- index = 0;
-
- target = targets[index]->target;
- Observe(target);
- }
- }
- else if (targets.size() > 0) {
- target = targets[0]->target;
- Observe(target);
- }
- else {
- target = 0;
- }
-
- targets.destroy();
-
- if (target && mode < STD)
- mode = STD;
-
- return target;
-}
-
-// +--------------------------------------------------------------------+
-
-SimObject*
-Sensor::LockTarget(SimObject* candidate)
-{
- Ignore(target);
- target = 0;
-
- if (ship->GetEMCON() < 3)
- return target;
-
- if (!candidate)
- return target;
-
- int type = candidate->Type();
- SimObject* test = 0;
- ListIter<Contact> contact(ship->ContactList());
-
- while (++contact) {
- if (type == SimObject::SIM_SHIP)
- test = contact->GetShip();
- else
- test = contact->GetShot();
-
- if (test == candidate) {
- double d_pas = contact->PasReturn();
- double d_act = contact->ActReturn();
- bool vis = contact->Visible(ship) || contact->Threat(ship);
-
- if (vis || d_pas > sensor_lock_threshold || d_act > sensor_lock_threshold) {
- target = test;
- Observe(target);
- }
-
- break;
- }
- }
-
- if (target && mode < STD)
- mode = STD;
-
- return target;
-}
-
-// +--------------------------------------------------------------------+
-
-SimObject*
-Sensor::AcquirePassiveTargetForMissile()
-{
- SimObject* pick = 0;
- double min_off = 2;
-
- ListIter<Contact> contact(ship->ContactList());
-
- while (++contact) {
- SimObject* test = contact->GetShip();
- double d = contact->PasReturn();
-
- if (d < 1) continue;
-
- // clip:
- if (contact->InFront(ship)) {
- double az, el, rng;
-
- contact->GetBearing(ship, az, el, rng);
- az = fabs(az / PI);
- el = fabs(el / PI);
-
- if (az + el < min_off) {
- min_off = az + el;
- pick = test;
- }
- }
- }
-
- return pick;
-}
-
-// +--------------------------------------------------------------------+
-
-SimObject*
-Sensor::AcquireActiveTargetForMissile()
-{
- SimObject* pick = 0;
- double min_off = 2;
-
- ListIter<Contact> contact(ship->ContactList());
-
- while (++contact) {
- SimObject* test = contact->GetShip();
- double d = contact->ActReturn();
-
- if (d < 1) continue;
-
- if (contact->InFront(ship)) {
- double az, el, rng;
-
- contact->GetBearing(ship, az, el, rng);
- az = fabs(az / PI);
- el = fabs(el / PI);
-
- if (az + el < min_off) {
- min_off = az + el;
- pick = test;
- }
- }
- }
-
- return pick;
-}
-
-// +--------------------------------------------------------------------+
-
-void
-Sensor::DoEMCON(int index)
-{
- int e = GetEMCONPower(index);
-
- if (power_level * 100 > e || emcon != index) {
- if (e == 0) {
- PowerOff();
- }
- else if (emcon != index) {
- PowerOn();
-
- if (power_level * 100 > e) {
- SetPowerLevel(e);
- }
-
- if (emcon == 3) {
- if (GetMode() < PST)
- SetMode(STD);
- else
- SetMode(CST);
- }
- else {
- int m = GetMode();
- if (m < PST && m > PAS)
- SetMode(Sensor::PAS);
- else if (m == CST)
- SetMode(PST);
- }
- }
- }
-
- emcon = index;
-}
-
+/* Starshatter OpenSource Distribution
+ Copyright (c) 1997-2004, Destroyer Studios LLC.
+ All Rights Reserved.
+
+ Redistribution and use in source and binary forms, with or without
+ modification, are permitted provided that the following conditions are met:
+
+ * Redistributions of source code must retain the above copyright notice,
+ this list of conditions and the following disclaimer.
+ * Redistributions in binary form must reproduce the above copyright notice,
+ this list of conditions and the following disclaimer in the documentation
+ and/or other materials provided with the distribution.
+ * Neither the name "Destroyer Studios" nor the names of its contributors
+ may be used to endorse or promote products derived from this software
+ without specific prior written permission.
+
+ THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
+ LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ POSSIBILITY OF SUCH DAMAGE.
+
+ SUBSYSTEM: Stars.exe
+ FILE: Sensor.cpp
+ AUTHOR: John DiCamillo
+
+
+ OVERVIEW
+ ========
+ Integrated (Passive and Active) Sensor Package class implementation
+*/
+
+#include "MemDebug.h"
+#include "Sensor.h"
+#include "Contact.h"
+#include "Element.h"
+#include "Ship.h"
+#include "ShipDesign.h"
+#include "Shot.h"
+#include "Drone.h"
+#include "WeaponDesign.h"
+#include "Sim.h"
+#include "CombatGroup.h"
+#include "CombatUnit.h"
+
+#include "Game.h"
+
+// +----------------------------------------------------------------------+
+
+const double SENSOR_THRESHOLD = 0.25;
+
+// +----------------------------------------------------------------------+
+
+Sensor::Sensor()
+: System(SENSOR, 1, "Dual Sensor Pkg", 1, 10, 10, 10),
+mode(STD), target(0),
+nsettings(0), range_index(0)
+{
+ name = Game::GetText("sys.sensor");
+ abrv = Game::GetText("sys.sensor.abrv");
+
+ SetMode(mode);
+ power_flags = POWER_WATTS;
+
+ ZeroMemory(range_settings, sizeof(range_settings));
+}
+
+// +----------------------------------------------------------------------+
+
+Sensor::Sensor(const Sensor& s)
+: System(s), mode(STD), target(0),
+nsettings(s.nsettings), range_index(0)
+{
+ Mount(s);
+
+ SetMode(mode);
+ power_flags = POWER_WATTS;
+
+ CopyMemory(range_settings, s.range_settings, sizeof(range_settings));
+
+ if (nsettings)
+ range_index = nsettings-1;
+}
+
+// +--------------------------------------------------------------------+
+
+Sensor::~Sensor()
+{
+ ClearAllContacts();
+}
+
+// +--------------------------------------------------------------------+
+
+void
+Sensor::ClearAllContacts()
+{
+ contacts.destroy();
+}
+
+// +--------------------------------------------------------------------+
+
+double
+Sensor::GetBeamLimit() const
+{
+ if (mode == ACM)
+ return 15*DEGREES;
+
+ if (mode <= GM)
+ return 45*DEGREES;
+
+ return 175*DEGREES;
+}
+
+double
+Sensor::GetBeamRange() const
+{
+ return (double) range_settings[range_index];
+}
+
+void
+Sensor::IncreaseRange()
+{
+ if (range_index < nsettings-1)
+ range_index++;
+ else
+ range_index = nsettings-1;
+}
+
+void
+Sensor::DecreaseRange()
+{
+ if (range_index > 0)
+ range_index--;
+ else
+ range_index = 0;
+}
+
+void
+Sensor::AddRange(double r)
+{
+ if (nsettings < 8)
+ range_settings[nsettings++] = (float) r;
+
+ range_index = nsettings-1;
+}
+
+void
+Sensor::SetMode(Mode m)
+{
+ if (mode != m) {
+ // dump the contact list when changing in/out of GM:
+ if (mode == GM || m == GM)
+ ClearAllContacts();
+
+ // dump the current target on mode changes:
+ if (m <= GM) {
+ if (ship)
+ ship->DropTarget();
+
+ Ignore(target);
+ target = 0;
+ }
+ }
+
+ mode = m;
+}
+
+// +----------------------------------------------------------------------+
+
+bool
+Sensor::Update(SimObject* obj)
+{
+ if (obj == target) {
+ target = 0;
+ }
+
+ return SimObserver::Update(obj);
+}
+
+const char*
+Sensor::GetObserverName() const
+{
+ return "Sensor";
+}
+
+// +--------------------------------------------------------------------+
+
+void
+Sensor::ExecFrame(double seconds)
+{
+ if (Game::Paused())
+ return;
+
+ System::ExecFrame(seconds);
+
+ if (!IsPowerOn() || energy <= 0) {
+ ClearAllContacts();
+ return;
+ }
+
+ if (ship && ship->GetAIMode() < 2) {
+ // just pretend to work this frame:
+ energy = 0.0f;
+ return;
+ }
+
+ if (ship && ship->GetRegion()) {
+ const Camera* cam = &ship->Cam();
+ double az1 = -45*DEGREES;
+ double az2 = 45*DEGREES;
+
+ if (mode > GM) {
+ az1 = -175*DEGREES;
+ az2 = 175*DEGREES;
+ }
+
+ ListIter<Ship> ship_iter(ship->GetRegion()->Ships());
+ while (++ship_iter) {
+ Ship* c_ship = ship_iter.value();
+
+ if (c_ship != ship) {
+ ProcessContact(c_ship, az1, az2);
+ }
+ else {
+ Contact* c = FindContact(c_ship);
+
+ if (!c) {
+ c = new(__FILE__,__LINE__) Contact(c_ship, 0.0f, 0.0f);
+ contacts.append(c);
+ }
+
+ // update track:
+ if (c) {
+ c->loc = c_ship->Location();
+ c->d_pas = 2.0f;
+ c->d_act = 2.0f;
+
+ c->UpdateTrack();
+ }
+ }
+ }
+
+ ListIter<Shot> threat_iter(ship->GetThreatList());
+ while (++threat_iter) {
+ ProcessContact(threat_iter.value(), az1, az2);
+ }
+
+ ListIter<Drone> drone_iter(ship->GetRegion()->Drones());
+ while (++drone_iter) {
+ ProcessContact(drone_iter.value(), az1, az2);
+ }
+
+ List<Contact>& track_list = ship->GetRegion()->TrackList(ship->GetIFF());
+ ListIter<Contact> c_iter(contacts);
+
+ while (++c_iter) {
+ Contact* contact = c_iter.value();
+ Ship* c_ship = contact->GetShip();
+ Shot* c_shot = contact->GetShot();
+ double c_life = -1;
+
+ if (c_ship) {
+ c_life = c_ship->Life();
+
+ // look for quantum jumps and orbit transitions:
+ if (c_ship->GetRegion() != ship->GetRegion())
+ c_life = 0;
+ }
+
+ else if (c_shot) {
+ c_life = c_shot->Life();
+ }
+
+ else {
+ c_life = 0;
+ }
+
+ if (contact->Age() < 0 || c_life == 0) {
+ delete c_iter.removeItem();
+ }
+
+ else if (ship && ship->GetIFF() >= 0 && ship->GetIFF() < 5) {
+ // update shared track database:
+ Contact* t = track_list.find(contact);
+
+ if (c_ship) {
+ if (!t) {
+ Contact* track = new(__FILE__,__LINE__) Contact(c_ship, contact->d_pas, contact->d_act);
+ track->loc = c_ship->Location();
+ track_list.append(track);
+ }
+
+ else {
+ t->loc = c_ship->Location();
+ t->Merge(contact);
+ t->UpdateTrack();
+ }
+ }
+
+ else if (c_shot) {
+ if (!t) {
+ Contact* track = new(__FILE__,__LINE__) Contact(c_shot, contact->d_pas, contact->d_act);
+ track->loc = c_shot->Location();
+ track_list.append(track);
+ }
+
+ else {
+ t->loc = c_shot->Location();
+ t->Merge(contact);
+ t->UpdateTrack();
+ }
+ }
+ }
+ }
+
+
+ if (mode == ACM) {
+ if (!ship->GetTarget())
+ ship->LockTarget(SimObject::SIM_SHIP, true, true);
+ }
+ }
+
+ energy = 0.0f;
+}
+
+// +--------------------------------------------------------------------+
+
+void
+Sensor::ProcessContact(Ship* c_ship, double az1, double az2)
+{
+ if (c_ship->IsNetObserver())
+ return;
+
+ double sensor_range = GetBeamRange();
+
+ // translate:
+ const Camera* cam = &ship->Cam();
+ Point targ_pt = c_ship->Location() - ship->Location();
+
+ // rotate:
+ double tx = targ_pt * cam->vrt();
+ double ty = targ_pt * cam->vup();
+ double tz = targ_pt * cam->vpn();
+
+ // convert to spherical coords:
+ double rng = targ_pt.length();
+ double az = asin(fabs(tx) / rng);
+ double el = asin(fabs(ty) / rng);
+ if (tx < 0) az = -az;
+ if (ty < 0) el = -el;
+
+ double min_range = rng;
+ Drone* probe = ship->GetProbe();
+ bool probescan = false;
+
+ if (ship->GetIFF() == c_ship->GetIFF()) {
+ min_range = 1;
+ }
+
+ else if (probe) {
+ Point probe_pt = c_ship->Location() - probe->Location();
+ double prng = probe_pt.length();
+
+ if (prng < probe->Design()->lethal_radius && prng < rng) {
+ min_range = prng;
+ probescan = true;
+ }
+ }
+
+ bool vis = tz > 1 && (c_ship->Radius()/rng > 0.001);
+ bool threat = (c_ship->Life() != 0 &&
+ c_ship->GetIFF() &&
+ c_ship->GetIFF() != ship->GetIFF() &&
+ c_ship->GetEMCON() > 2 &&
+ c_ship->IsTracking(ship));
+
+ if (!threat) {
+ if (mode == GM && !c_ship->IsGroundUnit())
+ return;
+
+ if (mode != GM && c_ship->IsGroundUnit())
+ return;
+
+ if (min_range > sensor_range || min_range > c_ship->Design()->detet) {
+ if (c_ship == target) {
+ ship->DropTarget();
+ Ignore(target);
+ target = 0;
+ }
+
+ return;
+ }
+ }
+
+ // clip:
+ if (threat || vis || mode >= PST || tz > 1) {
+
+ // correct az/el for back hemisphere:
+ if (tz < 0) {
+ if (az < 0) az = -PI - az;
+ else az = PI - az;
+ }
+
+ double d_pas = 0;
+ double d_act = 0;
+ double effectivity = energy/capacity * availability;
+
+ // did this contact get scanned this frame?
+ if (effectivity > SENSOR_THRESHOLD) {
+ if (az >= az1 && az <= az2 && (mode >= PST || fabs(el) < 45*DEGREES)) {
+ double passive_range_limit = 500e3;
+ if (c_ship->Design()->detet > passive_range_limit)
+ passive_range_limit = c_ship->Design()->detet;
+
+ d_pas = c_ship->PCS() * effectivity * (1 - min_range/passive_range_limit);
+
+ if (d_pas < 0)
+ d_pas = 0;
+
+ if (probescan) {
+ double max_range = probe->Design()->lethal_radius;
+ d_act = c_ship->ACS() * (1 - min_range/max_range);
+ }
+
+ else if (mode != PAS && mode != PST) {
+ double max_range = sensor_range;
+ d_act = c_ship->ACS() * effectivity * (1 - min_range/max_range);
+ }
+
+ if (d_act < 0)
+ d_act = 0;
+ }
+ }
+
+ // yes, update or add new contact:
+ if (threat || vis || d_pas > SENSOR_THRESHOLD || d_act > SENSOR_THRESHOLD) {
+ Element* elem = c_ship->GetElement();
+ CombatUnit* unit = c_ship->GetCombatUnit();
+
+ if (elem && ship && elem->GetIFF() != ship->GetIFF() && elem->IntelLevel() < Intel::LOCATED) {
+ elem->SetIntelLevel(Intel::LOCATED);
+ }
+
+ if (unit && ship && unit->GetIFF() != ship->GetIFF()) {
+ CombatGroup* group = unit->GetCombatGroup();
+
+ if (group && group->IntelLevel() < Intel::LOCATED &&
+ group->IntelLevel() > Intel::RESERVE) {
+ group->SetIntelLevel(Intel::LOCATED);
+ }
+ }
+
+ Contact* c = FindContact(c_ship);
+
+ if (!c) {
+ c = new(__FILE__,__LINE__) Contact(c_ship, 0.0f, 0.0f);
+ contacts.append(c);
+ }
+
+ // update track:
+ if (c) {
+ c->loc = c_ship->Location();
+ c->d_pas = (float) d_pas;
+ c->d_act = (float) d_act;
+ c->probe = probescan;
+
+ c->UpdateTrack();
+ }
+ }
+ }
+}
+
+// +--------------------------------------------------------------------+
+
+void
+Sensor::ProcessContact(Shot* c_shot, double az1, double az2)
+{
+ double sensor_range = GetBeamRange();
+
+ if (c_shot->IsPrimary() || c_shot->IsDecoy())
+ return;
+
+ // translate:
+ const Camera* cam = &ship->Cam();
+ Point targ_pt = c_shot->Location() - ship->Location();
+
+ // rotate:
+ double tx = targ_pt * cam->vrt();
+ double ty = targ_pt * cam->vup();
+ double tz = targ_pt * cam->vpn();
+
+ // convert to spherical coords:
+ double rng = targ_pt.length();
+ double az = asin(fabs(tx) / rng);
+ double el = asin(fabs(ty) / rng);
+ if (tx < 0) az = -az;
+ if (ty < 0) el = -el;
+
+ bool vis = tz > 1 && (c_shot->Radius()/rng > 0.001);
+ bool threat = (c_shot->IsTracking(ship));
+
+ // clip:
+ if (threat || vis || ((mode >= PST || tz > 1) && rng <= sensor_range)) {
+
+ // correct az/el for back hemisphere:
+ if (tz < 0) {
+ if (az < 0) az = -PI - az;
+ else az = PI - az;
+ }
+
+ double d_pas = 0;
+ double d_act = 0;
+ double effectivity = energy/capacity * availability;
+
+ // did this contact get scanned this frame?
+ if (effectivity > SENSOR_THRESHOLD) {
+ if (az >= az1 && az <= az2 && (mode >= PST || fabs(el) < 45*DEGREES)) {
+ if (rng < sensor_range/2)
+ d_pas = 1.5;
+ else
+ d_pas = 0.5;
+
+ if (mode != PAS && mode != PST)
+ d_act = effectivity * (1 - rng/sensor_range);
+
+ if (d_act < 0)
+ d_act = 0;
+ }
+ }
+
+ // yes, update or add new contact:
+ if (threat || vis || d_pas > SENSOR_THRESHOLD || d_act > SENSOR_THRESHOLD) {
+ Contact* c = FindContact(c_shot);
+
+ if (!c) {
+ c = new(__FILE__,__LINE__) Contact(c_shot, 0.0f, 0.0f);
+ contacts.append(c);
+ }
+
+ // update track:
+ if (c) {
+ c->loc = c_shot->Location();
+ c->d_pas = (float) d_pas;
+ c->d_act = (float) d_act;
+
+ c->UpdateTrack();
+ }
+ }
+ }
+}
+
+Contact*
+Sensor::FindContact(Ship* s)
+{
+ ListIter<Contact> iter(contacts);
+ while (++iter) {
+ Contact* c = iter.value();
+ if (c->GetShip() == s)
+ return c;
+ }
+
+ return 0;
+}
+
+Contact*
+Sensor::FindContact(Shot* s)
+{
+ ListIter<Contact> iter(contacts);
+ while (++iter) {
+ Contact* c = iter.value();
+ if (c->GetShot() == s)
+ return c;
+ }
+
+ return 0;
+}
+
+// +--------------------------------------------------------------------+
+
+bool
+Sensor::IsTracking(SimObject* tgt)
+{
+ if (tgt && mode != GM && mode != PAS && mode != PST && IsPowerOn()) {
+ if (tgt == target)
+ return true;
+
+ Contact* c = 0;
+
+ if (tgt->Type() == SimObject::SIM_SHIP) {
+ c = FindContact((Ship*) tgt);
+ }
+ else {
+ c = FindContact((Shot*) tgt);
+ }
+
+ return (c != 0 && c->ActReturn() > SENSOR_THRESHOLD && !c->IsProbed());
+ }
+
+ return false;
+}
+
+// +--------------------------------------------------------------------+
+
+const double sensor_lock_threshold = 0.5;
+
+struct TargetOffset {
+ static const char* TYPENAME() { return "TargetOffset"; }
+
+ SimObject* target;
+ double offset;
+
+ TargetOffset() : target(0), offset(10) { }
+ TargetOffset(SimObject* t, double o) : target(t), offset(o) { }
+ int operator< (const TargetOffset& o) const { return offset < o.offset; }
+ int operator<=(const TargetOffset& o) const { return offset <= o.offset; }
+ int operator==(const TargetOffset& o) const { return offset == o.offset; }
+};
+
+SimObject*
+Sensor::LockTarget(int type, bool closest, bool hostile)
+{
+ if (!ship || ship->GetEMCON() < 3) {
+ Ignore(target);
+ target = 0;
+ return target;
+ }
+
+ SimObject* test = 0;
+ ListIter<Contact> contact(ship->ContactList());
+
+ List<TargetOffset> targets;
+
+ while (++contact) {
+ if (type == SimObject::SIM_SHIP)
+ test = contact->GetShip();
+ else
+ test = contact->GetShot();
+
+ if (!test)
+ continue;
+
+ // do not target own missiles:
+ if (contact->GetShot() && contact->GetShot()->Owner() == ship)
+ continue;
+
+ double tgt_range = contact->Range(ship);
+
+ // do not target ships outside of detet range:
+ if (contact->GetShip() && contact->GetShip()->Design()->detet < tgt_range)
+ continue;
+
+ double d_pas = contact->PasReturn();
+ double d_act = contact->ActReturn();
+ bool vis = contact->Visible(ship) || contact->Threat(ship);
+
+ if (!vis && d_pas < sensor_lock_threshold && d_act < sensor_lock_threshold)
+ continue;
+
+ if (closest) {
+ if (hostile && (contact->GetIFF(ship) == 0 || contact->GetIFF(ship) == ship->GetIFF()))
+ continue;
+
+ targets.append(new(__FILE__,__LINE__) TargetOffset(test, tgt_range));
+ }
+
+ // clip:
+ else if (contact->InFront(ship)) {
+ double az, el, rng;
+
+ contact->GetBearing(ship, az, el, rng);
+ az = fabs(az / PI);
+ el = fabs(el / PI);
+
+ if (az <= 0.2 && el <= 0.2)
+ targets.append(new(__FILE__,__LINE__) TargetOffset(test, az+el));
+ }
+ }
+
+ targets.sort();
+
+ if (target) {
+ int index = 100000;
+ int i = 0;
+
+ if (targets.size() > 0) {
+ ListIter<TargetOffset> iter(targets);
+ while (++iter) {
+ if (iter->target == target) {
+ index = i;
+ break;
+ }
+
+ i++;
+ }
+
+ if (index < targets.size()-1)
+ index++;
+ else
+ index = 0;
+
+ target = targets[index]->target;
+ Observe(target);
+ }
+ }
+ else if (targets.size() > 0) {
+ target = targets[0]->target;
+ Observe(target);
+ }
+ else {
+ target = 0;
+ }
+
+ targets.destroy();
+
+ if (target && mode < STD)
+ mode = STD;
+
+ return target;
+}
+
+// +--------------------------------------------------------------------+
+
+SimObject*
+Sensor::LockTarget(SimObject* candidate)
+{
+ Ignore(target);
+ target = 0;
+
+ if (ship->GetEMCON() < 3)
+ return target;
+
+ if (!candidate)
+ return target;
+
+ int type = candidate->Type();
+ SimObject* test = 0;
+ ListIter<Contact> contact(ship->ContactList());
+
+ while (++contact) {
+ if (type == SimObject::SIM_SHIP)
+ test = contact->GetShip();
+ else
+ test = contact->GetShot();
+
+ if (test == candidate) {
+ double d_pas = contact->PasReturn();
+ double d_act = contact->ActReturn();
+ bool vis = contact->Visible(ship) || contact->Threat(ship);
+
+ if (vis || d_pas > sensor_lock_threshold || d_act > sensor_lock_threshold) {
+ target = test;
+ Observe(target);
+ }
+
+ break;
+ }
+ }
+
+ if (target && mode < STD)
+ mode = STD;
+
+ return target;
+}
+
+// +--------------------------------------------------------------------+
+
+SimObject*
+Sensor::AcquirePassiveTargetForMissile()
+{
+ SimObject* pick = 0;
+ double min_off = 2;
+
+ ListIter<Contact> contact(ship->ContactList());
+
+ while (++contact) {
+ SimObject* test = contact->GetShip();
+ double d = contact->PasReturn();
+
+ if (d < 1) continue;
+
+ // clip:
+ if (contact->InFront(ship)) {
+ double az, el, rng;
+
+ contact->GetBearing(ship, az, el, rng);
+ az = fabs(az / PI);
+ el = fabs(el / PI);
+
+ if (az + el < min_off) {
+ min_off = az + el;
+ pick = test;
+ }
+ }
+ }
+
+ return pick;
+}
+
+// +--------------------------------------------------------------------+
+
+SimObject*
+Sensor::AcquireActiveTargetForMissile()
+{
+ SimObject* pick = 0;
+ double min_off = 2;
+
+ ListIter<Contact> contact(ship->ContactList());
+
+ while (++contact) {
+ SimObject* test = contact->GetShip();
+ double d = contact->ActReturn();
+
+ if (d < 1) continue;
+
+ if (contact->InFront(ship)) {
+ double az, el, rng;
+
+ contact->GetBearing(ship, az, el, rng);
+ az = fabs(az / PI);
+ el = fabs(el / PI);
+
+ if (az + el < min_off) {
+ min_off = az + el;
+ pick = test;
+ }
+ }
+ }
+
+ return pick;
+}
+
+// +--------------------------------------------------------------------+
+
+void
+Sensor::DoEMCON(int index)
+{
+ int e = GetEMCONPower(index);
+
+ if (power_level * 100 > e || emcon != index) {
+ if (e == 0) {
+ PowerOff();
+ }
+ else if (emcon != index) {
+ PowerOn();
+
+ if (power_level * 100 > e) {
+ SetPowerLevel(e);
+ }
+
+ if (emcon == 3) {
+ if (GetMode() < PST)
+ SetMode(STD);
+ else
+ SetMode(CST);
+ }
+ else {
+ int m = GetMode();
+ if (m < PST && m > PAS)
+ SetMode(Sensor::PAS);
+ else if (m == CST)
+ SetMode(PST);
+ }
+ }
+ }
+
+ emcon = index;
+}
+
generated by cgit v1.1 at 2024-06-28 06:03:44 +0000