1 /*-
2 * Copyright (c) 1980, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * %sccs.include.proprietary.c%
6 */
7
8 #ifndef lint
9 static char sccsid[] = "@(#)move.c 8.1 (Berkeley) 06/04/93";
10 #endif /* not lint */
11
12 #include "hp2648.h"
13
move(xi,yi)14 move(xi,yi)
15 int xi,yi;
16 {
17 char xb1,xb2,yb1,yb2;
18 itoa(xsc(xi),&xb1,&xb2);
19 itoa(ysc(yi),&yb1,&yb2);
20 buffready(5);
21 putchar(PENUP);
22 putchar(xb2);
23 putchar(xb1);
24 putchar(yb2);
25 putchar(yb1);
26 currentx = xsc(xi);
27 currenty = ysc(yi);
28 }
29