Listing of file='INFILE.BAS;01' on disk='vmedia/chip_63-sector.ccvf'
5 PLOT 12 10 PRINT " INDEX FILE PARAMETER READING PROGRAM" 12 PLOT 15,10,10,10 15 INPUT "ENTER DISK NUMBER: ";Z$ 20 ZZ$= ".RND" 22 IN$= Z$+ ZZ$ 30 FILE "R",1,IN$,32 40 FOR Q= 1TO 32 50 GET 1,Q;A$[16] 60 PRINT Q,A$ 70 NEXT Q 80 INPUT "PRESS RETURN TO CONTINUE ,OR 1 TO END: ";N 90 IF N= 1THEN 120 110 GOTO 40 120 PLOT 1 130 INPUT "PRESS RETURN TO GO BACK TO MENU: ";W 140 GOTO 120 150 END