File := FileOpen("C:\bigFile.txt", "r")
if !File
{
    MsgBox Файл не может быть открыт!
    ExitApp
}

Buffer := ""

while !File.AtEOF()
{
    Fragment := File.Read(800000) ; Читаем фрагмент размером 500000 символов
    Buffer := Buffer . Fragment     ; Добавляем фрагмент в буфер

    ; Проверяем наличие символа перехода на новую строку
    Index := InStr(Buffer, "`n")
	
    while Index
    {
        Line := SubStr(Buffer, 1, Index-1) ; Получаем строку из буфера
        Buffer := SubStr(Buffer, Index+1)  ; Обновляем буфер, удаляя прочитанную строку
		count++
      ;  MsgBox % "Строка: " . Line
		tooltip, %count%
		FileAppend, %Line%, C:\результат\%count%.txt
		; Проверяем остаток буфера на наличие еще одной строки
        Index := InStr(Buffer, "`n")
    }
}

; Обрабатываем последний остаток в буфере
if Buffer != ""
{
    MsgBox % "Строка: " . Buffer
}