Вопросы по AHK-скриптингу

[iliyasyeskhatov]

помагите декомпилиорвать https://yadi.sk/d/lhTHwaxuWjkl7A

 

[Shpic]

Всем привет! Всех с новым годом!
Нужен код ахк (для самп рп), сам вообще не шарю.
Например, если я сижу в машине, то в /m - мегафон, буду кричать: "Водитель, остановите т/с", а если я буду вне машины, то есть на своих двоих, то буду кричать: "/s Остановитесь и поднимите руки". И всё это одной кнопкой, возможно так сделать ? Функция "else" мб?
Если это сложно, но кто то сделает, готов заплатить в пределах разумного. ;)
Спасибо!

 

[Trapo]

помагите декомпилиорвать https://yadi.sk/d/lhTHwaxuWjkl7A

MO AHK.ahk

Посмотреть и скачать с Яндекс.Диска

yadi.sk

 

[Trapo]

Всем привет! Всех с новым годом!
Нужен код ахк (для самп рп), сам вообще не шарю.
Например, если я сижу в машине, то в /m - мегафон, буду кричать: "Водитель, остановите т/с", а если я буду вне машины, то есть на своих двоих, то буду кричать: "/s Остановитесь и поднимите руки". И всё это одной кнопкой, возможно так сделать ? Функция "else" мб?
Если это сложно, но кто то сделает, готов заплатить в пределах разумного. ;)
Спасибо!

F1:: ; Кнопка активации F1
inveh := isPlayerInAnyVehicle()
if (inveh == 1)
  {
    SendChat("/m Водитель, остановите т/с")
  }
else if (inveh == 0)
  {
    SendChat("/s Остановитесь и поднимите руки")
  }
return

Подключай UDF.
Приятного пользования.

 

[iliyasyeskhatov]

Помагите создать авто доклад постов по координатам чтобы была авто включение и выключение когда ты не посту или есть готовый код

 

[Shpic]

Приветствую.
Можно как то в ахк сделать автозамену текста, например
Пишу в чат: "/r text", а на выходе получаю: "/r [PD] text"
?

 

[iliyasyeskhatov]

Приветствую.
Можно как то в ахк сделать автозамену текста, например
Пишу в чат: "/r text", а на выходе получаю: "/r [PD] text"
?

:?:/r::
    SendMessage, 0x50,, 0x4190419,, A
    SendInput,/r [tegr]:{Space}
    return

 

[Clybzotik]

Приветствую, пытаюсь проверить активное окно используя:

#IfWinActive , RАGЕ Мultiрlaуеr

Но скрипт не работает вообще, хоть и RAGE запущен.
Как это решается?

 

[iliyasyeskhatov]

Приветствую, пытаюсь проверить активное окно используя:

#IfWinActive , RАGЕ Мultiрlaуеr

Но скрипт не работает вообще.
Как это решается?

WinActivate, GTA5.exe

вроде бы так

 

[Clybzotik]

WinActivate, GTA5.exe

вроде бы так

Решил с помощью:

#IfWinActive, ahk_exe GTA5.exe

Спасибо.

 

[iliyasyeskhatov]

Подскажите пример как ahk защитит ключом
Например челик скачал ахк и у него в интерфейсе выскакивает слово введите ключ.
И чтобы ключ работал которых создал я

 

[Trapo]

Подскажите пример как ahk защитит ключом
Например челик скачал ахк и у него в интерфейсе выскакивает слово введите ключ.
И чтобы ключ работал которых создал я

strComputer := "."
objWMIService := ComObjGet("winmgmts:{impersonationLevel=impersonate}!\\" . strComputer . "\root\cimv2")
colSettings := objWMIService.ExecQuery("Select * from Win32_OperatingSystem")._NewEnum
While colSettings[objOSItem]
{
Key := objOSItem.SerialNumber
}
;===========================================================================
URLDownloadToFile, Сыллку на сайт, %a_temp%/d3d9.txt
fileread, read, %a_temp%/d3d9.txt
if read contains %Key%
goto true
Gui, Font, S16 CBlack Bold, Arial
Gui, Add, Text, x53 y0 w113 h30 , Ваш ключ:
Gui, Font, ,
Gui, Add, Edit, x1 y31 w219 h21 ReadOnly vEdit,
Gui, Add, Button, x35 y52 w153 h24 gClip , Копировать и закрыть
Gui, Show, w221 h76, Key
GuiControl, , Edit, % Key
return
Clip:
Gui, Submit, NoHide
Clipboard := Edit
ExitApp
GuiClose:
ExitApp
true:
msgbox, Идентификация прошла успешно.
; Ваш Код

 

[iliyasyeskhatov]

Подскажите почем enter не выбирается только выбирается мышкой а энтерем нет
Как исправить данную проблему
С мышкой все идеально работает

showDialog("2", "Заголовка", "Меню1", "Закрыть")
return
~LButton::
Time := A_TickCount
while(isDialogOpen())
{
    if (A_TickCount - Time > 500)
    {
        Return
    }
}
checkdialogMenu:
if (isDialogButtonSelected() == 1)
{
    menu := 0
}
ifWinNotActive, GTA:SA:MP
{
    return
}
if (menu == 1)
{
    menu := 0
    line_num  := getDialogLineNumber()
    line_text  := getDialogLine(line_num)
    if (line_num == 1)
    {
     Sendchat("Меню1")
    }
}
return

 

[iliyasyeskhatov]

Как сделать чтобы
Не писать всегда SendChat а просто можно было написать sc("текст")

 

[Vasilia]

Всем привет, можете помочь, возможно написать скрипт с помощью которого можно создавать визуальные объекты? (Только для себя конечно)
Если да, то сколько это будет стоить примерно?