home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga MA Magazine 1998 #6
/
amigamamagazinepolishissue1998.iso
/
coders
/
jËzyki_programowania
/
ace_basic
/
ace
/
include
/
fexists.h
< prev
next >
Wrap
Text File
|
1977-12-31
|
335b
|
20 lines
{ FEXISTS(x$) -- returns true if file exists otherwise false.
Author: David J Benn
Date: 28th February 1993,
2nd January 1994 }
sub fexists(x$)
if x$="" then
fexists=0
else
open "I",#255,x$
if handle(255) <> 0& then
close #255
fexists=-1
else
fexists=0
end if
end if
end sub