#SingleInstance Force ; отключаем повторность запуска
#Persistent
Timer:=0
F2:: ; Просто активация для наглядности
If (Timer = 1)
{
SetTimer, checklog, Off
}
else
{
SetTimer, checklog, 2500
}
return

checklog:
filename = C:\GTA San Andreas User Files\SAMP\chatlog.txt ; путь к моему файлу чатлога
filename = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt  // Стандартный путь:
loop
{
lastline := GetNewLine(filename) ; получаем последнюю строку
RegExMatch(lastline, "(.*\[\d+\])(.*)", Fix) ; фильтруем строку ищем чистую( Admin1_Nick1[225] ) не реагируем на строки типа Fix2 (Admin1_Nick1[225] govorit: noob)
If (Fix2 = Null)
{
IfInString, lastline, %Fix1% ; Если строка содержит: Отпишитесь на номер ~> выполняем то что ниже
{
RegExMatch(lastline, ".*\[(\d+)]", Fline) ; разбиваем строку на переменные
; Fline - вся строка целиком // Admin1_Nick1[228]
; Fline1 - текст который в \[(.*)\] // [228]
FileAppend, Logchat >>>%Fline%`n/showpass %Fline1%`n`r, debug.txt, utf-8 ; лог отправки смс
;~ SendInput, {F6}/showpass %Fline1%{ENTER}
}
}
if a_index = 1000
    break
}
return

; получаем последнюю строку + не допускаем повторов
GetNewLine(filename)
{
static old
static new
if !old
{
FileGetSize, old, %filename%
new := old
}
while old = new
{
sleep 500
FileGetSize, new, %filename%
}
old := new
Loop, read, %filename%
if A_LoopReadLine
last := A_LoopReadLine
return last
}

:?:/ack:: ; Активация в чат /ack
{
showGameText("~r~checking...", 500, 4)
Sleep 500
IniRead, path, settings.ini, main, PathToList, %A_WorkingDir%\AdmArm.txt
Loop, read, %path%
{
FileReadLine, admin, %path%, %A_Index%
adminid := getPlayerIdByName(admin)
if (adminid!="-1")
{
showGameText("~y~found admin", 1000, 4)
Sendinput, {F6}/id %admin%{Enter}
Sleep 1100
Sendinput, {F6}/showpass %adminid%{Enter}
Sleep 1100
}
}
showGameText("~g~completed", 500, 4)
}
Return

IniRead, path, settings.ini, main, PathToList, %A_WorkingDir%\AdmArm.txt