1*48517Sbostic /*- 2*48517Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*48517Sbostic * All rights reserved. 4*48517Sbostic * 5*48517Sbostic * %sccs.include.proprietary.c% 619975Sdist */ 719975Sdist 815455Sralph #ifndef lint 9*48517Sbostic static char sccsid[] = "@(#)move.c 5.2 (Berkeley) 04/22/91"; 10*48517Sbostic #endif /* not lint */ 1115455Sralph 1215455Sralph #include "hp2648.h" 1315455Sralph 1415455Sralph move(xi,yi) 1515455Sralph int xi,yi; 1615455Sralph { 1715455Sralph char xb1,xb2,yb1,yb2; 1815455Sralph itoa(xsc(xi),&xb1,&xb2); 1915455Sralph itoa(ysc(yi),&yb1,&yb2); 2015455Sralph buffready(5); 2115455Sralph putchar(PENUP); 2215455Sralph putchar(xb2); 2315455Sralph putchar(xb1); 2415455Sralph putchar(yb2); 2515455Sralph putchar(yb1); 2615455Sralph currentx = xsc(xi); 2715455Sralph currenty = ysc(yi); 2815455Sralph } 29