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