SetTimer, read, on
global File := % A_MyDocuments . "\GTA San Andreas User Files\SAMP\Chatlog.txt"
global SampDirScrennShot := % A_MyDocuments . "\GTA San Andreas User Files\SAMP\screens" ; путь к папке скриншотов samp
global MoveDirScheenShot := % A_ScriptDir . "\ScreenShots\" ; путь перемещения скриншотов
global NameScreenShot := "MyScreenShot-" ; приставка скриншота

:?:/org::
showDialog(2, "Helper","[1]`n[2]", "ОК")
Result := LineResult()
if (!Result)
return
Gosub, dil%Result%
return

dil1:
addChatMessage("1")
SetTimer, ScreenTakeMove, On
return

dil2:
addChatMessage("[Информация] {FFFFFF}Время действия маски 10 минут, после исхода времени ее придётся выбросить.")
return

SetTimer, read, on
File := A_MyDocuments "\GTA San Andreas User Files\SAMP\Chatlog.txt"

read:
FileRead, out, % File
if (RegExMatch(out, "\[.*\] \[Информация] \{FFFFFF}Время действия маски 10 минут, после исхода времени ее придётся выбросить.")) {
SendChat("/me достал из кармана маску, после чего надел её")
    delLine("\[.*\] \[Информация] \{FFFFFF}Время действия маски 10 минут, после исхода времени ее придётся выбросить.")
}
else if (RegExMatch(out, "\[.*\] \[Информация] \{FFFFFF}Вы успешно выкинули маску.")) {
   SendChat("/me резким движением руки снял маску с лица")
    delLine("\[.*\] \[Информация] \{FFFFFF}Вы успешно выкинули маску.")
}

return

delLine(string) {
    File := A_MyDocuments "\GTA San Andreas User Files\SAMP\Chatlog.txt"
    FileRead, All, % File
    FileOpen(File, "w").Write(RegExReplace(All, "(^|\R)" . string . "|" . string . "(\R|$)"))
}

return

LineResult() {
if (!isDialogOpen())
return false
if (getDialogStyle() = 0 || getDialogStyle() = 1 || getDialogStyle() = 3)
return false
while(!GetKeyState("LButton", "P") && !GetKeyState("Enter", "P") && !GetKeyState("Esc", "P"))
continue
if (GetKeyState("Enter", "P"))
return getDialogLineNumber()
else if (GetKeyState("Esc", "P"))
return false
else{
KeyWait, LButton
KeyWait, LButton, D T0.4
if (isDialogOpen())
return LineResult()
else
return getDialogLineNumber()
}
}
return

ScreenTakeMove:
SetTimer, ScreenTakeMove, Off ; отключаем таймер во избежания мульти процессов
Send {F8} ; имитирум нажатие клавиши f8
sleep 4000 ; пауза 4сек (4*1000)
Line := 0 ; сбос строки с линии чата
Loop
{
    GetChatLine(Line, Chat) ; udf функция (считывание строк и чата) я хз вроде была ранше построена на основе чтения файла chatlog.txt рядом с папкой скринов
    IfInString, Chat, Screenshot Taken ; если в чате есть строка делаем следующее
    {
        RegExMatch(Chat, "Screenshot Taken - sa-mp-(?<index>.+).png", screen_) ; берем переменную чила скриншота и сохраняем как %screen_index%
        FormatTime, now_timecode, %A_Now%, dd.MM-HH.mm.ss ; создаем таймкод скрину с текущей датой на системе
        IfNotExist, % MoveDirScheenShot . LectioName
        FileCreateDir, % MoveDirScheenShot . LectioName
        FileMove, % SampDirScrennShot . "\sa-mp-" . screen_index . ".png", % MoveDirScheenShot . LectioName . "\" . NameScreenShot . now_timecode . ".png", 1 ;перемещаем с ключем 1 (если есть такой файл то с заменой)
        break ; завершаем цыкл
    }
    else
        Line++ ; добавляем +1 к циклу тоесть новую строку для чтения и поиска
}
return