RosettaCodeData/Task/File-size/Liberty-BASIC/file-size.basic
2023-07-01 13:44:08 -04:00

9 lines
212 B
Text

'input.txt in current directory
OPEN DefaultDir$ + "/input.txt" FOR input AS #m
PRINT "File size: "; lof(#m)
CLOSE #m
'input.txt in root
OPEN "c:/input.txt" FOR input AS #m
PRINT "File size: "; lof(#m)
CLOSE #m