1 #ifndef lint 2 static char sccsid[] = "@(#)subr.c 4.1 (Berkeley) 06/27/83"; 3 #endif 4 5 extern float obotx; 6 extern float oboty; 7 extern float boty; 8 extern float botx; 9 extern float scalex; 10 extern float scaley; 11 xsc(xi){ 12 int xa; 13 xa = (xi-obotx)*scalex+botx; 14 return(xa); 15 } 16 ysc(yi){ 17 int ya; 18 ya = (yi-oboty)*scaley+boty; 19 return(ya); 20 } 21