21 lines
348 B
C
21 lines
348 B
C
#ifndef lint
|
|
static char sccsid[] = "@(#)subr.c 1.1 94/10/31 SMI"; /* from UCB 4.1 6/27/83 */
|
|
#endif
|
|
|
|
extern float obotx;
|
|
extern float oboty;
|
|
extern float boty;
|
|
extern float botx;
|
|
extern float scalex;
|
|
extern float scaley;
|
|
xsc(xi){
|
|
int xa;
|
|
xa = (xi-obotx)*scalex+botx;
|
|
return(xa);
|
|
}
|
|
ysc(yi){
|
|
int ya;
|
|
ya = (yi-oboty)*scaley+boty;
|
|
return(ya);
|
|
}
|