A bunch more changes. Relays mostly work now, I think, except for the infinite recursion.
A bunch more changes. Relays mostly work now, I think, except for the infinite recursion.

file:b/ARTools.cs (new)
  using System;
 
  namespace AntennaRange
  {
  public static class Tools
  {
  private static ScreenMessage debugmsg = new ScreenMessage("", 2f, ScreenMessageStyle.UPPER_RIGHT);
 
  [System.Diagnostics.Conditional("DEBUG")]
  public static void PostDebugMessage(string Msg)
  {
  if (HighLogic.LoadedScene > GameScenes.SPACECENTER)
  {
  debugmsg.message = Msg;
  ScreenMessages.PostScreenMessage(debugmsg, true);
  }
 
  KSPLog.print(Msg);
  }
 
  /*
  * MuMech_ToSI is a part of the MuMechLib library, © 2013 r4m0n, used under the GNU GPL version 3.
  * */
  public static string MuMech_ToSI(double d, int digits = 3, int MinMagnitude = 0, int MaxMagnitude = int.MaxValue)
  {
  float exponent = (float)Math.Log10(Math.Abs(d));
  exponent = UnityEngine.Mathf.Clamp(exponent, (float)MinMagnitude, (float)MaxMagnitude);
 
  if (exponent >= 0)
  {
  switch ((int)Math.Floor(exponent))
  {
  case 0:
  case 1:
  case 2:
  return d.ToString("F" + digits);
  case 3:
  case 4:
  case 5:
  return (d / 1e3).ToString("F" + digits) + "k";
  case 6:
  case 7:
  case 8:
  return (d / 1e6).ToString("F" + digits) + "M";
  case 9:
  case 10:
  case 11:
  return (d / 1e9).ToString("F" + digits) + "G";
  case 12:
  case 13:
  case 14:
  return (d / 1e12).ToString("F" + digits) + "T";
  case 15:
  case 16:
  case 17:
  return (d / 1e15).ToString("F" + digits) + "P";
  case 18:
  case 19:
  case 20:
  return (d / 1e18).ToString("F" + digits) + "E";
  case 21:
  case 22:
  case 23:
  return (d / 1e21).ToString("F" + digits) + "Z";
  default:
  return (d / 1e24).ToString("F" + digits) + "Y";
  }
  }
  else if (exponent < 0)
  {
  switch ((int)Math.Floor(exponent))
  {
  case -1:
  case -2:
  case -3:
  return (d * 1e3).ToString("F" + digits) + "m";
  case -4:
  case -5:
  case -6:
  return (d * 1e6).ToString("F" + digits) + "μ";
  case -7:
  case -8:
  case -9:
  return (d * 1e9).ToString("F" + digits) + "n";
  case -10:
  case -11:
  case -12:
  return (d * 1e12).ToString("F" + digits) + "p";
  case -13:
  case -14:
  case -15:
  return (d * 1e15).ToString("F" + digits) + "f";
  case -16:
  case -17:
  case -18:
  return (d * 1e18).ToString("F" + digits) + "a";
  case -19:
  case -20:
  case -21:
  return (d * 1e21).ToString("F" + digits) + "z";
  default:
  return (d * 1e24).ToString("F" + digits) + "y";
  }
  }
  else
  {
  return "0";
  }
  }
  }
  }
 
 
/* /*
* AntennaRange © 2013 toadicus * AntennaRange © 2013 toadicus
* *
* AntennaRange provides incentive and requirements for the use of the various antenna parts. * AntennaRange provides incentive and requirements for the use of the various antenna parts.
* Nominally, the breakdown is as follows: * Nominally, the breakdown is as follows:
* *
* Communotron 16 - Suitable up to Kerbalsynchronous Orbit * Communotron 16 - Suitable up to Kerbalsynchronous Orbit
* Comms DTS-M1 - Suitable throughout the Kerbin subsystem * Comms DTS-M1 - Suitable throughout the Kerbin subsystem
* Communotron 88-88 - Suitable throughout the Kerbol system. * Communotron 88-88 - Suitable throughout the Kerbol system.
* *
* This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 Unported License. To view a * This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 Unported License. To view a
* copy of this license, visit http://creativecommons.org/licenses/by-nc-sa/3.0/ * copy of this license, visit http://creativecommons.org/licenses/by-nc-sa/3.0/
* *
* This software uses the ModuleManager library © 2013 ialdabaoth, used under a Creative Commons Attribution-ShareAlike 3.0 Uported License. * This software uses the ModuleManager library © 2013 ialdabaoth, used under a Creative Commons Attribution-ShareAlike
* * 3.0 Uported License.
*/ *
  * This software uses code from the MuMechLib library, © 2013 r4m0n, used under the GNU GPL version 3.
