dxx-rebirth/maths/rand.c

/* $Id: rand.c,v 1.4 2004-05-12 07:31:37 btb Exp $ */
/*
 *
 * Descent random number stuff...
 * rand has different ranges on different machines...
 *
 */

#ifdef HAVE_CONFIG_H
#include <conf.h>
#endif

#include <stdlib.h>

#ifdef NO_WATCOM_RAND

void d_srand(unsigned int seed)
{
	srand(seed);
}

int d_rand()
{
	return rand() & 0x7fff;
}

#else

static unsigned int d_rand_seed;

int d_rand()
{
	return ((d_rand_seed = d_rand_seed * 0x41c64e6d + 0x3039) >> 16) & 0x7fff;
}

void d_srand(unsigned int seed)
{
	d_rand_seed = seed;
}

#endif
formatting 2004-05-12 07:32:50 +00:00			`/* $Id: rand.c,v 1.4 2004-05-12 07:31:37 btb Exp $ */`
formatting 2003-02-18 20:23:22 +00:00			`/*`
formatting 2004-05-12 07:32:50 +00:00			`*`
formatting 2003-02-18 20:23:22 +00:00			`* Descent random number stuff...`
			`* rand has different ranges on different machines...`
formatting 2004-05-12 07:32:50 +00:00			`*`
formatting 2003-02-18 20:23:22 +00:00			`*/`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00
Makefile and conf.h fixes 2001-01-31 15:18:05 +00:00			`#ifdef HAVE_CONFIG_H`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`#include <conf.h>`
Makefile and conf.h fixes 2001-01-31 15:18:05 +00:00			`#endif`

This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`#include <stdlib.h>`

			`#ifdef NO_WATCOM_RAND`
formatting 2004-05-12 07:32:50 +00:00
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`void d_srand(unsigned int seed)`
			`{`
formatting 2004-05-12 07:32:50 +00:00			`srand(seed);`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`}`

			`int d_rand()`
			`{`
formatting 2004-05-12 07:32:50 +00:00			`return rand() & 0x7fff;`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`}`
formatting 2004-05-12 07:32:50 +00:00
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`#else`
formatting 2004-05-12 07:32:50 +00:00
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`static unsigned int d_rand_seed;`

formatting 2004-05-12 07:32:50 +00:00			`int d_rand()`
			`{`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`return ((d_rand_seed = d_rand_seed * 0x41c64e6d + 0x3039) >> 16) & 0x7fff;`
			`}`

formatting 2004-05-12 07:32:50 +00:00			`void d_srand(unsigned int seed)`
			`{`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`d_rand_seed = seed;`
			`}`
formatting 2004-05-12 07:32:50 +00:00
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. 2001-01-19 03:30:16 +00:00			`#endif`