Compucolor.org – Virtual Media

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

5 REM  PROGRAM 1.5
6 REM  THE VERTICAL MODE
10 PLOT 12:REM  CLEAR SCREEN
20 PLOT 27,10:REM  VERTICAL MODE
30 PLOT 3,10,5:REM  POSITION THE CURSOR
40 PRINT "TEST #1"
50 PLOT 3,20,5
60 PRINT "TEST #2"
68 REM  NOW FOR PROOF THAT THE SCREEN DOES NOT
69 REM  SCROLL WHEN IN VERTICAL MODE
70 PLOT 3,32,28:PRINT "TEST #3"
80 PLOT 27,11:REM  BACK TO SCROLL MODE