Listing of file='COLORS.BAS;01' on disk='vmedia/isc_demos-sector.ccvf'
10 REM 20 OUT 8,199:POKE 33278,0:GOTO 60 30 PLOT 27,88,15,3,63,31,6,7,31,46,15,6,0,3,64,0:OUT 8,207 40 FOR I= 1TO 200:A= PEEK (33278):IF A= 13THEN PLOT 27,88,15,6,0,3,63,31,32,3,64,0:LOAD "MENU":RUN 45 IF A= 32THEN POKE 33278,0:OUT 8,199:GOTO 10 46 IF A= 72OR A= 104THEN OUT 8,199:PLOT 6,2,12,15,29:PRINT "LOADING DEMO INSTRUCTIONS...":PLOT 3,64,0:LOAD "HELP":RUN 50 NEXT I:OUT 8,199:IF PEEK (33284)= 1THEN PLOT 27,88,15,6,0,3,63,31,32,3,64,0:LOAD "TRIANG":RUN 60 PLOT 15,30,16,29,18,12,27,24 70 FOR I= 0TO 7:PLOT 6,3 80 Y= I* 3+ 1 90 FOR J= 0TO 7 100 C= J+ I* 8:X= J* 8+ 1 110 PLOT 3,X,Y 120 PRINT " "; 130 PLOT 3,X,Y+ 1,6,C 140 PRINT " a COLOR b " 150 PLOT 3,X,Y+ 2 160 PRINT " lm " 170 NEXT J,I 180 PLOT 6,6,27,11 190 PLOT 14,3,10,26:PRINT "ALL FOREROUND & BACKGROUND COLOR COMBINATIONS" 200 PLOT 3,64,0:GOTO 30