10MODE3
   20VDU14
   30PRINT"This program will display all of the files in this directory."''"Hold shift to scroll the text"''
   40REPEAT
   50READ A$
   60PRINT''"*TYPEing ";A$''
   70OSCLI"TYPE "+A$
   80UNTIL A$="087_090"
   90END
  100DATAINDEX0,INDEX1,INDEX2,INDEX3,INDEX4,INDEX5
  110DATA001_010,011_013,014_016,017_020,021_027,028_031,032_037,038_040,041_046,047_051,052_057,058_063,064_066,067_068,069_071,072_074,075_079,080_083,084_086,087_090