Я весь день оборачивался вокруг оси, пытаясь понять, почему INSTR не находит возврат каретки в моем текстовом файле. Как заставить макрос INSTR прочитать текст и найти разрывы строк?
.data
CRLF db 13,10,0
.data?
hFile DWORD ?
bytesRead DWORD ?
tmpstr BYTE 1825 DUP (?)
.code
println_arr MACRO arr
lea EAX, arr
print EAX
ENDM
start:
mov hFile, fopen("books.txt")
mov bytesRead, fsize(hFile)
mov bytesRead, fread(hFile, addr tmpstr, 1825)
strpos TEXTEQU @InStr( , tmpstr, CRLF)
print "Position of first instance of '"
println_arr CRLF
print "': "
print str$(strpos), 13, 10
fclose hFile
exit
end start