home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_400 / 422_01 / libcf / rand.asm < prev    next >
Encoding:
Assembly Source File  |  1994-03-27  |  259 b   |  12 lines

  1. *
  2. * Generate a pseudo-random number: int rand(limit)
  3. *
  4. rand    LD    RANDSEED    Get current seed
  5.     MUL    #13709        First calculation
  6.     ADD    #13849        Second calculation
  7.     ST    RANDSEED    Resave seed
  8.     DIV    2,S        Limit with division
  9.     ALT            Get remainder
  10.     RET
  11. $DD:RANDSEED 2
  12.