Page 1 of 1

DECB, RGBDOS, HDBDOS Basic example to get file size

PostPosted: Fri Jul 06, 2018 1:21 pm
by PacoOtaktay
Here is a Basic example of how to get the size of a file in Disk Extended Color Basic, RGBDOS, and HDBDOS

Code: Select all
10 CLS
20 PRINT "FILE NAME";
30 INPUT NAME$
40 IF NAME$="" THEN 10
50 OPEN"D",#1,NAME$,1
60 FILESIZE=LOF(1)
70 CLOSE #1
80 PRINT "FILE SIZE IS ";FILESIZE
90 END