| 1 |
|
#ifndef lint |
| 2 |
|
static const char RCSid[] = "$Id$"; |
| 3 |
|
#endif |
| 4 |
– |
#ifndef lint |
| 5 |
– |
static char sccsid[] = "@(#)arc.c 4.1 (Berkeley) 6/27/83"; |
| 6 |
– |
#endif |
| 4 |
|
|
| 5 |
+ |
#include "local4014.h" |
| 6 |
+ |
#include "lib4014.h" |
| 7 |
+ |
|
| 8 |
|
int del = 20; |
| 9 |
< |
step(d){ |
| 9 |
> |
|
| 10 |
> |
extern void |
| 11 |
> |
step(int d) |
| 12 |
> |
{ |
| 13 |
|
del = d; |
| 14 |
|
} |
| 15 |
< |
arc(x,y,x0,y0,x1,y1){ |
| 15 |
> |
|
| 16 |
> |
extern void |
| 17 |
> |
arc( |
| 18 |
> |
int x, |
| 19 |
> |
int y, |
| 20 |
> |
int x0, |
| 21 |
> |
int y0, |
| 22 |
> |
int x1, |
| 23 |
> |
int y1 |
| 24 |
> |
) |
| 25 |
> |
{ |
| 26 |
|
double pc; |
| 27 |
|
double sqrt(); |
| 28 |
|
int flg,m,xc,yc,xs,ys,qs,qf; |
| 113 |
|
} |
| 114 |
|
} |
| 115 |
|
} |
| 116 |
< |
quad(x,y,xp,yp){ |
| 116 |
> |
|
| 117 |
> |
extern int |
| 118 |
> |
quad( |
| 119 |
> |
int x, |
| 120 |
> |
int y, |
| 121 |
> |
int xp, |
| 122 |
> |
int yp |
| 123 |
> |
) |
| 124 |
> |
{ |
| 125 |
|
if(x < xp) |
| 126 |
|
if(y <= yp)return(1); |
| 127 |
|
else return(4); |
| 131 |
|
else if(y < yp)return(2); |
| 132 |
|
else return(4); |
| 133 |
|
} |
| 134 |
< |
abs_(a){ /* Windows complains that abs() is an "internal function" */ |
| 134 |
> |
|
| 135 |
> |
extern int |
| 136 |
> |
abs_( /* Windows complains that abs() is an "internal function" */ |
| 137 |
> |
int a |
| 138 |
> |
) |
| 139 |
> |
{ |
| 140 |
|
if(a < 0)return(-a); |
| 141 |
|
return(a); |
| 142 |
|
} |
