本人想把产生随机数的函数代码改成：如果给定种子号，按照种子号产生随机数，如果没有种子号，则将照系统时间作为种子号；下面是代码，编译通过，但运行出错。请教各位大侠赐教。谢谢！

#include <time.h>
#include <stdio.h>
#include <dos.h>

  void rnds(r,p,n)
  double *r,p[];
  int n;
  { int i,m;
    time_t t;
    double a;
    t = time(NULL);
    a = (double)t;
    if (r=NULL) r=a;
   
    double s,u,v;
    s=65536.0; u=2053.0; v=13849.0;
    for (i=0; i<=n-1; i++)
      { *r=u*(*r)+v; m=(int)(*r/s);
        *r=*r-m*s; p[i]=*r/s;
      }
    return;
  }




  main()
  { int i,j,n=50;
    double p[50],r;
    //r=1.0;
    rnds(p,n);
    printf("\n");
    for (i=0; i<=9; i++)
      { for (j=0; j<=4; j++)
          printf("%10.7lf  ",p[5*i+j]);
        printf("\n");
      }
    printf("\n");
  }

可能我的意思没有说清楚，就是说函数的名字为： rdns（r,p,n）;调用时如果用rdns（p,n）则函数里面的种子数为时间，如果用rdns（r,p,n）调用，则种子号为给定的r值。
所以我想上面的程序还得改一下，但我不知道改哪？大侠有何办法，请不吝赐教。谢谢！

调用不会有问题，我拿别的例子试过。