global FileCLog:=% A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt"
loop
{
lastline := GetNewLine(FileCLog)
if lastline contains Отправил Отправил *Ник*
{
Sleep 1000
Sendinput, {F6}/do Телефон в кармане вибрирует{enter}
Sleep 1000
SendInput {F6}/do На телефон пришло уведомление "Время отправить обьявление"{ENTER}
Sleep 2000
SendInput {F6}/ad *Текст обьявления*{ENTER}
Sleep 1000
SendInput {F6}/me отправил обьявление с телефона в редакцию{ENTER}
Sleep 2000
SendInput {F6}/do Обьявление отправлено{ENTER}
}
}
GetNewLine(filename)
{
static old
static new
if !old
{
FileGetSize, old, %filename%
new := old
}
while old = new
{
sleep 100
FileGetSize, new, %filename%
}
old := new
Loop, read, %filename%
if A_LoopReadLine
{
last := A_LoopReadLine
}
return last
}