Code:NextBasic Snippets

NextBasic Snippets

To read a file of any type or size to any bank this will load myfile.bin to bank 22 (8kbs):

.extract myfile.bin -mb 22

To get the filesize of a file in to var fsize:

OPEN #4, "myfile"
DIM #4 TO %a
fsize=%a
CLOSE #4

Check if a file exists in a location without generating an error

Layer 2,0: print at 0,0; : cat file$: exist$=screen$(0,0)
Layer 0: If exist$<>"N" then print "File found"