try do your way that will be better for you
to save your map do something like this
`dim map(25,25)
`-----------save tile--------
if file exist(filename) the delete file filename
open to write 1,"filename"
for xtile = 0 to 25
for ytile = 0 to 25
write byte 1,map(xtile,ytile)
next ytile
next xtile
close file 1
`-----------load tile--------
if file exist(filename)
open to read 1,"filename"
for xtile = 0 to 25
for ytile = 0 to 25
read byte 1,map(xtile,ytile)
next ytile
next xtile
close file 1
endif
hope this help
You can do it if you try