Home | History | Annotate | Line # | Download | only in hack
rnd.c revision 1.1 
      1  1.1  cgd /* rnd.c - version 1.0.2 */
      2  1.1  cgd 
      3  1.1  cgd #define RND(x)	((random()>>3) % x)
      4  1.1  cgd 
      5  1.1  cgd rn1(x,y)
      6  1.1  cgd register x,y;
      7  1.1  cgd {
      8  1.1  cgd 	return(RND(x)+y);
      9  1.1  cgd }
     10  1.1  cgd 
     11  1.1  cgd rn2(x)
     12  1.1  cgd register x;
     13  1.1  cgd {
     14  1.1  cgd 	return(RND(x));
     15  1.1  cgd }
     16  1.1  cgd 
     17  1.1  cgd rnd(x)
     18  1.1  cgd register x;
     19  1.1  cgd {
     20  1.1  cgd 	return(RND(x)+1);
     21  1.1  cgd }
     22  1.1  cgd 
     23  1.1  cgd d(n,x)
     24  1.1  cgd register n,x;
     25  1.1  cgd {
     26  1.1  cgd 	register tmp = n;
     27  1.1  cgd 
     28  1.1  cgd 	while(n--) tmp += RND(x);
     29  1.1  cgd 	return(tmp);
     30  1.1  cgd }
     31