Add seedable PRNG using an adaptation the original LCG algorithm.

[open-adventure.git] / funcs.h

diff --git a/funcs.h b/funcs.h
index 455de2d6b78360ae63c24aaf9528feb70b969410..deb401065dfaa5239aa845413ac34e67509ef940 100644 (file)
--- a/funcs.h
+++ b/funcs.h
@@ -23,7 +23,7 @@
 #define CNDBIT(L,N)    (TSTBIT(COND[L],N))
 #define FORCED(LOC)    (COND[LOC] == 2)
 #define DARK(DUMMY)    ((!CNDBIT(LOC,0)) && (PROP[LAMP] == 0 || !HERE(LAMP)))
-#define PCT(N) (RAN(100) < (N))
+#define PCT(N) (randrange(100) < (N))
 #define GSTONE(OBJ)    ((OBJ) == EMRALD || (OBJ) == RUBY || (OBJ) == AMBER || (OBJ) == SAPPH)
 #define FOREST(LOC)    ((LOC) >= 145 && (LOC) <= 166)
 #define VOCWRD(LETTRS,SECT)    (VOCAB(MAKEWD(LETTRS),SECT))