#NoEnv
#include samp.ahk
#include cp.ahk
CMD.Register("gt","getinfo")
exit
#IfWinActive GTA:SA:MP
~ESC::
~F6::
menu:=0 ; Обнуляем меню при нажатии ESC и F6
return
F3:: ; Кнопка вызова диалога
menupass:=0
menu:=1
textmenu1=
(
{FFFFFF}1{FD4C00}. {FFFFFF}Посмотреть на часы{FD4C00}.
{FFFFFF}2{FD4C00}. {FFFFFF}Моментом открыть репорт{FD4C00}.
)
ShowDialog("2", "{FD4C00}Helper {FFFFFF}• {FD4C00}Главное меню:", textmenu1,"Отмена")
return

~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
}
if (menu==2) ; Если "menu" равно 2
{
menu:=0 ; деактивирует меню
line:=getDialogLineNumber() ; В переменную "line" будет номер выбранной строки
sleep, 100 ; задержка перед телепортом на метку (можно делать под себя)
Gosub, menu_2_%line% ; переходит на мету выбранного пункта
return
}
return
$~Enter::
;$~Enter:: ; при нажатии на Entrer
if (menu==1) ; Если "menu"равно 1
{
menu:=0 ; деактивирует меню
line:=getDialogLineNumber() ; В переменную "line" будет номер выбранной строки
sleep, 500 ; задержка перед телепортом на метку (можно делать под себя)
Gosub, menu_1_%line% ; переходит на мету выбранного пункта
return
}
if (menu==2) ; Если "menu" равно 2
{
menu:=0 ; деактивирует меню
line:=getDialogLineNumber() ; В переменную "line" будет номер выбранной строки
sleep, 500 ; задержка перед телепортом на метку (можно делать под себя)
Gosub, menu_2_%line% ; переходит на мету выбранного пункта
return
}
return

menu_1_1: ; это Первая строка в 1 диалоге
gravirovka="Brody The Best"
year:=A_YYYY
hour:=A_Hour
min:=A_MIN
day:=A_DD
mm:=A_MM
SendChat("/me нажал на пульт, который на руке и высветился логотип: " gravirovka)
SendChat("/do Высветилась голограмма: " hour ":" min ". Дата: " day "." mm "." year)
time:=3600-min*60
SendChat("/do Под временем в голограмме высветилось время до зарплаты: " time " секунд(ы)")
Sendchat("/c 60")
return
menu_1_2: ; это Вторая строка в 2 диалоге
Sleep, 130
menu:=2
textmenuRP =
(
{FFFFFF}1{FD4C00}. {FFFFFF}Посмотреть на часы{FD4C00}.
{FFFFFF}2{FD4C00}. {FFFFFF}Показать паспорт{FD4C00}.
)
ShowDialog("2", "{FD4C00}Helper {FFFFFF}• {FD4C00}РП отыгровки:", textmenuRP,"Отмена")
return

menu_2_1: ; это Первая строка в 2 диалоге
addChatMessage("Вы выбрали первую строку в диалоге №2")
sendchat("/c 60")
return
menu_2_2:
Sleep, 180
menupass:=1
Showdialog("1", "{FD4C00}Helper by Brody {FFFFFF}• {FD4C00}/pass", "{FFFFFF}Введите ID игрока, кому хотите показать паспорт.`n{FF1515}- Не используйте лишних знаков!`n{46FF1C}- Пример: 228", "Отмена")
input, text, V, {Enter}
SendChat("/me достал паспорт из правого кармана")
Sleep, 1000
SendChat("/do Паспорт синего цвета.")
Sleep, 1000
SendChat("/me приоткрыл паспорт и пролистал странички")
Sleep, 1000
SendChat("/me передал паспорт человеку напротив")
Sleep, 1000
Sendchat("/pass "text)
addChatMessage("{FD4C00}[Hack]: {FFFFFF}ты показал паспорт игроку с " text " {FFFFFF}идом{FD4C00}.")
return
getinfo(pid)
{
if(pid == "")
{
    addChatMessageEx(0xffffff, "Неправильно указан id игрока")
}
else
{
    name := getPlayerNameById(pid)    
    level := getPlayerScoreById(pid)
    ping := getPlayerPingById(pid)
    showDialog(0, "Информация об игроке", "Ник: " name " [id: " pid "]`nУровень: " level "`nПинг: " ping "`n","Закрыть")
}
}
return

#NoEnv
CMD.Register("command1","func1")
CMD.Register("command2","func2")
CMD.Register("command322","func322")
exit
func1() {
AddChatMessage("2")
}
func2() {
AddChatMessage("2")
}
func322() {
AddChatMessage("322")
}