1
/* This file is part of the GNU plotutils package. Copyright (C) 1995,
2
1996, 1997, 1998, 1999, 2000, 2005, Free Software Foundation, Inc.
4
The GNU plotutils package is free software. You may redistribute it
5
and/or modify it under the terms of the GNU General Public License as
6
published by the Free Software foundation; either version 2, or (at your
7
option) any later version.
9
The GNU plotutils package is distributed in the hope that it will be
10
useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
11
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12
General Public License for more details.
14
You should have received a copy of the GNU General Public License along
15
with the GNU plotutils package; see the file COPYING. If not, write to
16
the Free Software Foundation, Inc., 51 Franklin St., Fifth Floor,
17
Boston, MA 02110-1301, USA. */
1
19
/* The internal point-drawing function, which point() is a wrapper around.
2
20
It draws a point at the current location. There is no standard
3
21
definition of `point', so any Plotter is free to implement this as it
38
51
/* sync ReGIS's foreground color to be the same as our pen color */
39
_r_set_pen_color (S___(_plotter));
52
_pl_r_set_pen_color (S___(_plotter));
41
54
/* output the point, as a single pixel */
42
_regis_move (R___(_plotter) ixx, iyy);
55
_pl_r_regis_move (R___(_plotter) ixx, iyy);
43
56
_write_string (_plotter->data, "V[]\n");
45
58
/* update our notion of ReGIS's notion of position */