fileName$    = "f:\sample.txt"
requiredLine = 7
open fileName$ for input as #f

for i = 1 to requiredLine
  if not(eof(#f)) then line input #f, a$
next i
close #f
print a$
end