xref: /csrg-svn/old/lib2648/agoto.c (revision 18797)
111458Sralph /*
2*18797Sdist  * Copyright (c) 1980 Regents of the University of California.
3*18797Sdist  * All rights reserved.  The Berkeley software License Agreement
4*18797Sdist  * specifies the terms and conditions for redistribution.
5*18797Sdist  */
6*18797Sdist 
7*18797Sdist #ifndef lint
8*18797Sdist static char sccsid[] = "@(#)agoto.c	5.1 (Berkeley) 04/26/85";
9*18797Sdist #endif not lint
10*18797Sdist 
11*18797Sdist /*
1211458Sralph  * position the alphanumeric cursor to (x, y).
1311458Sralph  */
1411458Sralph 
1511458Sralph #include "2648.h"
1611458Sralph 
agoto(x,y)1711458Sralph agoto(x, y)
1811458Sralph int x, y;
1911458Sralph {
2011458Sralph 	char mes[20];
2111458Sralph 	sprintf(mes, "\33*dE\33&a%dr%dC", x, y);
2211458Sralph 	outstr(mes);
2311458Sralph }
2411458Sralph 
2511458Sralph /*
2611458Sralph  * lower left corner of screen.
2711458Sralph  */
lowleft()2811458Sralph lowleft()
2911458Sralph {
3011458Sralph 	outstr("\33F");
3111458Sralph }
32