Compucolor.org – Virtual Media

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

0 REM 
1 REM  		A MENU PROGRAM USING THE DIRECIORY
2 REM
3 REM  		BY   MERVYN A. E. LINDEN    AUG/80
4 REM
5 REM  MACHINE LANGUAGE RESIDES BETWEEN BASIC AND VARIABLES
6 REM      IF BASIC IS MODIFIED PROGRAM WILL NOT WORK
7 REM 
10 PLOT 27,24,6,2
11 POKE  33283,173:POKE  33284,132:N$= "             "
12 Y= CALL (X):ON  Y GOTO  15,16,16,17,17
13 PLOT 12,3,22,15:PRINT "INCORRECT FILE TYPE"
14 FOR I= 1TO 2000:NEXT I:GOTO 12
15 PLOT 12:LOAD  N$:RUN
16 PLOT 12,27,4:PRINT "RUN "N$
17 PLOT 12,27,4:PRINT "LOAD "N$:PLOT 27,27,8:INPUT "";Q$
18 END