I fill the filelist$ with filenames but when outputting these filenames$ the first file misses the first letter. Can however get first letter to show if I put text 0,0,"initiate" in before the file list, then it will be the first letter of Initiate that is missing and the file list is printed without errors. Strange...
function choose_bitmap_for_monster()
current_array_spot = 1
`set directory to monster bitmaps directory
set dir "shanki moon\bitmaps\monsters"
`find first file in directory
dim file_list$(100)
find first
repeat
filename$ = get file name$()
if lower$(right$ (filename$,4)) = ".bmp"
`put the actual filename in the string array for filenames
file_list$(current_array_spot) = filename$
`increment the current array spot
inc current_array_spot
endif
find next
until get file type() = -1
end_of_monster_bitmap_file_list = current_array_spot
`return to main directory
cd ".."
cd ".."
cd ".."
current_ui$ = "main"
endfunction
text 0,0,"Initiate"
if current_ui$ = "main"
y = 0
for t = 1 to 3
text 90,y,file_list$(t)
inc y,10
next t
endif
EDIT: I use matrix1utils by the way, dont know if there is a connection there.
The byte chrunchers are coming...
DIVIDING BY ZERO/BECAUSE WE SUCK...