1: CLS
2: FOR I = 1 TO 15
3: COLOR I, I - 1
4: PRINT "COLOR"; I; ","; I - 1
5: NEXT
6: PRINT "Press any key to continue ...": SLEEP
7: CLS
8: FOR I = 15 TO 30
9: COLOR I, I - 15
10: PRINT "COLOR"; I; ","; I - 15
11: NEXT
12: COLOR 15, 0
13:
5748486 [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:00:58