Listing of file='7P4.BAS;01' on disk='vmedia/color_graphics_2_suits-sector.ccvf'
5 REM PROGRAM 7.4 6 REM PLOT A BORDER AROUND THE SCREEN 10 PLOT 12:REM ERASE SCREEN 20 PLOT 6,134:REM CYAN AND PLOT 30 PLOT 27,24:REM PAGE MODE 39 40 N= 8:REM FOR THE LOOP IN LINE 200 50 GOSUB 200:REM PLOT TOP BORDER 59 60 PLOT 3,0,31:REM POSITION CURSOR 70 GOSUB 200:REM PLOT BOTTOM BORDER 79 80 PLOT 27,10:REM VERTICAL MODE 90 PLOT 8:REM HOME CURSOR 100 N= 4 110 GOSUB 200:REM PLOT LEFT BORDER 119 120 PLOT 3,63,0 130 GOSUB 200:REM PLOT RIGHT BORDER 139 140 PLOT 27,11:REM SCROLL MODE 150 PLOT 6,2:REM REGULAR GREEN 159 160 END 198 199 200 FOR J= 1TO N 210 PRINT "A BORDER"; 220 NEXT 229 230 PRINT 240 RETURN