В твоем случае лучше использовать ReadLine
Code
filein = ReadFile("1.txt")
Read1$ = ReadLine( filein )
Read2$ = ReadLine$( filein )
Read3$ = ReadLine$( filein )
Read4$ = ReadLine$( filein )
CloseFile( filein )
Print Read1
Print Read2
Print Read3
Print Read4
WaitKey()