From c86cd8c013bfdcfab84f91007dcf9e2b437d19f2 Mon Sep 17 00:00:00 2001
From: mfranz <mfranz>
Date: Sat, 11 Mar 2006 09:52:51 +0000
Subject: [PATCH] "flaps down" -> decrease maximum speed "flaps up"   ->
 increase maximum speed

---
 Aircraft/ufo/ufo-set.xml | 24 +++++++++++++++++++++++-
 1 file changed, 23 insertions(+), 1 deletion(-)

diff --git a/Aircraft/ufo/ufo-set.xml b/Aircraft/ufo/ufo-set.xml
index 618807ff9..5753e67e8 100644
--- a/Aircraft/ufo/ufo-set.xml
+++ b/Aircraft/ufo/ufo-set.xml
@@ -6,7 +6,7 @@
 
   <description>UFO from the 'White Project' of the UNESCO</description>
   <author>ET</author>
- 
+
   <flight-model>ufo</flight-model>
 
   <sound>
@@ -27,8 +27,30 @@
     <name>joystick fire button</name>
     <desc>fly backwards</desc>
    </key>
+   <key>
+    <name>[ ]</name>
+    <desc>increase/decrease maximum speed</desc>
+   </key>
   </help>
 
  </sim>
 
+ <nasal>
+  <ufo>
+   <script>
+       var maxspeed = props.globals.getNode("engines/engine/speed-max-mps");
+       controls.flapsDown = func(x) {
+           if (!x) { return }
+           var speed = maxspeed.getValue();
+           if (x > 0 and speed > 5) {
+               speed /= 1.5;
+           } elsif (x &lt; 0 and speed &lt; 20000) {
+               speed *= 1.5;
+           }
+           maxspeed.setDoubleValue(speed);
+           gui.popupTip(sprintf("MaxSpeed " ~ int(speed) ~ " m/s"));
+       }
+   </script>
+  </ufo>
+ </nasal>
 </PropertyList>