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
#include "sys-defines.h"
6
_t_erase_page (S___(Plotter *_plotter))
8
_t_erase_page (S___(_plotter))
9
S___(Plotter *_plotter;)
23
_pl_t_erase_page (S___(Plotter *_plotter))
12
25
/* erase: emit ESC C-l, i.e. ^[^l */
13
26
_write_string (_plotter->data, "\033\014");
14
_plotter->tek_mode = MODE_ALPHA; /* erasing enters alpha mode */
27
_plotter->tek_mode = TEK_MODE_ALPHA; /* erasing enters alpha mode */
16
29
/* Note: kermit Tek emulator, on seeing ESC C-l , seems to enter graphics
17
mode, not alpha mode. Maybe we should specify MODE_PLOT above,
18
instead of MODE_ALPHA? The above won't hurt though, because we don't
19
use MODE_ALPHA anyway (we'll have to switch away from it). */
30
mode, not alpha mode. Maybe we should specify TEK_MODE_PLOT above,
31
instead of TEK_MODE_ALPHA? The above won't hurt though, because we don't
32
use TEK_MODE_ALPHA anyway (we'll have to switch away from it). */
21
34
/* set background color (a no-op unless we're writing to a kermit
22
35
Tektronix emulator, see t_color.c) */
23
_t_set_bg_color (S___(_plotter));
36
_pl_t_set_bg_color (S___(_plotter));