Compucolor.org – Virtual Media

Listing of file='MENU.BAS;01' on disk='vmedia/dukedom-sector.ccvf'

50 CLEAR 100
100 PLOT 12,17
110 PRINT TAB( 20)"DUKEDOM"
120 PRINT TAB( 20)"eeeeeee"
130 PLOT 15,22
140 PRINT :PRINT :PRINT
150 PRINT TAB( 5);"DO YOU WANT DETAILED INSTRUCTIONS";:INPUT D$
160 D$= LEFT$ (D$,1)
170 IF D$= "Y"GOTO 200
180 IF D$< > "N"THEN PRINT TAB( 5)"PLEASE BE MORE SPECIFIC":GOTO 150
190 GOTO 300
200 FOR I= 1TO 9:PLOT 12,27,4
210 PRINT "LOA DUKE.INS;";I:PLOT 27,27
220 PLOT 3,10,30:INPUT "HIT RETURN TO CONTINUE";A$
230 NEXT I
300 LOAD "DUKE":RUN
310 END