1*18787Sdist /* 2*18787Sdist * Copyright (c) 1980 Regents of the University of California. 3*18787Sdist * All rights reserved. The Berkeley software License Agreement 4*18787Sdist * specifies the terms and conditions for redistribution. 5*18787Sdist */ 611495Sralph 7*18787Sdist #ifndef lint 8*18787Sdist static char sccsid[] = "@(#)texton.c 5.1 (Berkeley) 04/26/85"; 9*18787Sdist #endif not lint 10*18787Sdist 1111495Sralph #include "2648.h" 1211495Sralph texton()1311495Sralphtexton() 1411495Sralph { 1511495Sralph sync(); 1611495Sralph escseq(TEXT); 1711495Sralph } 1811495Sralph textoff()1911495Sralphtextoff() 2011495Sralph { 2111495Sralph sync(); 2211495Sralph 2311495Sralph /* 2411495Sralph * The following is needed because going into text mode 2511495Sralph * leaves the pen where the cursor last was. 2611495Sralph */ 2711495Sralph _penx = -40; _peny = 40; 2811495Sralph escseq(ESCP); 2911495Sralph outchar('a'); 3011495Sralph motion(_supx, _supy); 3111495Sralph _penx = _supx; _peny = _supy; 3211495Sralph } 33