LOC

LOC

Top  Previous  Next

Action

Returns the position of last read or written Byte of the file

 

 

Syntax

lLastReadWritten = LOC (#bFileNumber)

 

 

Remarks

bFileNumber

(Byte) File number, which identifies an opened file

lLastReadWritten

(Long) Variable, assigned with the Position of last read or written Byte (1-based)

 

This function returns the position of the last read or written Byte. If an error occurs, 0 is returned. Check DOS-Error in variable gbDOSError. If the file position pointer is changed with the command SEEK, this function can not be used till the next read/write operation.

 

This function differs from VB. In VB the byte position is divided by 128.

 

 

See also

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

 

 

ASM

Calls

_FileLoc

 

Input

r24: filenumber

X: Pointer to Long-variable, which gets th result

Output

r25: Errorcode

C-Flag: Set on Error

 

 

Example

' open the file in BINARY mode

Open "test.bin" For Binary As #2

Put #2 , B                                         ' write a byte

Put #2 , W                                         ' write a word

Put #2 , L                                         ' write a long

Ltemp = Loc(#2)+ 1                         ' get the position of the next byte

Print Ltemp ;" LOC"                        ' store the location of the file pointer

Print Lof(#2);" length of file"

Print Fileattr(#2);" file mode"        ' should be 32 for binary

Put #2 , Sn                                 ' write a single

Put #2 , Stxt                                 ' write a string

 

Flush #2                                         ' flush to disk

Close #2