Función EOF

Objetivo:

Devuelve -1 (verdadero) cuando el final de un  archivo secuenciales o uno  de comunicaciones ha sido alcanzado, o devuelve un 0 si el final de archivo (EOF_end of file) no ha sido encontrado.

Sintaxis:

v=EOF(file number)

Comentarios:

Si GET es hecho por delante del final del archivo, EOF vuelve-1. Esto puede ser usado encontrar el tamaño de un archivo usando una búsqueda binaria u otro algoritmo. Con archivos de comunicaciones, un -1 indica que el buffer esta vacío.

Use EOF para probar el final de un archivo introduciendo para evitar el error "Input Past End".

Ejemplos:

10 OPEN "I", 1, "DATA"
20 C=0
30 IF EOF(1) THEN 100
40 INPUT#1, M(C)
50 C=C+1: GOTO 30
100 END

El archivo llamado DATA es leído en la serie M hasta que el final del archivo sea alcanzado, entonces el programa deriva a la línea 100.