Compucolor.org – Virtual Media

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

5 REM  PROGRAM 9.1
6 REM  DUP A SCREEN DISPLAY
10 PLOT 12:REM  ERASE SCREEN & RESET SCREEN MEMORY
19
20 PLOT 27,4:REM  FCS
30 PRINT "LOAD SCREEN.DSP"
39
40 PLOT 27,27:REM  EXIT FCS
49
50 INPUT "";A$:REM  WAIT
51
52 REM  AT THIS POINT, SWITCH DISKS AND THEN PRESS
53 REM  "RETURN".  DOING SO WILL PRINT NOTHING ON
54 REM  THE SCREEN
55
60 PLOT 27,4:REM  FCS
70 PRINT "SAVE SCREEN.DSP 7000 1000"
79
80 PLOT 27,27:REM  EXIT FCS