using System; *
using System.Collections.Generic; */
using KSP; using System;
  using System.Collections.Generic;
namespace AntennaRange using System.Linq;
{ using KSP;
/* using UnityEngine;
* ModuleLimitedDataTransmitter is designed as a drop-in replacement for ModuleDataTransmitter, and handles range-  
* finding, power scaling, and data scaling for antennas during science transmission. Its functionality varies with namespace AntennaRange
* three tunables: nominalRange, maxPowerFactor, and maxDataFactor, set in .cfg files. {
* /*
* In general, the scaling functions assume the following relation: * ModuleLimitedDataTransmitter is designed as a drop-in replacement for ModuleDataTransmitter, and handles range-
* * finding, power scaling, and data scaling for antennas during science transmission. Its functionality varies with
* D² α P/R, * three tunables: nominalRange, maxPowerFactor, and maxDataFactor, set in .cfg files.
* *
* where D is the total transmission distance, P is the transmission power, and R is the data rate. * In general, the scaling functions assume the following relation:
* *
* */ * D² α P/R,
public class ModuleLimitedDataTransmitter : ModuleDataTransmitter, IScienceDataTransmitter *
{ * where D is the total transmission distance, P is the transmission power, and R is the data rate.
// Stores the packetResourceCost as defined in the .cfg file. *
protected float _basepacketResourceCost; * */
   
// Stores the packetSize as defined in the .cfg file. /*
protected float _basepacketSize; * Fields
  * */
// We don't have a Bard, so we're hiding Kerbin here. public class ModuleLimitedDataTransmitter : ModuleDataTransmitter, IScienceDataTransmitter, IAntennaRelay
protected CelestialBody _Kerbin; {
  [KSPField(isPersistant = true)]
// Returns the current distance to the center of Kerbin, which is totally where the Kerbals keep their radioes. protected bool IsAntenna = true;
protected double transmitDistance  
{ // Stores the packetResourceCost as defined in the .cfg file.
get protected float _basepacketResourceCost;
{  
Vector3d KerbinPos = this._Kerbin.position; // Stores the packetSize as defined in the .cfg file.
Vector3d ActivePos = base.vessel.GetWorldPos3D(); protected float _basepacketSize;
   
return (ActivePos - KerbinPos).magnitude; // Every antenna is a relay.
} protected AntennaRelay relay;
}  
  // Keep track of vessels with transmitters for relay purposes.
// Returns the maximum distance this module can transmit protected List<Vessel> _relayVessels;
public double maxTransmitDistance  
{ // Sometimes we will need to communicate errors; this is how we do it.
get protected ScreenMessage ErrorMsg;
{  
return Math.Sqrt (this.maxPowerFactor) * this.nominalRange; // Let's make the error text pretty!
} protected UnityEngine.GUIStyle ErrorStyle;
}  
  // The distance from Kerbin at which the antenna will perform exactly as prescribed by packetResourceCost
// The distance from Kerbin at which the antenna will perform exactly as prescribed by packetResourceCost // and packetSize.
// and packetSize. [KSPField(isPersistant = false)]
[KSPField(isPersistant = false)] public float nominalRange;
public double nominalRange = 1500000d;  
  // The multiplier on packetResourceCost that defines the maximum power output of the antenna. When the power
// The multiplier on packetResourceCost that defines the maximum power output of the antenna. When the power // cost exceeds packetResourceCost * maxPowerFactor, transmission will fail.
// cost exceeds packetResourceCost * maxPowerFactor, transmission will fail. [KSPField(isPersistant = false)]
[KSPField(isPersistant = false)] public float maxPowerFactor;
public float maxPowerFactor = 8f;  
  // The multipler on packetSize that defines the maximum data bandwidth of the antenna.
// The multipler on packetSize that defines the maximum data bandwidth of the antenna. [KSPField(isPersistant = false)]
[KSPField(isPersistant = false)] public float maxDataFactor;
public float maxDataFactor = 4f;  
  [KSPField(isPersistant = true)]
// Override ModuleDataTransmitter.packetSize. Below the nominal range, scales up packetSize to protected float ARmaxTransmitDistance;
// packetSize * maxDataFactor  
[KSPField(isPersistant = false)] /*
public new float packetSize * Properties
{ * */
get // Returns the current distance to the center of Kerbin, which is totally where the Kerbals keep their radioes.
{ public new Vessel vessel
if (this.transmitDistance >= this.nominalRange) {
{ get
return this._basepacketSize; {
} return base.vessel;
else }
{ }
// From above, data rate increases with the inverse square of the distance.  
return Math.Min(this._basepacketSize * (float)Math.Pow(this.nominalRange / this.transmitDistance, 2), public double transmitDistance
this._basepacketSize * this.maxDataFactor); {
} get
} {
set return this.relay.transmitDistance;
{ }
this._basepacketSize = value; }
}  
  // Returns the maximum distance this module can transmit
} public float maxTransmitDistance
  {
// Override ModuleDataTransmitter.packetResourceCost. Above the nominal range, scales up packetResourceCost to get
// packetResourceCost * maxPowerFactor. {
[KSPField(isPersistant = false)] return this.ARmaxTransmitDistance;
public new float packetResourceCost }
{ }
get  
{ /*
if (this.transmitDistance <= this.nominalRange) * The next two functions overwrite the behavior of the stock functions and do not perform equivalently, except
{ * in that they both return floats. Here's some quick justification:
return this._basepacketResourceCost; *
} * The stock implementation of GetTransmitterScore (which I cannot override) is:
else * Score = (1 + DataResourceCost) / DataRate
{ *
// From above, power increases with the square of the distance. * The stock DataRate and DataResourceCost are:
return this._basepacketResourceCost * (float)Math.Pow (this.transmitDistance / this.nominalRange, 2); * DataRate = packetSize / packetInterval
} * DataResourceCost = packetResourceCost / packetSize
} *
set * So, the resulting score is essentially in terms of joules per byte per baud. Rearranging that a bit, it
{ * could also look like joule-seconds per byte per byte, or newton-meter-seconds per byte per byte. Either way,
this._basepacketResourceCost = value; * that metric is not a very reasonable one.
} *
  * Two metrics that might make more sense are joules per byte or joules per byte per second. The latter case
} * would look like:
  * DataRate = packetSize / packetInterval
// Build ALL the objects. * DataResourceCost = packetResourceCost
public ModuleLimitedDataTransmitter () : base() *
{ * The former case, which I've chosen to implement below, is:
// Go fetch Kerbin, because it is tricksy and hides from us. * DataRate = packetSize
List<CelestialBody> bodies = FlightGlobals.Bodies; * DataResourceCost = packetResourceCost
  *
foreach (CelestialBody body in bodies) * So... hopefully that doesn't screw with anything else.
{ * */
if (body.name == "Kerbin") // Override ModuleDataTransmitter.DataRate to just return packetSize, because we want antennas to be scored in
{ // terms of joules/byte
this._Kerbin = body; public new float DataRate
break; {
} get
} {
} this.PreTransmit_SetPacketSize();
  return this.packetSize;
// Post an error in the communication messages describing the reason transmission has failed. Currently there }
// is only one reason for this. }
protected void PostCannotTransmitError()  
{ // Override ModuleDataTransmitter.DataResourceCost to just return packetResourceCost, because we want antennas
string ErrorText = String.Format ("Unable to transmit: out of range! Maximum range = {0}; Current range = {1}.", this.maxTransmitDistance, this.transmitDistance); // to be scored in terms of joules/byte
ScreenMessages.PostScreenMessage (new ScreenMessage (ErrorText, 4f, ScreenMessageStyle.UPPER_LEFT)); public new float DataResourceCost
} {
  get
// Override ModuleDataTransmitter.GetInfo to add nominal and maximum range to the VAB description. {
public override string GetInfo() this.PreTransmit_SetPacketResourceCost();
{  
string text = base.GetInfo(); if (this.CanTransmit())
text += "Nominal Range: " + this.nominalRange.ToString() + "\n"; {
text += "Maximum Range: " + this.maxTransmitDistance.ToString() + "\n"; return this.packetResourceCost;
return text; }
} else
  {
// Override ModuleDataTransmitter.CanTransmit to return false when transmission is not possible. return float.PositiveInfinity;
public new bool CanTransmit() }
{ }
if (this.transmitDistance > this.maxTransmitDistance) }
{  
return false; public bool relayChecked
} {
return true; get
} {
  return this.relay.relayChecked;
// Override ModuleDataTransmitter.TransmitData to check against CanTransmit and fail out when CanTransmit }
// returns false. }
public new void TransmitData(List<ScienceData> dataQueue)  
{ /*
if (this.CanTransmit()) * Methods
{ * */
base.TransmitData(dataQueue); // Build ALL the objects.
} public ModuleLimitedDataTransmitter () : base()
else {
{ // Make the error posting prettier.
this.PostCannotTransmitError (); this.ErrorStyle = new UnityEngine.GUIStyle();
} this.ErrorStyle.normal.textColor = (UnityEngine.Color)XKCDColors.OrangeRed;
} this.ErrorStyle.active.textColor = (UnityEngine.Color)XKCDColors.OrangeRed;
  this.ErrorStyle.hover.textColor = (UnityEngine.Color)XKCDColors.OrangeRed;
// Override ModuleDataTransmitter.StartTransmission to check against CanTransmit and fail out when CanTransmit this.ErrorStyle.fontStyle = UnityEngine.FontStyle.Bold;
// returns false. this.ErrorStyle.padding.top = 32;
public new void StartTransmission()  
{ this.ErrorMsg = new ScreenMessage("", 4f, false, ScreenMessageStyle.UPPER_LEFT, this.ErrorStyle);
if (this.CanTransmit()) }
{  
base.StartTransmission(); // At least once, when the module starts with a state on the launch pad or later, go find Kerbin.
} public override void OnStart (StartState state)
else {
{ base.OnStart (state);
this.PostCannotTransmitError ();  
} if (state >= StartState.PreLaunch)
} {
} this.relay = new AntennaRelay(vessel);
} this.relay.maxTransmitDistance = this.maxTransmitDistance;
  }
   
