GetChatLine(0, chatLine)
addChatMessage(chatLine) пустой

#Include SAMP-UDF-037-R1.ahk
GetChatLine(0, chatLine)
MyFunc() {
    addChatMessage(chatLine)
}
MyFunc()

$F11::
Loop
{
Send {Y down}
Sleep 100
Send {Y up}
Sleep 300
Send {Enter down}
Sleep 100
Send {Enter up}
Sleep 300
}
Return
$F12::Pause

$F11::
Loop
{
Send {vk0x59 down}
Sleep 100
Send {vk0x59 up}
Sleep 300
Send {Enter down}
Sleep 100
Send {Enter up}
Sleep 300
}
Return
$F12::Pause

$F11::
Loop
{
Send {vk0x59}
Sleep 300
Send {Enter down}
Sleep 100
Send {Enter up}
Sleep 300
}
Return
$F12::Pause

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