srandom ( ) 和 random ( ) 【C语言库函数源代码】

【C语言库函数源代码】

【本程序在Dev C++ 4.9.9.2 下编译通过】

/*

   这两个函数也是C库中产生随机数的程序。你需要先

   使用srandom()函数赋随机数种子值。然后再使用

   random()函数来产生随机数。是对srand()和rand()

   这两个函数的改良，用法也很类似。现在的这个代码

   仅仅是实现了随机数函数srand()和rand()的功能。

   在GCC库函数中要比现在的代码完全的多，另外可以

   指定其他的状态值，使得随机更完全。

*/

 

#define ULONG_MAX  ((unsigned long)(~0L)) /* 0xFFFFFFFF*/

#define LONG_MAX   ((long)(ULONG_MAX >> 1))/* 0x7FFFFFFF*/

 

#define NULL (void *) 0

 

static long int RandomTable[32] ={ 3,

      0x9a319039, 0x32d9c024, 0x9b663182, 0x5da1f342,

      0xde3b81e0, 0xdf0a6fb5, 0xf103bc02, 0x48f340fb,

      0x7449e56b, 0xbeb1dbb0, 0xab5c5918, 0x946554fd,

      0x8c2e680f, 0xeb3d799f, 0xb11ee0b7, 0x2d436b86,

      0xda672e2a, 0x1588ca88, 0xe369735d, 0x904f35f7,

      0xd7158fd6, 0x6fa6f051, 0x616e6b96, 0xac94efdc,

      0x36413f93, 0xc622c298, 0xf5a42ab8, 0x8a88d77b,

      0xf5ad9d0e, 0x8999220b, 0x27fb47b9

    };

 

static long int *fptr = &RandomTable[4];

static long int *rptr = &RandomTable[1];

static long int *state = &RandomTable[1];

static long int *end_ptr = &RandomTable[sizeof(RandomTable) / sizeof(RandomTable[0])];

 

long int my_random ()

{

   long int i;

   *fptr += *rptr;

 

   i = (*fptr >> 1) & LONG_MAX;

   fptr++;

   if (fptr >= end_ptr)

   {

      fptr = state;

      rptr++;

   }

   else

   {

      rptr++;

      if (rptr >= end_ptr)

        rptr = state;

   }

   return i;

}

void my_srandom (unsigned int seed)

{

   state[0] = seed;

   register long int i;

   for (i = 1; i < 31; ++i)

      state[i] = (1103515145 * state[i - 1]) + 12345;

   fptr = &state[3];

   rptr = &state[0];

   for (i = 0; i < 10 * 31; ++i)

      my_random();

}

 

#include

int main()

{

   int i;

  

   my_srandom((unsigned)(time(NULL)));

   for(i=0;i<100;i++)

   {

      if(i % 10 == 0)

         printf("\n");

      printf("%d\t",my_random()%99+1);

   }

   system("pause");

   return 0;

}