add fgcommand "set-mouse", which sets mouse coordinates and cursor type

diff --git a/src/Main/fg_commands.cxx b/src/Main/fg_commands.cxx
index c25e36e5f07ba15ef1dd2b74eb2df1288c4a8a54..56eb29fcfe44cb96bc56e6caed1d641d49704d6d 100644 (file)
--- a/src/Main/fg_commands.cxx
+++ b/src/Main/fg_commands.cxx
@@ -1149,6 +1149,28 @@ do_gui_redraw (const SGPropertyNode * arg)
     return true;
 }
 
+
+/**
+ * Set mouse coordinates and cursor.
+ */
+static bool
+do_set_mouse (const SGPropertyNode * arg)
+{
+    if (arg->hasValue("x") || arg->hasValue("y")) {
+        int x = arg->getIntValue("x", fgGetInt("/devices/status/mice/mouse/x"));
+        int y = arg->getIntValue("y", fgGetInt("/devices/status/mice/mouse/y"));
+        fgWarpMouse(x, y);
+    }
+
+    SGPropertyNode *cursor = const_cast<SGPropertyNode *>(arg)->getNode("cursor", true);
+    if (cursor->getType() != SGPropertyNode::NONE)
+        fgSetMouseCursor(cursor->getIntValue());
+
+    cursor->setIntValue(fgGetMouseCursor());
+    return true;
+}
+
+
 /**
  * Built-in command: play an audio message (i.e. a wav file) This is
  * fire and forget.  Call this once per message and it will get dumped
@@ -1451,6 +1473,7 @@ static struct {
     { "dialog-update", do_dialog_update },
     { "dialog-apply", do_dialog_apply },
     { "gui-redraw", do_gui_redraw },
+    { "set-mouse", do_set_mouse },
     { "play-audio-sample", do_play_audio_sample },
     { "presets-commit", do_presets_commit },
     { "log-level", do_log_level },