  // Pre-set the transmit cost and packet size when loading.
  this.PreTransmit_SetPacketResourceCost();
  this.PreTransmit_SetPacketSize();
  }
   
  // When the module loads, fetch the Squad KSPFields from the base. This is necessary in part because
  // overloading packetSize and packetResourceCostinto a property in ModuleLimitedDataTransmitter didn't
  // work.
  public override void OnLoad(ConfigNode node)
  {
  this.Fields.Load(node);
  base.Fields.Load(node);
   
  this.ARmaxTransmitDistance = Mathf.Sqrt (this.maxPowerFactor) * this.nominalRange;
   
  base.OnLoad (node);
   
  this._basepacketSize = base.packetSize;
  this._basepacketResourceCost = base.packetResourceCost;
   
  Tools.PostDebugMessage(string.Format(
  "{0} loaded:\n" +
  "packetSize: {1}\n" +
  "packetResourceCost: {2}\n" +
  "nominalRange: {3}\n" +
  "maxPowerFactor: {4}\n" +
  "maxDataFactor: {5}\n",
  this.name,
  base.packetSize,
  this._basepacketResourceCost,
  this.nominalRange,
  this.maxPowerFactor,
  this.maxDataFactor
  ));
  }
   
  // Post an error in the communication messages describing the reason transmission has failed. Currently there
  // is only one reason for this.
  protected void PostCannotTransmitError()
  {
  string ErrorText = string.Format (
  "Unable to transmit: out of range! Maximum range = {0}m; Current range = {1}m.",
  Tools.MuMech_ToSI((double)this.ARmaxTransmitDistance, 2),
  Tools.MuMech_ToSI((double)this.transmitDistance, 2)
  );
   
  this.ErrorMsg.message = ErrorText;
   
  ScreenMessages.PostScreenMessage(this.ErrorMsg, true);
  }
   
