RosettaCodeData/Task/Terminal-control-Coloured-text/BBC-BASIC/terminal-control-coloured-text.basic

      FOR col% = 0 TO 14
        COLOUR col% : REM foreground
        COLOUR 128+(15-col%) : REM background
        PRINT "Rosetta Code"
      NEXT