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