  // Before transmission, set packetResourceCost. Per above, packet cost increases with the square of
  // distance. packetResourceCost maxes out at _basepacketResourceCost * maxPowerFactor, at which point
  // transmission fails (see CanTransmit).
  protected void PreTransmit_SetPacketResourceCost()
  {
  if (this.transmitDistance <= this.nominalRange)
  {
  base.packetResourceCost = this._basepacketResourceCost;
  }
  else
  {
  base.packetResourceCost = this._basepacketResourceCost
  * (float)Math.Pow (this.transmitDistance / this.nominalRange, 2);
  }
  }
   
  // Before transmission, set packetSize. Per above, packet size increases with the inverse square of
  // distance. packetSize maxes out at _basepacketSize * maxDataFactor.
  protected void PreTransmit_SetPacketSize()
  {
  if (this.transmitDistance >= this.nominalRange)
  {
  base.packetSize = this._basepacketSize;
  }
  else
  {
  base.packetSize = Math.Min(
  this._basepacketSize * (float)Math.Pow (this.nominalRange / this.transmitDistance, 2),
  this._basepacketSize * this.maxDataFactor);
  }
  }
   
  // Override ModuleDataTransmitter.GetInfo to add nominal and maximum range to the VAB description.
  public override string GetInfo()
  {
  string text = base.GetInfo();
  text += "Nominal Range: " + Tools.MuMech_ToSI((double)this.nominalRange, 2) + "m\n";
  text += "Maximum Range: " + Tools.MuMech_ToSI((double)this.ARmaxTransmitDistance, 2) + "m\n";
  return text;
  }
   
