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.




print fileSize(DefaultDir$,"input.txt")  ' current default directory
print fileSize("","input.txt")       ' root directory
 
function fileSize(dir$,file$)
open dir$;"\";file$ FOR input as #f
fileSize = lof(#f)                   ' Length Of File
close #f
end function