10 REM > ColourGrid
   20 REM Grid of COLOUR foregrounds/backgrounds
   30 :
   40 VDU 20:CLS:PRINT SPC30;"COLOUR Grid"
   50 PRINT "    Background"'"Fgd";
   60 FOR bg%=0 TO 15:PRINT" ";~bg%;"  ";:NEXT bg%:PRINT
   70 FOR fg%=0 TO 15
   80   PRINT CHR$20;" ";~fg%;" ";
   90   FOR bg%=0 TO 15
  100     COLOUR 128+bg%:COLOUR fg%
  110     PRINT " ";~bg%;~fg%;" ";
  120     REM PRINT STRING$(4,CHR$&B1);
  130   NEXT bg%
  140   VDU 20:PRINT
  150 NEXT fg%
  160 END

Download ColourGrid

BBC BASIC detokeniser and syntax highlighter by Ben Ryves.