I have tried versions 1.76, 1.82, and 1.83, every time it try to compile the code I get the following error message:
Cannot perform 'integer' cast on type 'about_Fileptr' at line 19.
rem
rem AGK Application
rem
false = 0
true = 1
about_Filename as string
about_Filename = "/media/about/about information.txt"
about_Fileptr as integer
about_Fileptr = OpenToRead( about_Filename )
Dim arrText[100]
if FileIsOpen( about_Fileptr ) = true
index = 0
while FileEOF( about_Fileptr ) = false
arrText[index] = ReadLine(about_Fileptr)
index = index + 1
endwhile
endif
do
Sync()
loop
please help?