Scale EnergyReq based on Intensity

Also update notes for 4.0.6 release and KSP 1.6.0

Author: MOARdV

GameData/AviationLights/Parts/aviation_light.cfg

@@ -56,7 +56,7 @@ PART
 		Interval = 1.0
 
 		//Energy consumption rate
-		EnergyReq = 0.005
+		EnergyReq = 0.020
 
 		SpotAngle = 170
 		LightRotation = 0, 180, 0

GameData/AviationLights/Plugins/AviationLights.version

@@ -21,7 +21,7 @@
   "KSP_VERSION_MAX":
   {
     "MAJOR": 1,
-    "MINOR": 5,
+    "MINOR": 6,
     "PATCH": 99
   }
 }

README.md

@@ -69,7 +69,7 @@ The upgrade should not cause any loss of vessels.
 
 ### Localization
 
-Aviation Lights 4.0 and later support localization.  The currently supported languages are en-us.
+Aviation Lights 4.0 and later support localization.  The currently supported languages are en-us and es-es.
 
 Translations would be appreciated.
 
@@ -81,11 +81,6 @@ will update the legacy lights so they are available in the editor.  If you do no
 installation, and you do not have any vessels currently using those lights, feel free to delete the
 AviationLights/Parts/lights folder.  The new light is in AviationLights/Parts.
 
-### KSP 1.3.1
-
-AviationLights 4.0 may work in KSP 1.3.1 using the legacy lights.  However, the new part does not work correctly in KSP 1.3.1.
-You are welcome to try this configuration, but it is not supported.
-
 ### B9 Part Switcher
 
 If you wish to use B9 Part Switcher instead of the stock part variants feature, rename MM_B9PartSwitch.nocfg to
@@ -253,7 +248,8 @@ and the Intensity and Range may be changed with the Type Preset control.  In add
 directly by enabling Advanced Tweakables.
 
 * **Color**: The RGB color of the light.  Valid values are from 0 to 1 for each channel.
-* **Intensity**: The intensity of the light.  Brighter lights should use larger values.  Valid numbers range from 0 to 8.  Nav lights use 0.5.
+* **Intensity**: The intensity of the light.  Brighter lights should use larger values.  Valid numbers range from 0 to 8.  Nav lights use 0.5.  Energy consumption
+is affected by Intensity.
 * **Range**: The range of the light, in meters.
 
 ### Flash Timing
@@ -272,8 +268,13 @@ a new one.  All times are measured in seconds.
 The resource fields control the resource type and amount consumed per second.  By default, the parts require ElectricCharge, but they do not
 consume energy.
 
+EnergyReq is affected by the Intensity of the light.  The EnergyReq listed in the part config is the amount of resources required for a light
+with an Intensity of 1.0.  EnergyReq is scaled by the square of the Intensity, with a minimum scale of 0.25.  For example, a Nav Light that has an EnergyReq of 0.020
+and an Intensity of 0.5 will actually use 0.005 EC (= 0.020 x (0.5 x 0.5)).  An Intensity of 2.0 will consume 4x the listed EnergyReq.
+
 * **Resource**: The name (from the RESOURCE_DEFINITION) of the resource consumed when this light is on.
-* **EnergyReq**: The amount of the resource consumed per second while switched on.  If this value is zero, the light does not consume any resources.
+* **EnergyReq**: The amount of the resource consumed per second while switched on for a light of Intensity = 1.0.  If this value is zero, the light does not consume any resources.
+Intensity modifies this value.
 
 ### Advanced
 
@@ -291,6 +292,12 @@ added to a config file or edited in the persistent.sfs file.
 
 ## CHANGELOG
 
+21 December 2018 - v4.0.6
+
+* Added es-es localization courtesy fitiales.  Pull request #15.
+* Scaled energy consumption based on light intensity.  Issue #13.
+
+***
 16 October 2018 - v4.0.5.1
 
 * Recompiled against KSP 1.5.0.

Source/AviationLights.cs

@@ -39,6 +39,7 @@ public class TypePreset
 
         [KSPField]
         public float EnergyReq = 0.0f;
+        public float actualEnergyReq = 0.0f;
 
         [KSPField]
         public float SpotAngle = 0.0f;
@@ -170,6 +171,7 @@ public void Start()
             }
 
             Intensity = Mathf.Clamp(Intensity, 0.0f, 8.0f);
+            actualEnergyReq = EnergyReq * Mathf.Max(0.25f, Intensity * Intensity);
             FlashOn = Mathf.Max(FlashOn, 0.01f);
             FlashOff = Mathf.Max(FlashOff, 0.01f);
             Interval = Mathf.Max(Interval, 0.01f);
@@ -428,6 +430,7 @@ private void TypePresetChanged(BaseField field, object oldFieldValueObj)
             Interval = newtype.interval;
             Intensity = newtype.intensity;
             Range = newtype.range;
+            actualEnergyReq = EnergyReq * Mathf.Max(0.25f, Intensity * Intensity);
 
             if (applySymmetry)
             {
@@ -481,9 +484,9 @@ public void Update()
         {
             if (HighLogic.LoadedSceneIsFlight)
             {
-                if (navLightSwitch != (int)NavLightState.Off && EnergyReq > 0.0f && TimeWarp.deltaTime > 0.0f)
+                if (navLightSwitch != (int)NavLightState.Off && actualEnergyReq > 0.0f && TimeWarp.deltaTime > 0.0f)
                 {
-                    if (vessel.RequestResource(part, resourceId, EnergyReq * TimeWarp.deltaTime, true) < EnergyReq * TimeWarp.deltaTime * 0.5f)
+                    if (vessel.RequestResource(part, resourceId, actualEnergyReq * TimeWarp.deltaTime, true) < actualEnergyReq * TimeWarp.deltaTime * 0.5f)
                     {
                         UpdateLights(false);
                         return;

Source/Properties/AssemblyInfo.cs

@@ -17,7 +17,7 @@
 // You can specify all the values or you can default the Build and Revision Numbers 
 // by using the '*' as shown below:
 // [assembly: AssemblyVersion("1.0.*")]
-[assembly: AssemblyVersion("4.0.5.1")]
+[assembly: AssemblyVersion("4.0.6")]
 
 // Setting ComVisible to false makes the types in this assembly not visible 
 // to COM components.  If you need to access a type in this assembly from