Необходима помощь с AHK

Beck

Известный
Автор темы
19
6
Добрый день, уважаемые форумчане и пользователи форума BlastHack. Мне требуется ваша помощь с написанием АХК, а именно, чтобы при вводе команды, которую мы создаём при написании AHK (/helpers, /pt и тому подобное), можно было вводить значение ID и тогда введённое нами значение ID отображалось в написанных отыгровках.

Пример:

Доброго времени суток, управление полиции Los Santos PD. Офицер Австралия.
/do На груди офицера значок с номером (значение ID).

Я прошу вашей помощи, потому что многие из Вас разбираются в коде программирования АХК лучше, чем я.
 
Решение
AutoHotKey:
#include samp.ahk ; подключаешь samp udf, скачать можно [URL='https://blast.hk/threads/20318/']в этой теме[/URL], необходимо расположить в одной папке со скриптом.
LineResult() {
    if (!isDialogOpen() || getDialogStyle() = 0 || getDialogStyle() = 1 || getDialogStyle() = 3)
    return false
    while (isDialogOpen())
    continue
    if(GetKeyState("Esc", "P"))
    return false
    return getDialogLineNumber()
}
;----------------------------- Action
$~Enter::
if (IsInChat() && !IsDialogOpen()) {
blockChatInput()
Sleep 200
dwAddress := dwSAMP + 0x12D8F8
chatInput := readString(hGTA, dwAddress, 256)
if (RegExMatch(chatInput,"/autosms ([0-9]*)",out))
{
         AntiCrash()
   SendChat("/sms " out1 " Тут твое сообщение") ; out1 - значание которое вы ввели после команды...

degrando

Известный
362
128
AutoHotKey:
#include samp.ahk ; подключаешь samp udf, скачать можно [URL='https://blast.hk/threads/20318/']в этой теме[/URL], необходимо расположить в одной папке со скриптом.
:?:/udo::
id := getId() ; Функция из SampUDF
SendChat("Доброго времени суток, управление полиции Los Santos PD. Офицер Австралия.")
SendChat("/do На груди офицера значок с номером " id ". ")
return
 

Beck

Известный
Автор темы
19
6
AutoHotKey:
#include samp.ahk ; подключаешь samp udf, скачать можно [URL='https://blast.hk/threads/20318/']в этой теме[/URL], необходимо расположить в одной папке со скриптом.
:?:/udo::
id := getId() ; Функция из SampUDF
SendChat("Доброго времени суток, управление полиции Los Santos PD. Офицер Австралия.")
SendChat("/do На груди офицера значок с номером " id ". ")
return
Благодарю тебя. Но есть ещё парочка просьб о помощи. Может быть, темы с помощью АХК я некоторые читал, но они мне казались куда более непонятными. Вообщем, суть заключается в отправке забинденной в АХК сообщения определённому игроку через команду, прописав значения его айди. Можешь привести примеры?
 

degrando

Известный
362
128
Благодарю тебя. Но есть ещё парочка просьб о помощи. Может быть, темы с помощью АХК я некоторые читал, но они мне казались куда более непонятными. Вообщем, суть заключается в отправке забинденной в АХК сообщения определённому игроку через команду, прописав значения его айди. Можешь привести примеры?



AutoHotKey:
#include samp.ahk ; подключаешь samp udf, скачать можно [URL='https://blast.hk/threads/20318/']в этой теме[/URL], необходимо расположить в одной папке со скриптом.
LineResult() {
    if (!isDialogOpen() || getDialogStyle() = 0 || getDialogStyle() = 1 || getDialogStyle() = 3)
    return false
    while (isDialogOpen())
    continue
    if(GetKeyState("Esc", "P"))
    return false
    return getDialogLineNumber()
}
;----------------------------- Action
$~Enter::
if (IsInChat() && !IsDialogOpen()) {
blockChatInput()
Sleep 200
dwAddress := dwSAMP + 0x12D8F8
chatInput := readString(hGTA, dwAddress, 256)
if (RegExMatch(chatInput,"/autosms ([0-9]*)",out))
{
         AntiCrash()
   SendChat("/sms " out1 " Тут твое сообщение") ; out1 - значание которое вы ввели после команды /autosms
}
else {
if (!isDialogOpen() && chatInput != "") {
unBlockChatInput()
SendChat(chatInput)
writeString(hGTA, dwAddress, "")
}
}
}
return
 
  • Нравится
Реакции: Beck

Beck

Известный
Автор темы
19
6
AutoHotKey:
#include samp.ahk ; подключаешь samp udf, скачать можно [URL='https://blast.hk/threads/20318/']в этой теме[/URL], необходимо расположить в одной папке со скриптом.
LineResult() {
    if (!isDialogOpen() || getDialogStyle() = 0 || getDialogStyle() = 1 || getDialogStyle() = 3)
    return false
    while (isDialogOpen())
    continue
    if(GetKeyState("Esc", "P"))
    return false
    return getDialogLineNumber()
}
;----------------------------- Action
$~Enter::
if (IsInChat() && !IsDialogOpen()) {
blockChatInput()
Sleep 200
dwAddress := dwSAMP + 0x12D8F8
chatInput := readString(hGTA, dwAddress, 256)
if (RegExMatch(chatInput,"/autosms ([0-9]*)",out))
{
         AntiCrash()
   SendChat("/sms " out1 " Тут твое сообщение") ; out1 - значание которое вы ввели после команды /autosms
}
else {
if (!isDialogOpen() && chatInput != "") {
unBlockChatInput()
SendChat(chatInput)
writeString(hGTA, dwAddress, "")
}
}
}
return

Благодарю.