2021-10-11 18:37:13 -03:00

28 lines
562 B
C

/*
* Copyright (c) 1980 Regents of the University of California.
* All rights reserved. The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*/
#ifndef lint
static char sccsid[] = "@(#)move.c 1.1 94/10/31 SMI"; /* from UCB 5.1 5/7/85 */
#endif not lint
#include "hp2648.h"
move(xi,yi)
int xi,yi;
{
char xb1,xb2,yb1,yb2;
itoa(xsc(xi),&xb1,&xb2);
itoa(ysc(yi),&yb1,&yb2);
buffready(5);
putchar(PENUP);
putchar(xb2);
putchar(xb1);
putchar(yb2);
putchar(yb1);
currentx = xsc(xi);
currenty = ysc(yi);
}