CL := A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt"
Loop {
FileRead, chat, %CL%
if chat contains Вы провели курс лечения для
{
Sleep, 500 ; дабы не сразу скринило, чтобы не завис компутер
SendInput, {F6}/c 060{Enter}
Sleep, 100
SendInput, {F8}
FileDelete, %CL%
}
}

#Persistant
#include SAMPMAXnew.ahk

Loop
{
GetChatLine(0, ThirstLine)
if ThirstLine contains Привет
{
   SendChat("/с 060")
   Sleep, 100
   SendInput, {f6}
}
Sleep, 100
}

#Persistent

!1:: ; Alt+1 активация (Начать поиск фразы курс лечения)
stopc = 0
Loop
{
    if (stopc=="1")
    {
  Return
    }
    FileRead, Chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
    RegExMatch(Chatlog, "s).*\[(..):(..):(..)\]", pr)
    RegExMatch(Chatlog, "s).*\[(..):(..):(..)\Q] Вы провели курс лечения для \E(.*)\Q\E", name) ; После скобочек не знаю сколько должно быть пробелов (Посмотри в чат логе и исправь если не так)
    if ((((name1*3600+name2*60+name3+2)>(pr1*3600+pr2*60+pr3)) and ((name1*3600+name2*60+name3)<(pr1*3600+pr2*60+pr3+2))) or (((name1-24)*3600+name2*60+name3+2)>(pr1*3600+pr2*60+pr3)))
    {
  Sleep, 250
  Sendinput, {F6}/c 060{Enter}
  Sleep, 500
  Sendinput, {F8 Down}
  Sleep, 100
  Sendinput, {F8 Up}
    }
}
Return

!2:: ; Alt+2 деактивация (Остановить поиск фразы курс лечения)
stopc = 1
Return