DISKFREE
Action
Returns the free size of the Disk
Syntax
lFreeSize = DiskFree ()
Remarks
|
lFreeSize |
A Long Variable, which is assigned with the available Bytes on the Disk in Kbytes (Units of 1024 Bytes) |
This functions returns the free size of the disk in KBytes.
ASM
|
Calls |
_GetDiskFreeSize |
|
|
Input |
none |
|
|
Output |
r16-r19: Long-Value of free KBytes |
|
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 Kbytes
Print "Disk
free: " ;
Diskfree()
' show free space too
End If