1

/* $Id$ */

     2

     4

     6

     7

#if defined(RANDOM_DEBUG)

     8

uint32 AIBase::DoRandom(int line, const char *file)

     9

#else

    10

uint32 AIBase::Random()

    11

#endif

    12

{

    13

	/* We pick RandomRange if we are in SP (so when saved, we do the same over and over)

    14

	 *   but we pick InteractiveRandomRange if we are a network_server or network-client. */

    15

	if (_networking) return InteractiveRandom();

    16

#if defined(RANDOM_DEBUG)

    17

	return ::DoRandom(line, file);

    18

#else

    19

	return ::Random();

    20

#endif

    21

}

    22

    23

#if defined(RANDOM_DEBUG)

    24

uint AIBase::DoRandomRange(uint max, int line, const char *file)

    25

#else

    26

uint AIBase::RandomRange(uint max)

    27

#endif

    28

{

    29

	/* We pick RandomRange if we are in SP (so when saved, we do the same over and over)

    30

	 *   but we pick InteractiveRandomRange if we are a network_server or network-client. */

    31

	if (_networking) return InteractiveRandomRange(max);

    32

#if defined(RANDOM_DEBUG)

    33

	return ::DoRandomRange(max, line, file);

    34

#else

    35

	return ::RandomRange(max);

    36

#endif

    37

}

    38

    39

bool AIBase::Chance(uint out, uint max)

    40

{

    41

	return (uint16)this->Random() <= (uint16)((65536 * out) / max);

    42

}