Listing of file='1P7.BAS;01' on disk='vmedia/color_graphics_1_suits-sector.ccvf'
5 REM PROGRAM 1.7 6 REM DRAWING A BORDER 10 PLOT 15,6,6:REM SELECT REGULAR HEIGHT; SET COLOR 20 PLOT 12:REM CLEAR SCREEN 30 PLOT 27,24:REM PAGE MODE 40 PLOT 6,8:REM SET BACKGROUND COLOR TO RED 50 PLOT 11:REM ERASE THE TOP LINE (I.E., MAKE IT RED) 60 PLOT 3,0,31:REM MOVE THE CURSOR TO BOTTOM OF SCREEN 70 PLOT 11:REM ERASE BOTTOM LINE IN RED 80 PLOT 8:REM HOME CURSOR 90 PLOT 27,10:REM VERTICAL MODE 100 PRINT SPC( 32)"":REM DRAW A LINE IN RED 110 PLOT 3,63,0:REM POSITION CURSOR AT TOP OF RIGHT HAND CORNER 120 PRINT SPC( 32)"":REM DRAW A LINE 130 PLOT 8:REM HOME CURSOR AGAIN 140 PLOT 27,11:REM SCROLL MODE 150 PLOT 6,3:REM BACK TO A MANAGEABLE COLOR