Commit | Line | Data |
---|---|---|
97e3edfb DF |
1 | /* |
2 | * Copyright (c) 1980 Regents of the University of California. | |
3 | * All rights reserved. The Berkeley software License Agreement | |
4 | * specifies the terms and conditions for redistribution. | |
5 | */ | |
6 | ||
7 | #ifndef lint | |
8 | static char sccsid[] = "@(#)texton.c 5.1 (Berkeley) %G%"; | |
9 | #endif not lint | |
4685d517 RC |
10 | |
11 | #include "2648.h" | |
12 | ||
13 | texton() | |
14 | { | |
15 | sync(); | |
16 | escseq(TEXT); | |
17 | } | |
18 | ||
19 | textoff() | |
20 | { | |
21 | sync(); | |
22 | ||
23 | /* | |
24 | * The following is needed because going into text mode | |
25 | * leaves the pen where the cursor last was. | |
26 | */ | |
27 | _penx = -40; _peny = 40; | |
28 | escseq(ESCP); | |
29 | outchar('a'); | |
30 | motion(_supx, _supy); | |
31 | _penx = _supx; _peny = _supy; | |
32 | } |