to:
Fileread, read, %file%
filedelete, %file%
if RegExMatch(read, "^\[\d+:\d+:\d+\]\s+\< Репорт \> Игрок ([A-z_]+)\[(\d{1,3})\]: \{.*\}(\d{1,3})" , out)
{
    addChatMessage("{00FF00}[AHK] Пришла жалоба с причиной: " out3 ", 1 - ответить или 2 - отказать")
    Loop
    {
  if (getkeystate("0", "P"))
  {
     SendInput, {f6}/pm %out2% Начинаю работать по Вашей жалобе. Приятной игры {enter}
     Sleep 1000
     SendInput, {f6}/re %out3% {enter}
     break
  }
  else
  {
   if (getkeystate("-", "P"))
   {
     addChatMessage("[AHK] Вы отказались от ответа на репорт")
     break
   }
  }
    }
goto, to
return

SetTimer, AutoReport, on

AutoReport:
Fileread, read, %file%
if RegExMatch(read, "\]\s+\< Репорт \> Игрок ([A-z_]+)\[(\d{1,3})\]: \{.*\}(\d{1,3})" , out)
{
    addChatMessage("{00FF00}[AHK] Пришла жалоба с причиной: " out3 ", 1 - ответить или 2 - отказать")
    report := true
    SetTimer, report, 10000 ; Через 10сек автоматически будет отклонено.
    Filedelete, % file
}
return

~vk31::
if (report) {
    SendChat("/pm " out2 " Начинаю работать по Вашей жалобе. Приятной игры")
    ; всякий код.. SendChat("/speak " out3) - к примеру
    report := false
}
return

~vk32::
if (report) {
    addChatMessage("[AHK] Вы отказались от ответа на репорт")
    report := false
}
return

report:
if (report) {
    report := false
}