FileCLog:=% A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt"

loop
{

lastline := GetNewLine(FileCLog)

If lastline contains (тел. 1235)
{
SendMessage, 0x50,, 0x4190419,, A
SendPlay {F6}/ad куплю 24/7 цена договарная {ENTER}
SendPlay {F6}/c 60{ENTER}
Sleep 1000
Send, {F8 Up}
}

}

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
}
return

FileCLog:=% A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt"

loop
{
lastline := GetNewLine(FileCLog)

if (RegExMatch(lastline, ".* \| Отправил Sergey_Lip\[\d{1,3}\] \(тел. 1235\)"))
{
SendMessage, 0x50,, 0x4190419,, A
SendPlay {F6}/ad куплю 24/7 цена договарная {ENTER}
SendPlay {F6}/c 60{ENTER}
Sleep 1000
Send, {F8 Up}
}

}

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
}
return

#Include UDF.ahk

F1:: ; Активация
showDialog("1", "2", "3" , "4") ; 1 - тип диалога, 2 заголовок, 3 "пояснение", 4-5 кнопка
input, wText, V, {enter}
SendChat(wText) ; Отправка в чат.
return

#include UDF_037.ahk ; UDF_037.ahk - это название  файла UDF

;=============================================
; Обнуление переменной при нажатии ESC и F6
;=============================================
~ESC::
~F6::
menu:=0
return

;=============================================
; Кнопки вызова диалогов
;=============================================
F3::
menu := 1
ShowDialog(2, "Диалог 1", "Первая`nВторая", "X")
return
F4::
menu := 2
ShowDialog(2, "Диалог с подменю", "Лекции`nПункт без доп. меню", "X")
return

~LButton::
Time := A_TickCount
while(isDialogOpen())
{
    if (A_TickCount - Time > 500)
    {
  Return
    }
}
checkdialogMenu:
if (isDialogButton1Selected() == 1)
{
    menu := 0
}
ifWinNotActive, GTA:SA:MP
{
    return
}

;=============================================
; Проверка на активное меню
;=============================================
if (menu == 1)
{
    menu := 0
    line_num  := getDialogLineNumber()
    line_text  := getDialogLine(line_num)

    addChatMessage("Выбрано: " line_text)
    return
}
else if (menu == 2)
{
    menu := 0
    line_num  := getDialogLineNumber()
    line_text  := getDialogLine(line_num)

    if (line_num == 1)
    {
  showDialog(2, "Подменю", "Первый пукнкт`nВторой пункт", "X")
  menu := 3
    }
    else if (line_num == 2)
  addChatMessage("Выбрано: " line_text)
    return
}
else if (menu == 3)
{
    menu := 0
    line_num  := getDialogLineNumber()
    line_text  := getDialogLine(line_num)

    addChatMessage("В подменю выбрано: " line_text)
    return
}
return

~Enter::
gosub, checkdialogMenu
return

var := TopFuncInTheWorld("Привет МИИР АААААААААААААА")
RegExMatch(var, "^(Прив.*)\s?$", item)
MsgBox, % item1

TopFuncInTheWorld(var) {
    delimiter := StrSplit(var, A_Space)
    for i, k in delimiter
    {
  StringUpper, string, k
  if (string == k) {
   delimiter[i] := ""
  }
  f .= delimiter[i]
    }
    return f
}