Compucolor.org – Virtual Media

Listing of file='2P1.BAS;01' on disk='vmedia/color_graphics_1_suits-sector.ccvf'

5 REM  PROGRAM 2.1
6 REM  SETTING FOREGROUND AND BACKGROUND COLORS
10 PLOT 30:REM  FLAG BIT ON
20 PLOT 17:REM  SET BACKGROUND TO RED
30 PLOT 29:REM  FLAG OFF
40 PLOT 20:REM  SET FOREGROUND TO BLUE
50 PRINT "BLUE ON RED ";
60 PLOT 23:REM  SET FOREGROUND TO WHITE
70 PRINT "WHITE ON RED ";
80 PLOT 30:REM  FLAG ON
90 C1= 20:C2= 16
100 PLOT C1:REM  SET BACKGROUND TO BLUE
110 PRINT "WHITE ON BLUE ";
120 PLOT C2:REM  SET BACKGROUND TO BLACK
130 PRINT "WHITE ON BLACK ";