#IfWinActive GTA:SA:MP
SendMode Input
#UseHook
#NoEnv
#SingleInstance force
#Include SAMP.ahk
F2::
if (isInChat())
{
    SendInput {Escape}
}
message := "[R] Пришло новое объявление от"
exception_1 := "FFFFFF"
exception_2 := "-"
showGameText("~g~ON", 1100, 6)
sleep 150
SelectedFile = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
filedelete, %SelectedFile%
fileappend, %SelectedFile%
start:
fileread, read, %SelectedFile%
if GetKeyState("F2" , "P")
{
    goto, off
}
else
if read contains %message%
{
    goto, nice
}
goto, start

nice:
showGameText("~y~Find Massage", 1100, 6)
RegExMatch(read, "\QF}\E(.*)\Q (ID\E", chatname)
sleep 100
SendChat("/edit")

i := 1
checkname:
linetext := getDialogLine(i)
if linetext contains %exception_1%
{
    i += 1
    sleep 50
    goto, checkname
}
else
if linetext contains %exception_2%
{
    i += 1
    sleep 50
    goto, checkname
}
else
if i > 15
{
    goto, off
}
else
if linetext contains %chatname1%
{

    i -= 1
    SendInput {Down %i%}
    sleep 50
    SendInput {Enter}
    goto, off
}
off:
showGameText("~r~OFF", 1100, 6)
filedelete, %SelectedFile%
fileappend, %SelectedFile%
return