From 8dbef7b8ed3202ac4ee029446fda50b465ecda92 Mon Sep 17 00:00:00 2001
From: Joshua Davidson <joshuadavidson2000@gmail.com>
Date: Tue, 8 Nov 2016 21:13:38 -0500
Subject: [PATCH] correct flap/slat system, flaps 1 only slats when above
 100kts, per airbus A320 FCOM

---
 A319-200-IAE-set.xml |  1 +
 A320-200-IAE-set.xml |  9 +-----
 A320-main.xml        |  8 ++++++
 A321-200-IAE-set.xml |  1 +
 Nasal/fctl.nas       | 68 ++++++++++++++++++++++++++++++++++++++++++++
 5 files changed, 79 insertions(+), 8 deletions(-)
 create mode 100644 Nasal/fctl.nas

diff --git a/A319-200-IAE-set.xml b/A319-200-IAE-set.xml
index d775a9d8..59161af2 100644
--- a/A319-200-IAE-set.xml
+++ b/A319-200-IAE-set.xml
@@ -86,6 +86,7 @@
             <file>Aircraft/A320Family/Nasal/gpws.nas</file>
             <file>Aircraft/A320Family/Nasal/efis.nas</file>
 			<file>Aircraft/A320Family/Nasal/PFD_FMA.nas</file>
+			<file>Aircraft/A320Family/Nasal/fctl.nas</file>
 		</A320>
 		<itaf>
 			<file>Aircraft/A320Family/Nasal/it-autoflight.nas</file>
diff --git a/A320-200-IAE-set.xml b/A320-200-IAE-set.xml
index cac29def..0ea645bb 100644
--- a/A320-200-IAE-set.xml
+++ b/A320-200-IAE-set.xml
@@ -19,14 +19,6 @@
 			</livery>
 		</model>
 
-		<flaps>
-			<setting>0.000</setting>
-			<setting>0.290</setting>
-			<setting>0.596</setting>
-			<setting>0.645</setting>
-			<setting>1.000</setting>
-		</flaps>
-
 		<view>
 			<name>Pilot View</name>
 			<internal archive="y">true</internal>
@@ -86,6 +78,7 @@
             <file>Aircraft/A320Family/Nasal/gpws.nas</file>
             <file>Aircraft/A320Family/Nasal/efis.nas</file>
 			<file>Aircraft/A320Family/Nasal/PFD_FMA.nas</file>
+			<file>Aircraft/A320Family/Nasal/fctl.nas</file>
 		</A320>
 		<itaf>
 			<file>Aircraft/A320Family/Nasal/it-autoflight.nas</file>
diff --git a/A320-main.xml b/A320-main.xml
index 45e6500f..f47c17fd 100644
--- a/A320-main.xml
+++ b/A320-main.xml
@@ -19,6 +19,14 @@
 		<startup>
 			<splash-texture>Aircraft/A320Family/splash.png</splash-texture>
 		</startup>
+		
+		<flaps>
+			<setting>0.000</setting>
+			<setting>0.290</setting>
+			<setting>0.596</setting>
+			<setting>0.645</setting>
+			<setting>1.000</setting>
+		</flaps>
 
 		<systems>
 			<!-- Disable the generic electrical system and use the Nasal system -->
diff --git a/A321-200-IAE-set.xml b/A321-200-IAE-set.xml
index 490d301c..220aa4d0 100644
--- a/A321-200-IAE-set.xml
+++ b/A321-200-IAE-set.xml
@@ -86,6 +86,7 @@
             <file>Aircraft/A320Family/Nasal/gpws.nas</file>
             <file>Aircraft/A320Family/Nasal/efis.nas</file>
 			<file>Aircraft/A320Family/Nasal/PFD_FMA.nas</file>
+			<file>Aircraft/A320Family/Nasal/fctl.nas</file>
 		</A320>
 		<itaf>
 			<file>Aircraft/A320Family/Nasal/it-autoflight.nas</file>
diff --git a/Nasal/fctl.nas b/Nasal/fctl.nas
new file mode 100644
index 00000000..5e8b2de2
--- /dev/null
+++ b/Nasal/fctl.nas
@@ -0,0 +1,68 @@
+# Custom Flap/Slat System by Joshua Davidson (it0uchpods)
+# In air, flaps 1 is slats only. On ground, it is slats and flaps.
+
+setprop("/controls/flight/flap-lever", 0);
+
+controls.flapsDown = func(step) {
+	if (step == 1) {
+		if (getprop("/controls/flight/flap-lever") == 0) {
+			if (getprop("/velocities/airspeed-kt") <= 100) {
+				setprop("/controls/flight/flaps", 0.290);
+				setprop("/controls/flight/slats", 0.666);
+				setprop("/controls/flight/flap-lever", 1);
+				return;
+			} else {
+				setprop("/controls/flight/flaps", 0.000);
+				setprop("/controls/flight/slats", 0.666);
+				setprop("/controls/flight/flap-lever", 1);
+				return;
+			}
+		} else if (getprop("/controls/flight/flap-lever") == 1) {
+			setprop("/controls/flight/flaps", 0.596);
+			setprop("/controls/flight/slats", 0.814);
+			setprop("/controls/flight/flap-lever", 2);
+			return;
+		} else if (getprop("/controls/flight/flap-lever") == 2) {
+			setprop("/controls/flight/flaps", 0.645);
+			setprop("/controls/flight/slats", 0.814);
+			setprop("/controls/flight/flap-lever", 3);
+			return;
+		} else if (getprop("/controls/flight/flap-lever") == 3) {
+			setprop("/controls/flight/flaps", 1.000);
+			setprop("/controls/flight/slats", 1.000);
+			setprop("/controls/flight/flap-lever", 4);
+			return;
+		}
+	} else if (step == -1) {
+		if (getprop("/controls/flight/flap-lever") == 4) {
+			setprop("/controls/flight/flaps", 0.645);
+			setprop("/controls/flight/slats", 0.814);
+			setprop("/controls/flight/flap-lever", 3);
+			return;
+		} else if (getprop("/controls/flight/flap-lever") == 3) {
+			setprop("/controls/flight/flaps", 0.596);
+			setprop("/controls/flight/slats", 0.814);
+			setprop("/controls/flight/flap-lever", 2);
+			return;
+		} else if (getprop("/controls/flight/flap-lever") == 2) {
+			if (getprop("/velocities/airspeed-kt") <= 100) {
+				setprop("/controls/flight/flaps", 0.290);
+				setprop("/controls/flight/slats", 0.666);
+				setprop("/controls/flight/flap-lever", 1);
+				return;
+			} else {
+				setprop("/controls/flight/flaps", 0.000);
+				setprop("/controls/flight/slats", 0.666);
+				setprop("/controls/flight/flap-lever", 1);
+				return;
+			}
+		} else if (getprop("/controls/flight/flap-lever") == 1) {
+			setprop("/controls/flight/flaps", 0.000);
+			setprop("/controls/flight/slats", 0.000);
+			setprop("/controls/flight/flap-lever", 0);
+			return;
+		}
+	} else {
+		return 0;
+	}
+}
\ No newline at end of file