InputFile := "D:\chatlog.txt"
OutputFile := "D:\log.txt "
word := "ранга"
lineNumber := 0
loop
{
FileGetSize, size, %InputFile%
if (size > sizePrev)
{
sizePrev := size
loop
{
FileReadLine, readLine, %InputFile%, % A_Index + lineNumber
if ErrorLevel
{
if (NewLines != "")
{
FileAppend, %NewLines%, %OutputFile%
NewLines := ""
}
lineNumber += A_Index - 1
break
}
if InStr(readLine, word)
NewLines .= readLine "`n"
}
}
sleep, 100
}Возможно сделать чтобы он добавлял только новые строки после старых?
Возможно. Но надо решить по какому принципу скриптом строки во входном файле будут определяться как старые или новые.
Если во входной файл происходит только дозаписывание (на что намекает имя файла "chatlog.txt"), то можно, например, перед тем как парсить его содержимое, сначала посчитать количество записей в выходном файле и при парсинге входного файла сделать сдвиг на это количество (т.е. проигнорировать первые N вхождений).
Или можно запомнить на какой строке входного файла завершился парсинг в прошлый раз и следующий парсинг сделать с соответствующим сдвигом.
FileRead, OutputVar, D:\chatlog.txt
Loop, read, D:\chatlog.txt, D:\log.txt
{
IfInString, A_LoopReadLine, ранга, FileAppend, %A_LoopReadLine%`n
}