Серый форум — AHK: Loop и SetTimer

Re: AHK: Loop и SetTimer

null@example.com (SeaVodikendu) — Tue, 17 May 2016 03:05:50 +0000

Не знаю в чем вчера причина была, но сейчас буквально изменил строки какие нужно искать и ваш скрипт заработал. Спасибо.

Re: AHK: Loop и SetTimer

null@example.com (serzh82saratov) — Mon, 16 May 2016 16:22:30 +0000

А я не проверяю?

Re: AHK: Loop и SetTimer

null@example.com (SeaVodikendu) — Mon, 16 May 2016 15:57:59 +0000

serzh82saratov
Не может быть. Я ведь сперва на шаблоне проверяю и в вручную сам добавляю.

Re: AHK: Loop и SetTimer

null@example.com (serzh82saratov) — Mon, 16 May 2016 14:03:49 +0000

SeaVodikendu пишет:

Бесконечный поиск после "MsgBox Search text11".

Значит после запуска скрипта в указанный вами файл не добавляется строка с содержимым "text11".

Re: AHK: Loop и SetTimer

null@example.com (SeaVodikendu) — Mon, 16 May 2016 13:48:38 +0000

serzh82saratov
Ваш код у меня не работает. Бесконечный поиск после "MsgBox Search text11".
Но вы неумышленно помогли разобраться мне в "A_TickCount" и я просто присобачил его к моему коду.

Re: AHK: Loop и SetTimer

null@example.com (serzh82saratov) — Mon, 16 May 2016 11:31:10 +0000

последняя оказывается пустой

Это без разницы, а вот если добавит больше 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

Re: AHK: Loop и SetTimer

null@example.com (SeaVodikendu) — Mon, 16 May 2016 11:26:19 +0000

Да, именно. Но бывает лог файл добавляет строку так, что последняя оказывается пустой.

Re: AHK: Loop и SetTimer

null@example.com (serzh82saratov) — Mon, 16 May 2016 10:48:11 +0000

Нет, я про то что почему 2 последние строки. У вас наверное речь про лог файл, и интересны просто новые добавленные данные...

Re: AHK: Loop и SetTimer

null@example.com (SeaVodikendu) — Mon, 16 May 2016 10:44:28 +0000

serzh82saratov
Проверка последней и предпоследней строки.
Вы хотите сказать что второй "Loop" конфликтует с "text11" из первого?

Re: AHK: Loop и SetTimer

null@example.com (serzh82saratov) — Mon, 16 May 2016 10:02:13 +0000

идет поиск строки "text11" в файле.

в файле появится строка "text22"

Loop, read, %path%tex.txt
   {
    pred_line := last_line
    last_line := A_LoopReadLine
}
   if (last_line = "text22" or pred_line = "text22")

Интересуют только 2 последние строки?

AHK: Loop и SetTimer

null@example.com (SeaVodikendu) — Mon, 16 May 2016 09:23:30 +0000

Здравствуйте.
Помогите разобраться с SetTimer.
Что должно быть:
После запуска скрипта идет поиск строки "text11" в файле.
Когда находит, переход к "Loop" с "SetTimer".
Далее, если в течении (не по прошествии) 10 секунд в файле появится строка "text22", сразу переход к "Metka3" (завершает скрипт).
Если не находит строку, переход к "Metka1" (начинает заново).

Мой вариант совсем не так работает:

#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