33 lines
365 B
C
33 lines
365 B
C
#ifndef lint
|
|
static char rcsid[] = "$Id: rnd.c,v 1.2 1993/08/02 17:19:45 mycroft Exp $";
|
|
#endif /* not lint */
|
|
|
|
#define RND(x) ((random()>>3) % x)
|
|
|
|
rn1(x,y)
|
|
register x,y;
|
|
{
|
|
return(RND(x)+y);
|
|
}
|
|
|
|
rn2(x)
|
|
register x;
|
|
{
|
|
return(RND(x));
|
|
}
|
|
|
|
rnd(x)
|
|
register x;
|
|
{
|
|
return(RND(x)+1);
|
|
}
|
|
|
|
d(n,x)
|
|
register n,x;
|
|
{
|
|
register tmp = n;
|
|
|
|
while(n--) tmp += RND(x);
|
|
return(tmp);
|
|
}
|