1
## Copyright (C) 1998-2003 Joao Cardoso.
3
## This program is free software; you can redistribute it and/or modify it
4
## under the terms of the GNU General Public License as published by
5
## the Free Software Foundation; either version 2, or (at your option)
8
## This program is distributed in the hope that it will be useful, but
9
## WITHOUT ANY WARRANTY; without even the implied warranty of
10
## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11
## General Public License for more details.
13
## This file is part of plplot_octave.
15
## usage: title (text)
17
## Defines a title for the next plots
18
## The special character `#' followed by another special character may be
19
## used for special text manipulation, eg ';x#u2#d;' prints `x^2' in math,
20
## and `title("#gS#u5#b#d#dn=1#u") prints \sum_{n=1}^{5}.
22
## #u superscript, end with #d
23
## #d subscript, end with #u
26
## #+ toogle overline mode
27
## #- toogle underline mode
29
## #fn switch to normal font
30
## #fr switch to roman font
31
## #fi switch to italic font
32
## #fs switch to script font
33
## #(nnn) hershey character nnn
35
## For special fonts, the extended charset must be loaded first,
36
## use `plfontld(1)' to set, and `plfontld(0)' to return to normal.
38
## See also: xlabel, ylabel, zlabel
40
function text = title (text)
43
global pl_automatic_replot
48
usage ("title (text)");
51
if (nargin == 1 && isempty(text))
56
text = __pl.tlabel(strm,:);
58
__pl.tlabel = __pl_matstr(__pl.tlabel, text, strm);
61
if (exist("pl_automatic_replot"))
62
if (pl_automatic_replot)