home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_14_1986_Transactor_Publishing.d64 / non-random (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  126b  |  6 lines
  1. 5 rem  this program illustrates the
  2. 6 rem  non-randomness of rnd(0)
  3. 10 n=rnd(0)*1024
  4. 20 poke 1024+n,24: poke 55296+n,1
  5. 30 goto 10
  6.