pc-hack

PC HACK 3.61 source code (archival)
git clone http://frotz.net/git/pc-hack.git
Log | Files | Refs

rnd.c (280B)

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