new file mode 100644
--- /dev/null
+++ b/scripts/plot/title.m
@@ -0,0 +1,22 @@
+function title (text)
+
+# usage: title (text)
+#
+# Defines a title for a plot.  The title will appear the next time a
+# plot is displayed. 
+#
+# See also: plot, semilogx, semilogy, loglog, polar, mesh, contour,
+#           bar, stairs, gplot, gsplot, replot, xlabel, ylabel
+
+  if (nargin != 1)
+    error ("usage: title (text)");
+  endif
+
+  if (isstr (text))
+    command = sprintf ("set title \"%s\"", text);
+    eval (command);
+  else
+    error ("error: title: text must be a string");
+  endif
+
+endfunction