1: PRINT "press any key to continue..."
2: SLEEP 20
3: RANDOMIZE TIMER
4: FOR g% = 1 TO 200
5: x% = INT(RND * 10000)
6: PRINT x%,
7: LPRINT x%,
8: FOR a% = 1 TO 2000: NEXT a%
9: NEXT g%
10:
11:
5748160 [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:08:39