36 lines
704 B
C
36 lines
704 B
C
#ifndef lint
|
|
static char sccsid[] = "@(#)getcodi.c 1.1 94/10/31 SMI"; /* from UCB 4.2 05/27/83 */
|
|
#endif
|
|
|
|
# include "getpar.h"
|
|
|
|
/*
|
|
** get course and distance
|
|
**
|
|
** The user is asked for a course and distance. This is used by
|
|
** move, impulse, and some of the computer functions.
|
|
**
|
|
** The return value is zero for success, one for an invalid input
|
|
** (meaning to drop the request).
|
|
*/
|
|
|
|
getcodi(co, di)
|
|
int *co;
|
|
double *di;
|
|
{
|
|
|
|
*co = getintpar("Course");
|
|
|
|
/* course must be in the interval [0, 360] */
|
|
if (*co < 0 || *co > 360)
|
|
return (1);
|
|
*di = getfltpar("Distance");
|
|
|
|
/* distance must be in the interval [0, 15] */
|
|
if (*di <= 0.0 || *di > 15.0)
|
|
return (1);
|
|
|
|
/* good return */
|
|
return (0);
|
|
}
|