Initial release of Maemo 5 port of gnuplot

[gnuplot] / demo / mouselab_1.dem

diff --git a/demo/mouselab_1.dem b/demo/mouselab_1.dem
new file mode 100644 (file)
index 0000000..5ae3fb2
--- /dev/null
+++ b/demo/mouselab_1.dem
@@ -0,0 +1,37 @@
+#
+# $Id: mouselab_1.dem,v 1.1 2006/07/10 19:49:54 sfeam Exp $
+#
+# Demonstrate screen interaction using mouse variables
+#
+#     MOUSE_X MOUSE_Y MOUSE_KEY MOUSE_CHAR
+#
+# On entry, LID is the identifier for the previous label
+#
+LID = LID + 1
+set label 2 sprintf(">>> READY FOR LABEL %d <<<",LID-100) 
+set label 2 at graph .02, graph .65 tc lt (LID-100)
+replot
+
+#
+# Get mouse position and first character of label
+#
+pause mouse key
+LABEL = MOUSE_CHAR
+LABEL_X = MOUSE_X
+LABEL_Y = MOUSE_Y
+set label LID LABEL at LABEL_X, LABEL_Y
+replot
+#
+# Call routine that catches keystrokes one by one and
+# updates the label
+#
+load "mouselab_2.dem"
+#
+# Print out final label details
+#
+show label LID
+
+#
+# Loop until we see an <esc>
+#
+if (MOUSE_KEY != 27) reread