Ваш код у меня не работает. Бесконечный поиск после "MsgBox Search text11".
Но вы неумышленно помогли разобраться мне в "A_TickCount" и я просто присобачил его к моему коду.
]]>Бесконечный поиск после "MsgBox Search text11".
Значит после запуска скрипта в указанный вами файл не добавляется строка с содержимым "text11".
]]>]]>последняя оказывается пустой
Это без разницы, а вот если добавит больше 2 строк между проверками файла, то можно пропустить.
В PathLog указать путь к файлу.
PathLog := A_ScriptFullPath
File := FileOpen(PathLog, "r`n"), File.Pos := File.Length
Search:
MsgBox Search text11
Match := 0
While !Match
{
Loop, Parse, % File.Read(), `n
If (Instr(A_LoopField, "text11") && Match := 1)
Break
File.Pos := File.Length
Sleep 200
}
MsgBox Search text22
Match := 0, Start := A_TickCount
While !Match
{
If (A_TickCount - Start >= 10000)
Break
Loop, Parse, % File.Read(), `n
If (Instr(A_LoopField, "text22") && Match := 1)
Break
File.Pos := File.Length
Sleep 200
}
If !Match
GoTo, Search
MsgBox ExitApp
ExitApp
идет поиск строки "text11" в файле.
в файле появится строка "text22"
Loop, read, %path%tex.txt
{
pred_line := last_line
last_line := A_LoopReadLine
}
if (last_line = "text22" or pred_line = "text22")Интересуют только 2 последние строки?
]]>Мой вариант совсем не так работает:
#Persistent
Metka1:
Loop, read, %path%tex.txt
{
pred_line := last_line
last_line := A_LoopReadLine
}
if (last_line = "text11" or pred_line = "text11")
{
A=1
MsgBox, Таймер вкл. Переход к Metka2
goto, Metka2
}
If !a
{
goto, Metka1
}
return
Metka2:
SetTimer, tover, 10000
F=0
Loop, read, %path%tex.txt
{
pred_line := last_line
last_line := A_LoopReadLine
}
if (last_line = "text22" or pred_line = "text22")
{
F=1
SetTimer, tover, off
MsgBox, Таймер выкл. Переход к Metka3
goto, Metka3
}
return
tover:
MsgBox, Время вышло. Переход к Metka1
goto, Metka1
return
Metka3:
MsgBox, Ok
ExitApp
return