BSD 4_3_Tahoe development

Work on file usr/src/games/hack/rnd.c

Synthesized-from: CSRG/cd2/4.3tahoe

diff --git a/usr/src/games/hack/rnd.c b/usr/src/games/hack/rnd.c
new file mode 100644 (file)
index 0000000..8547cef
--- /dev/null
+++ b/usr/src/games/hack/rnd.c
@@ -0,0 +1,30 @@
+/* rnd.c - version 1.0.2 */
+
+#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);
+}