Basic - Error de que no encuentra el final del archivo al leer los datos

Hola, no se si sigue viva esta linea, espero que si, porque después de mucho tiempo, me apetecía hacer un programita en basic, pero tengo un problema.
Al abrir gw basic, en windows xp (sp2) funciona de cine, pero al abrir el programa que deseaba utilizar, que era uno para crear archivos de datos, tengo el problema de que siempre me da el error de que no encuentra el final del archivo al leer los datos.
después de abrir con input #1 "i".... y de colocar la instrucción de EOF en varios sitios diferentes, siempre me da el error de que no encuentra el fin del archivo.

Espero que esto siga abierto y que alguien me responda. MUCHAS GRACIAS

Lo mas seguro es que el archivo de datos no se haya cerrado o creado correctamente.
Si puedes poner el codigo se podría ver.

TE MANDO UN BREVE PROGRAMA
10 REM PRUEBA.BAS
20 ON ERROR GOTO 1000
30 OPEN "ARCHIVO.TXT" FOR INPUT ACCESS READ SHARED AS 1
40 FOR TR=1 TO 10000
50 LINE INPUT #1,X$
100 NEXT TR
110 CLOSE : END
1000 REM RUTINA DE ERROR
1010 IF ERR=62 AND ERL=50 THEN RESUME 110
1020 ON ERRO GOTO 0