From cf1183a6fffd153f8165428ecb37b1ed24fc9e72 Mon Sep 17 00:00:00 2001
From: Mark van Renswoude <mark@x2software.net>
Date: Mon, 28 Jan 2013 22:37:27 +0000
Subject: [PATCH] Added recognition lights (just in time for release 0.6)

---
 G940LEDControl/Forms/MainFrm.dfm             |   4 ++++
 G940LEDControl/G940LEDControl.dproj          |   4 ++--
 G940LEDControl/G940LEDControl.res            | Bin 28524 -> 28524 bytes
 G940LEDControl/Units/FSXLEDStateProvider.pas |   7 ++++++-
 4 files changed, 12 insertions(+), 3 deletions(-)

diff --git a/G940LEDControl/Forms/MainFrm.dfm b/G940LEDControl/Forms/MainFrm.dfm
index f69ef25..f63ad32 100644
--- a/G940LEDControl/Forms/MainFrm.dfm
+++ b/G940LEDControl/Forms/MainFrm.dfm
@@ -442,6 +442,10 @@ object MainForm: TMainForm
     object tsAbout: TTabSheet
       Caption = 'About'
       ImageIndex = 1
+      ExplicitLeft = 0
+      ExplicitTop = 0
+      ExplicitWidth = 0
+      ExplicitHeight = 0
       object lblVersionCaption: TLabel
         Left = 16
         Top = 67
diff --git a/G940LEDControl/G940LEDControl.dproj b/G940LEDControl/G940LEDControl.dproj
index 459422c..1e505f8 100644
--- a/G940LEDControl/G940LEDControl.dproj
+++ b/G940LEDControl/G940LEDControl.dproj
@@ -81,8 +81,8 @@
 			<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
 		</PropertyGroup>
 		<PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
-			<VerInfo_MinorVer>5</VerInfo_MinorVer>
-			<VerInfo_Keys>CompanyName=X²Software;FileDescription=G940 LED Control;FileVersion=0.5.0.0;InternalName=;LegalCopyright=© 2011 X²Software;LegalTrademarks=;OriginalFilename=G940LEDControl.exe;ProductName=G940 LED Control;ProductVersion=0.5;Comments=</VerInfo_Keys>
+			<VerInfo_MinorVer>6</VerInfo_MinorVer>
+			<VerInfo_Keys>CompanyName=X²Software;FileDescription=G940 LED Control;FileVersion=0.6.0.0;InternalName=;LegalCopyright=© 2011 X²Software;LegalTrademarks=;OriginalFilename=G940LEDControl.exe;ProductName=G940 LED Control;ProductVersion=0.6;Comments=</VerInfo_Keys>
 			<VerInfo_Locale>1033</VerInfo_Locale>
 			<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
 		</PropertyGroup>
diff --git a/G940LEDControl/G940LEDControl.res b/G940LEDControl/G940LEDControl.res
index 37b730a375cd00c9129865a1b15db3c1d5110e50..673824825398b275e260cf11c6695f7f545ef1b1 100644
GIT binary patch
delta 36
lcmaEJkMYet#t8+SYzz><wy~0(k<n~(BO^bEn#goJ2LQ=G3LXFe

delta 36
lcmaEJkMYet#t8+StPBvqy0Ma-k<oN>BO^bEn#goJ2LQ<a3K{?a

diff --git a/G940LEDControl/Units/FSXLEDStateProvider.pas b/G940LEDControl/Units/FSXLEDStateProvider.pas
index 9bb50d2..98874ff 100644
--- a/G940LEDControl/Units/FSXLEDStateProvider.pas
+++ b/G940LEDControl/Units/FSXLEDStateProvider.pas
@@ -46,6 +46,7 @@ const
   FUNCTION_FSX_AUTOPILOT_NAV = FUNCTION_PROVIDER_OFFSET + 24;
 
   FUNCTION_FSX_TAXILIGHTS = FUNCTION_PROVIDER_OFFSET + 25;
+  FUNCTION_FSX_RECOGNITIONLIGHTS = FUNCTION_PROVIDER_OFFSET + 26;
 
 
 type
@@ -124,6 +125,7 @@ const
   FSX_LIGHTON_TAXI = $0008;
   FSX_LIGHTON_STROBE = $0010;
   FSX_LIGHTON_PANEL = $0020;
+  FSX_LIGHTON_RECOGNITION = $0040;
   FSX_LIGHTON_CABIN = $0200;
 
 
@@ -163,6 +165,7 @@ begin
   AConsumer.AddFunction(FUNCTION_FSX_NAVLIGHTS, 'Nav lights');
   AConsumer.AddFunction(FUNCTION_FSX_PARKINGBRAKE, 'Parking brake');
   AConsumer.AddFunction(FUNCTION_FSX_PRESSURIZATIONDUMPSWITCH, 'Pressurization dump switch');
+  AConsumer.AddFunction(FUNCTION_FSX_RECOGNITIONLIGHTS, 'Recognition lights');
   AConsumer.AddFunction(FUNCTION_FSX_SPOILERS, 'Spoilers (air brake)');
   AConsumer.AddFunction(FUNCTION_FSX_STROBELIGHTS, 'Strobe lights');
   AConsumer.AddFunction(FUNCTION_FSX_TAILHOOK, 'Tail hook');
@@ -267,7 +270,8 @@ begin
   { Lights }
   if Consumer.FunctionMap.HasFunction([FUNCTION_FSX_LANDINGLIGHTS, FUNCTION_FSX_INSTRUMENTLIGHTS,
                                        FUNCTION_FSX_STROBELIGHTS, FUNCTION_FSX_NAVLIGHTS,
-                                       FUNCTION_FSX_BEACONLIGHTS, FUNCTION_FSX_TAXILIGHTS]) then
+                                       FUNCTION_FSX_BEACONLIGHTS, FUNCTION_FSX_TAXILIGHTS,
+                                       FUNCTION_FSX_RECOGNITIONLIGHTS]) then
   begin
     AddVariable(DEFINITION_LIGHTS, 'LIGHT ON STATES', FSX_UNIT_MASK, SIMCONNECT_DATATYPE_INT32);
     AddDefinition(DEFINITION_LIGHTS);
@@ -458,6 +462,7 @@ begin
   SetFSXLightState(state, FSX_LIGHTON_NAV, FUNCTION_FSX_NAVLIGHTS);
   SetFSXLightState(state, FSX_LIGHTON_STROBE, FUNCTION_FSX_STROBELIGHTS);
   SetFSXLightState(state, FSX_LIGHTON_TAXI, FUNCTION_FSX_TAXILIGHTS);
+  SetFSXLightState(state, FSX_LIGHTON_RECOGNITION, FUNCTION_FSX_RECOGNITIONLIGHTS);
 end;