Вопросы по AHK-скриптингу
- Автор темы gwplayer
- Дата начала
Код:
SetWorkingDir %A_ScriptDir%
#Include samp udf.ahk
#Persistent
blfind:
SendChat("/find")
sleep, 600
a := GetDialogText()
a := RegExReplace(a, "[\s]+")
RegExMatch(a, "Изнихонлайн:(.*)Напау",p)
a1 := p1
a2 := 2
Result := 0
filename := "bl.txt"
ftestt := ""
Loop, %a1%
{
a2 ++
RegExMatch(getDialogLine(a2),"\[([0-9]*)\]",s)
name := getPlayerNameById(s1)
name2 := RegExReplace(name,"_"," ")
FileEncoding, UTF-8
test := 0
Loop, Read, %filename%
{
str := RegExReplace(A_LoopReadLine,"""")
dol := ",(.*?),(.*?),(.*?),(.*?),(.*?),(.*?),(.*?),"
RegExMatch(str,dol,p)
if (p2 == name || p2 == name2)
{
Result ++
test := 1
if (ftestt == "")
ftestt := name
else
ftestt := ", " name
}
}
}
addChatMessageEx(0x4285F4, MvdTitl "Результат проверки /find на ЧС: {ff5c33}" result " в ЧС МВД")
sleep, 300
if (result != 0)
addChatMessageEx(0x4285F4, MvdTitl "Для списка того кто в ЧС МВД введите /bfcheck")
return
bfcheck:
if (ftestt == "")
{
addChatMessageEx(0x4285F4, MvdTitl "Проверка не осуществлена: {ff5c33}/blfind")
return
}
else
{
dial := RegExReplace(ftestt,", ","`n")
sleep, 300
AntiCrash()
ShowDialog("0","" MvdTitl "Список","{ffffff}" dial,"Закрыть")
AntiCrash()
return
}
return
darksoor
Известный
- 678
- 354
Лучше бы помог, а не задавал такие вопросы. Если пролистаешь выше, то человек ему скинул код для проверки финда на ЧС, но он не полный.
Поставь какую-нибудь кнопку или команду перед метками, будет все работать.
darksoor
Известный
- 678
- 354
HURACAN
Известный
- 42
- 3
Код:
!1::
ShowDialog(2, "text","Проверить find на ЧС`nСписок ЧС","Закрыть")
Result := LineResult()
if (!Result)
return
Gosub, chscheck%Result%
return
chscheck1:
sleep 250
SendChat("/find")
sleep, 600
a := GetDialogText()
a := RegExReplace(a, "[\s]+")
RegExMatch(a, "Изнихонлайн:(.*)Напау",p)
a1 := p1
a2 := 2
Result := 0
filename := "bl.txt"
ftestt := ""
Loop, %a1%
{
a2 ++
RegExMatch(getDialogLine(a2),"\[([0-9]*)\]",s)
name := getPlayerNameById(s1)
name2 := RegExReplace(name,"_"," ")
FileEncoding, UTF-8
test := 0
Loop, Read, %filename%
{
str := RegExReplace(A_LoopReadLine,"""")
dol := ",(.*?),(.*?),(.*?),(.*?),(.*?),(.*?),(.*?),"
RegExMatch(str,dol,p)
if (p2 == name || p2 == name2)
{
Result ++
test := 1
if (ftestt == "")
ftestt := name
else
ftestt := ", " name
}
}
}
addChatMessageEx(0x4285F4, MvdTitl "Результат проверки /find на ЧС: {ff5c33}" result " в ЧС МВД")
sleep, 300
if (result != 0)
addChatMessageEx(0x4285F4, MvdTitl "Для списка того кто в ЧС МВД введите /bfcheck")
return
chscheck2:
if (ftestt == "")
{
addChatMessageEx(0x4285F4, MvdTitl "Проверка не осуществлена: {ff5c33}/blfind")
return
}
else
{
dial := RegExReplace(ftestt,", ","`n")
sleep, 300
AntiCrash()
ShowDialog("0","" MvdTitl "Список","{ffffff}" dial,"Закрыть")
AntiCrash()
return
}
returnА как сделать отмену отыгровки? Ну типа что-то не то, нажал допустим 3 и отыгровка отменилась
Мне бы сделать ахк,чтобы каждые 15 мин,включалась команда /usemed,я нашёл 1 такое ахк но я включаю его и у меня пишет типо ошибка,скажие какое ахк скачать
HURACAN
Известный
- 42
- 3
darksoor
Известный
- 678
- 354
Самое простейшее:
AutoHotKey:
F2:: ;активация
Loop
{
SendInput, {F6}/usemed{enter}
Sleep, 900000
}
Return
Cod
Участник
- 117
- 15
Помогите разобраться в одной теме. Я хотел получить через память номер радиостанции, которая сейчас играет, а потом через память её редактировать.
Но я не смог даже нормально получить номер радиостанции, я пробывал много способов, даже типы данных разные ставил. Возможно адресс кривой, взял на этом сайте: Адреса Памяти (SA) — GTAModding.ru(http://gtamodding.ru/wiki/%D0%90%D0%B4%D1%80%D0%B5%D1%81%D0%B0_%D0%9F%D0%B0%D0%BC%D1%8F%D1%82%D0%B8_(SA))
0xBA679A - [byte] ID текущей радиостанции:
Но я не смог даже нормально получить номер радиостанции, я пробывал много способов, даже типы данных разные ставил. Возможно адресс кривой, взял на этом сайте: Адреса Памяти (SA) — GTAModding.ru(http://gtamodding.ru/wiki/%D0%90%D0%B4%D1%80%D0%B5%D1%81%D0%B0_%D0%9F%D0%B0%D0%BC%D1%8F%D1%82%D0%B8_(SA))
0xBA679A - [byte] ID текущей радиостанции:
Напиши мне код через RegExMatch(a, "УровеньРозыска:(.*)Напау",p), что то типо такого как делали ранее.
Код:
Код:
if (chatInput == "/pas") {
my_nick := getUsername()
my_nick := RegExReplace(my_nick, "_", " ")
sendchat("Добрый день, Вас беспокоит " my_nick "")
sleep 1000
sendchat("/do На груди висит жетон МВД.")
sleep 1000
sendchat("Предъявите Ваши документы, уверяю Вас, это обычная проверка.")
addChatMessage("{00CED1}[AHK] {FFFFFF}Скрипт {00CED1}ожидает{00CED1}, {FFFFFF}пока игрок покажет паспорт.")
Loop {
if RegExMatch(getChatLineEx(), "Уровень розыска\:\s(\d)", var)
break
}
if (var1 == 0) {
sleep 1000
sendchat("/me досконально изучил паспорт")
sleep 300
sendchat("/me сообщил диспечеру")
sleep 2000
sendchat("Спасибо за предоставление документов, можете быть свободны.")
} else if (var1 >= 1) {
addChatMessage("{00CED1}[AHK] {FFFFFF}Игрок находится в розыске! Уровень розыска: {00CED1}" var1 ".")
sleep 2000
sendchat("/me получил сообщение от диспетчера о подозреваемом")
sleep 1000
sendchat("Вы находитесь в розыске и я должен Вас задержать. Пройдемте в машину!")
sleep 500
sendchat("В Ваших же интересах сделать это добровольно. В противном случае мы применим силу!")
} else
addChatMessage("{00CED1}[AHK] {FFFFFF}Не удалось определить розыск")
}
HURACAN
Известный
- 42
- 3
Ответил в ЛСНапиши мне код через RegExMatch(a, "УровеньРозыска:(.*)Напау",p), что то типо такого как делали ранее.
Код:
скриншотКод:if (chatInput == "/pas") { my_nick := getUsername() my_nick := RegExReplace(my_nick, "_", " ") sendchat("Добрый день, Вас беспокоит " my_nick "") sleep 1000 sendchat("/do На груди висит жетон МВД.") sleep 1000 sendchat("Предъявите Ваши документы, уверяю Вас, это обычная проверка.") addChatMessage("{00CED1}[AHK] {FFFFFF}Скрипт {00CED1}ожидает{00CED1}, {FFFFFF}пока игрок покажет паспорт.") Loop { if RegExMatch(getChatLineEx(), "Уровень розыска\:\s(\d)", var) break } if (var1 == 0) { sleep 1000 sendchat("/me досконально изучил паспорт") sleep 300 sendchat("/me сообщил диспечеру") sleep 2000 sendchat("Спасибо за предоставление документов, можете быть свободны.") } else if (var1 >= 1) { addChatMessage("{00CED1}[AHK] {FFFFFF}Игрок находится в розыске! Уровень розыска: {00CED1}" var1 ".") sleep 2000 sendchat("/me получил сообщение от диспетчера о подозреваемом") sleep 1000 sendchat("Вы находитесь в розыске и я должен Вас задержать. Пройдемте в машину!") sleep 500 sendchat("В Ваших же интересах сделать это добровольно. В противном случае мы применим силу!") } else addChatMessage("{00CED1}[AHK] {FFFFFF}Не удалось определить розыск") }
Последнее редактирование:
Ребят, подскажите, пожалуйста, с помощью АХК можно вообще перемещаться по заданным координатам или нет? В SAMP UDF я нашел только проверку координат, но не могу найти как же двигаться по заданным координатам?
