xref: /csrg-svn/old/lib2648/movecurs.c (revision 18775)
1*18775Sdist /*
2*18775Sdist  * Copyright (c) 1980 Regents of the University of California.
3*18775Sdist  * All rights reserved.  The Berkeley software License Agreement
4*18775Sdist  * specifies the terms and conditions for redistribution.
5*18775Sdist  */
611483Sralph 
7*18775Sdist #ifndef lint
8*18775Sdist static char sccsid[] = "@(#)movecurs.c	5.1 (Berkeley) 04/26/85";
9*18775Sdist #endif not lint
10*18775Sdist 
1111483Sralph #include "2648.h"
1211483Sralph 
movecurs(x,y)1311483Sralph movecurs(x, y)
1411483Sralph {
1511483Sralph 	char mes[20];
1611483Sralph 
1711483Sralph 	if (x==_curx && y==_cury)
1811483Sralph 		return;
1911483Sralph 	sprintf(mes, "%d,%do", x, y);
2011483Sralph 	escseq(ESCD);
2111483Sralph 	outstr(mes);
2211483Sralph 	escseq(NONE);
2311483Sralph 	_curx = x;
2411483Sralph 	_cury = y;
2511483Sralph }
26