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