-/* File: z-rand.h */
+/* File: z-rand.h */
+
+/*
+ * Copyright (c) 1997 Ben Harrison, and others
+ *
+ * This software may be copied and distributed for educational, research,
+ * and not for profit purposes provided that this copyright and statement
+ * are included in all such copies. Other copyrights may also apply.
+ */
+
#ifndef INCLUDED_Z_RAND_H
#define INCLUDED_Z_RAND_H
* The integer X falls along a uniform distribution.
* For example, if M is 100, you get "percentile dice"
*/
-#define rand_int(M) \
+#define randint0(M) \
((s32b)Rand_div(M))
/*
* Generates a random long integer X where A<=X<=B
* The integer X falls along a uniform distribution.
- * Note: rand_range(0,N-1) == rand_int(N)
+ * Note: rand_range(0,N-1) == randint0(N)
*/
#define rand_range(A,B) \
- ((A) + (rand_int(1+(B)-(A))))
+ ((A) + (randint0(1+(B)-(A))))
/*
* Generate a random long integer X where A-D<=X<=A+D
* Note: rand_spread(A,D) == rand_range(A-D,A+D)
*/
#define rand_spread(A,D) \
- ((A) + (rand_int(1+(D)+(D))) - (D))
+ ((A) + (randint0(1+(D)+(D))) - (D))
/*
* Generate a random long integer X where 1<=X<=M
* Also, "correctly" handle the case of M<=1
*/
-#define randint(M) \
- (rand_int(M) + 1)
+#define randint1(M) \
+ (randint0(M) + 1)
/*
* Evaluate to TRUE "P" percent of the time
*/
#define magik(P) \
- (rand_int(100) < (P))
+ (randint0(100) < (P))
#define one_in_(X) \
- (rand_int(X) == 0)
+ (randint0(X) == 0)
/*
* Evaluate to TRUE "S" percent of the time
*/
#define saving_throw(S) \
- (rand_int(100) < (S))
+ (randint0(100) < (S))
/**** Available Variables ****/
-extern bool Rand_quick;
-extern u32b Rand_value;
extern u16b Rand_place;
extern u32b Rand_state[RAND_DEG];
/**** Available Functions ****/
-extern void Rand_state_init(u32b seed);
-extern s32b Rand_mod(s32b m);
-extern s32b Rand_div(u32b m);
+extern void Rand_state_init(void);
+extern void Rand_state_set(u32b seed);
+extern void Rand_state_backup(u32b* backup_state);
+extern void Rand_state_restore(u32b* backup_state);
+extern s32b Rand_div(s32b m);
extern s16b randnor(int mean, int stand);
extern s16b damroll(int num, int sides);
extern s16b maxroll(int num, int sides);
+extern s32b div_round(s32b n, s32b d);
+extern s32b Rand_external(s32b m);
#endif