  // Override ModuleDataTransmitter.CanTransmit to return false when transmission is not possible.
  public new bool CanTransmit()
  {
  return this.relay.CanTransmit();
  }
   
  // Override ModuleDataTransmitter.TransmitData to check against CanTransmit and fail out when CanTransmit
  // returns false.
  public new void TransmitData(List<ScienceData> dataQueue)
  {
  if (this.CanTransmit())
  {
  base.TransmitData(dataQueue);
  }
  else
  {
  this.PostCannotTransmitError ();
  }
   
  Tools.PostDebugMessage (
  "distance: " + this.transmitDistance
  + " packetSize: " + this.packetSize
  + " packetResourceCost: " + this.packetResourceCost
  );
  }
   
  // Override ModuleDataTransmitter.StartTransmission to check against CanTransmit and fail out when CanTransmit
  // returns false.
  public new void StartTransmission()
  {
  PreTransmit_SetPacketSize ();
  PreTransmit_SetPacketResourceCost ();
   
  Tools.PostDebugMessage (
  "distance: " + this.transmitDistance
  + " packetSize: " + this.packetSize
  + " packetResourceCost: " + this.packetResourceCost
  );
  if (this.CanTransmit())
  {
  base.StartTransmission();
  }
  else
  {
  this.PostCannotTransmitError ();
  }
  }
   
  // When debugging, it's nice to have a button that just tells you everything.
  #if DEBUG
  [KSPEvent (guiName = "Show Debug Info", active = true, guiActive = true)]
  public void DebugInfo()
  {
  PreTransmit_SetPacketSize ();
  PreTransmit_SetPacketResourceCost ();
   
  string msg = string.Format(
  "'{0}'\n" +
  "_basepacketSize: {1}\n" +
  "packetSize: {2}\n" +
  "_basepacketResourceCost: {3}\n" +
  "packetResourceCost: {4}\n" +
  "maxTransmitDistance: {5}\n" +
  "transmitDistance: {6}\n" +
  "nominalRange: {7}\n" +
  "CanTransmit: {8}\n" +
  "DataRate: {9}\n" +
  "DataResourceCost: {10}\n" +
  "TransmitterScore: {11}",
  this.name,
  this._basepacketSize,
  base.packetSize,
  this._basepacketResourceCost,
  base.packetResourceCost,
  this.ARmaxTransmitDistance,
  this.transmitDistance,
  this.nominalRange,
  this.CanTransmit(),
  this.DataRate,
  this.DataResourceCost,
  ScienceUtil.GetTransmitterScore(this)
  );
  ScreenMessages.PostScreenMessage (new ScreenMessage (msg, 4f, ScreenMessageStyle.UPPER_RIGHT));
  }
  #endif
  }
  }
