checkdialogMenu:
if (isDialogButtonSelected() == 1)   ; Нажимает Enter, тем самым переходит на следующий диалог
{
       SendInput {Enter down}
       sleep 18
       SendInput {Enter up}
       sleep 18
}
else if (isDialogButtonSelected() == 0)
{
    menu := 0
}
ifWinNotActive, GTA:SA:MP
{
    return
}

F3::
menu := 1
sleep 500
AntiCrash()
ShowDialog("2", "Пример диалога", "Пункт 1`nПункт 2", "Выбрать", "Закрыть") ; Добавляем кнопки "Выбрать", "Закрыть"
return

#Persistent
#Include SAMP.ahk
;===========================================================
;C O D E
;===========================================================
SetTimer, report, on
File := % A_MyDocuments "\GTA San Andreas User Files\SAMP\chatlog.txt" ;Чекает чатлог

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

report:
lastline := GetNewLine(File)

if RegExMatch(lastline, "\[A\] (?<admn>.*)_(?<adml>.*)\[.*\]: \/mute (?<id>.*) (?<one>.*) (?<two>.*)", c_)  ; Кнопка вызова диалога
menu:=1
showDialog(2, "Подтвердите выдачу наказания", "1. Подтвердить`n2. Отклонить.", "ОК") ; Диалог
return

~LButton::
if (isDialogOpen()==0)
{
KeyWait, LButton
}
if (A_PriorHotkey <> "~LButton" or A_TimeSincePriorHotkey > 500) ; Проверяем нажато ли два раза ЛКМ за 500мс, если нет ждем второе нажатие и ретурним
{
KeyWait, LButton
return
}
; Если нажато два раза, то делаем то что ниже
if (menu==1) ; Если "menu" равно 1
{
menu:=0 ; деактивирует меню
line:=getDialogLineNumber() ; В переменную "line" будет номер выбранной строки
sleep, 100 ; задержка перед телепортом на метку (можно делать под себя)
Gosub, menu_1_%line% ; переходит на мету выбранного пункта
return
}

menu_1_1: ; это Первая строка в 1 диалоге
    AntiCrash()
    SendChat("/mute " c_id " " c_one " " c_two " • " c_admn " "c_adml)
    return
return
menu_1_2: ; это Вторая строка в 1 диалоге
  AntiCrash()
  addChatMessage("Отмена")
  return
return

;===========================================================
;М У С О Р
;===========================================================

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
}