Listing of file='6P22.BAS;01' on disk='vmedia/color_graphics_2_suits-sector.ccvf'
5 REM PROGRAM 6.22 6 REM REENTRY TO PLOT SUBMODES 10 PLOT 6,6,12:REM SET UP 20 PLOT 2:REM GENERAL PLOT MODE 28 29 REM DRAW A VECTOR FROM 0,0 TO 63,63 30 PLOT 0,0,242,63,63 39 40 PLOT 251:REM INCREMENTAL POINT PLOT SUBMODE 49 50 FOR J= 1TO 10 60 PLOT 96:REM INCREMENT WITHOUT PLOTTING 70 PLOT 6:REM INCREMENT ONLY ONCE 80 NEXT 89 90 PLOT 255 95 END :REM EDITOR'S NOTE: WHEN READY FOR LINES 100-210, 96 REM DELETE LINES 95 AND 96 100 PLOT 6,1:REM RED 110 PLOT 2:REM GENERAL PLOT MODE 120 PLOT 251:REM BACK TO INCREMENTAL POINT PLOT MODE 129 130 FOR J= 1TO 10 140 PLOT 96,6:REM CONTINUE THE DOTTED LINE 150 NEXT 159 160 PLOT 255 169 170 PLOT 6,2:REM GREEN 180 PLOT 2:REM REENTER GENERAL PLOT MODE 190 PLOT 242:REM VECTOR PLOT MODE 200 PLOT 0,0:REM DRAW A VECTOR BACK TO STARTING POINT 209 210 PLOT 255