Action

Returns the free size of the Disk in KB.

 

 

Syntax

lFreeSize = DISKFREE()

 

 

Remarks

 

This functions returns the free size of the disk in KB.

With the support of FAT32, the return value was changed from byte into KB.

 

See also

INITFILESYSTEM , OPEN , CLOSE, FLUSH , PRINT, LINE INPUT, LOC, LOF , EOF , FREEFILE , FILEATTR , SEEK , BSAVE , BLOAD , KILL , DISKSIZE , GET , PUT , FILEDATE , FILETIME , FILEDATETIME , DIR , FILELEN , WRITE , INPUT

 

 

 

ASM

 

 

Partial Example

Dim Gbtemp1 As Byte                        ' scratch byte

Gbtemp1 =Initfilesystem(1)                 ' we must init the filesystem once

If Gbtemp1 > 0 Then

   Print#1 ,"Error "; Gbtemp1

Else

   Print#1 ," OK"

Print "Disksize : ";Disksize()        ' show disk size in bytes

Print "Disk free: ";Diskfree()         ' show free space too

End If