Verify the size of a file called     input.txt     for a file in the current working directory, and another one in the file system root.




      file% = OPENIN(@dir$+"input.txt")
      IF file% THEN
        PRINT "File size = " ; EXT#file%
        CLOSE #file%
      ENDIF
 
      file% = OPENIN("\input.txt")
      IF file% THEN
        PRINT "File size = " ; EXT#file%
        CLOSE #file%
      ENDIF