file:b/AntennaRelay.cs (new)
  using System;
  using System.Collections.Generic;
  using System.Linq;
 
  namespace AntennaRange
  {
  public class AntennaRelay : IAntennaRelay
  {
  protected CelestialBody Kerbin;
 
  public Vessel vessel
  {
  get;
  protected set;
  }
 
  // Returns the current distance to the center of Kerbin, which is totally where the Kerbals keep their radioes.
  public double transmitDistance
  {
  get
  {
  IAntennaRelay nearestRelay = this.FindNearestRelay();
 
  if (nearestRelay == null)
  {
  return this.DistanceTo(this.Kerbin);
  }
  else
  {
  return this.DistanceTo(nearestRelay);
  }
  }
  }
 
  public virtual float maxTransmitDistance
  {
  get;
  set;
  }
 
  /// <summary>
  /// Gets a value indicating whether this <see cref="AntennaRange.ProtoDataTransmitter"/> has been checked during
  /// the current relay attempt.
  /// </summary>
  /// <value><c>true</c> if relay checked; otherwise, <c>false</c>.</value>
  public virtual bool relayChecked
  {
  get;
  protected set;
  }
 
  public bool CanTransmit()
  {
  if (this.transmitDistance > this.maxTransmitDistance)
  {
  return false;
  }
  else
  {
  return true;
  }
  }
 
  /// <summary>
  /// Finds the nearest relay.
  /// </summary>
  /// <returns>The nearest relay.</returns>
  public IAntennaRelay FindNearestRelay()
  {
  this.relayChecked = true;
 
  List<Vessel> nearbyVessels = FlightGlobals.Vessels
  .Where(v => (v.GetWorldPos3D() - vessel.GetWorldPos3D()).magnitude < this.maxTransmitDistance)
  .ToList();
 
  Tools.PostDebugMessage(string.Format(
  "{0}: Vessels in range: {1}",
  this.GetType().Name,
  nearbyVessels.Count
  ));
 
  nearbyVessels.RemoveAll(v => v.id == vessel.id);
 
  Tools.PostDebugMessage(string.Format(
  "{0}: Vessels in range excluding self: {1}",
  this.GetType().Name,
  nearbyVessels.Count
  ));
 
  List<IAntennaRelay> nearbyRelays = nearbyVessels.SelectMany(v => v.GetAntennaRelays()).ToList();
 
  Tools.PostDebugMessage(string.Format(
  "{0}: Found {1} nearby relays.",
  this.GetType().Name,
  nearbyRelays.Count
  ));
 
  nearbyRelays.RemoveAll(r => r.relayChecked);
 
  Tools.PostDebugMessage(string.Format(
  "{0}: Found {1} nearby relays not already checked.",
  this.GetType().Name,
  nearbyRelays.Count
  ));
 
  nearbyRelays.RemoveAll(r => !r.CanTransmit());
 
  Tools.PostDebugMessage(string.Format(
  "{0}: Found {1} nearby relays not already checked that can transmit.",
  this.GetType().Name,
  nearbyRelays.Count
  ));
 
  nearbyRelays.Sort(new RelayComparer(this.vessel));
 
  IAntennaRelay nearestRelay = nearbyRelays.FirstOrDefault();
 
  this.relayChecked = false;
 
  return nearestRelay;
  }
 
  /// <summary>
  /// Initializes a new instance of the <see cref="AntennaRange.ProtoDataTransmitter"/> class.
  /// </summary>
  /// <param name="ms"><see cref="ProtoPartModuleSnapshot"/></param>
  public AntennaRelay(Vessel v)
  {
  this.vessel = v;
 
  this.Kerbin = FlightGlobals.Bodies.FirstOrDefault(b => b.name == "Kerbin");
  }
 
  internal class RelayComparer : IComparer<IAntennaRelay>
  {
  protected Vessel referenceVessel;
 
  private RelayComparer() {}
 
  public RelayComparer(Vessel reference)
  {
  this.referenceVessel = reference;
  }
 
  public int Compare(IAntennaRelay one, IAntennaRelay two)
  {
  double distanceOne;
  double distanceTwo;
 
  distanceOne = one.vessel.DistanceTo(referenceVessel);
  distanceTwo = two.vessel.DistanceTo(referenceVessel);
 
  return distanceOne.CompareTo(distanceTwo);
  }
  }
  }
  }
 
 
