Compucolor.org – Virtual Media

Listing of file='7P3.BAS;01' on disk='vmedia/color_graphics_2_suits-sector.ccvf'

5 REM  PROGRAM 7.3
6 REM  BLIND CURSOR IN PLOT MODE
10 PLOT 6,131:REM  YELLOW AND PLOT
20 PLOT 3,15,11:REM  POSITION CURSOR
30 PRINT "TEST #1";:REM  SUPPRESS THE CR/LF
40 PLOT 10:REM  CURSOR DOWN
50 PLOT 25,25:REM  CURSOR TO THE RIGHT TWICE
60 PRINT "TEST #2"
69
70 PLOT 3,127:REM  BLIND CURSOR
80 PLOT 15,19:REM  X,Y
90 PLOT 1:REM  CCI CODE
100 PRINT "BLIND CURSOR"
110 PLOT 27,27:REM  EXIT BLIND CURSOR
119
120 PRINT :PRINT
130 PRINT "TEST #3"
140 PLOT 6,2:REM  GREEN; BACK TO NORMAL
150 PRINT "TEST #4"