РЕШЕНО [AHK]Именной тазер для полицейских

Пофиксил критические ошибки предыдущей версии.
Попрошу админов не закрывать тему, ибо так люди не могут голосовать за закрепление(как это случилось в прошлый раз и тема просто утонула, не дождавшись реакции или закрепа). То есть либо оставить тему открытой и увидеть реакцию сообщества, либо сразу закрепить. Спасибо за внимание! Теперь начнем!

Нажимаете Num2, вводите id с клавиатуры, после чего идет идет удар шокером и отыгровка, а в чате указывается имя того, на кого вы надели наручники. Если вдруг не хватило радиуса, не переживайте, просто попытайтесь сблизиться с преступником, скрипт сделает еще 3 попытки тазернуть, после чего вернется в исходное состояние. Примечание: Если вдруг хотите убрать то что скрипт будет еще 3 раза автоматом тазерить, удалите то, что выделено зеленым. Если захотите увеличить число попыток, замените число 3 на нужное вам в строке "If trys <= 3". Если захотите уменьшить/увеличить промежуток времени между ударами шокером при автотазере измените число в строке "sleep, 2000" (не меньше 1000!).

Что ж, успешно обезвредили преступника? Тогда смело нажимаете на Num3 - сразу идет cuff на ранее введенный id (чтобы не сбили оглушение багом), и отыгровка.
Текст скрипта (красным выделены клавиши, оранжевым - отыгровка, которые можете изменить на свои):

checkfile = %A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt
Numpad2::
trys =0
FileDelete %checkfile%
FileAppend %checkfile%
SendMessage, 0x50,, 0x4190419,, A
SendInput, {F6}/tazer{Space}
Input, Plid, V, {enter}
Sleep, 1000
FileRead, info, %checkfile%
metka1:
If info contains Вы ударили электрошокером
{
SendInput, {F6}/id %Plid%{Enter}
sleep, 1000
FileRead, info, %checkfile%
RegExMatch(info, " Игрок (.*)\Q_\E(.*)\Q[\E(.*)\Q]\E\N", pname)
name = %pname1%
family = %pname2%
SendInput, {F6}/me резко вытащил электрошокер и использовал его на %name% %family%{Enter}
}
else
{
If trys <= 3
{
SendInput,{F6}/tazer %Plid%{enter}
sleep, 2000
goto, metka1
trys+=1
}
}
return



Numpad3::
FileDelete %checkfile%
Sendinput, {F6}/cuff %Plid%{Enter}
sleep, 1000
FileRead, info1, %checkfile%
If info contains Вы надели наручники на
{
Sendinput, {F6}/me снял с пояса наручники и надел их на %name% %family%{Enter}
}
return


P.S. Очень редко бывает, что чатлог располагается в другой директории, при этом у вас не будет отображаться имя того, кого тазерите. Чтобы исправить это, просто найдите расположение вашего чатлога(например, введя в поиске файлов слово chatlog), скопируйте путь к нему и в строке "checkfile = %A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt" то, что выделено фиолетовым замените на путь вашего чатлога.

Хотите выразить благодарность, задать вопрос или предложить что- то? Вам в лс группы: https://vk.com/glassyworkshop

 

Сделаю общую тему с вашими скриптами.