Commit | Line | Data |
---|---|---|
4685d517 RC |
1 | /* texton.c 4.1 83/03/09 */ |
2 | ||
3 | #include "2648.h" | |
4 | ||
5 | texton() | |
6 | { | |
7 | sync(); | |
8 | escseq(TEXT); | |
9 | } | |
10 | ||
11 | textoff() | |
12 | { | |
13 | sync(); | |
14 | ||
15 | /* | |
16 | * The following is needed because going into text mode | |
17 | * leaves the pen where the cursor last was. | |
18 | */ | |
19 | _penx = -40; _peny = 40; | |
20 | escseq(ESCP); | |
21 | outchar('a'); | |
22 | motion(_supx, _supy); | |
23 | _penx = _supx; _peny = _supy; | |
24 | } |