5748484 [rkeene@sledge /home/rkeene/devel/archive/quickbasic]$ cat -n stars.bas
   1:     SCREEN 12
   2:     FOR t% = 1 TO 3000
   3:     RANDOMIZE TIMER
   4:     x% = INT(RND * 640)
   5:     Y% = INT(RND * 480)
   6:     z% = INT(RND * 15)
   7:     PSET (x%, Y%), z%
   8:     NEXT t%
   9:
5748485 [rkeene@sledge /home/rkeene/devel/archive/quickbasic]$
Click here to go back to the directory listing.
Click here to download this file.
last modified: 2000-05-09 21:09:54