Compucolor.org – Virtual Media

Listing of file='COLORS.BAS;01' on disk='vmedia/ncc_4-sector.ccvf'

10 REM   COLORS BY PATRICK LEABO
25 PLOT 6,0,14,12,29,27,11
50 B= 96:FOR A= 0TO 127
100 PLOT 6,A
150 PRINT "CCI=";A;
200 FOR N= 1TO 50
300 PRINT CHR$ (B);
400 NEXT :PRINT :NEXT :GOTO 25