file:b/Extensions.cs (new)
  using System;
  using System.Collections.Generic;
  using System.Linq;
 
  namespace AntennaRange
  {
  public static class Extensions
  {
  public static double DistanceTo(this Vessel vesselOne, Vessel vesselTwo)
  {
  return (vesselOne.GetWorldPos3D() - vesselTwo.GetWorldPos3D()).magnitude;
  }
 
  public static double DistanceTo(this Vessel vessel, CelestialBody body)
  {
  return (vessel.GetWorldPos3D() - body.position).magnitude;
  }
 
  public static double DistanceTo(this IAntennaRelay relay, Vessel Vessel)
  {
  return relay.vessel.DistanceTo(Vessel);
  }
 
  public static double DistanceTo(this IAntennaRelay relay, CelestialBody body)
  {
  return relay.vessel.DistanceTo(body);
  }
 
  public static double DistanceTo(this IAntennaRelay relayOne, IAntennaRelay relayTwo)
  {
  return relayOne.DistanceTo(relayTwo.vessel);
  }
 
  public static IEnumerable<IAntennaRelay> GetAntennaRelays (this Vessel vessel)
  {
  Tools.PostDebugMessage(string.Format(
  "{0}: Getting antenna relays from vessel {1}.",
  "IAntennaRelay",
  vessel.name
  ));
 
  List<IAntennaRelay> Transmitters;
 
  if (vessel.loaded) {
  Tools.PostDebugMessage(string.Format(
  "{0}: vessel {1} is loaded.",
  "IAntennaRelay",
  vessel.name
  ));
 
  Transmitters = vessel.Parts
  .SelectMany (p => p.Modules.OfType<IAntennaRelay> ())
  .ToList();
  } else {
  Tools.PostDebugMessage(string.Format(
  "{0}: vessel {1} is not loaded.",
  "IAntennaRelay",
  vessel.name
  ));
 
  Transmitters = new List<IAntennaRelay>();
 
  foreach (ProtoPartModuleSnapshot ms in vessel.protoVessel.protoPartSnapshots.SelectMany(ps => ps.modules))
  {
  if (ms.IsAntenna())
  {
  Transmitters.Add(new ProtoAntennaRelay(ms, vessel));
  }
  }
  }
 
  Tools.PostDebugMessage(string.Format(
  "{0}: vessel {1} has {2} transmitters.",
  "IAntennaRelay",
  vessel.name,
  Transmitters.Count
  ));
 
  return Transmitters;
  }
 
  public static bool IsAntenna (this PartModule module)
  {
  return module.Fields.GetValue<bool> ("IsAntenna");
  }
 
  public static bool IsAntenna(this ProtoPartModuleSnapshot protomodule)
  {
  bool result;
 
  return Boolean.TryParse (protomodule.moduleValues.GetValue ("IsAntenna") ?? "False", out result)
  ? result : false;
  }
  }
  }
 
 
file:b/IAntennaRelay.cs (new)
  using KSP;
  using System;
 
  namespace AntennaRange
  {
  public interface IAntennaRelay
  {
  Vessel vessel { get; }
 
  float maxTransmitDistance { get; }
 
  bool relayChecked { get; }
 
  bool CanTransmit();
  }
  }
 
 
  using System;
 
  namespace AntennaRange
  {
  public class ProtoAntennaRelay : AntennaRelay
  {
  protected ProtoPartModuleSnapshot snapshot;
 
  /// <summary>
  /// The maximum distance at which this transmitter can operate.
  /// </summary>
  /// <value>The max transmit distance.</value>
  public override float maxTransmitDistance
  {
  get
  {
  double result;
  Double.TryParse(snapshot.moduleValues.GetValue ("ARmaxTransmitDistance") ?? "0", out result);
  return (float)result;
  }
  }
 
  public override bool relayChecked
  {
  get
  {
  bool result;
  Boolean.TryParse(this.snapshot.moduleValues.GetValue("relayChecked"), out result);
  return result;
  }
  protected set
  {
  this.snapshot.moduleValues.SetValue("relayChecked", value.ToString());
  }
  }
 
  public ProtoAntennaRelay(ProtoPartModuleSnapshot ms, Vessel vessel) : base(vessel)
  {
  this.snapshot = ms;
  }
  }
  }