1: SCREEN 12
2: FOR I% = 0 TO 0
3: FOR J% = 0 TO 640
4: LINE (0, 480)-(J%, I%), INT(RND * 15)
5: LINE (640, 480)-(J%, I%), INT(RND * 15)
6: NEXT J%: NEXT I%
7:
5748107 [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:02:37