|
|
1.1 ! root 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: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.